Ошибка в скрипте или..?
Posted: 2005-05-23 17:44:40
Вот решил сделать себе скрипт на обкладывание врага разным мусором, но что-то ему не нравится..
подправьте плиз, если что не так.
подправьте плиз, если что не так.
Code: Select all
sub drop1()
if uo.getglobal('drop')=='on' then
uo.print('*DROP is allready running!!*')
goto q
end if
var s
dim d[6]
d[0]=0x1B9B
d[1]=0x1B9C
d[2]=0x1B9D
d[3]=0x1B9E
d[4]=0x09AA
d[5]=0x0E7D
for s=0 to 5
uo.setglobal('drop','on')
uo.set('lasttarget','laststatus')
x=uo.getserial('lasttarget')
uo.findtype(d[s])
if uo.findcount('finditem') then
if uo.getdistance('finditem')<3 then
end if
uo.drop("1",str(uo.getx(x)-1),str(uo.gety(x)),0,"finditem")
end if
wait(267)
uo.findtype(d[s])
if uo.findcount('finditem') then
if uo.getdistance('finditem')<3 then
end if
uo.drop("1",str(uo.getx(x)),str(uo.gety(x)+1),0,"finditem")
end if
wait(432)
uo.findtype(d[s])
if uo.findcount('finditem') then
if uo.getdistance('finditem')<3 then
end if
uo.drop("1",str(uo.getx(x)+1),str(uo.gety(x)),0,"finditem")
end if
wait(600)
uo.findtype(d[s])
if uo.findcount('finditem') then
if uo.getdistance('finditem')<3 then
end if
uo.drop("1",str(uo.getx(x)),str(uo.gety(x)-1),0,"finditem")
end if
uo.setglobal('drop','off')
uo.print('.....d o n e.....')
q:
end sub