1 REM  short one this, all that is needed
10 KEY
100 LOGIC
110 INK
120 BAR
130 INK
140 LOGIC
150 VARNAME
160 FOR
161 CLS
170 SCREEN COPY
180 SCREEN$
190 SCREEN SWAP
2 REM is a datascreen in bank 15 
20 MODE
200 NEXT
210 GOTO
30 HIDE
40 CURS
50 GET PALETTE
60 REM eddies search light routine
70 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
80 RESERVE
81 DIM
82 FOR
90 CLS