CLS
10
speed = 5
v = v + 1
RANDOMIZE TIMER
o% = INT(RND * 24) + 1
p% = INT(RND * 79) + 1
q% = CINT(RND * 10) + 1
IF q% = 4 THEN q% = 15: GOTO 13
IF q% = 3 THEN q% = 12: GOTO 13
IF q% = 2 THEN q% = 1: GOTO 13
IF q% = 1 THEN q% = 14 ELSE q% = 0
13
LOCATE o%, p%
COLOR q%
IF v >= 3 THEN GOTO 15 ELSE GOTO 20
15 RESTORE: v = 0
20
DATA 4,15,42
READ w%
d = CINT(RND * 6)
IF d = 3 THEN PRINT CHR$(w%) ELSE GOTO 10
GOTO 10