home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / simtel / cpmug / cpmug089.ark / CONTROL.BAS < prev    next >
Encoding:
BASIC Source File  |  1984-04-29  |  376 b   |  19 lines
  1.     rem This is CONTROL.BAS used to set up control characters for
  2.     rem your terminal.
  3.  
  4.  
  5.     clear$=chr$(27)+"+"
  6.  
  7.     block.size=1024
  8.  
  9.     ON$=chr$(27)+chr$(41)  rem background ON
  10.     OFF$=chr$(27)+chr$(40) rem background OFF
  11.  
  12.     pagelen=51
  13.  
  14.     UP$=CHR$(11)
  15.     CUR$=CHR$(27)+CHR$(61)+CHR$(44)+CHR$(32)
  16.     GOTO 50.5
  17. 50    CUR2$=CHR$(27)+CHR$(61)+CHR$(CL+32)+CHR$(CC+32):RETURN
  18. 50.5    REM
  19.