5 SCREEN 7 10 COLOR 8, 15 20 PRINT "Trance 1.1" 30 PRINT "by ARJ Software." 40 PRINT "Copyright 1995. All rights reserved." 50 PRINT 60 INPUT "Type trance level here:", tl 70 LET a = tl * 1000 80 PRINT "Hit ENTER key when ready, and look at" 85 INPUT "the screen.", q$ 90 CLS 100 PRINT "><><><><><><><><><><><><><><><><><><><><" 110 PRINT "<><><><><><><><><><><><><><><><><><><><>" 120 LET a = a - 1 130 IF NOT a < 0 THEN GOTO 100 140 BEEP 150 INPUT "Are you spaced out? y/n ", q$ 160 IF q$ = "n" THEN CLS 170 IF q$ = "n" THEN GOTO 60 180 IF q$ = "y" THEN PRINT "Good." 190 IF q$ = "y" THEN END 200 CLS 210 GOTO 150