Page 1 of 1

как прописать рекол?

Posted: 2005-09-12 23:44:08
by Smedique
ребята помогите кто может, плиз!
Я написал себе скрипт на мининг(чтоб он ходил и рыл пока не наберется полный вес) только вот незнаю как пишется цикл на рекол... :(
Раскажите пожалуста по подробнее(ну и чуть с описанием) и превидите пример скрипта. допустим чтоб выполнялса рекол (дом) сброс руды в сундук и рекол (шахта).оформить его до ума я смогу, вот только вся запара в том что я никогда не работал с реколам в инже и даже незнаю как его там вызвать! вот

P.S. заранее спаиба...

Re: как прописать рекол?

Posted: 2005-09-13 05:35:47
by Don SpiL
Smedique wrote:ребята помогите кто может, плиз!
Я написал себе скрипт на мининг(чтоб он ходил и рыл пока не наберется полный вес) только вот незнаю как пишется цикл на рекол... :(
Раскажите пожалуста по подробнее(ну и чуть с описанием) и превидите пример скрипта. допустим чтоб выполнялса рекол (дом) сброс руды в сундук и рекол (шахта).оформить его до ума я смогу, вот только вся запара в том что я никогда не работал с реколам в инже и даже незнаю как его там вызвать! вот

P.S. заранее спаиба...

Ты меня конечно прости!Но если ты неможешь ДАЖЕ реколл написать то за мининг тебе помоему еще рано.Попробуем помочь......

Вот смотри для начала тебе универсальный саб рекола.

Code: Select all

Sub Recall(Num) 
VAR myx, myy,Tim
VAR Cliloc="сообщение о физле "
VAR Cliloc2="сообщение о перегрузе"
VAR recOk = false

IF Uo.waiting() then #Сбрасываем лишние таргеты
   Uo.canceltarget()
   wait(200)
End IF
myx=Uo.getx() #определяем свои координаты
myy=Uo.gety()
Uo.deletejournal() #Чистим журнальчик
wait(300)
REPEAT
Uo.waittargetobject(NUM)
if uo.count("0x1f4c")>0 then #Проверяем есть ли скролы,если нет то по книге
              Uo.usetype("0x1f4c")
              Tim = Uo.Timer()
else
              Uo.cast("Recall")
              Tim = Uo.Timer()
end if
REPEAT                       
     wait(100)                 
UNTIL (Uo.Timer()-Tim) > 50 or myx<>Uo.getx() or myy<>Uo.gety() or Uo.InJournal(Cliloc) #Ждем результатов каста
IF myx<>Uo.getx() or myy<>Uo.gety()  Then #проверяем,успешно или нет
recOk = True
else
  IF Uo.InJournal(Cliloc2) then
     Uo.findtype(Ore)  #Сбрасываем руду при перегрузе
     Uo.moveitem("finditem","1","ground")
     wait(500)
  End IF
EndIF
UNTIL recOk
End Sub


Теперь собственно ты можешь вызвать этот саб для рекола следущим образом.

Code: Select all

Recall(Num) 
где num это то куда нада реколиться!
Например!
Ты добавил в обекты две руны (к шахте и к дому) под именами RecHOME и RecMining.
Чтобы среколиться к шахте вызываешь саб рекола так

Code: Select all

Recall(RecMining) 

и аналогично к дому.

Code: Select all

Recall(RecHome) 


8) 8) 8)

Posted: 2005-09-13 07:55:52
by SerrouS
Don SpiL не обижай человека, у него грамотный позыв - не клянчить а разбираться, нынче это редкость. :wink:

Я вот например тоже не знаю как реколл писать - просто рунок и рунбуки нет. Я не могу реколл написать, но других скриптов у меня много. Вот :!:

Posted: 2005-09-13 09:27:18
by Don SpiL
SerrouS wrote:Don SpiL не обижай человека, у него грамотный позыв - не клянчить а разбираться, нынче это редкость. :wink:

Я вот например тоже не знаю как реколл писать - просто рунок и рунбуки нет. Я не могу реколл написать, но других скриптов у меня много. Вот :!:

Ффф..яж написал что без обид!! Просто настроение с утра дерьмовое было ((
Да и ответил собсна только потому что чел хочет разбираться а не халявничать! Таким типам типа "пришлите мне на мыло скрипт на супер мининг " я вообще не отвечаю кроме как шуткой.

С Уважением...........

Posted: 2005-09-15 12:09:52
by Smedique
Большое спасибо за помощь!!!!... :D