у меня функция есть, что если нажать грызуна, то следующяя пуля вылетит только тогда, когда та пуля уничтожится:
....
deletpula =0
Repeat
Cls
If MouseDown(1)
deletpula =1
...
If pula\yp <= 30
Delete pula
deletpula =0
Else
DrawImage(pula\image, pula\xp, pula\yp,pula\frame)
EndIf
Да, и ещё. такой глюк возникает, только если начать стрелять под каким то углом.