1 REM O'SCOPE
2REM LOL Simmonds 1989
10 ON ERROR GOTO120
11 MODE7
12 PRINT""
13 PRINT""
14 PRINT""
15 PRINT "THIS WILL DISPLAY A TRACE F
ROM ADVAL1."
16 PRINT "WAVING YOUR HAND ACROSS THE
BACK OF THE"
17 PRINT "COMPUTER WILL MAKE THE TRAC
E BIGGER."
18 PRINT"PRESS THE SPACE BAR TO CONTI
NUE OR HIT"
19 PRINT"THE ESCAPE KEY TO END."
20 REPEAT UNTIL GET=32
30MODE0:VDU23;8202;0;0;0;
40CLS
50FORZ%=1TO1200STEP3
60B=ADVAL1:A%=B/64
70IFZ%=1PLOT4,Z%,A%
80PLOT5,Z%,A%
90NEXT
100GOTO40
120 MODE7
121 PRINT""
122 PRINT""
123 PRINT""
124 PRINT"IF YOU ENJOYED THIS GAME, YO
U MAY LIKE"
125 PRINT"TO TRY THIS; TYPE L.,100 AND
THEN CHANGE";
126 PRINT"TO MODE2 IN LINE 30. TO GIV
E COLOURS,"
127 PRINT"ADD THE LINE 65 GCOL 0,RND(Z
%) -RUN THIS";
128 PRINT"AND SEE WHAT HAPPENS! YOU C
AN ALSO TRY ";
129 PRINT"PLAYING WITH THE VALUE OF B
/96 eg. B/64"
130 END