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

Помогите настроить скрипт на мининг.
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8212		 Page 1 of 1
Author:  covenok [ 2006-07-12 15:21:24 ]
Post subject:  Помогите настроить скрипт на мининг.
Вобщем у нас на серваке ввели такую фичю что под собой копать незя. Как здесь исправить чтоб он копал на 1 клетку в сторону? левее правее сзади, не важно.
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("1340",STR(UO.GetX()),STR(UO.GetY()),"0") 
   UO.UseType("0x0E85") 
   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:  omi4 [ 2006-07-12 15:27:00 ]
Post subject: 
Code:
UO.WaitTargetTile("1340",STR(UO.GetX()+1),STR(UO.GetY()+1),"0")


админ у вас гений, типа баг закрыл...
Author:  covenok [ 2006-07-12 15:31:46 ]
Post subject: 
спасибо, сам разобрался после того как написал :) Незнаю чаво он там закрыл, но тупость какая-то.
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/