Игростроение - Создание игр

if keydown(...)  
if Millisecs()> time+1000;(1сек)  
time=Millisecs()  

тута твой выстрел  

endif  
endif

If MouseDown(1)
If MilliSecs()> time+200
time=MilliSecs()
PlaySound (fire_01)
    If Not lModeShoot
      Animate weapon, 1,1,2
    EndIf
    lModeShoot = True
Else
    If lModeShoot
      Animate weapon, 1,1,1
      lModeShoot = False
   EndIf     
EndIf
EndIf