SET c,255

CLRSCR c,0,0
WAIT 2000
CLRSCR 0,c,0
WAIT 2000
CLRSCR 0,0,c
WAIT 2000

CLRSCR c,c,c
WAIT 2000


LOOP

;WAIT 1000
CLRSCR c,0,0, 1

;WAIT 1000
CLRSCR 0,c,0, 2

;WAIT 1000
CLRSCR 0,0,c, 3

;WAIT 1000
CLRSCR c,c,0, 4

;WAIT 1000
CLRSCR 0,c,c, 5

;WAIT 1000
CLRSCR c,0,c, 6

;WAIT 1000
CLRSCR c,c,c, 7

;WAIT 1000
CLRSCR c,0,0, 8

;WAIT 1000
CLRSCR c,0,c, 20,5

;WAIT 1000
CLRSCR c,c,c, 21

ENDLOOP