Yoko :: Помогите подправить. Снова мининг

Yoko http://forum.yoko.com.ua/

Помогите подправить. Снова мининг http://forum.yoko.com.ua/viewtopic.php?f=20&t=8251	Page 1 of 1

Author:

covenok [ 2006-07-17 01:04:47 ]

Post subject:

Помогите подправить. Снова мининг

Можно ли сюда добавить, чтоб при выкапке определённой руды он шел дальше, а не докапывал точку?

Code:

sub mine_spot() 
   var maxMineTime=30000 
   var times=0 
   var timeout=0 
while not UO.Hidden() 
UO.Warmode("0") 
uo.print("Прячемся...") 
UO.UseSkill("Hiding") 
wait(4000) 
wend
   While UO.InJournal("Нет")==0
   UO.Print("Mining time!") 
   UO.DeleteJournal() 

   UO.WaitTargetTile("1339",STR(UO.GetX()+1),STR(UO.GetY()),"0") 
   UO.UseType("0x0F39") 
   timeout=0 
   times = times +1 
   if times>20 then 
      wait(maxMineTime) 
      times = 0 
   endif 
   Repeat 
      timeout=timeout+200 
      Wait(200) 
      #UO.Print("Waiting...") 
      Until UO.InJournal("положили") OR UO.InJournal("You loosen") OR UO.InJournal("Нет") OR timeout>maxMineTime 
   Wend 

   return 0 
end sub

Author:	Nmy [ 2006-07-17 02:44:36 ]
Post subject:
Code: Until UO.InJournal("положили\|Нет\|You loosen\|Iron\|Rusty\|Crystal\|Aqua\|Vulcan\|Marganece\|Cooper")

Author:	covenok [ 2006-07-17 03:10:14 ]
Post subject:
Интересно и как это поможет?

Author:	Adrenalinium [ 2006-08-07 19:47:08 ]
Post subject:
инжект прочитает ети строки и пайдёт дальше (как я понял)

Author:	no_t1m3 [ 2006-08-08 10:45:07 ]
Post subject:	Mining
sub main() var x,y,where_x,where_y,waits, coords , resources_count, times_dig=0, ore='0x19b9',goldsand='0x0eed', fishstake='0x097b',pickaxe='0x0e85',hammerpick='0x #wait(1000) #until uo.hidden 143c', shovel='0x0f39', dagger='0x0f51',clay='0x1be9' while uo.weight<60000 x=-2 while x<=2 y=-2 while y<=2 while not UO.Hidden() UO.Warmode("0") uo.print("no_t1m3@mail.ru (c)2006") UO.UseSkill("Hiding") wait(6000) wend where_x=uo.getx() where_y=uo.gety() resources_count=uo.count(ore)+uo.count(goldsand)+uo.count(clay) coords="waittargettile "+"0 "+str(where_x+x)+" "+str(where_y+y)+" 0" uo.exec(coords) if uo.count(pickaxe)>0 then uo.usetype(pickaxe) else if uo.count(hammerpick)>0 then uo.usetype(hammerpick) else if uo.count(shovel)>0 then uo.usetype(shovel) else while (uo.count(pickaxe)+ uo.count(shovel)+uo.count(hammerpick)<1) uo.waittargettype(dagger) uo.useskill('Arms Lore') wait(10000) wend endif endif endif ###uo.print(coords); - for debug - prints calculated coordinates in command line waits=0 repeat wait(1000) waits=waits+1 until resources_count<>(uo.count(ore)+uo.count(goldsand)+uo.count(clay)) or waits>6 if (uo.count(ore)+uo.count(goldsand)+uo.count(clay))==resources_count then y=y+1 endif times_dig=times_dig+1 if times_dig>20 then if uo.count(fishstake)>0 then uo.usetype(fishstake) endif times_dig=0 endif wend x=x+1 wend wend end sub Vot tak mining nada delat sorry za latin!

Page 1 of 1	All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/