Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

Прямая связь с администрацией по скайпу: gods.dragon
@  fr33 : (17 April 2024 - 11:16) gm pashol v mu igrac
@  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% и вроде как я поправил это.

Photo

Regu Scr.


  • Please log in to reply
8 replies to this topic

#1 Huliganka2

Huliganka2

    Novice

  • Members
  • 35 posts

Posted 21 January 2011 - 18:46

Sveiki.
Vajag skriptu, kurš pats pērk regus un teleportējās uz nākošo veikalu pie nākošā pārdevēja.Utt...
Meklēju šeit, bet neko jēdzīgu neatreadu :(
Uz EasyUO
BMWPower

#2 Huliganka2

Huliganka2

    Novice

  • Members
  • 35 posts

Posted 21 January 2011 - 19:19

Atradu šādu scr. Pasakiet, kas man šeit ir jaizmaina, lai es lidotu uz visiem shopiem un pirktu regus.
Variet ielikt kādu citu scr. kurš iet vai arī man palīdzēt atrisināt problēmu.
set %runebook IWZZJMD es nomainiju, bet man rādās šāds tekts-Nav Runebooka.Paarbaudi, vai esi uzstaadiijis taa ID jeb arii vai tas atrodas tavaa backpackaa.
Kpc viņš rādās?
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;autoreagentsbuyer by keidzhii;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;setup;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
set %runebook IWZZJMD;;;;;;;;;;;;;;;;;;;;;
set %regi JUF_KUF_PZF_MZF_MMF_LZF_WZF_JZF;;;;;;
set %bag ZCXGLMD;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
mainloop:
gosub Britain1stMageShop
gosub Britain2ndMageShop
gosub NujelMageShop
gosub Unload
gosub TakeRegsForRecalling
gosub YewMage
gosub SerpentMage
gosub OccloMage1
gosub Wind3rdMageShop
gosub OccloMage2
gosub JhelomMage
gosub Unload
gosub TakeRegsForRecalling
gosub SkarabraeMage
gosub Wind2ndMageShop
gosub Unload
gosub TakeRegsforRecalling
gosub WaitUntilNextCircle
goto mainloop
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub Britain1stMageShop
set %click1 266
set %click2 388
set %click3 279
set %click4 349
set %number 1
gosub Click&Fly
Gosub Buy DHIAC Daren
Gosub Buy VDIAC Delbin
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub Britain2ndMageShop
set %click1 266
set %click2 388
set %click3 445
set %click4 350
set %number 1
gosub Click&Fly
Gosub Buy UAIAC Vesta
Gosub Buy CUHAC Missy
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub NujelMageShop
set %click1 300
set %click2 385
set %click3 281
set %click4 352
set %number 2
gosub Click&Fly
gosub Buy TBVZB Bronson
gosub Buy PBVZB Leo
gosub Buy DDVZB Genevieve
gosub Buy KCVZB Chuck
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub YewMage
set %click1 300
set %click2 385
set %click3 445
set %click4 350
set %number 2
gosub Click&Fly
gosub Buy UYKZB Mandy
Gosub Buy ZXKZB Berit
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub SerpentMage
set %click1 334
set %click2 387
set %click3 287
set %click4 352
set %number 3
gosub Click&Fly
gosub Buy KGRZB Stacey
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub OccloMage1
set %click1 334
set %click2 387
set %click3 450
set %click4 347
set %number 3
gosub Click&Fly
gosub Buy DDWZB Gaylord
gosub Buy DEWZB Buck
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub OccloMage2
set %click1 370
set %click2 386
set %click3 280
set %click4 344
set %number 4
gosub Click&Fly
gosub Buy KWVZB Delmore
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub MoonglowMage1
set %click1 370
set %click2 386
set %click3 449
set %click4 345
set %number 4
gosub Click&Fly
gosub Buy BXZZB Nediva
gosub Buy ZPZZB Eden
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub MoonglowMage2
set %click1 434
set %click2 386
set %click3 282
set %click4 350
set %number 5
gosub Click&Fly
gosub Buy MVXZB Esmeralda
gosub Buy HKXZB Alaina
gosub Buy NUXZB Bancroft
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub JhelomMage
set %click1 434
set %click2 386
set %click3 450
set %click4 349
set %number 5
gosub Click&Fly
gosub Buy RUSZB Quincy
gosub Buy ARSZB Jonah
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub SkarabraeMage
set %click1 467
set %click2 387
set %click3 279
set %click4 350
set %number 6
gosub Click&Fly
gosub Buy VXLZB Virgil
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub Wind1stMageShop
set %click1 467
set %click2 387
set %click3 446
set %click4 348
set %number 6
gosub Click&Fly
gosub Buy SJIAC Banning
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub Wind2ndMageShop
set %click1 499
set %click2 384
set %click3 280
set %click4 352
set %number 7
gosub Click&Fly
gosub Buy LBKAC Matrika
gosub Buy RBJZB Volf
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
sub Wind3rdMageShop
set %click1 499
set %click2 384
set %click3 445
set %click4 350
set %number 7
gosub Click&Fly
gosub Buy LOMZB Berk
gosub Buy XZIZB Ingrid
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub OpenRunebook
repeat:
{
Finditem %Runebook C_ , #backpackid
if #findkind = -1
{
Display ok Nav Runebooka.Paarbaudi, vai esi uzstaadiijis taa ID jeb arii vai tas atrodas tavaa backpackaa.
halt
}
Set #lobjectid #findid
Event Macro 17 0
wait 4
}
Until #ContSize = 577_426
Return
;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub Click&Fly
set %success #false
set %GlobalTimer #sCnt + 60
repeat
{
set %tries 0
repeat
{
set %tries %tries + 1
Gosub OpenRunebook
}
until %tries > 5 || #contsize = 577_426; runebook gump

if #contsize = 577_426
{
Click %click1 %click2
set %tries 0
_WaitForRunebookGump:
If #contName <> generic_gump && #contsize <> 577_426
{
Wait 1
set %tries %tries + 1
if %tries < 5
Goto _WaitForRunebookGump
}
if %Number = 1
set %contsize 604_426
if %Number = 2
set %contsize 577_426
if %Number = 3
set %contsize 577_426
if %Number = 4
set %contsize 599_426
if %Number = 5
set %contsize 579_426
if %Number = 6
set %contsize 585_426
if %Number = 7
set %contsize 577_426
if %Number = 8
set %contsize 577_426
If #contName = generic_gump && #contsize = %contsize
{
set %OldCharX #charposX
set %OldCharY #charposY
set %tries 0
repeat
{
set %tries %tries + 1
Click %click3 %click4
set %timerWait #sCnt + 10
repeat
{
wait 1
}
until %OldCharX <> #charposX || %OldCharY <> #charposY || #scnt > %timerwait
}
until ( %OldCharX <> #charposX || %OldCharY <> #charposY ) || %tries > 5
if %OldCharX <> #charposX || %OldCharY <> #charposY
{
set %success #true
}
}
}
}
until #scnt > %GlobalTimer || %success = #true
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub Buy
set %weight #weight
for %i 1 3
{
finditem %1
if #findkind = -1
return
event pathfind #findx #findy
wait 2s
msg ,buy regi %2 $
wait 5
if %weight <> #weight
{
wait 1s
msg Thank You %2 !$
break
}
wait 4
}
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub Unload
gosub OpenRunebook
set %click1 537
set %click2 384
set %click3 283
set %click4 352
set %number 8
Gosub Click&Fly
gosub RunTo 2478 80
event macro 12
gosub RunTo 2478 83
event macro 12
repeat
{
finditem %bag G_3
set #lobjectid #findid
event macro 17 0
wait 40
}
Until #contName = container_gump && #Contsize = 176_194
Contpos 0 0
wait 1s
repeat
{
finditem %regi C_ , #backpackid
if #findcnt > 0
{
exevent drag #findid #findstack
wait 5
exevent dropc #contid
wait 5
repeat
{
finditem #findid C_ , #backpackid
wait 1
}
until #findkind = -1
}
finditem %regi C_ , #backpackid
wait 1
}
until #findkind = -1
return
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Sub TakeRegsForRecalling
repeat
{
finditem %bag G_2
set #lobjectid #findid
event macro 17 0
wait 2
}
Until #contName = container_gump && #contsize = 176_194
Contpos 0 0
event Sysmessage Njemam regus priekjsh recalloshanaas...
wait 1s
Finditem KUF C_ , #ContID
if #findkind = -1
HALT
Exevent drag #findid 10
wait 1s
Exevent Dropc #backpackid
wait 1s
set %overtime #scnt + 15
set %WaitResult #false
repeat
{
finditem KUF C_ , #backpackid
wait 5
if #scnt > %overtime
{
Finditem KUF C_ , #ContID
if #findkind = -1
HALT
Exevent drag #findid 10
wait 1s
Exevent Dropc #backpackid
wait 1s
set %WaitResult #True
}
}
until #findkind <> -1 || %WaitResult = #True
Finditem JUF C_ , #ContID
if #findkind = -1
HALT
Exevent drag #findid 10
wait 1s
Exevent Dropc #backpackid
wait 1s
set %overtime #scnt + 15
set %WaitResult #false
repeat
{
finditem JUF C_ , #backpackid
wait 5
if #scnt > %overtime
{
Finditem JUF C_ , #ContID
if #findkind = -1
HALT
Exevent drag #findid 10
wait 1s
Exevent Dropc #backpackid
wait 1s
set %WaitResult #True
}
}
until #findkind <> -1 || %WaitResult = #True
Finditem MZF C_ , #ContID
if #findkind = -1
HALT
Exevent drag #findid 10
wait 1s
Exevent Dropc #backpackid
wait 1s
set %overtime #scnt + 15
set %WaitResult #false
repeat
{
finditem MZF C_ , #backpackid
wait 5
if #scnt > %overtime
{
Finditem MZF C_ , #ContID
if #findkind = -1
HALT
Exevent drag #findid 10
wait 1s
Exevent Dropc #backpackid
wait 1s
set %WaitResult #True
}
}
until #findkind <> -1 || %WaitResult = #True
event macro 13 46
wait 20s
return

sub runTo
repeat
{
move %1 %2 0 10s
}
until #charPosX = %1 && #charPosY = %2
return

sub WaitUntilNextCircle
event macro 13 21
wait 250s
return
BMWPower

#3 ExTjUtY

ExTjUtY

    *Riebīgais

  • Members
  • 3928 posts
  • Gender:Male
  • Location:Miami

Posted 21 January 2011 - 20:49

Te atstarpes saliec pec ID lai semikols nebutu kopā ar ID!!
set %runebook IWZZJMD;;;;;;;;;;;;;;;;;;;;;

set %regi JUF_KUF_PZF_MZF_MMF_LZF_WZF_JZF;;;;;;

set %bag ZCXGLMD;;;;;;;;;;;;;;;;;;;;;;;;;;;


sub Britain1stMageShop

set %click1 266

set %click2 388

set %click3 279

set %click4 349

set %number 1

gosub Click&Fly

Gosub Buy DHIAC Daren

Gosub Buy VDIAC Delbin

return

Gosub Buy DHIAC Daren

Gosub Buy VDIAC Delbin


Un te kur tev vajadzēs salikt vendoru ID un vārus pie kuriem viņš lidos!
Posted Image
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.

#4 Huliganka2

Huliganka2

    Novice

  • Members
  • 35 posts

Posted 21 January 2011 - 21:56

Paldies Extjuty. Tgt teleportējās, bet kā, lai uzliek id, lai viņš man pirktu tos itemus kurus man vajag.
Cik es saprotu, tad jānomaina ir šeit- set %regi JUF_KUF_PZF_MZF_MMF_LZF_WZF_JZF šie nosaukimi, ja? Kā lai to izdara?
Un Exjtjuti, vai tam vendoriem ID un vārds arī ir jānomaina, ja skriptā ir tādi paši vārdi kā vendoram spēlē?
Un tad, kā lai nomaina vendoram ID? ķipa tas #LABJECTID ir tas ID?
Varbūt pat kādam ir šitais scr gatavs, kur tikai jāsaliek man runebūkā rūnām nosaukumi un viss aizies?
BMWPower

#5 electric1993

electric1993

    Novice Player

  • Members
  • 128 posts

Posted 21 January 2011 - 22:52

Paldies Extjuty. Tgt teleportējās, bet kā, lai uzliek id, lai viņš man pirktu tos itemus kurus man vajag.
Cik es saprotu, tad jānomaina ir šeit- set %regi JUF_KUF_PZF_MZF_MMF_LZF_WZF_JZF šie nosaukimi, ja? Kā lai to izdara?
Un Exjtjuti, vai tam vendoriem ID un vārds arī ir jānomaina, ja skriptā ir tādi paši vārdi kā vendoram spēlē?
Un tad, kā lai nomaina vendoram ID? ķipa tas #LABJECTID ir tas ID?
Varbūt pat kādam ir šitais scr gatavs, kur tikai jāsaliek man runebūkā rūnām nosaukumi un viss aizies?

Ganjau ka ir ,bet šaubos vai dos..

#6 Huliganka2

Huliganka2

    Novice

  • Members
  • 35 posts

Posted 21 January 2011 - 23:14

Ganjau ka ir ,bet šaubos vai dos..

Nedodiet :D
Bet palīdziet šito pašu scr. palaist pie dzīvības.
Problēma:
*Runebook ID uzliku, pats scr atrod runebook. Viņš atver runebok, tad atver sadaļu, kur var izmest chargu ārā,izmantot teleportu, (ceru ka sapratāt) Un vairāk nekas nenotiek.
-Kas tur jānomaina, lai biņš teleportētos pa rūnām?
*Tālāk, man interesē kas ir šis te:
set %click1 266
set %click2 388
set %click3 279
set %click4 349
*Šitā sadaļā, vendora vārds ir vienāds ar spēlē esošo vendoru. Tur lkm nekas nav jāmaina?
sub Britain1stMageShop
set %click1 266
set %click2 388
set %click3 279
set %click4 349
set %number 1
gosub Click&Fly
Gosub Buy DHIAC Daren
Gosub Buy VDIAC Delbin
return
BMWPower

#7 Huliganka2

Huliganka2

    Novice

  • Members
  • 35 posts

Posted 22 January 2011 - 00:31

Labāk kāds, kas vel pa šo lietu iedodiet lūdzu savu skyp niku un palaidīsim šito scr kopā!
BMWPower

#8 ExTjUtY

ExTjUtY

    *Riebīgais

  • Members
  • 3928 posts
  • Gender:Male
  • Location:Miami

Posted 22 January 2011 - 00:36

Uzraksti man Breikers6
Posted Image
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.

#9 Huliganka2

Huliganka2

    Novice

  • Members
  • 35 posts

Posted 22 January 2011 - 12:04

CLOSE!
BMWPower




0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users