IBM 5170 Technical Reference page 190

- - -- - -- - ---
--------------------
----------
-
-- -
-----------
;-------- MINIMUM CONFIG WITH BAD CMOS OR NON VALID VIDEO
OA46 BAD_MOS:
OA46 BO 8E MOV AL, DIAG_STATUS GET THE DIAGNOSTIC STATUS
OA48 E6 70
OUT
CMOS PORT, AL
OA4A EB 00
JMP
SHORT $+2
OA4C E4 71 IN AL, CMOS_PORT+l
OA4E A8 CO TEST AL,OCOH
WAS THE BATTERY DEfECTIVE OR BAD CKSUM
OA50 75 OE JNZ BAD MOSl GO I F YES
OA52
OA54
86 C4
BO 8E
XCHG
MOV
AL,AH
AL,DIAG STATUS
SAVE THE STATUS
CHECK CMOS GOOD
OA56
E6 70 OUT CMOS PORT. AL
OA58 EB 00 JMP SHORT $+2
OA5A 86 C4 XCHG AL,AH
RESTORE THE STATUS
OA5C OC 20 OR AL,20H
SET THE MIN CONFC FLAG
OA5E E6 71
OUT
CMOS_PORT+l,AL
STORE THE STATUS
OA60
BAD MOS1:
OA60 E8 09FB R
- CALL
CHK VIDEO
CHECK FOR VIDEO ROM
OA63
OA65
BO 01
74 OB
MOV
JZ
AL,OlH
NORMAL_CONF I G
01 SKETTE ONLY
GO I F V IDEO ROM PRESENT
OA67
F6 06 0012 R 40 TEST MFG_TST, DSP_JMP CHECK FOR DISPLAY JUMPER
OMC
OA6E
BO 11
14 02
MOV
JZ
AL, 1 lH
NORMAL_CONF IG
DEFAULT TO 40X25 COLOR
GO IF JUMPER IS INSTALLED
OA10
OA72
BO 31 MOV AL,31H ; DISKETTE /
---------------
­--
-.
­-
_.-
_.
-------­
-----
-­
- - -- -­
CONFIGURATION AND MFG. MODE
_.
-----
­ -- - -
--------­---­--­---­--­
------­
- -
-
­
-­
NORMAL_CON FIG:
BW CRT 80X25
OA72
OA77
F6 06 0012 R 20
75 02
TEST
JNZ
MFG_TST, MFG_JMP
NORMl
IS THE MANUFACTURING JUMPER
GO I F NOT
INSTALLED
OA79 24 3E ANO AL,03EH
STRI
P
DISKETTE FOR MFG TEST
OA7B 2A E4
NORM': SUB
AH,AH
OA7D A3 0010 R MOV EQU I P _FLAG, AX SAVE SWITCH INFO
OABO
81 3E 0072
R
1234 eMP RESET_FLAG,1234H
BYPASS I F SOFT RESET
OA86 74 2C JZ E6
;------- GET THE FIRST SELF TEST RESULTS FROM KEYBOARD
OA88 BO 60 MOV
AL,60H
ENABLE KEYBOARD
OASA E8 Oll05 R CALL C8042
ISSUE WR I TE BYTE COMMNAD
OA8D BO 40 MOV AL,4DH
ENABLE OUT BUFF FULL I NT
SYS FLAG - PC 1 COMP - I NH OVERR I DE
ENABLE KEYBOARD
OA8F E6 60
OUT
PORT_A,AL
OA91 2B c9 SUB CX,CX
WAIT FOR COMMAND ACCEPTEO
OA93 E8 040A R
CALL
C42_1
OA96 B9 7FFF MOV CX,07FFFH
SET LOOP COUNT FOR APPROX 100 MS
TO RESPOND
OA99 E4 64
TST6: IN AL,STATUS_PORT
WAIT FOR OUTPUT BUFF FULL
OA9B A8 01
TEST AL, OUT_BUF_FULL
OA9D El FA LOOPZ TST6
TRY AGA I N I F NOT
OA9F
ge PUSHF SAVE FLAGS
OAAO
BO AD MOV AL, 01 S_KBD
D
I SABLE KEYBOARD
OAA2 E8 0405 R
CALL
C8042
I SSUE THE COMMAND
OAA5
90 POPF RESTORE FLAGS
OAM 74 OC JZ E6 CONT I NUE WITHOUT RESU L TS
OAA8 E4 60
IN
AL, PORT_A CET I NPUT FROM KEY BOARD
OAAA A2 0072 R MOV BYTE PTR RESET_FLAG,AL TEMP SAVE FOR AA REC I EVED
;-------- CHECK FOR MFG REQUEST
OAAD
3C 65
CMP Al,065H LOAD MFG. TEST REQUEST?
OAAF 75 03 JNE E6
OABl E9 002C R JMP MFG_BOOT GO TO BOOTSTRAP I F SO
TEST.14
~ +~~ile~6~6 ~~~D;~~nEC~+O~~~~~OLLER
(6845)
OEseR
I
PT I ON
RESET THE VIDEO ENABLE SIGNAL.
SELECT ALPHANUf~ER I C MODE, 40
-1+
25, B Be W.
READ/WRITE DATA PATTERNS TO STG. CHECK STG
ADDRESSAB I L I TY.
; ERROR
=
1 LONG AND 2 SHORT BEEPS :
;
--
-------
-----------
- - --
-------------------------------­
OAB4 E6:
OAB4
Al 0010 R MOV AX, EQU I P FLAG GET SENSE INFO
OAB7 50 PUSH SAVE IT
AX ­
OAB8 BO 30 MOV AL,30H
OABA A3 0010 R MOV EQUI P FLAG,AX
OABO 2A E4 SUB
AH,AH­
OABF CD 10
INT
I NT_V IDEO
SEND I NIT TO B/W CARD
OACl BO 20 MOV AL,20H
OAC3 A3 0010 R
MOV
EQU I P _FLAG, AX
OAC6 2A E4 SUB AH,AH AND INIT COLOR CARD
OAC8 CD 10 INT INT VIDEO
OACA B8 0001 Mav AX,0001H
SET COLOR 40X25 MODE
OACD CD 10
I NT
tNT VIDEO
OACF 58 POP
AX -
RECOVER REAL SWITCH INFO
OADO A3 0010 R
MOV
EQUIP_FLAG,AX RESTORE IT
OAD3 24 30
ANO
AL,30H
ISOLATE VIDEO SWS
OAD5 75 12
JNZ
E7
V IDEO SWS SET TO 01
OAD7 1 E
PUSH
OS
SAVE THE DATA SEGMENT
OAD8 50
PUSH
AX
OAD9 2B CO
SUB
AX, AX
SET DATA SEGMENT TO 0
OADB 8E 08 Mav DS,AX
OADD B F 0040 R
MOV
01, OffSET VI OEO_I NT ,SET I NT 10H TO DUMMY
OAEO c7 05 0000 E
MOV WORD PTR (DIJ,OFFSET DUMMY_RETURN ; RETURN IF NO VIDEO CARD
OAE4 58
POP AX RESTORE REG I STERS
OAE5 1 F POP OS
OAE6 E9 0668 R
J
r~p E18_1
BYPASS V IDEO TEST
OAE9 E7:
TEST VIDEO:
OAE9 3C 30
eMP
AL,30H B/W CARD ATTACHED?
OAEB 74 08
J E
E8
YES - SET MODE FOR B/W CARD
OAED FE C4 I Ne AH SET COLOR MODE FOR COLOR CD
OAEF 3C 20
eMP
AL,20H
80X25 MODE SELECTED?
OAFl 75 02 JNE
E8
NO - SET MODE FOR 40X25
OAF3 B4 03 MOV AH,3
SET MODE FOR 80X25
OAFS 86 EO E8:
XCHG
AH,AL
SET MODE:
OAF7 50 PUSH AX
SAVE VIDEO MODE ON STACK
OAF8 2A E4
SUB AH,AH
INITIALIZE TO ALPHANUMERIC MD
OAFA CD 10 INT I NT VIDEO CALL VIDEO 10
OAFC 58
POP RESTORE VIDEO SENSE SWS IN AH
AX­
OAFD 50 PUSH
AX
RESAVE VALUE
OAFE BB BOOO
MOV
BX,OBOOOH
BEG V IDEO RAM ADDR B/W CD
OBOl BA 03B8 MOV DX,3B8H MODE REG FOR B/W
5-48
Test 1