IBM XT 5160 Technical Reference page 265

I NIT I AL I ZE THE 8259 I NTERRUPT CONTROLLER CH I P
;----- ESTABLISH BIOS SUBROUTINE CALL INTERRUPT VECTORS
.
---------- - ------ --------------------- -
- - - - - - - - - - -
------
C25: MOV AL, 13H I CW I - EDGE, SNGL, I CW4
OUT I NTAOO, AL
MOV AL,8 SETUP ICW2 - INT TYPE 8 18-F)
OUT I NTA 0 1 , AL
MOV AL,9 SETUP ICW4 - BUFFRD,8086 MODE
OUT INTAOI,AL
MOV AL, OFFH MASK ALL I NTS. OFF
OUT I NTAO I ,AL (V IDEO ROUT! NE ENABLES I NTS. )
SET UP THE I NTERRUPT VECTORS TO TEMP INTERRUPT
; SAVE MEMORY SIZE
GO TO BOOTSTRAP I F SO
SET SEG. REG.
RECOVER OAT A SEG
GET SW I TCH INFO
ISOLATE SW ITCHES
SAVE
ENABLE OTHER BANK OF SWS.
LOAD MFG. TEST REQUEST?
SEE IF MFG. JUMPER IN
KEYBOARD PRESENT?
FILL ALL 32 INTERRUPTS
FIRST INTERRUPT LOCATION
SET ES=OOOO ALSO
MOVE ADDR OF I NTR PROC TO TBL
GET ADDR OF I NTR PROC SEG
VECTBLO
TEST PATTERN
SAVE PATTERN
SEND PATTERN TO MEM.
PUT SOMETH I NG IN AL
GET PATTERN
COMPARE PATTERNS
GO END I F NO COMPARE
SET COUNT FOR 8K WORDS
FILL 8K WORDS
PO I NT TO NEXT 16KB BLOCK
BUMP COUNT BY 16KB
TOP OF RAM AREA YET? (AOOOO I
; ROTATE TO HIGH NIBBLE
; ISOLATE
; COMB I NE WITH OTHER BANK
; MOVE VECTOR TABLE TO RAM
; SK I P SEGMENT PO INTER
; GET STACK VALUE
; SET THE STACK UP
; STACK I S READY TO GO
; MAKE AX=OOOO
; STORE 8K WORDS OF 0000
AX, STACK
SS,AX
SP, OFFSET TOS
AX,AX
STOSW
AX,CS
01 , OFFSET V IDEO I NT ; SETUP ADDR TO I NTR AREA
CS -
OS ; SETUP ADDR OF VECTOR TABLE
AX ,OS ; SET AX=SEGMENT
SI,OFFSET VECTOR TABLE+16 ; START WITH VIDEO ENTRY
CX,I6 -
03
DATA_WORD[OFFSET MEMORY_SIZE] ,BX
OS
CX,32
01,01
ES,DI
AX,OFFSET 011
OS
OS
AL,PORT C
AL,OOooTlIIB
AH,AL
AL,10101101B
PORT_B,AL
01
01
D3A
AL,PORT C
CL,4 -
AL,CL
AL,11110000B
AL,AH
AH,AH
DATA WORD[OFFSET EQUIP FLAG],AX ; SAVE SWITCH INFO
AL,99H -
CMD PORT ,AL
KBD-RESET
BL,OAAH
E6
BL,065H
D3B
MFG BOOT
AL,38H
PORT_B,AL
AL,PORT A
AL,OFFH- WAS DATA LINE GROUNDED
E6
DATA_AREA[OFFSET MFG_TST] ; SET MANUFACTURING TEST FLAG
OX ,400H
BX,16
DH,OAOH
FILL_LOOP
ES,DX
01,01
AX,OAA55H
CX,AX
ES:[DI],AX
AL,OFH
AX,ES:[DI]
AX,CX
HOW BIG END
cx,2000R
STOSW
DATA WORD[OFFSET RESET FLAG] ,BX ; RESTORE RESET FLAG
DX,0400H - ; SET PO I NTER TO JUST> I 6KB
BX,16 ; BAS I C COUNT OF 16K
DETERMINE CONFIGURATION AND MFG. MODE
PUSH
MOV
SUB
MOV
MOV
STOSW
MOV
STOSW
LOOP
MOV
MOV
MOV
MOV
PUSH
POP
MOV
MOV
MOV
MOVSW
INC
INC
LOOP
POP
PUSH
IN
AND
MOV
MOV
OUT
NOP
IN
MOV
ROL
AND
OR
SUB
MOV
MOV
OUT
CALL
CMP
JE
CMP
JNE
JMP
MOV
OUT
NOP
NOP
IN
AND
JNZ
INC
; ----- SETUP STACK SEG AND SP
D3B:
03:
D3A:
SOURCE (BIOS FOR THE IBM PERSONAL COMPUTER XTI 11/08/82
CLR STG:
- SUB
REP
HOW BIG:
- MOV
MOV
MOV
FILL LOOP:
- MOV
SUB
MOV
MOV
MOV
MOV
MOV
XOR
JNZ
MOV
REP
ADD
ADD
CMP
JNZ
HOW BIG END:
- -MOV
LOC OBJECT
LINE
E18E 531
E18E 2BCO 532
E 190 F3 533
EI91
AB
E192
534
E192 891E1204 535
E196 BAOO04
536
E 199 BB 1000
531
EI9C
538
E19C 8EC2 539
E 19E 2BFF
540
E 1AO B855AA 541
E 1A3 8BC8 542
E 1A5 268905 543
E1A8 BOOF 544
E 1AA 268B05
545
El AD 33C 1
546
EIAF 1511
541
EIBI B90020
548
E1B4 F3 549
E IB5 AB
EIB681C20004
550
ElBA 83C310 551
E IBD 80FEAO
552
EICO 15DA 553
EIC2 554
E I C2 89 I E 1304
55~
556
551
558
E I C6 B83000 559
E I C9 8EDO 560
EICB BCOOOI 561
562
563
564
E ICE BO 13
565
E 100 E620
566
E1D2 B008
561
E1D4 E621 568
E1D6 B009 569
E 108 E621 510
E IDA BOFF
511
E lDC E621
512
513
514
515
EIDE IE 516
E 1OF B92000 511
E IE2 2BFF 518
E I E4 8EC1
519
E I E6 B823FF
580
E I E9 AB 581
E1EA 8CC8 582
E I EC AB 583
E1ED E2F1 584
585
586
581
E lEF BF4000
588
E1F2 OE
589
E1F3 IF
590
E lF4 8CD8 591
E 1F6 BE03FF90 592
EIFA B91000 593
E1FD A5 594
EIFE 41 595
EIFF 41
596
E200 E2FB
591
598
599
600
60 I
E202 IF 602
E203 IE 603
E204 E462 604
E206 240F 605
E208 8AEO 606
E20A BOAD
601
E20C E661 608
E20E 90
609
E20F E462
610
E211 Bl04
611
E213 D2CO
612
E215 24FO 613
E211 OAC4 614
E219 2AE4 615
E21 B A31004 616
E21 E B099
611
E220 E663 618
E222 E80518
619
E225 80FBAA
620
E228 1418
621
E22A 80FB65
622
E22D 1503
623
E22F E9EFFD
624
E232 B038
625
E234 E661 626
E236 90 621
E231 90 628
E238 E460 629
E23A 24FF 630
E23C 1504 631
E23E FE06 I 204 632
633
5-118
PC-XT System BIOS (11/08/82)