Помогите Исправить Скрипт на пушку

[The_BoBi]

Скрипт видимо не доделан он все подряд стреляет и стреляет



sub pushka()
var i
dim a[1]
a[1]='0x0190'
for i = 1 to 1
uo.ignore('0x00c61969')#
uo.ignore('0x00390ab8')#
uo.ignore('0x00010418')#
uo.ignore('0x011a0ef8')#
uo.ignore('0x011B7522')#
UO.FindType(a[i],'-1','ground')
while uo.findcount()
sleep(1000)
uo.addobject('dich','finditem')
uo.getstatus('dich')
UO.waittargetobject('0x7B62995B','finditem')
UO.Exec('usefromground 0x0E73')
WEND
end sub

За ранее спасибо