Hmmmm... Учусь однако, но не прально, непойму где :\

[Dron D.]

Хммм вот накарябал скрипт на одевание перса на пвп альфе, но часто бывает что одну из менюшек он пропускает, вот написал ответный скрипт на проверку чего нету. Скрипт должен проверять:
Regs=1
potion=3
restor=3
binti=100 штук(1 пачка Ж))

Но когда я запускаю скрипт, то он сразу выключается, не пойму где тут ошибка...

Code: Select all

sub chek()
Var Regs='0x0E76' #мешок с регами
Var potion='0x09B0' #мешок с поушнами
Var restor='0x0F09' #ресторы
Var binti='0x0E21' #бинты

If Uo.Count(Regs) < 0 Then
   uo.exec ("useobject 0x40013766")
   wait (200)
   uo.Lclick (212,226);regs 1х
End If

If Uo.Count(potion) < 0 Then
   uo.exec ("useobject 0x40013766") #остальное
   wait (200)
   uo.Lclick (254,206);potion 3х
end if

If Uo.Count(restor) < 0 Then
   uo.exec ("useobject 0x40013766")
   wait (200)
   uo.Lclick (256,284);choise restors 3x
End If

If Uo.Count(binti) < 0 Then
   uo.exec ("useobject 0x40013766")
   wait (200)
   uo.Lclick (207,187) #бинты 100
End If
End sub

[flake]

Вопрос: может ли у тебя быть сумок меньше ноля?
Думаю ответ знаешь сам.
Исправь везде
If Uo.Count(Regs) < 0 Then
на
If Uo.Count(Regs) == 0 Then

[Don SpiL]

Или так...
If Uo.Count(Regs) < 0 Then
на
If Uo.Count(Regs) < 1 Then