IBM 5170 Technical Reference page 181

03E8
EB 27 90 JMP OBF_42
GO WA I T FOR RESPONSE
03EB [II 60 E30C: IN Al, PORT..A
GET THE SWITCH
03ED E6 82 OUT
DMA_PAGE+l,AL
SAVE TEMP
;------ WRITE BYTE 0 OF 8042 RAM
03EF 80 60
MOV
AL,60H
WR I TE BYTE COMMAND
03F1 BC 0000 E
MOV
SP,OFFSET C8042B
SET RETURN ADDR
03F4 EB OF 90 JMP C8042
ISSUE IHE COMMAND
03F7 74 05
TST4_D: JZ TST4_01
corn
I NUE I F COMMAND ACCEPTED
03F9 BO 00 HOV AL,ODH
<><> <><> <><><><><><><> <>
03FB
£6 80
OUT
MFG_PORT,AL
<><><>CHECKPOINT 00 <><>
03FD
f '
HLT
03FE BO 50
TST4 01 :MOV
AL,5DH
ENABLE OUTPUT BUFF FULL INT - DISABLE KEYBOARD
01.00 E6 60
- OUT
PORT_A,AL
SET SYS FLAG - PC 1 CaMP - INH OVERRIDE
0402
EB 1 E 90
JMP
E30A CONTI NUE
~
; --------- ISSUE THE COMMAND TO THE 8042
0405 fA C8042:
eLi NO I NTERRUPTS ALLOWED
01.06 E6 611
OUT
SEND COMMAND IN AL REG
0408 2B C9 SUB
CX,ex
LOOP COUNT
040A
E4 64
IN AL, STATUS_PORT
WAIT FOR THE COMMAND ACCEPTED
040C A8 02 TEST AL, I NPT BUF FULL
040E EO FA
LOOPNZ
C42_1 - ­
0410 C3
RET
;------- WAIT FOR 8042 RESPONSE
0411 2B C9 OBf _42: SUB cX,ex
0413
83 06 MOV BL,6 200MS/ PER LOOP
*
6
=1200 MS +
0415 El
t
64 C42_2: IN AL,STATUS_PORT
CHECK FOR RESPONSE
0417
A8 01 TEST AL,OUT_BUF_FULL
0419
75 06 JNZ C42_3
GO
I
F RESPONSE
0416
E2 F8
LOOP C42 2
TRY AGAIN
0410
FE CB DEC BL - DECREMENT LOOP COUNT
041F 75 F4 JNZ C112_2
0
1
421
C3
C42_3: RET , RETURN TO CALLER
;
-
- -
-------------
-- - -
--
- -
----
--------
-
---
----
--- ­
TEST. 11
; BASE 64K READ/WR I TE STORAGE TEST
; DESCRIPTION
WRITE/READ/VERIFY DATA PATTERNS
AA,55, FF,Ol, AND 00 TO 1ST 64K Of
STORAGE. VER I FY STORAGE ADDRESSAB I L I TY.
;
----------
-
-
- -- -
--
~--
---
-
-------
-
----
-
---
--
----­
FI LL HEMORY WITH DATA
0422
BO OE E30A: MOV AL,OEH ;SET CHECKPOINT (E)
0424
E6 80
OUT
MFG_PORT, AL
; <><><><><><><><><><><>
0426
88 --~~
R
MOV
AX, DATA
GET THE SYSTEM SEGMENT
0429
BE 08
MOV
DS,AX
OF DATA
0426
88 1E 0072 R
MOV
BX, RESET_FLAG SAVE RESET FLAG IN BX
042F fe eLD
SET 01 R FLAG TO INC.
0430
[39 8000
MOV
CX,2000H*4 SET FOR 32K WORDS
0433 2B FF
sua
DI,DI
FIRST 16K
0435 26 F6 SUB SI, SI
0 1 137
2B CO
SUB
AX,AX
01t39 8E 08
MOV
DS,AX
~
0 1 138 8E CO MOV
ES,AX
043lJ
81 FB 1234
eMP
ax,
1234H WARM START?
01141
75 03 JNZ
E30A_0
GO I F NOT
0443 E9 05E6 R JMP
CLR_STG
;-~------ GET THE INPUT BUFFER (SWITCH SETTINGS)
0
1
446 BO OF
E30A_0:
MOV
AL,OfH
<><><><><><><><><><><><>
0448
E6 80 OUT MFG_PORT, AL
<><><>CHECKPO I NT F<><><>
044A 80 80
MOV
AL, PRTY_CHK
SET BASE RAM PAR! TY
044C
E6 87
OUT
DMA_ PAGE+6,AL
USE AS TEMP SAVE
044E
BC 0000
MOV
SP,OFrSET C2
SET RETURN ADDRESS
0451 E9 0000 JMP
STGTST_CNT
01i54 86 08 C30:
MOV
BX,AX SAVE FAILING BIT PATTERN
0
1
156 75 03 JNZ
e31
0458 E9 05F1 R JMP e33
STORAGE OK, CaNT I NUE
BASE 64K STORAGE FAJ LURE
DISPLAY THE CHECKPOINT (MFG CHECKPOINT)
AND XOR EXPECTED WITH READ IN MFG_PORT
o
I SPLAY CHECKPO I NT IN MFG_PORT+3
DISPLAY XOR'D DATA HIGH BYTE MFG PORT+l
LOW BYTE IN MFG PORT+2 ­
A READ/WR I TE sCOPE LOOP OF THE FIRST
WORD FOR POSS i BLE ADDRESS LINE FA I LURES
;
---
--~-
-----------
-
--
- -- -
-
- - - -
---------
~
-
-­
045B
C31 :
045B
SA C7 I"IOV AL,BH
SAVE HIGH BYTE
0450 E6 81 OUT
MFG PORT+1,AL
045F 8A C3
MOV
AL, BL SAVE LOW BYTE
0461 E6 82
OUT
MfG_PORT+2,AL
; ------- CHECK fOR V I DEO ROM
0463 B9 COOO MOV
eX,OCOOOH
START OF 10 ROM
0466
8E 09 M1: MOV uS,ex
0468 ?B DB
SUB BX,BX
GET THE FIRST 2 LOCATIONS
046A 8B 07 MOV
046C
EB 00 -IMP
~~o~~X
l+2
BUS SETTLE
046E
3D AA55 eMP AX,OAA55H
I S THE V I DEO ROM PRESENT?
0471 74 OC JL
Z'
GO I F YES
0473 81 C1 0080 ADO CX,080H
PO I NT TO NEXT 2K BLOCK
0477
81 F9 C800
eMP
ex,
oe800H TOP Of V IDEO ROM AREA YET?
047B 7C E9 JL Ml
TRY AGAI N
~
0470 ?3 C9 ANa
ex,cx
SET NON ZERO fLAG
047F 75 03
Z5: JNZ C32 GO I F NOr
0481
E9 0573 R
JMP C3'_O BYPASS ERROR DISPLAY
I
F VIDEO ROM
.-------------------------
------- - ---------------­
; SET V IDEO MODE TO D I SPLAY MEMORY ERROR
; THIS ROUTINE INITIALIZES THE ATTACHMENT TO
; TO DISPLAY FIRST 64K STORAGE ERRORS.
; BOTII COLOR AND MONO ATTACHMENTS ARE INITIALIZED.
=
0010
M4 EQU 10H
;------- INIT COLOR/MONO
0484
BA 0308 C3? : MOV OX,3D8H
CONTROL REG ADDRESS Of COLOR CARD
0487
2A CO SUB
AL,AL
MODE SET
0489 EE
OUT
DX,AL
Test 1 5-39