IBM PC CONVERTIBLE

02DF 8A F8
MOV BH,AL
SAVE THE STATUS
02El
B4 IF MOV AH,RTCFEALCON
SELECT FEATURE CONFIG
02E3 E8 0000 E CALL
GELRTCREG
GET FEATURE CON FIG
02E6 A8 40
TEST
AL,INTMOD_INST I NTERNAL MODEM PRESENT?
02E8 74 08
JZ
CHLFOILRS
NO, CHECK FOR RS-232
TEST MODEM FOR POWER ACTIVE
02EA F6 C7 02 TEST BH ,ACLMODEM
YES, IS MODEM POWER ON?
02ED 74 03 JZ CHLFOILRS
NO, CHECK FOR RS-232 CARD
02EF 80 CB 08 OR BL,08
YES, SET MODEM ACTIVE
TEST RS-232 FOR POWER ACTI VE
02F2
CHLFOR_RS:
02F2 A8 80 TEST
AL, SERPLL_INST IS RS-232 CARD INSTALLED?
02F4 74 08 JZ CHLFOILLCD
NO, JUMP TO LCD CHECK
02F6
F6 C7 04 TEST BH, ACLRS232
YES, IS RS-232 POWER ON?
02F9 74 03 JZ CHLFOILLCD
NO, JUMP TO LCD CHECK
02FB 80 CB 04 OR BL,04
YES, SET RS POWER ACTIVE
TEST I F LCD IS OPERATIVE
02FE
CHLFOR_LCD:
02FE B4 20 MOV
AH, RTCDSP _CON LOOK AT THE DISPLAY
0300 E8 0000 E CALL GELRTCREG
CONFIGURATION
0303 A8 03 TEST
AL, DSP ~LCD+DSP _CLCD IS LCD CONFIGURED?
0305 75 03 JNZ
SYS_STALEXIT YES, THEN LEAVE ROUTINE
0307 80 CB 01 OR BL,OI
NO, LCD IS INOPERATIVE
030A
SYS_STALEXIT:
030A 8A C3 MOV AL,BL
RESTORE STATUS BACK TO AL
030C 5B POP BX
RESTORE BX REG
0300 F8 CLC
SET NORMAL GOOD RETURN
030E C3 RET
030F
SYS_STATUS
ENDP
Modem Power Services
(SYS_MODEM_PWR)
030F
030F OA co
0311
74 OE
0313
0313 B4 10
0315 E8 0000 E
0318 E8 0000 E
031B 73 OA
0310 BO 80
031F EB 08
; -- -- --- --- ---- -- -- - - ----- - ------ - - - -- - -- - - - - - ---- - - - - - - - - - -- - - - - -- ---
INT 15H (AH = 44H)
SYS_MODE~PWR: THIS PROCEDURE TURNS ON OR OFF THE MODEM
INPUT: AL = 0, POWER OFF; AL <> 0, POWER ON.
OUTPUT: AL = 0 IF SUCCESSFUL; AL = 80H IF NOT SUCCESSFUL
REGISTERS USED: AX DESTROYED.
SYS~ODEM_PWR PROC NEAR
OR
JZ
SYS~OD_ON:
AL,AL
SYS~OD_OFF
MOV AH, RTC~OD_PROFl
CALL GELRTCREG
CALL MODE~CONFIG
JNC SYS~OD_END
MOV
JMP
AL,80H
SHORT SYS~OD_EXIT
; TEST AL FOR COMMAND
; TURN MODEM OFF
GET THE PROFI LE REG
PLACE PROFILE IN AL
CONFIGURE AND POWER MODEM
ERROR EXIT
ROM BIOS 2-183