home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / ASMUTL / ASMCOLOR.ZIP / COLOR.ASM < prev    next >
Encoding:
Assembly Source File  |  1987-01-11  |  640 b   |  28 lines
  1.     TITLE Convert to Color Display
  2.     PAGE    ,132
  3. DATA    SEGMENT AT 40H
  4.     ORG    10H
  5. EQUIPFLAG    DW    ?
  6. DATA    ENDS
  7. STACK    SEGMENT STACK
  8.     DW    64 DUP(?)
  9. STACK    ENDS
  10. CODE    SEGMENT
  11.     ASSUME    CS:CODE,DS:DATA
  12. COLOR    PROC    FAR
  13.     PUSH    DS        ; Establish return vector
  14.     SUB    AX,AX
  15.     PUSH    AX
  16.     MOV    AX,DATA
  17.     MOV    DS,AX        ; Set up segment register
  18.     MOV    AX,EQUIPFLAG    ; Get equipment flag
  19.     AND    AL,11001111B    ; Turn off Monochrome flags
  20.     OR    AL,00100000B    ; Turn on 80x25 color
  21.     MOV    EQUIPFLAG,AX    ; Restore equipment flag
  22.     MOV    AX,3        ; Do a 80x25 mode set
  23.     INT    10H        ;  to the video interrupt
  24.     RET            ; Return to DOS
  25. COLOR    ENDP
  26. CODE    ENDS
  27.     END
  28.