Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  Pablo : (15 March 2024 - 21:12) Sell regs from pandora box.
@  Pablo : (15 March 2024 - 21:11) Sell paralyze and poison necklaces 100k 1 piece.
@  fr33 : (11 March 2024 - 16:38) blee gm zb atdai bank
@  GM SOLAR : (10 March 2024 - 17:24) ОпЯТь лаГГи ! ! !
@  Pablo : (06 March 2024 - 17:48) Labākais hot ko esmu jebkad paņēmis :D
@  Senseless : (05 March 2024 - 09:42) Opatj ataki na server powli :(
@  Pablo : (03 March 2024 - 19:19) Riebiigais
@  Ganjakur : (03 March 2024 - 15:10) kāds niks mp?
@  Pablo : (02 March 2024 - 21:31) Var kāds iedot 40 kk priekš 11 lvl ?
@  Senseless : (02 March 2024 - 18:12) bratva estj u kogo script na ckerika na lamber ?
@  GM SOLAR : (02 March 2024 - 16:44) ALL GO NA CTF ! ! ! ! !
@  Ganjakur : (01 March 2024 - 17:32) labi
@  Pablo : (29 February 2024 - 12:08) Eu džeki, tie kuri vairāk nespēlē ultimu, varat droši man uzdāvināt savus itemus, vai pat savus acc. droši rakstam man privāti. Es vismaz uzturēšu šo serveri pie dzīvības :D
@  fr33 : (29 February 2024 - 09:45) yes
@  EmmaSb : (28 February 2024 - 21:00) Easyuo still working ?
@  Artemy Shan : (18 February 2024 - 20:42) Еще один фикс поставил. Смотрим, тестируем.
@  jurasiks : (18 February 2024 - 20:04) da pipec tu, zdelal on
@  Senseless : (17 February 2024 - 19:17) Lagi powli opatj
@  Artemy Shan : (17 February 2024 - 12:36) Мне удалось повторить действия, которые делал этот пиздюк, чтобы нагружать процессор сервера на 100% и вроде как я поправил это.
@  Artemy Shan : (13 February 2024 - 02:44) Сменился айпи для входа в игру. Теперь заходим через: loginserver=login.oldp.net,2593 или loginserver=91.121.232.151,2593

Photo

Metam Regus/Trappedus Vienā Maisā


  • Please log in to reply
6 replies to this topic

#1 beilijs

beilijs

    Novice Player

  • Members
  • 145 posts
  • Gender:Male
  • Location:LV

Posted 16 May 2009 - 23:11

Neesmu iisti drosh, vai jau shaads skripts nav te bijis, bet nu whatever.
Ja nu kaadam nepatiik muuzhiigie puspilnie regu maisi, jeb arii kaads negrib sviest tos veejaa, bet veel savaakt tos regus, kas tajos palicis, tad luudzu skriptinjsh:

set %bloodmoss JUF

set %mandrakeroot MZF

set %sulfuriousash SZF

set %spiderssilk RZF

set %nightshade WZF

set %ginseng JZF

set %garlic KZF

set %blackpearls KUF



gosub setup

gosub moving regs

ignoreitem reset

event sysmessage gatavs!

halt



sub setup

event macro 13 1

event macro 25

 repeat

  {

   wait 10

	}

 until #targcurs = 0

set %receivingcontainer #ltargetid

finditem %receivingcontainer C_ , #backpackid

ignoreitem #findid

return



sub moving regs

repeat

{

finditem CKF C_ , #backpackid

set #lobjectid #findid

event macro 17

 waitforgump:

  {

  if #contsize <> 176_194

   {

	goto waitforgump

   }

   wait 4

  }

gosub moveregs

wait 5

finditem CKF C_ , #backpackid

}

until #findcnt = 0

return



sub moveregs

finditem %bloodmoss C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %spiderssilk C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %mandrakeroot C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %ginseng C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %garlic C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %blackpearls C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %sulfuriousash C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

finditem %nightshade C_ , #contid

if #findkind = 0

{

exevent drag #findid #findstack

wait 5

exevent dropc %receivingcontainer

wait 5

}

wait 1s

finditem #lobjectid C_ , #backpackid

exevent drag #findid #findstack

wait 5

exevent dropg #charposx #charposy #charposz

wait 5

ignoreitem #findid

return

Tagad mazliet paskaidroshu :
Tad, kad paraadas targets, jaanoraada uz to maisinju charactera sominjaa, kuraa gribat samest visus regus. ( tas var buut trapeds,laade,bekpeks utt. )
Kad no viena maisinja regi tiek izvaakti, tas tiek izmests pie kaajaam (tas taa lai nebuutu peectam vinji veel jaamet aaraa).
Un tas arii viss. Nav jau patiesiibaa diezko noderiiga shtelle, bet man vienmeer apniik izvaakt visus regus ar rokaam. :cool2:

#2 beilijs

beilijs

    Novice Player

  • Members
  • 145 posts
  • Gender:Male
  • Location:LV

Posted 17 May 2009 - 12:28

Man pasham massmoovs vairs nestraadaa, paaris lietas tikai paarmet un raksta cant pick up item. Dll`s man no oldp.net.

Ja bloodmossa vietaa ieliksi, tad jau nekas nesanaaks, jo vinjsh meklees trapedus maisos. uz aatro kko uzrakstiishu:

;;;;;;;;; Author : Beilijs;;;;;;;;;;

gosub setup

gosub movetrapeds

event sysmessage viss bumbaas!

halt





sub setup

event macro 13 1

event macro 25

repeat

  {

   wait 10

	}

until #targcurs = 0

set %receivingcontainer #ltargetid

return



sub movetrapeds

finditem IUD C_ , #backpackid

 if #findcnt > 0

  {

   repeat

	{

	 exevent drag #findid

	 wait 3

	 exevent dropc %receivingcontainer

	 wait 3

	 finditem IUD C_ , #backpackid

	}

   until #findcnt = 0

  }

return

Taargetojam uz taa kontainera, kuraa gribam visu samest.

#3 EnFlame

EnFlame

    Thief of Horses

  • Members
  • 2041 posts
  • Gender:Male
  • Location:Беломорканал
  • Interests:A bit of this &amp; a bit of that.

Posted 17 May 2009 - 14:47

Move Regs:
set %dropBag #false; #true - nomet tuksho maisu, #false - nee





set #targcurs 0

display ok From?

set #targcurs 1

while #targcurs = 1

wait 1

set %from #ltargetid

display ok To?

set #targcurs 1

while #targcurs = 1

wait 1

set %to #ltargetid

set #lobjectid %from

event macro 17

while #contid <> %from

wait 1

set %regs KZF_SZF_JUF_MZF_JZF_RZF_WZF_KUF

repeat

{

finditem %regs C_ , %from

if #findcnt >= 1

 {

 exevent drag #findid #findstack

 exevent dropc %to

 wait 20

 }

finditem %regs C_ , %from

}

until #findcnt = 0

if %dropBag

(

exevent drag %from

exevent dropg #charposx #charposy #charposz

wait 10

}

event sysmessage Done.

halt

Move Trappeds:
set #targcurs 0

display ok Move trappeds to:

set #targcurs 1

while #targcurs = 1

wait 1

set %to #ltargetid

repeat

{

finditem IUD C_ , #backpackid

if #findcnt >= 1

 {

 exevent drag #findid #findstack

 exevent dropc %to

 wait 10

 }

finditem IUD C_ , #backpackid

}

until #findcnt = 0

event sysmessage Done.

halt

Principā tas pats vien ir, bet nu... :)

#4 mczii

mczii

    Player

  • Members
  • 285 posts
  • Gender:Male
  • Location:My location is Britania Teritory.
  • Interests:My interests are artifact`s and Girl`s :)

Posted 06 November 2010 - 23:20

nestrada :o
Unique archers 1lvl ( zilais cilvecins) :)))

#5 keidzhii

keidzhii

    Player

  • Members
  • 207 posts

Posted 06 November 2010 - 23:52

nestrada :o

kuru skriptu tu lieto ? + paspaidot F7, kur iestreegst ?

#6 Tadeus

Tadeus

    Advanced Player

  • Members
  • 360 posts
  • Gender:Male
  • Location:Jelgava
  • Interests:Tomis 5 Level Clerik

Posted 04 November 2013 - 14:44

Palidziet ar scriptu , regu maisi pa pilno bt scripts nestrada



#7 vinnie

vinnie

    Player

  • Members
  • 162 posts
  • Gender:Male

Posted 04 November 2013 - 18:07

izdzees tukshaas rindas kodaa!






0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users