1 REM Lol Simmonds 1992
   10 REM JOYDRAW  
   20  ON ERROR GOTO140 
   30 MODE0:VDU23;8202;0;0;0;
   40 VDU19,0,1,0,0,0:VDU19,1,0,0,0,0
   50 IFINKEY(1)=32 CLS 
   60 X%=ADVAL(0) AND 3
   70 Z%=1200-ADVAL1/48
   80 B=ADVAL2:A%=B/64
   90 IF X%= 2 PLOT22,Z%,A%
  100 IF X%= 1 PLOT5,Z%,A%   
  110 IF X%= 3 PLOT82,Z%,A%
  120 PLOT21,Z%,A% 
  130 GOTO50
  140  MODE7
  150  END