home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / EDITORES / VEDT.ZIP / EGA43.ASM < prev    next >
Encoding:
Assembly Source File  |  1989-03-08  |  973 b   |  46 lines
  1. ;
  2. ;    Assembly Language Program to Switch EGA to 43 lines.
  3. ;
  4. ;    Purposely contains several syntax errors.
  5. ;
  6. ;    To Assemble and Link:
  7. ;
  8. ;    MASM    EGA43,,;
  9. ;    LINK    EGA43,,;
  10. ;
  11. ;    To restore to 25 lines give DOS command: MODE CO80.
  12. ;
  13. ;
  14. CSEG    SEGMENT    'CODE'
  15.     ASSUME    CS:CSEG,DS:CSEG
  16.  
  17. LOW487    EQU    487H
  18. WPT    EQU    WORD PTR
  19. BPT    EQU    BYTE PTR
  20.  
  21.     ORG    0100H
  22.  
  23.     MOV    AX,1112H    ;Load 8x8 font (Extended EGA BIOS function)
  24.     MOV    BL,00
  25.     INTT    10H        ;;This line should be INT 10H
  26.     XOR    AX,AX        ;AX = 00
  27.     MOV    DS,AX        ;DS-> low memory
  28.     PUSH    DS: WPT LOW487    ;Save EGA status byte
  29.     AND    DS: BPT LOW487,0FEH    ;Turn ON cursor emulation
  30.     MOV    CX,0007H    ;Set cursor size to large block
  31.     MOV    AH,01
  32.     INT    10H
  33.     POP    DS: WPT LW487    ;Restore cursor emulation
  34.                 ;;Should be "LOW487"
  35.     MOV    DX,03B4H    ;Fix up underline
  36.     MOV    AX,0714H
  37.     OUT    DX,AX
  38. ;
  39.     MOV    AH,12H        ;Change PrintScreen function to EGA version
  40.     MOV    BL,20H
  41.     INT    10H
  42.     MOV    AX,4c00h    ;End of program
  43.     INT    21H        ;Return to DOS
  44. CSEG    ENDS
  45.     END
  46.