IBM 5150 - Page 130

LOC OBJ LINE SOURCE
E16F 03EO
E171 8BC8
E173 Fe
EI74
E174 AA
El7S E2FD
f177 892£7204
fl78 BOF8
El7D E661
E17F E462
E181 2401
flS3 BlOC
fiBS 03CO
E
187 80Fe
E189 £661
E188 £462
E18D 240F
ElaF OAt4
E191 8Aoe
E193 8420
E195 F6EIt
EI97 A31504
E19. 7418
El9C BAOOI0
E19F 6AEO
E!AI BODO
ElA3
EtA3 8£C2
ElAS 890080
EIAS 2SFF
EIAA F3
flAB AA
flAC 81C2:0008
ElBO FEes
EIB2 75EF
flB4
EIB4 B013
ElM E620
EIBS B008
ElBA E621
EIBC
B009
ElBE E621
EICO 28CO
EIC2 8Eeo
Ele4 883000
E1e7 8£00
EIC9 etUDOl
Elce 81F03412
ElOO 7425
EI02 2SFF
EIOIt 6EOF
fl06 862400
El09 C70747FF
£100 43
flOE 43
EtOF eCOF
ElEl £85F04
EIE4 60F865
Elf7 750E
ElU B2FF
ElEB
El fB £86204
EIEE 8AC3
Elf 0 AA
515
SHL AX. Cl
516
MOV ex. AX
517
CLO I SET DIR FLAG TO INCR
518
C19:
51. STOSB
; FILL BASE RAM WITH DATA
52.
LOOP C19
, LOOP TIL ALL ZERO
521
MOV
522
523
J----- DETERtHNE 10 CHANNEL RAM SIZE
524
525 HOV
AL,OF8H
I ENABLE SWITCH 5
526 OUT
PORT_B,Al
527
AL.PORT_C
; READ SWITCHES
528
AHO AL,OOOOOOOlB
; ISOLATE SWITCH 5
'H
52. MOV
CL,l20
53.
ROL AX,Cl
531 MOV Al,OFCH
; DISABLE SW. 5
532
OUT
PORT_B,AL
533 AL,PORT_C
'H
534
AlII
Al.OFH
535
OR
AL,AH
i COI18INE SWITCH VALUES
536
NOV
BL,AL
; SAYE
537
MOV
AH,32
538
NUL AH
J CALC. LENGTH
53. MOV DATA.WORDlOFFSET IO.RAM.SIZEJ .AX
1SAYE IT
54. JZ
C21
541
MOV DX,lOOOH
I SEGMENT FOR I/O RAM
542
MOV
AM.At
543
MOV
Al.O
544
C20:
545
NOV ES,OX
546
HOV ex.sooGH ; FILL 32K BYTES
547
sue
01,01
548
REP STOSB
54.
OX.SOOH
I NEXT SEGMENT VALUE ...
550
OEC BL
551 JHZ C20
55.
553 INITIALIZE THE 8259 INTERRUPT CONTROLLER CHIP
554 ; ------------------------.---------------------------------------
555
e21:
556
NOV
AL.13H
I
ICWl - EDGE, SNGL. ICW4
557
OUT INTAOO.AL
558
NOV Al.8
J SETUP
ICW2 - lIfT TYPE 8 (8-F)
55.
OUT INTA01.Al
560
NOV
AL.9
; SETUP ICW4 - BUFFRO. 8086 HOOE
561
OUT
INTAOl.Al
56.
SUB AX .... X ~ POINT ES TO BEGIN
563
NOV
ES .... X ; OF RIW STORAGE
564 j---------------------------------------------------------------------------
565 CHECK FOR MANUFACTURING TEST 2 TO LOAD TEST PROGRAHS FROM KEYBOARD.:
566 j---------------------------------------------------------------------------
567
568 i----- SETUP STACK SEG AI'«) SP
56.
570
NOV
"'X.STACK
I GET STACK V ... lUE
571
NOV
SS .... X J SET THE STACK UP
572
MOV
SP,OFFSET
TOS
I STACK IS RE"'DY TO GO
573
CMP BP.1234H I RESET J L ... G SET?
574
JE C2S J YES - SKIP HFG TEST
575
SUB
DI.DI
576
MOV OS. DI
577 MOV
BX. 24H
578
HOV WORD PTR [BX),OFfSET 011 J SET UP KB INTERRUPT
57.
BX
'NC
580
INC BX
581
I'1OY (8XI.CS
582
CALL KBD_RESET ; READ IN KB RESET CODE TO Bl
583
CMP Bl,065H
I IS THIS MANUF"'CTURIt-aG TEST 2?
584
JNZ C25
I
JUMP IF NOT HAN. TEST
585
tIOV DL,255 I READ IN TEST PROGR ... M
586
C22:
587 CALL SP _TEST
588
HOV AL.Sl
58'
STOSS
System BIOS 5-37