IBM 5150 Hardware Reference Manual page 200

LaC OBJ
LINE SOURCE
E100 EBAO
38.
JNP SHORT ERROl
386
387 INITIALIZE TINER 1 TO REFRESH MEMORY
388
EIOF
38.
C15: ; WRAP_OMA_REG
flOF 8054 3.0
MOV
Al.54H ;SEl TIM I. LSB. MODE 2
Ell1 E643
391 OUT TIMER+3.AL
;WRITE TIMER MODE REG
E113 B012
392
MOV AL.IS
;SETUP DIVISOR FOR REFRESH
EllS E641
393 OUT
TIMER+l.Al
iL-:RITE TIMER 1 CNT REG
E1l7 E600 394 OUT
OMA+ODH,Al
iSH/O MASTER CLEAR TO DMA
395
396 WRAP oMA CHANNELS ADDRESS AND COUNT REGISTERS
397
E119 BOFF
3.8
MOV AL,OFFH ;WRITE PATTERN FFH TO ALL REGS
EllB 8A08 39. C16:
MOV
BL,AL ;SAVE PATTERN FOR COMPARE
EllD 8AF8 400
MOV
BH,AL
EllF 890800
401
MOV CX,B ;SETUP LOOP CNT
E122 BAOOOO
402 MOV OX,DMA
; SETUP I/O PORT AD DR OF REG
E125 EE 403
t17:
O'JT
DX,Al IWRITE PATTERN
TO
REG, LSB
E126 EE 404 OUT OX,AL ;t1SB OF 16 BIT REG
E127 B80101 405 110V AX,OIOIH ;AX TO ANOTHER PAT BEFORE
RO
E12A EC
406 '"
AL,oX ;READ 16-BIT DMA eH REG, LSB
E128 8AEO 407 tIDY AH,AL
;SAYE lSB OF 16~BIT REG
E120 EC 408 IN AL,oX ;READ MSB OF DMA CH REG
f12E 3808 40. CtlP 8X,AX ;PATTERN READ AS WRITTEN?
EnD 7403 410
J'
C18
; YES - CHECK NEXT REG
E 132 E97AFF 411
JMP
ERROl ;NO - HALT THE SYSTEM
E135 41. C18:
I NXT_DI1A_CH
E135 42
413 INC OX
;SET I/O PORT TO NEXT CH REG
E136 ElED 414
LOOP CI7
iWRITE PATTERN TO NEXT REG
E136 F6DO 41.
NOT AL iSET PATTERN TO ZERO
E13A 74DF
416 JZ C16
;WRITE TO CHANNEL REGS
417
418 INITIALIZE AND START DMA FOR MEMORY REFRESH.
419
EBe
BOFF 420
MOV
At,OFFH
; SET CNT OF 64K FOR RAM REFRESH
E13E E601 421
OUT
DMA+l,Al
E140 E601
422
OUT QMA+l,Al
El42 B058
423
tlOV Al,058H ,SET OMA MODE.CH O,READ,AUOTIHT
E144 E608 424 OUT
DHA+OBH,AL ,WRITE oMA MODE REG
E146 8000 425
MOV
Al,O ; ENABLE OMA CONTROLLER
E148 E606
426 OUT
OMA+8,Al
; SETUP OMA COMMAND REG
E14A E60A 427
OUT DMA+I0 ,At ;ENABLE CHANNEL 0 FOR REFRESH
E14C B041
42. MOV AL,41H ,SET MODE FOR CHANNEL 1
E14E E608 4••
OUT
OMA+OBH,AL
E150 8042 43D MOV AL,42H ;SET MODE FOR CHANNEL 2
E152 E608 431
OUT DMA+OBH,AL
E154 8043
432 MOV AL,43H ;SET MODE FOR CHANNEl 3
E156 E608 433
OUT OMA+OBH .AL
434
;-------------------------------------------­
435 ;TESr.04
436 BASE 16K REAO/WRITE STORAGE TEST
437
438 ;DESCRIPTION
439 WRITE/REAOIVERIFY DATA PATTERNS FF,55.AA.Ol, ANO 00 TO 1ST 16K OF
440 STORAGE. VERIFY STORAGE AOORESSABIllTY.
441 INITIALIZE THE 8259 INTERRUPT CONTROllER CHIP FOR CHECKING
442 MANUFACTURING TEST 2 MODE.
443 ; ----­ ---------------­ ---­ -----------­ - --­ --­
444 DETERMINE MENORY SIZE AND FILL MEMORY Wlrn DATA
445
E158 884000 446 MOV AX,OATA jPOINT OS TO DATA SEG
E158 8E08
447
MOV OS,AX
I
EISC 681E7200 448 HOV BX,RESETJLAG ;SAVE RESET_FLAG' IN
ax
E161 28CO 449
SUB
AX,AX ;SET ES MID OS TO 0
E163 8EtO
450
NOV ES,AX ; SETUP ES SEGMENT REG
f165 6E08
451 MOV oS,AX
El67 2BFF 452
SUB
01,01
E169 E460 453 IN
Al.PORT_A
IDETERMINE BASE RAM SIZE
E168 240C 454 AHO AL,OCH jISQlATE RAM SIZE SWS
E160 0404 455
ADO
AL, 4
I CALCULATE MEMORY SIZE
E16F BlOC 456 MOV CL, 12
E171 03EO 457
SHL
AX, CL
EI73 88C8
458 MOV
CX, AX
E175 8AEO
45. MOV AH. AL
fI77 Fe 460 CLD ISET DIR FLAG TO INCR
E178 AA 461 C19:
STOSB
;FIlL BASE RAM WITH DATA
A-7