Sorry your browser is not supported!

-play the first animation (moving my shotgun up)
-wait until the first animation is done, then loop the reloading animation until the Ammo is at its max
-once Ammo is full, play last animation (pumping my shotgun and bringing it to the orginal state)

Mode = 0
Play object Obj, 1, 5

Do
   If Object Playing(Obj) = 0 and mode = 0
      Mode = 1
      Loop Object Obj, 6, 10
   endif
   
   If Mode = 1
     If object frame(Obj) > 9.5
        rem One complete ammo load has been done
        Ammo = Ammo + 1
     endif
   endif

   If Ammo = Full
      Play Object Obj, 11, 15 : Mode = 2
   endif

   If object playing(Obj) = 0 and mode = 2
      rem We're done!
   endif
   Sync
Loop

Function Play_Animation(Action$)
	
	if Action$ = "Retrieve"
		play object shotgun, ani_retrieve1, ani_retrieve2
	ENDIF
	if Action$ = "Idle"
		loop object shotgun, ani_idle1, ani_idle2
	ENDIF
	if Action$ = "Move"
		loop object shotgun, ani_move1, ani_move2
	ENDIF
	if Action$ = "Reload"
		play object shotgun, ani_start_reload1, ani_start_reload2
		mode = 0
		//do
		if Object Playing(shotgun) = 0 and mode = 0
				`loop reload
				loop object shotgun, ani_reload1, ani_reload2
				loop sound ShotGunReload
				mode = 1
		endif
		if mode = 1
			if object frame(shotgun) > (ani_reload2 - 0.5)
				Ammo = Ammo + 1
			endif
		endif
		if Ammo = MaxAmmo
			play object shotgun, ani_end_reload1, ani_end_reload2
			mode = 2
		endif
		if object playing(shotgun) = 0 and mode = 2
			mode = 0
			reload = 0
		endif
		//sync
		//loop
	ENDIF	
        if Action$ = "Fire"
		play object shotgun, ani_fire1, ani_fire2
	ENDIF
	
ENDFUNCTION

	
if Action$ = "Reload"
		play object shotgun, ani_start_reload1, ani_start_reload2
		mode = 0