SCREEN 7
10 RANDOMIZE TIMER
a = CINT(RND)
b = CINT(RND)
c = CINT(RND)
IF a = 0 AND b = 0 AND c = 0 THEN COLOR 10, 0
IF a = 0 AND b = 0 AND c = 1 THEN COLOR 14, 0
IF a = 0 AND b = 1 AND c = 0 THEN COLOR 12, 0
IF a = 0 AND b = 1 AND c = 1 THEN COLOR 9, 0
IF a = 1 AND b = 0 AND c = 0 THEN COLOR 2, 0
IF a = 1 AND b = 0 AND c = 1 THEN COLOR 4, 0
IF a = 1 AND b = 1 AND c = 0 THEN COLOR 12, 0
IF a = 1 AND b = 1 AND c = 1 THEN COLOR 1, 0
nk = POS(0)
nb = CSRLIN
IF nb > 23 THEN LOCATE 1, 1
PRINT CHR$(219);
GOTO 10