home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / AAKXREF.ZIP / PRINTER.CST < prev    next >
Encoding:
Text File  |  1986-05-26  |  2.5 KB  |  49 lines
  1. CONST
  2.    TL_Corner         = #240    ;
  3.    TR_Corner         = #242    ;
  4.    BL_Corner         = #246    ;
  5.    BR_Corner         = #247    ;
  6.    Horz              = #241    ;
  7.    Vert              = #245    ;
  8.    Left_Junc         = #244    ;
  9.    Right_Junc        = #249    ;
  10.    Top_Junc          = #243    ;
  11.    Bot_Junc          = #248    ;
  12.    Cross             = #250    ;
  13.    Form_Feed         = ^L      ;
  14.    Start_Macro       = ^['+'   ; (* START DEFINING MACRO INSTRUCTION 16 CHARS MAX *)
  15.    Exec_Macro        = ^['!'   ; (* EXECUTE MACRO *)
  16.    End_Macro_Ins     = #30     ; (* END DEFINING MACRO *)
  17.    Accept_8th_Bit    = ^['#'   ; (* ACCEPT 8TH BIT AS IS FROM HOST CPU *)
  18.    Copy_Rom_Chars    = ^['*0'  ; (* COPY PRINTER ROM CHARS TO RAM *)
  19.    Pre_Define_Char   = ^['*1'  ; (* DEFINE CHAR IN RAM n1, n2, m1, m2 *)
  20.    Cancel_Down_Load  = ^['$0'  ; (* CANCEL DOWN LOAD SET 96 CHARS MAX *)
  21.    Select_Down_Load  = ^['$1'  ; (* SELECT DOWN LOAD SET 96 CHARS MAX *)
  22.    Start_Under_Line  = ^['-'^A ; (* START UNDER LINING TEXT *)
  23.    Stop_Under_Line   = ^['-'#0 ; (* STOP UNDER LINING TEXT *)
  24.    LPI06             = ^['2'   ; (* SET LINE FEED TO 12/72 OF AN INCH *)
  25.    LPI08             = ^['0'   ; (* SET LINE FEED TO  9/72 OF AN INCH *)
  26.    LPI09             = ^['A'^H ; (* SET LINE FEED TO  8/72 OF AN INCH *)
  27.    Italics_On        = ^['4'   ; (* SELECT ITALIC CHARS IN ROM *)
  28.    Italics_Off       = ^['5'   ; (* SELECT DEFAULT ROMM CHARS *)
  29.    Reset_Printer     = ^['@'   ; (* SOFTWARE RESET PRINTER *)
  30.    CPL80             = ^['B'^A ;
  31.    CPL96             = ^['B'^B ;
  32.    CPL132            = ^['B'^C ;
  33.    Pre_Graf_60       = ^['K'   ; (* START 60 DOTS PER INCH FOR n1, n2  Col = n1 + n2 * 256 *)
  34.    Pre_Graf_120      = ^['L'   ; (* START 120 DOTS PER INCH FOR n1, n2  CHARS *)
  35.    Pre_Graf_120_Fast = ^['y'   ; (* START 120 DOTS PER INCH IN HIGH SPEED *)
  36.    Pre_Graf_240      = ^['z'   ; (* START 240 DOTS PER INCH n1, n2 *)
  37.    Pre_Set_Left      = ^['M'   ; (* SET LEFT HAND n1 CHARS IN *)
  38.    Pre_Set_Skip      = ^['N'   ; (* SET PERF SKIP *)
  39.    Super_On          = ^['S'#0 ; (* SUPER SCRIPT CHARS *)
  40.    Sub_On            = ^['S'^A ; (* SUB SCRIPT CHARS *)
  41.    Super_Sub_Off     = ^['T'   ; (* OFF SUPER OR SUB SCRIPT NORMAL CHARS *)
  42.    Double_Wide_On    = ^['W'^A ; (* SET DOUBLE WIDE CHARS *)
  43.    Double_Wide_Off   = ^['W'#0 ;
  44.    Empha_On          = ^['E'   ;
  45.    Empha_Off         = ^['F'   ;
  46.    Double_Strike_On  = ^['G'   ;
  47.    Double_Strike_Off = ^['H'   ; (* CANCELS DOUBLE STRIKE MODE *)
  48.    No_Perf_Skip      = ^['O'   ;
  49.