home *** CD-ROM | disk | FTP | other *** search
/ ftp.whtech.com / ftp.whtech.com.tar / ftp.whtech.com / club100 / prt / lfcr.200 < prev    next >
Text File  |  2006-10-19  |  430b  |  10 lines
  1. 0 'LFCR.BA Modified for the Model 200      CLUB 100 Library - 415/939-1246 BBS,    937-5039 NEWSLETTER, 932-8856 VOICE
  2. 1 CLS:LINE(0,0)-(239,127),1,B:PRINT@41,"1 = CR + LF     0 = CR      ESC = Quit
  3. 2 X=PEEK(61243):IFX=1THENPRINT@292,"CR + LF now active 
  4. 3 IFX=0THENPRINT@292,"CR only is Active 
  5. 4 X$=INKEY$:IFX$=""GOTO4
  6. 5 IFX$="1"THENPOKE61243,1:GOTO2
  7. 6 IFX$="0"THENPOKE61243,0:GOTO2
  8. 7 IFX$=CHR$(27)THENMENU
  9. 8 BEEP:GOTO2
  10.