home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / ROBOTWAR.DSK / ROBOTWAR.bas < prev    next >
BASIC Source File  |  2014-09-09  |  2KB  |  17 lines

  1. 1  ONERR  GOTO 3
  2. 2  CALL 2081
  3. 3  CALL 2084
  4. 4 L'<CTRL-H>L HLIN <CTRL-K> 9<UNKNOWN TOKEN> X<UNKNOWN TOKEN>  FN <CTRL-X>  OR  >  AND  >  OR  COLOR=  SPC(  RUN  - RUN  >
  5. 43517 <CTRL-A> DEL  CHR$ SPEED= <CTRL-C> PLOT =<CTRL-I> PLOT V TAB(  9<UNKNOWN TOKEN> X<UNKNOWN TOKEN> <CTRL-L><CTRL-Y><CTRL-A><CTRL-J>  COS<CTRL-X> INT AT  ^ AT  SPC(  ABS COLOR=  TO  COLOR=  SGN > FN  > ABS COLOR=  ABS > COLOR=  ^ > TO   THEN 
  6. 537 <CTRL-L> SPEED=  STORE  <UNKNOWN TOKEN><UNKNOWN TOKEN> COLOR= 
  7. 8195 <CTRL-\><CTRL-Z>  COS<CTRL-X> COLOR=  SGN > FN  > ABS INT COLOR=  -  OR  SPEED= 
  8. 793 <CTRL-A>  COS<CTRL-X> COLOR=  COLOR=  SPC(  TO  ABS TO  ^ >  STEP  COLOR=  >  NOT  COLOR=  SGN > FN  > ABS INT COLOR=  COLOR=  COLOR=  COLOR=  COLOR=  COLOR=  SGN > FN  > ABS INT COLOR=  ^ > TO   THEN  AT   THEN  PLOT 
  9. 41498 
  10. 60936   AND <CTRL-H> VTAB 
  11. 61443 <CTRL-B> GOSUB <CTRL-X> ~<CTRL-P> IF   AND <CTRL-H><CTRL-X>i<CTRL-C> DEL % SPEED= <CTRL-\> DEL $ "<UNKNOWN TOKEN>  COLOR= <CTRL-I>L -<CTRL-H> SPEED= <CTRL-V> DEL   <CTRL-L><CTRL-Y><CTRL-P>
  12. 40984  COLOR=  COLOR=  =  SGN AT  INT INT PRINT  PLOT  INT =  TO  SPC(  AT  COLOR=  FN  TO  SGN COLOR=  ABS > COLOR=   AND  > FRE AT  PLOT  SGN AT  ABS USR SGN  OR  COLOR=  ABS > COLOR=  INT AT  ^ AT  SPC(  ABS PLOT  AT  INT SPC(  COLOR=  ABS > COLOR=  FN  AT   STEP  -  OR  COLOR=   STEP  TO   AND  AT 
  13. 8325  SPEED= 
  14. 45082 <CTRL-M> IF  ><CTRL-C> -<CTRL-B> GOSUB <CTRL-C>LH<CTRL-H>L SPC( <CTRL-I> LOMEM: % CALL =<CTRL-I> z<CTRL-Z>tb HGR2 <UNKNOWN TOKEN>  HLIN <UNKNOWN TOKEN>  FN <CTRL-X> FN  ^ > TO   THEN  COLOR= 
  15. 8201   STEP <CTRL-X> RUN  FRE GOSUB  RUN  TO  LOMEM: 
  16. 2563 <CTRL-J>I<UNKNOWN TOKEN>8i|  SQR<UNKNOWN TOKEN>   STEP <CTRL-X> GOSUB  GOSUB  PLOT 
  17. 44547  ><CTRL-C> TAN<CTRL-E><UNKNOWN TOKEN>/LH<CTRL-H>  AT <CTRL-[>  COLOR= <CTRL-I>L COS<CTRL-[> COLOR= <UNKNOWN TOKEN> + TAB( <CTRL-H> = <CTRL-A>` POKE tb <UNKNOWN TOKEN><UNKNOWN TOKEN>L VTAB <CTRL-I>