Nah, mostly 3D ones. I just came up with a new idea though; although it won't work since I keep getting this "undefined label" error:
Function Pistol() If KeyHit(57) Then pframe = 1 pistolresettimer = 50 EndIf If pistolresettimer > 0 Then Goto drawmmore pistolresettimer = pistolresettimer - 1 EndIf If pistolresettimer = 0 Then pframe = 0 EndIf .drawmore DrawImage pistol,200,230,pframe End Function