home *** CD-ROM | disk | FTP | other *** search
/ ftp.whtech.com / ftp.whtech.com.tar / ftp.whtech.com / club100 / txt / append.200 < prev    next >
Text File  |  2006-10-19  |  1KB  |  18 lines

  1. 0 'Club 100 Library, Modem 415-939-1246
  2. 1 'APPEND.200 by James Yi 1989
  3. 2 'Lets paste buffer append
  4. 3 'This Basic loader creates APPEND.CO, which runs in Alt LCD.
  5. 4 'APPEND.CO can be run from the Menu or called from BASIC, but it will exit to the Menu and not return to BASIC.
  6. 10 READS:IFS>MAXRAMTHENCLEAR200ELSECLEAR256,S
  7. 20 RESTORE:READS,E,F$:PRINT"Loading APPEND.CO":PRINT"Please Wait... ";
  8. 30 FORA=STOE:READB:POKEA,B:NEXT:SAVEMF$,S,E,S+3
  9. 40 PRINT"Done!":PRINT"Read Remarks in this program"
  10. 100 DATA 63574,63812,APPEND,195,166,248,58,21,253,230,4,202,126,248,58,72,248,111,38,0,41,17,201,247,25,235,237,235,26,230
  11. 110 DATA 240,254,192,19,237,62,0,202,171,248,205,69,79,204,42,42,33,142,248,34,52,239,33,212,113,205,32,110,175,196,69,79,205
  12. 120 DATA 75,113,33,197,113,205,158,103,205,240,84,215,202,164,103,58,22,253,230,1,245,205,115,45,241,229,17,11,245,237,34,229
  13. 130 DATA 248,33,192,248,217,33,0,0,34,210,239,195,36,115,229,42,229,248,227,229,213,197,245,33,4,22,229,56,28,237,1,169,115
  14. 140 DATA 8,33,122,240,194,225,248,54,255,33,235,248,217,201,126,60,200,33,0,0,34,11,245,201,50,202,239,245,205,212,121,241
  15. 150 DATA 245,254,15,202,18,249,254,21,202,31,249,254,27,194,176,115,58,203,239,254,27,194,176,115,241,205,228,248,195,21,116
  16. 160 DATA 241,205,207,118,205,100,119,205,50,249,195,27,120,241,205,207,118,205,100,119,205,137,120,202,44,120,205,50,249,195
  17. 170 DATA 47,120,205,98,44,17,160,242,237,62,26,190,35,194,59,249,43,217,195,154,120
  18.