Подскажите пожалуйста где ошибка...

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
1nter
Posts: 9
Joined: 2008-10-09 07:51:50
Contact:

Подскажите пожалуйста где ошибка...

Post by 1nter »

sub auto()
uo.useobject("0x779B994D")
uo.set("finddistance","18")
Uo.Ignore("0x015D40CB")
perezaryad()
While 1<2
uo.findtype("0x0191 -1 ground")
if uo.findcount() > 0 AND (uo.getX('finditem') >= 2570) and (uo.getX('finditem') <= 2575) and (uo.getY('finditem') >= 154) and (uo.getY('finditem') <= 160) then
uo.waittargetobject('finditem')
wait(3000)
uo.findtype("0x0191 -1 ground")
if uo.findcount() > 0 AND (uo.getX('finditem') >= 2570) and (uo.getX('finditem') <= 2575) and (uo.getY('finditem') >= 154) and (uo.getY('finditem') <= 160) then
uo.waittargetobject('finditem')
wait(3000)
wend
end sub

Sub perezaryad()
UO.WaitTargetObject('0x7ABA2BA1')
UO.Exec("findtype 0x0E73 -1 0x779B994D")
uo.useobject("finditem")
wait(550)
end sub

Макрос на автопушку, он открывает сундук, заряжает ядро в пушку, и ошибку выдает заместо того чтобы убивать цель.


вот такой вот макрос, пишет ошибку:
Line 24: Parse error

уже весь мозг сломал (так как в скрипте 23 строчки), ничего понять не могу...
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

Code: Select all

###########
VAR ser#### НЕ удалять!
VAR sunduk = '0x779B994D'
VAR pushka = '0x7ABA2BA1'
VAR waitTime = 1 #Время в секундах между выстрелами

sub auto()
   uo.useobject(sunduk)
   wait(500)
   uo.set("finddistance","18")
   Uo.Ignore('self')
   waitTime = waitTime * 1000
   While 1<2
      uo.findtype('0x0191', '-1', 'ground')
      if uo.findcount() > 0 AND (uo.getX('finditem') >= 2570) and (uo.getX('finditem') <= 2575) and (uo.getY('finditem') >= 154) and (uo.getY('finditem') <= 160) then
         ser = UO.GetSerial('finditem')
         wait(waitTime)
         perezaryad()
      else
         uo.findtype('0x0190', '-1', 'ground')
         if uo.findcount() > 0 AND (uo.getX('finditem') >= 2570) and (uo.getX('finditem') <= 2575) and (uo.getY('finditem') >= 154) and (uo.getY('finditem') <= 160) then
            ser = UO.GetSerial('finditem')
            wait(waitTime)
            perezaryad()
         endif
      endif
   wend
end sub

Sub perezaryad()
   UO.Findtype('0x0E73', '-1', sunduk)
   UO.WaitTargetObject(pushka, ser)
   uo.useobject('finditem')
   wait(600)
end sub
1nter
Posts: 9
Joined: 2008-10-09 07:51:50
Contact:

Post by 1nter »

спасибо куперу :-)
Post Reply