IBM AT 5170 Technical Reference page 232

IBM Personal Comput.er MACRO Assembler Verston 2.00
1-'
TEST2 ---- 06/10/85 POST TESTS AND INITIALIZATION ROUTINES 06- I 0-65
229 0000 8A C I
"OV AL,CL SET T I MER 0 COUNT REG I STER
230 0002 E6 40 OUT
TIMER+O,AL
WRITE TIMER 0 COUNT REGISTER
231 0004 F8 STI
232 0005 ~6 06 0068 R 01
08: TEST 01 NTR_FLAG.O 1 H
233
DID
TIMER 0 INTERRUPT OCCUR?
234 OODA 75 00
JNZ 09 CHECK TIMER OPERATION FOR SLOW TIt..E
235
OOOC E2
Fl
LOOP
06 WA
I
T FOR ,NTERRUPT FOR SPEC I
FI
ED
TI
ME
23b
237 OODE C6 06 0015 R 02
"OV
OMf"G_ERR_FLAG,02H
<> <> <> <> <><><> <> <> <> <> <> <><> <>
236
<><>
TIMER CHECKPOINT (2)
<><>
239
2.0
241 00E3 BE 0000 E
SI,OFFSET EI02 01 SPLA Y 102 ERROR
242 00E6 E9 0051 R
DbA TIMER 0 INTERRUPT DID NOT OCCUR" ERROR
2'3
24.
245 00E9 BO 2B 09: MOV
AL,2BH <><> <> <><><><><><> <><><>
24& OOEB E6 80
OUT MFG_PORT .AL <><> CKECKPOINT 2B <><>
247
248 ODED FA
eLI
249 OOEE BlOC
MOV Cl,I2 SET PROGRAM LOOP COUNT
250 OOFO BO
~F
MOV
AL,OFFH WR I TE
TI
MER 0 COUNT REG I STER
251 00F2 E6 40
OUT TI MER+O.AL
252 00F4 C6 06 006B R 00 MOV ClINTR FLAG,O RESET INTERRUPT RECEIVED FLAG
253 00F9 BO FE
"OV
AL,OFEH RE-ENA8LE T I MER
0
INTERRUPTS
254 OOFB £6 2 I OUT
INTAOI,AL
255 OOFD FB
STI
256 OOFE F6 06 006B R 0 I DIOt TEST ClINTR FLAG,OIH DID T [MER 0 I NTERRUPT OCCUR?
257 0103 Hi DE
JNZ
08 A -
YES - TIMER COUNTING TOO FAST, ERROR
258 0105 E2
Fl
LOOP 01'0 WAIT FOR INTERRUPT FOR SPECIFIED TltdE
25.
2.0
WAIT FOR
INTERRUPT
261
262 0107 2B C9 SUB
CX,CX
263
264 0 I 09 BO 2C
"OV
AL,2CH <> <> <> <><> <> <> <> <> <> <><>
265 OIOB E6 80
OUT MFG_PORT ,AL
<><>
CHECKPOINT 2C
<><>
266 0100
011 0:
267 0100 F6 06 006B R 01
TEST ClINTR_FLAG.OIH DID TIMER
0
INTERRUPT OCCUR?
268 01 12 75 08
JNZ 012 GO IF YES
269 0114 E2 F7 LOOP
DI10 TRY AGAIN
270
27101168EOOOOE
"OV
51 ,OFFSET EI03
DISPLAY 103 ERROR
272 0119 E9 0051 R
J"P
ERROR I F NOT
06'
273
27' SETUP TI MER 0 TO MODE 3
275
27601lCFA
D12: eLI
217 01tDBOFF
MOV AL,OFFH DISABLE ALL DEVICE INTERRUPTS
27801lFE621
OUT INTAOI,AL
279 0121 BO 36
"OV AL,36H
SELECT TIMER O,LSB,MSB,MODE 3
280 0123 E6 43
OUT TIMER+3,AL WRITE TIMER MODE REGISTER
281 0125 EB 00
J"P
110 DELAY
'-2
282 0127 BO 00
"OV AL,O
283 0129 E6 40 OUT
T IMER+O,AL
WRITE LSB TO TIMER 0 REGISTER
284 012B EB 00 JMP
" 2
I/O DELAY
285 0120 E6 40
OUT
TlMER+O ,AL WRITE MSB TO TIMER 0 REGISTER
266
2.,
CHECK 6042 FOR LAST COMMAND ACCEPTED
288
289
a
12F 2B C9
SUB CX,CX SET WAIT TIME
290 0131 BO 20
"OV
AL,20H <> <> <> <><><><><> <><><><>
291 0133 E6 80
OUT MFG PORT ,AL
<><>
CHECKPOINT 20
<><>
292 0135 E4 64
013: IN AL,S-TATUS PORT GET THE 6042 STATUS
293 0137 A8 02
TEST AL, I NPT aUF FUll HAS THE LAST COMMAND BEEN ACCEPTED?
294 0139 74 08
JZ
EI9 - -
GO IF YES
295 013B E2 F8
LOOP 013 TRY AGAIN
2. .
2'7
;----- ERROR EXIT (MESSAGE 105)
296
299 0130 BE 0000 E MOV
SI,OFFSET EI05 PRINT
105
ERROR
300 0140 E9 0051 R
JMP D6A GO ERROR HALT
301
302 ;
- - - - - -
--------
- - -- - - -
----
- - - - - - -- - -
--
-
--
- -
-
- -- -
----
-
-
- - - - -- -
-----
-
- - - - - ­
303
I TEST. 19
3D' ADDITIONAL READ/WRITE STORAGE TEST
305
++++ MUST RUN IN PROTECTED MODE ++++
30b DESCR I PT I ON
307
WRITE/READ DATA PATTERNS TO ANY READ/WRITE STORAGE AFTER THE
306 FIRST 64K. STORAGE ADDRESSABILITY IS CHECKED.
30'
;------------
--
-----
-------­
310
311
ASSUME DS:OATA
312 0143 E19:
313 0143 E8 0000 E CALL 005 SET DATA SEGMENT
314 0146 BO 2F
"OV Al,2FH
<> <> <> <> <><> <> <> <> <> <><>
315 0148 E6 80
OUT MFG_PORT ,AL <><> CHECKPOINT 2F <><>
31b
317 014A 81 3E 0072 R 1234
e"p
WARM START? ~~~~ET _FLAG, 1234H
318 0150 75 03
JNE GO IF NOT
319 0152 E9 0420 R
JMP SHUT2 GO TO NEXT TEST I F WARM START
320
321
SET SHUTDOWN RETURN 2
322
323 0155 BO 30 EI9AI MOV
AL,30H
<> <> <> <> <><><> <> <> <> <><>
324 0157 E6 80 OUT
MFG_PORT, AL
<><>
CHECI(POINT 30
<><>
325
326 0159 B8 028F hlDV
AX,Z·H+CMOS SHUT_DOWN+NNI • ADDRESS FOR SHUTDOWN BYTE
327 DISC E8 0000 E
CALL CMOS_WRITE - SECOND ENTRY IN SHUTDOWN TABLE
32.
32. ; - - - - - ENABLE PROTECTED MODE
330
331 015F BC 0000
"DV
SP,P05T S5 SET STACK f"OR SYS1NITI
332 0162 8E 04
"OV
SS, SP ­
333 0164 BC 8000
"OV
SP,POST_SP
33.
335 0167 E8 0000 E
CALL SYSINITI GO ENABLE PROTECTED MODE
33.
331
016A BO 31 MOV AL,31H <><><> <> <><><><> <> <><><>
338 016C E6 80
OUT MFG_PORT ,AL
<><>
CHECKPOINT 31
<><>
33'
340
; ----- SET TEMPORARY STACK
341
342 016E lOA 08
5-60
TEST2