IBM 5170 Technical Reference page 186

-------------------------------------------------------
0730 EB 6f 90 JMP CMOS4 GO TO MINIMUM CONflG
; .--- ­ VER I FY CHECKSUM
0733 BO 8E CMOS1: MOV
Al,DIAG_STATUS
CLEAR OLD STATUS
0735 E6 70 OUT CMOS_PORT, Al
0737 EB 00 JMP SHORT $+2 10 DELAY
0739 E4 71
IN Al, CMOS PORT+l GET THE CURRENT STATUS
073B EB 00
JMP SHORT $+2 10 DELAY
0730 86 c4
XCHG Al,AH
SAVE THE CURRENT STATUS
073f BO 8E MOV Al,OIAG STATUS
0741 E6 70 OUT CMOS PORT, Al
0743
81 3E 0072 R 1234 CMP
RESET_FlAG,1234H
IS THIS A SOFT RESET
0749 75 07 JNZ CMOS1 A GO If NOT
074B 86 EO
XCHG
AH,Al-
RESTORE THE STATUS
0740 24 10 AND Al, W_MEM_S IZE CLEAR All BUT THE CMOS/ POR MEMORY SIZE
MI SCOMPARE
074f
EB 03 90
JMP
CMOS1_B
0752 CMOSl A:
0752 2A CO
- SUB
Al,Al
0754 E6 71 CMOS1_B:OUT CMOS_PORT+1, Al
0756
2B DB SUB
BX,BX
0758 2B C9 SUB CX,CX
075A B1 90 MOV Cl, CMOS BEG I N SET START OF CMOS
075C B5 AE MOV CH,CMOS::::END+l SET END Of CMOS
075E 8A C1 CMOS2: MOV
Al,Cl
0760 E6 70 OUT
CMOS_PORT, Al
ADDRESS THE BEG I NN I NG
0762 ED 00 JMP SHORT $+2 WAIT STATE fOR 10
0764 E4 71 IN Al, CMOS_PORT+l
0766 2A E4 SUB AH,AH INSURE AH=O
0768 13 08 AOC BX,AX ADO TO CURRENT VALUE
076A fE C1
INC CL
PO I NT TO NEXT WORD
076C 3A E9 CMP
CH,Cl
f
r
N
r
SHED?
076E 75 EE JNZ
CMOS2
GO I f NOT
0770 DB DB OR BX,BX BX MUST NOT BE 0
0772 74 16 JZ CMOS3
CMOS BAD I f CKSUM=O
0774 BO AE MOV Al,CMOS_ENO+1 GET THE CHECK SUM
0776 E6 70 OUT CMOS PORT, Al
0778
EB 00 JMP
SHORT $+2
077A E4 71 IN
Al, CMOS_PORT+l
fiRST BYTE Of CHECKSUM
077C 8A EO MOV
AH,Al
SAVE IT
077E BO Af MOV Al, CMOS_END+2 SECOND BYTE Of CHECKSUM
0780
E6 70 OUT
CMOS_PORT ,Al
0782 EB 00 JMP
SHORT $+2
0784 E4 71 IN
Al, CMOS_PORT+l
0786 3B C3 CMP AX,BX
r
S THE CHECKSUM OK
0788 74 17 JZ CMOS4 GO I F YES
; ------ ­ SET CMOS CHECKSUM ERROR
078A BO 8E CMOS3: MOV Al,DIAG STATUS SET BAD CHECKSUM fLAG
078C E6 70 OUT CMOS_PORT, Al
078E EB 00 JMP SHORT $+2 10 DELAY
0790 E4 71 IN Al,CMOS PORT+l GET THE CURRENT STATUS
0792 86 C4
XCHG Al,AH ­ SAVE IT
0794 80 CC 40 OR AI;I, BAO_CKSUM
SET BAD CHECKSUM fLAG
0797
BO 8E MOV Al,DIAG_STATUS
0799 E6 70 OUT CMOS PORT, Al
079B
EB 00
JMP SHORT $+2
10 DELAY
0790 86 c4 XCHG Al,AH SET fLAG
079f E6 71 OUT CMOS_PORT+1,Al
07Al BO 18 CMOS4: MOV Al, 18~1 <><><><><><><><><><><><>
07A3 E6 80 OUT MFG_PORT, Al <><><>CHECKPO I NT 18 <><>
ENABLE PROTECTED MODE
;------------------------------------------------------­
07A5 E4 61
IN
AL, PORT_B
DISABLE 10/RAM PARITY CHK
07A7 OC OC
OR
Al,RAM PAR Off
07A9
Ell
00
JMP SHORT "S"+2 - 10 DELAY
07AB E6 61 OUT PORT_B,Al
; ------- SET RETURN ADDRESS BYTE I N CMOS
07AD
BO 19 MOV Al,19H
<><><><><><><><><><><><>
07AF E6 80 OUT MfG_PORT, Al
<><><>CHECKPO I NT 19 <><>
07B1 BO 8f MOV Al, SHUT_DOWN SET THE RETURN AOOR
07B3 E6 70 OUT CMOS PORT, Al
07B5
EB 00 JMP SHORT $+2 10 DELAY
07B7 BO 01 MOV Al,01H fiRST SHUTDOWN RETN AD OR
07B9 E6 71
OUT
CMOS_PORT+l, Al
07BB BC 0000 MOV SP, POST_SS
SET STACK fOR SYSINITl
07BE 8E
04
MOV SS,SP
07CO
BC 8000 MOV SP, POST_SP
07C3
E8 0000 E CALL SYSINITl CAll THE DESCR I PTOR TABLE BU I lDER
AND REAL-TO-PROTECTED MODE SWITCHER
07C6 BO 1A
MOV
Al,1AH
<><><><><><><><><><><><>
07C8 E6 80 OUT MfG_PORT, Al
<><><>CHECKPO I NT 1 A <><>
; -------- SET TEMPORY STACK
07CA
B8 0008 MOV AX, GOT PTR
07CD 8E 08
MOV DS,AX - ,
07Cf C7 06 005A 0000 MOV DS:SS TEMP. BASE lO WORD,O
0705 C6 06 005C 00
MOV BYTE PTR OS: (SS:TEMP. BASE_H I_BYTE) ,TEMP_STACK_H I
07DA BE 0058
MOV SI,SS_TEMP ;
0700
8E 06 MOV SS,SI
07DF BC ffFD MOV SP, MAX_SEG_LEN-2 ,
;-------------------------------------------­
TEST .13
PROTECTED MODE TEST
CHECK MSW fOR PROTECTED MODE
MEMORY SIZE DETERMINE (RAM -> 640K)
DESCR I PT I ON
TH I S ROUT I NE RUNS I N PROTECTED MODE IN
ORDER TO ADDRESS All STORAGE
MEMORY SIZE IS SAVED AT MEMORY_SIZE
CMOS DIAGNOSTIC BYTE BIT 4
=
512 -> 640K
;
-------------- --- --
---
-
------
--------------­
; ------- I NSURE PROTECTED MODE
SMSW AX
GET THE MACH I NE STATUS WORD
07E2 Of
+
DB OOfH
07E3
+ ??OOOE LABEL BYTE
07E3 01 EO
+
SHL AX,1
07E5 + ??OOOf LABEL BYTE
07E3
+
ORG OffSET CS:??OOOE
07E3 01
+
DB 001H
5·44 Test 1