IBM XT 5160 Technical Reference page 308

LI NE SOURCE (B I OS FOR THE I BM PERSONAL COMPUTER XT) I 1 /08/82
;----- DETERMINE GRAPHICS MODE IN OPERATION
5-161
EXCLUS I VE OR WITH CURRENT
STORE THE CODE PO I NT
AGAIN FOR ODD FIELD
GET THE OFFSET OF THE TABLE
GET THE SEGMENT OF THE TABLE
GET BYTE FROM CODE POINTS
SHOULD WE USE THE FUNCT I ON
TO PUT CHAR IN
STORE I N REGEN BUFFER
CRT CHAR GEN (OFFSET OF I MAGES)
SAVE SEGMENT ON STACK
DETERM I NE_MODE
ESTABL I SH VECTOR ADDRESS I NG
RECOVER DATA SEGMENT
SAVE TABLE SEGMENT ON STACK
BACK TO MA I NSTREAM
HIGH CHAR
SA VE-REGEN PO INTER
SAVE CODE PO INTER
NUMBER OF TIMES THROUGH LOOP
GET CODE PO I NT
DOUBLE UP ALL THE BITS
CONVERT THEM TO FOREGROUND
COLOR ( 0 BACK )
I S TH I S XOR FUNCT I ON
NO, STORE IT IN AS IT IS
DO FUNCT I ON WITH HALF
AND WITH OTHER HALF
STORE FIRST BYTE
STORE SECOND BYTE
GET CODE PO I NT
CONVERT TO COLOR
AGA IN, I S TH I S XOR FUNCT I ON
NO. JUST STORE THE VALUES
FUNCT I ON WITH FIRST HALF
AND WITH SECOND HALF
RECOVER REGEN PO INTER
PO I NT TO NEXT CHAR POS I T I ON
MORE CHARS TO WR I TE
DETERM 1NE MODE
MUL TI PL Y CODE PO I NT
VALUE BY 8
MORE TO WR I TE
MED RES WR I TE
SAVE HIGH COLOR BIT
OFFSET·2 SINCE 2 BYTES/CHAR
EXPAND BL TO FULL WORD OF COLOR
MED CHAR
SAVE REGEN PO INTER
SAVE THE CODE PO INTER
NUMBER OF LOOPS
STORE I N SECOND PORT ION OF BUFFER
PO I NT TO NEXT LOCA T I ON
KEEP GOING
RECOVER CODE PONTER
RECOVER REGEN PO INTER
PO I NT TO NEXT CHAR POS I T I ON
; S I HAS OFFSET OF DES I RED CODES
; RECOVER TABLE PO I NTER SEGMENT
TEST FOR MED I UM RESOLUT I ON MODE
; STORE I N SECOND HALF
MOVE TO NEXT ROW I N REGEN
DONE WITH LOOP
AL,ES: [01 +2000H-I]
S5
S I, OFA6EH
CS
SHORT S2
S21
AX,BX
AX,I
AX,I
AX,
I
S I ,AX
CRT MODE,6
OS -
S7
BL,80H
S6
AL,80H
OS
S I, S I
DS,SI
OS: ABSO
S I ,EXT PTR
DX,DS -
OS :DATA
OS
OX
ES: [01 +2000H-l] ,AL
01,79
DH
S4
S I
01
01
S3
V IDEO_RETURN
AL,ES:[DI]
01
S I
DH,4
DL,BL
01,1
S 19
01
S I
DH,4
S21
AX,BX
DL,80H
S II
AH,ES: [01 +2000H]
AL,Ei: [01 +200 IH]
ES:[DI+2000H ,AH]
ES: [01 +2000H+ I] ,AL
01,80
DH
S9
S I
01
01
01
S8
V IDEO RETURN
ENDP -
DL,80H
S 1 0
AH,ES: [01]
AL,ES: [01 + I]
ES:[DI].AH
ES:[DI+I],AL
TEST
JZ
XOR
XOR
MOV
PUSH
JMP
MOV
SAL
CALL
LODSB
CALL
AND
LODSB
TEST
JNZ
STOSB
LODSB
MOV
ADD
DEC
JNZ
POP
POP
INC
LOOP
JMP
XOR
STOSB
LODSB
XOR
JMP
PUSH
PUSH
MOV
SAL
SAL
SAL
ADD
CMP
POP
JC
SUB
PUSH
SUB
MOV
ASSUME
LOS
MOV
ASSUME
POP
PUSH
PUSH
PUSH
MOV
MOV
MOV
LODSB
CALL
AND
TEST
JZ
XOR
XOR
PC-XT System BIOS (11/08/82)
I MAGE I SIN SECOND HALF, I N USER RAM
EXTEND CHAR
ZERO OR I GIN FOR SECOND HALF
SAVE DATA POINTER
IMAGE IS IN FIRST HALF, CONTAINED IN ROM
;----- HIGH RESOLUTION MODE
; ----- MED I UM RESOLUT ION WR I TE
S 11:
S 10:
MOV
MOV
ADD
DEC
JNZ
POP
POP
INC
INC
LOOP
JMP
GRAPH I CS_WR I TE
4481
4482
4483
4484
4485
4486
4487
4488
4489
4490 SI:
4491
4492
4493
4494
4495
4496
4497
4498
4499
4500
4501
4502
4503
4504 S2:
4505
4506
4507
4508
4509
4510
4511
4512
4513
4514
4515 S3:
4516
4517
4518
4519 S4:
4520
4521
4522
4523
4524
4525 S5:
4526
4527
4528
4529
4530
4531
4532
4533
4534
4535 S6:
4536
4537
4538
4539
4540
4541
4542
4543
4544 S7:
4545
4546
4547
4548 S8:
4549
4550
4551
4552 S9:
4553
4554
4555
4556
4557
4558
4559
4560
4561
4562
4563
4564
4565
4566
4567
4568
4569
4570
4571
4572
4573
4574
4575
4576
4577
4578
4579
4580
4581
4582
4583
F58B
F58B 2C80
F58D IE
F58E 2BF6
F590 8EDE
F5AA
F5AA 57
F5AB 56
F5AC B604
F5AE
F5AE AC
F5AF F6C380
F5B27516
F5B4 AA
F5B5 AC
F5B6
F5B6 268885FF I F
F5BB 83C74F
F5BE FECE
F5CO 75EC
F5C2 5E
F5C3 5F
F5C4 47
F5C5 E2E3
F5C7 E9FBFB
F5CA
F5CA 263205
F5CD AA
F5CE AC
F5CF 263285FF I F
F5D4 EBEO
F598 IF
F599 52
LOC OBJECT
F592 C5367COO
F596 8CDA
F59A
F59A OlEO
F59C 0 I EO
F59E OlEO
F5AO 03FO
F5A2 803E490006
F5A7 IF
F5A8 722C
F585 BE6EFA
F588 OE
F589 EBOF
F5D6
F5D6 8AD3
F5D8 D1E7
F5DA E8Dl00
F5DD
F5DD 57
F5DE 56
F5DF B604
F5EI
F5El AC
F5E2 E8DEOO
F5E5 23C3
F5E7 F6C280
F5EA 7407
F5EC 263225
F5EF 2632450 I
F5F3
F5F3 268825
F5F6 2688450 I
F5FA AC
F5FB E8C500
F5FE 23C3
F600 F6C280
F603 740A
F605 2632A50020
F60A 2632850120
F60F
F60F 2688A50020
F614 2688850120
F619 83C750
F61C FECE
F61E 75Cl
F620 5E
F621 5F
F622 47
F623 47
F624 E2B7
F626 E99CFB