home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
v
/
vdtj122b.zip
/
VCSD.ZIP
/
EGA43.ASM
< prev
next >
Wrap
Assembly Source File
|
1989-03-08
|
973b
|
46 lines
;
; Assembly Language Program to Switch EGA to 43 lines.
;
; Purposely contains several syntax errors.
;
; To Assemble and Link:
;
; MASM EGA43,,;
; LINK EGA43,,;
;
; To restore to 25 lines give DOS command: MODE CO80.
;
;
CSEG SEGMENT 'CODE'
ASSUME CS:CSEG,DS:CSEG
LOW487 EQU 487H
WPT EQU WORD PTR
BPT EQU BYTE PTR
ORG 0100H
MOV AX,1112H ;Load 8x8 font (Extended EGA BIOS function)
MOV BL,00
INTT 10H ;;This line should be INT 10H
XOR AX,AX ;AX = 00
MOV DS,AX ;DS-> low memory
PUSH DS: WPT LOW487 ;Save EGA status byte
AND DS: BPT LOW487,0FEH ;Turn ON cursor emulation
MOV CX,0007H ;Set cursor size to large block
MOV AH,01
INT 10H
POP DS: WPT LW487 ;Restore cursor emulation
;;Should be "LOW487"
MOV DX,03B4H ;Fix up underline
MOV AX,0714H
OUT DX,AX
;
MOV AH,12H ;Change PrintScreen function to EGA version
MOV BL,20H
INT 10H
MOV AX,4c00h ;End of program
INT 21H ;Return to DOS
CSEG ENDS
END