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

Помогите
http://forum.yoko.com.ua/viewtopic.php?f=17&t=12628		 Page 1 of 1
Author:  Zayats [ 2007-10-16 17:09:45 ]
Post subject:  Помогите
Этот скрипт для того чтобы ресать зверей в радеусе 2х клеток ели они там есть.... помоги исправить.. немоогу разобраться почему он использует только первое животное из масива, а вот на второе третье даже непроверяет ((( Что нетак?
Author:  Scripts Writer [ 2007-10-16 17:12:57 ]
Post subject: 
Code:
sub res() 
Dim Regs[3] 
Regs[0] = '0x007A' 
Regs[1] = '0x0084' 
Regs[2] = '0x006B' 
Var i 
for i = 0 to 2 
UO.Set('finddistance','2') 
uo.FindType(Regs[i],'-1','ground') 
uo.waitTargetObject('finditem') 
uo.useType('0x0E21') 
wait(2500) 
next
end sub
Author:  Zayats [ 2007-10-16 17:15:37 ]
Post subject: 
Я читал я не могу разобраться что то невыходит... помогите если нетрудно
Author:  Scripts Writer [ 2007-10-16 18:11:01 ]
Post subject: 
Я тебе кинул скрипт выше- не работает?
Author:  Zayats [ 2007-10-17 19:43:10 ]
Post subject: 
sub res()
Dim Regs[6]
Regs[0] = '0x007A' # Уникорн
Regs[1] = '0x0084' # Кирин
Regs[2] = '0x00F3' # Хири
Regs[3] = '0x00B2' # Найтмар
Regs[4] = '0x0317' # Жук
Regs[5] = '0x00E4' # Хорса
Var i
for i = 0 to 5
UO.Set('finddistance','2')
uo.FindType(Regs[i],'-1','ground')
if uo.findcount() then
uo.waitTargetObject('finditem')
uo.useType('0x0E21')
wait(2500)
while uo.gethp('finditem') <> uo.getmaxhp('finditem')
uo.waitTargetObject('finditem')
uo.useType('0x0E21')
wait(2500)
wend
end if
wait(200)
next
wait(1000)
res()
end sub

Я уже вот написал, если можете помоги разобраться, почему после минут 5 после запуска уо просто закрываеться
Author:  Okypok [ 2007-10-17 22:31:14 ]
Post subject: 
Зачем в конце res() опять? Нельзя в цикл загнать? :)
Author:  Zayats [ 2007-10-18 06:19:47 ]
Post subject: 
Если нетрудно помоги, то я заганял а он неработает, как?
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/