IBM PC CONVERTIBLE

012C 80 3E 0049 R 07 CMP
CRT~ODE, 7 MONO MODE
OBI 75 OC
JNE M13C
0133 B4 20
MOV
AH, RTCDSP _CON
GET DISPLAY CONFIGURATION
0135 E8 0000 CALL
GELRTCREG
0138 A8 02 TEST AL, DSP _MLCD
LCD CONFIGURED AS MONO
OI3A 74 03 JZ
MI3C
013C B9 1000 MOV
CX ,4096 SET PG LEN TO 4096 TO ALLOW
MUL TI PG KEYS WHEN LCD MONO
013F 89 OE 004C R
MI3C: MOV CRLLEN,CX SAVE LENGTH OF CRT
SET CURSOR POSITIONS
0143 B9 0008 MOV
CX ,8 ; CLEAR ALL CURSOR POSITIONS
0146 BF 0050 R
MOV
DI,OFFSET CURSOR_POSN
0149 IE
PUSH OS ESTABLISH SEGMENT
014A 07 POP ES ADDRESSING
014B 33 CO
XOR AX,AX
0140
F3/ AB REP
STOSW FILL WITH ZEROES
SET UP OVERSCAN
REGISTER
014F 42 INC
OX SET OVERSCAN PORT TO DEFAULT
0150 BO 30 MOV
AL,30H VALUE OF 30H FOR ALL MODES
EXCEPT 640X200
0152 80 3E 0049 R 06
CMP CRT~oDE,6
SEE I F MODE IS 640X200 BW
0157 75 02 JNZ
MI4
I F NOT 640X200, GO TO REGULAR
0159 BO 3F
MoV AL, 3 FH I F IT IS 640X200, PUT IN 3FH
015B MI4 :
015B EE
OUT OX ,AL SEND CORRECT VAL TO 309 PORT
015C A2 0066 R
MOV CRLPALETTE,AL SAVE THE VAL FOR FUTURE USE
SET CURSOR TYPE TO DEFAULT VALUES.
015F B9 0607
MOV
CX,0607H
CURSOR MODE FOR MODES 0-6
0162
80 3E 0049 R 07 CMP CRT~ODE,7 IS IT MODE 7
0167 75 03
JNE MI4A NO, JUMP ON
0169 B9 OBOC
MOV
CX,OBOCH
CURSOR MODE MONO (MODE 7)
016C EB 4C 90
MI4A: JMP SELCTYPE SET CURoSR TYPE
NORMAL RETURN FROM ALL VIDEO RETURNS
016F V IDEO_RETURN:
016F
50 POP BP
0170 5F
POP
OJ
0171 5E POP
SI
0172 5B POP BX
0173
59 POP CX
0174
5A POP OX
0175 IF POP
OS
0176 07 POP ES
0177 CF JRET
ALL DONE
0178 SELMODE ENDP
2-86 ROM BIOS