REM PROGRAMMED BY TRAVIS SCHULTZ
'SCREEN 12
CLS
DO
loc1% = INT(RND * 24) + 1
loc2% = INT(RND * 75) + 1
col% = INT(RND * 14) + 1
COLOR col%
LOCATE loc1%, loc2%
PRINT CHR$(248)
loc1% = INT(RND * 24) + 1
loc2% = INT(RND * 75) + 1
col% = INT(RND * 14) + 1
COLOR col%
LOCATE loc1%, loc2%
PRINT CHR$(248)
ljud% = INT(RND * 10000) + 500
SOUND ljud%, .1
LOOP UNTIL INKEY$ = "J"


CLS
PRINT "Congratulations!"
SLEEP 2
CLS
SYSTEM