v4.0/src/DEV/DISPLAY/EGA/850-CPI.ASM

   1 CODE    SEGMENT BYTE PUBLIC 'CODE'
   2         ASSUME CS:CODE,DS:CODE
   3
   4 IF1
   5         %OUT    EGA.CPI creation file
   6         %OUT    .
   7         %OUT    CP SRC files:\a
   8         %OUT    .
   9         %OUT    .       CODE PAGE:  850
  10 ENDIF
  11
  12 EGA850: DW     LEN_850                  ; SIZE OF ENTRY HEADER
  13         DW     POST_EGA850,0            ; POINTER TO NEXT HEADER
  14         DW     1                        ; DEVICE TYPE
  15         DB     "EGA     "               ; DEVICE SUBTYPE ID
  16         DW     850                      ; CODE PAGE ID
  17         DW     3 DUP(0)                 ; RESERVED
  18         DW     OFFSET DATA850,0         ; POINTER TO FONTS
  19 LEN_850 EQU    ($-EGA850)               ;
  20                                         ;
  21 DATA850:DW     1                        ; CART/NON-CART
  22         DW     3                        ; # OF FONTS
  23         DW     LEN_D850                 ; LENGTH OF DATA
  24 D850:                                   ;
  25         DB     16,8                     ; CHARACTER BOX SIZE
  26         DB     0,0                      ; ASPECT RATIO (UNUSED)
  27         DW     256                      ; NUMBER OF CHARACTERS
  28                                         ;
  29         INCLUDE 850-8X16.ASM            ;
  30                                         ;
  31         DB     14,8                     ; CHARACTER BOX SIZE
  32         DB     0,0                      ; ASPECT RATIO (UNUSED)
  33         DW     256                      ; NUMBER OF CHARACTERS
  34                                         ;
  35         INCLUDE 850-8X14.ASM            ;
  36                                         ;
  37         DB     8,8                      ; CHARACTER BOX SIZE
  38         DB     0,0                      ; ASPECT RATIO (UNUSED)
  39         DW     256                      ; NUMBER OF CHARACTERS
  40                                         ;
  41         INCLUDE 850-8X8.ASM             ;
  42                                         ;
  43 LEN_D850        EQU ($-D850)            ;
  44                                         ;
  45 POST_EGA850     EQU     $               ;
  46                                         ;
  47 CODE    ENDS                            ;
  48         END                             ;
  49 \1a