home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / basic / library / qb_pds / communic / bceasydr / easyansi.bi < prev    next >
Encoding:
Text File  |  1993-11-14  |  1.3 KB  |  34 lines
  1. LF$ = CHR$(13) + CHR$(10)
  2. IF AnsiFlag$ >= "1" THEN
  3.  
  4.         AnsiReset$ = ""          ' Put all mode to off, reset
  5.         Blink$ = ""              ' Put in blinking mode
  6.         Invert$ = ""             ' Put in reverse video mode
  7.         Bright$ = ""             ' Put in high intensity mode (bright)
  8.         Down$ = "B"               ' Cursor one line down
  9.         Up$ = "A"                 ' Cursor one line up
  10.         SavePos$ = "s"             ' Save current cursor position
  11.         RestorePos$ = "u"          ' Restore cursor position
  12.         EraseLine$ = ""           ' Erase current line
  13.  
  14.         Black$ = ""             '
  15.         Red$ = ""               '
  16.         Green$ = ""             '
  17.         Yellow$ = ""            ' Foreground text color
  18.         Blue$ = ""              '
  19.         Magenta$ = ""           '
  20.         Cyan$ = ""              '
  21.         White$ = ""             '
  22.  
  23.         BlackBack$ = ""         '
  24.         RedBack$ = ""           '
  25.         GreenBack$ = ""         '
  26.         YellowBack$ = ""        ' Background text color
  27.         BlueBack$ = ""          '
  28.         MagentaBack$ = ""       '
  29.         CyanBack$ = ""          '
  30.         WhiteBack$ = ""         '
  31.  
  32. END IF
  33.  
  34.