Main Loop 1 - Shmupkit

I've tried to keep the main loop as simple as possible, I've added a starfield travelling downward using the STAR DOWN command.

Also, I am using T as a 'Trigger' variable, at the moment I'm just using it to trigger updating the score - there's a fuller explanation here:

In most of my games I tend to have a variable used for this purpose, I don't like refreshing scores etc. in every cycle through the program, rather I only want to update the on-screen scores when I need to, and rather than adding 'showscore' in all the events that the score changes, I just use one, wrapped inside a simple IF ... ENDIF and then Trigger it by letting T = 1 in other events.

You can, of course, use this Trigger variable T for other purposes as well in your game, just remember to reset it to 0 when you are done with it.

EVENT MAINLOOP1

STAR DOWN			; starfield travelling down

IF T = 1			     ; Score bar update requested
	AT 0 1			; at Line 0 column 1
	SHOWSCORE		; update the score
	LET T = 0		; reset the trigger
ENDIF

IF KEY FIRE3		    ; Pause the game if pause key is pressed
    WHILE KEY FIRE3
    ENDWHILE
    WAITKEY
ENDIF