не могу добрать реги из сейфа:(

[Kosto4ka]

Задумка следующая: 4ар кастует на себя стрелку, по исте4ению маны юзает спирит и медитирует. Если реги в паке закан4иваются,- добирает их в коли4естве 500шт из сейфа.

Code: Select all

var NS=('0x0F88')
var BP=('0x0F7A')
sub strelka() #стрелка+спирит+медитация и добирает реги из сейфа#
while not uo.dead()
if uo.getquantity(NS)==0 then
doborNS()
wait(1000)
end if
if uo.getquantity(BP)==0 then
doborBP()
wait(1000)
end if
if uo.mana > 12 then
uo.cast('Magic Arrow')
uo.waittargetself()
wait(2100)
else
UO.UseSkill("Spirit Speak")
wait(3000)
while UO.Mana<UO.Int
UO.UseSkill("Meditation")
wait(3000)
wend
wait(2000)
end if
wend
end sub

sub doborNS()
uo.FindType(NS,'-1','0x40524901') # ID сейфа=0x40524901 #
uo.Grab('500','finditem')
wait(1000)
end sub

sub doborBP()
uo.FindType(BP,'-1','0x40524901')
uo.Grab('500','finditem')
wait(1000)
end sub

Проблема:
Если рег закан4ивается в бэкпаке,- 4ар на4инает его добирать до тех пор, пока не выберет весь из сейфа. Хотя я ставлю всего 500 шт.

[Mirage]

Достаточно было прочитать уроки чтобы добиться от скрипта работоспособности

Code: Select all

var count = '0x40524901'
var i
sub strelka() #стрелка+спирит+медитация и добирает реги из сейфа#
   DIM reg[2]
   reg[0]='0x0F88'
   reg[1]='0x0F7A'
   while not uo.dead()
      for i = 0 to 1
         if uo.count(reg[i])<2 then
            dobor(reg[i])
         end if
      next
      if uo.mana > 12 then
         uo.waittargetself()
         uo.cast('Magic Arrow')
         wait(2100)
      else
         UO.UseSkill("Spirit Speak")
         wait(3000)
         while UO.Mana<UO.Int
            UO.UseSkill("Meditation")
            wait(3000)
         wend
         wait(2000)
      end if
   wend
end sub
sub dobor(item)
   uo.FindType(item,'-1',count)
   uo.Grab('500','finditem')
   wait(1000)
end sub

[Kosto4ka]

Пасиба за помощь и за то, 4то не отпинали)
Я только у4усь

[Mirage]

Честно с утра хотел чтото матное написать, так-как ошибка в принципе часто встречающаяся, но потом посмотрел - по мануалу скрипт написан правильно в принципе. Так что тут просто косметика.