IBM XT 5160 Technical Reference page 248

;----- SEE IF LOCATION THAT CAUSED PARITY CHECK CAN 8E FOUND
POST (01/10/86)
·
-
-
-- - -
-- -----
- - - - - -
---------- - --- -- -- --- ---- -- ------- ---
; TH I S ROUT I NE CHECKSUMS OPT 10NAL ROM MODULES AND
; IF CHECKSUM IS OK, CALLS INIT/TEST CODE IN MODULE
5-101
SET FOR 16K8 SCAN
SET S I TO 8E REAL TI VE TO
START OF ES
READ 16K8 OF MEMORY
SEE I F PAR I TY CHECK HAPPENED
PRINT ROW OF 11111 IF PARITY
CHECK COULD NOT 8E RE-CREATED
SET COUNT
SAVE COUNT
ADJUST
GO PRINT ADDRESS IF IT DID
PO I NT TO NEXT 16K 8LOCK
PR I NT SEGMENT VALUE
HALT SYSTEM
PO I NT TO NEXT 8YTE
ADD ALL 8YTES IN ROS MODULE
SUM
=
01
GET MEMORY SIZE WORD
SET 0 I R FLAG TO I NCR I MENT
POINT OX AT START OF MEM
POST CHECKSUM ERROR
AND EXIT
SAVE AX REG CONTENTS
READ CURRENT VAL OF PORT 8
FLIP ALL 81TS
I SOLATE CONTROL 81 T
MASK OUT OF ORIGINAL VAL
OR NEW CONTROL 8 I TIN
SET PO I NTER TO NEXT MODULE
RETR I VE COUNT
DO CHECKS~M
; TOGGLE PAR I TY CHECK ENA8LES
; 0 I SA8LE. TRAP
; PO I NT ES TO DATA AREA
; RESTORE AX REG
; RESTORE OR I G CONTENTS OF AX
; HALT SYSTEM
; SAVE PO INTER
; ZERO OUT AH
; GET LENGTH I NO I CATOR
; MULTI PL Y 8Y 5 12
1-18
01-10-86
'PARITY CHECK l ' ,CR,LF
'11111' ,CR,LF
AX
AL,DS: [8X]
8X
C26
AL,AL
DX,DS
PRT_SEG
ENDP
AL,OOH
OAOH,AL
AL,PORT 8
AL,001100008
PORT 8,AL
AL,1To011118
PORT 8,AL
8X ,CtMEMORY_ SIZE
DX,DX
DS,DX
ES,DX
CX,4000H
S I ,S I
OX
DS:DATA
PROC NEAR
AX
AL,PORT B
AH,AL -
AL
AL,010000008
AH,101111118
AL,AH
PORT 8,AL
AL,EOI
INTAOO,AL
AX
ENDP
LODS8
AL,PORT C
AL,Il0000008
PRT NMI
DX,0400H
8X,I6D
NMI LOOP
S I ,TDFFSET D2A)
P_MSG
08
08
8L I NK LED PROCEDURE FOR MFG RUN-
I N TESTS
I F LED I S ON, TURN I T OFF. I F OFF, TURN ON.
ADD
INC
LOOP
OR
RET
~~:=:~::~:~~
----
:~~~
---------------------
MESSAGE AREA FOR POST
C26:
02
014:
·
-
-- --- -- ------ - -- - ----- ------ ----- ---- --
; ROS CHECKSUM SU8ROUT I NE
~~~-~~~~~~~~----~~~~----~~~~------------~
NEXT ROS MODULE
- MOV CX , 0 ; NUM8ER OF 8YTES TO ADD
ROS CHECKSUM CNT: ; ENTRY FOR OPT 10NAL ROS TEST
- XOR - AL,AL
D2A
ASSUME
8L1NK INT
- STI
PUSH
IN
MOV
NOT
AND
AND
OR
OUT
MOV
OUT
POP
IRET
8LINK_INT
MOV
OUT
IN
OR
OUT
AND
OUT
MOV
CLD
SU8
NMI LOOP:
- MOV
MOV
MOV
SU8
REP
IN
AND
JNZ
ADD
SU8
JNZ
MOV
CALL
CLI
HLT
PRT NMI:
- MOV
CALL
CLI
HLT
POP
IRET
NMI_INT_'
·
---------
-------------------------------
EO 08 '101' ,CR,LF ; SYSTEM 80ARD ERROR
El 08 ' 201' ,CR,LF ; MEMORY ERROR
F3A 08 'ROM' ,CR, LF ; ROM CHECKSUM ERROR
F3C 08 '1801' ,CR,LF ; EXPANSION 10 80X ERROR
01 08 'PARITY CHECK 2' ,CR,LF
·
-- - --- --
- - - - -
--- --- --------- ----- - ----- -- ------ ----- ----
ROM CHECK PROC NEAR
- MOV AX,DATA
MOV ES,AX
SU8 AH,AH
MOV AL, [8X+2]
MOV CL,09H
SHL AX ,CL
MOV CX,AX
PUSH CX
MOV CX,4
SHR AX,CL
ADD OX, AX
POP CX
CALL ROS CHECKSUM CNT
JZ ROM-CHECK I -
CALL ROM-ERR-
JMP ROM:CHECK_END
ROM CHECK 1:
- POSH
188F
188F 89 0000
18C2
18C2 32 CO
18C4
18C4 02 01
18C6 43
18C1 E2 F8
18C9 OA CO
18C8 C3
18CC
1890 F3/ AC
189F E4 62
18A 1 24 CO
18A3 15 II
18A5 81 C2 0400
18A9 83 E8 10
18AC 15 E6
18AE 8E 1902 R
1881 E8 1991 R
1884 FA
1885 F4
1886
1886 8C DA
1888 E8 OC8A R
1888 FA
188C F4
1880
1880 58
188E CF
188F
18CC 31 30 31 00 OA
1801 20 32 30 31 ODOA
1801 52 4F 40 00 OA
18DC 3 I 38 30 31 00 OA
18E2 50 41 52 49 54 59
20 43 48 45 43 48
20 32 00 OA
18F2 50 41 52 49 54 59
20 43 48 45 43 48
20 31 00 OA
1902 3F 3F 3F 3F 3F 00
OA
181F 80 00
1881 E6 AO
1883 E4 61
1885 OC 30
1881 E6 61
1889 24 CF
1888 E6 61
1880 88 1E 0013 R
1891 FC
1892 28 02
1894
1894 8E DA
1896 8E C2
1898 89 4000
1898 28 F6
1909
1909 F8
190A 50
1908 E4 61
1900 8A EO
190F F6 DO
1911 24 40
1913 80 E4 8F
1916 OA C4
1918 E6 61
191A 80 20
191 C E6 20
191E 58
191F CF
1920
1920
1920 88 ---- R
1923 8E CO
1925 2A E4
1921 8A 41 02
192A 81 09
192C 03 EO
192E 88 C8
1930 51
1931 89 0004
1934 03 E8
1936 03 DO
1938 59
1939 E8 18C2 R
193C 14 06
193E E8 0146 R
1941 E8 14 90
1944
1944 52
IBM Personal Computer MACRO Assembler Version 2.00
POST ----- 01/10/86 SYSTEM POST AND 810S PROCEDURES
1933
1934
1935
1936
1931
1938
1939
1940
1941
1942
1943
1944
1945
1946
1941
1948
1949
1950
1951
1952
1953
1954
1955
1956
1951
1958
1959
1960
1961
1962
1963
1964
1965
1966
1961
1968
1969
1910
1911
1912
1913
1914
1915
1916
1911
1918
1919
1980
1981
1982
1983
1984
1985
1986
1981
1988
1989
1990
1991
1992
1993
1994
1995
1996
1991
1998
1999
2000
2001
2002
2003
2004
2005
2006
2001
2008
2009
2010
20 II
2012
2013
2014
2015
2016
2011
2018
2019
2020
2021
2022
2023
2024
2025
2026
2021
2028
2029
2030
2031
2032
2033
2034
2035
2036
2031
2038
2039
2040
2041
2042
2043
2044
2045
2046