
Макрос на автопушку:
sub fire()
uo.UseObject('0x534A3A26')
wait(1500)
uo.set("finddistance","14")
ignor()
perezaryad()
While 1<2
uo.findtype("0x0190","-1","ground")
If UO.FindCount()>0 and (uo.GetX('finditem')>4760 and uo.GetX('finditem')<4770 and uo.GetY('finditem')>3759 and uo.GetY('finditem')<3777) Then
uo.target('0x0000007','finditem')
wait(2500)
perezaryad()
endif
uo.findtype("0x0191","-1","ground")
If UO.FindCount()>0 and (uo.GetX('finditem')>4760 and uo.GetX('finditem')<4770 and uo.GetY('finditem')>3759 and uo.GetY('finditem')<3777) Then
uo.target('0x0000007','finditem')
wait(2500)
perezaryad()
endif
uo.findtype("0x001C","-1","ground")
If UO.FindCount()>0 and (uo.GetX('finditem')>4760 and uo.GetX('finditem')<4770 and uo.GetY('finditem')>3759 and uo.GetY('finditem')<3777) Then
uo.target('0x0000007','finditem')
wait(2500)
perezaryad()
endif
uo.findtype("0x0E","-1","ground")
If UO.FindCount()>0 and (uo.GetX('finditem')>4760 and uo.GetX('finditem')<4770 and uo.GetY('finditem')>3759 and uo.GetY('finditem')<3777) Then
uo.target('0x0000007','finditem')
wait(2500)
perezaryad()
endif
wait(1500)
wend
end sub
Sub perezaryad()
UO.WaitTargetObject('0x55A9A127')
UO.Exec("findtype 0x0E73 -1 0x534A3A26")
uo.useobject("finditem")
wait(850)
end sub
Sub ignor()
DIM ignor[9]
ignor[0]='self'
ignor[1]='0x00AB3FA8' #SEKTOR
ignor[2]='0x00AB3FA4' #DYXA
ignor[3]='0x008B06C7' #fish
ignor[4]='0x00775FA7' #MAZ
ignor[5]='0x0096AE81' #Kupull
ignor[6]='0x009EE723' #StarCraft
ignor[7]='0x0002A1D2' #miner1
ignor[8]='0x01D5C34F' #miner2
ignor[9]='0x009EE723' #miner3
############################################
var i=0
repeat
for i=0 to 9
Uo.Ignore(ignor[i])
next
until ignor[i]==ignor[9]
end sub
Чё я с ним только не делал всёравно не стреляет может ID не там поставил. Гляньте...