Скрипт на писание тока реколов......
Posted: 2006-04-20 13:32:43
Дайте пожайлуста скрипт на написание только реколов
Code: Select all
sub recalls()
var blanc=' type '
while not uo.Dead()
UO.WaitMenu ( 'Spell', 'Fourth', 'Spell', 'Recall' )
Uo.usetype(blanc)
wait(4500)
wend
end subCode: Select all
sub geton()
DIM reg[3]
reg[0]=' '
reg[1]=' '
reg[2]=' '
for i = 0 to 2
uo.findtype(reg[i],'0x0000','backpack')
if uo.Count() > 2 then
uo.Print(' That is ok! Craft more recalls! ')
else
uo.findtype(reg[i],'0x0000','ground')
if uo.FindCount() then
uo.moveitem('finditem','100')
wait(750)
end if
end if
uo.findtype(reg[i],'0x0000','backpack')
next
end sub