Table of Contents
Advertisement
1904
1904
80 fC Of
1907
72 OE
1909
E8 14f4 R
190C
72 09
190E
80 E3 85
19E1
8A E3
19E3
DO E4
19E5
OA DC
19£1
19E7
2A E4
19E9
f7
26 0485 R
19EO
50
19EE
E8 16B7 R
19f1
8B f8
19f3
8B 2E 0485 R
19f7
BA AOOO
19fA
8E C2
19fC
C5 36 010C R
lAOO
58
lAOl
03 fO
lA03
B6 03
lA05
lA05
F6 C3 80
lA08
74 OB
lAOA
B2 CE
lAOC
B8 0318
lAOf
E8 0018 R
lA12
EB lE 90
lA15
lA15
57
lA16
B2 C4
lA18
B8 020f
lA1B
E8 0018 R
lA1E
2B CO
lA20
51
lA21
8B CO
lA23
lE
lA24
E8 0001 R
lA27
lA27
AA
lA28
03 3E 044A R
lA2C
4f
lA20
E2 f8
lA2F
l f
lA30
59
lA31
5f
lA32
lA32
B2 C4
lA34
B4 02
lA36
8A C3
lA38
E8 0018 R
lA3B
57
lA3C
53
lA30
51
lA3E
8B DO
lA40
lE
lA41
E8 0001 R
1 A44
8B OE 044A R
lA48
l f
lA49
lA49
SA 04
lA4B
26:
SA 25
lA4[
26: 88 05
lA51
46
lA52
03 f9
lA54
48
lA55
75 f2
lA57
59
lA58
5B
lA59
2B.F5
lA5B
5f
lA5C
47
lA50
E2 A6
lA5F
B2 CE
lA61
B8 0300
lA64
E8 0018 R
lA67
B2 C4
lA69
B8 020F
lA6C
E8 0018 R
lA6f
E9 219B R
lA72
lA72
1M2
80 3E 0463 R B4
lA77
74 09
lA79
F6 06 0487 R 02
lA7E
74 05
lA80
CO 42
lA82
lA82
E9 219B R
lA85
lA85
2B CO
lA87
8B E8
lA89
C4 3E 04A8 R
lA80
83 C7 04
lA90
26: C4 3D
lA93
8C CO
lA95
OB C7
lA97
74 01
lA99
45
lA9A
1 A9A
E8 lOBO R
lA90
OA fF
lA9F
75 65
4789
4790
4791
4792
4793
4794
4795
4796
4797
4798
4799
4800
4801
4802
4803
4804
.4805
4806
4807
4808
4809
4810
4811
4812
4813
4814
4815
4816
4817
4818
4819
4820
4821
4822
4823
4824
4825
4826
4827
4828
4829
4830
4831
4832
4833
4834
4835
4836
4837
4838
,,839
4840
4841
4842
4843
4844
4845
4846
4847
4848
4849
4850
4851
4852
4853
4854
4855
4856
4857
4858
4859
4860
4861
4862
4863
4864
4865
4866
4867
4868
4869
4870
4871
4872
4873
4874
4875
4876
4877
4878
4879
4880
4881
4882
4883
4884
4885
4886
4887
4888
4889
4890
4891
4892
4893
4894
4895
4896
4897
4898
4899
4900
4901
4902
4903
4904
4905
4906
4907
4908
4909
4910
4911
4912
4913
4914
C
C
C
C
AL
=
CHAR TO WR ITE
BH
=
01 SPLAY PAGE
BL
=
ATTRIBUTE/COLOR
CX
=
COUNT Of CHARS TO WRITE
g
6RX-WRT -PROC----NEAR---------------------------------------------
C
-
ASSUME
OS: ABSO,
ES: NOTH I NG
C
cmp
ah,Ofh
C
Jb
no:"adj 1
C
ca
I I
mem_det
C
jc
no_adj 1
C
and
bl,10000101b
C
mov
ah,bl
C
shl
ah,l
C
or
bl,ah
C
nO_8djl:
C
SUB
C
MUL
C
PUSH
C
CALL
C
MOV
C
MOV
C
SRLOAO
C+
MOV
C+
MOV
C
WLXS
C+
LOS
C
POP
C
ADO
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
C
S20A:
NO_XOR:
S13A:
Sl K:
TEST
JZ
MOV
MOV
CALL
JMP
PUSH
MOV
MOV
CALL
SUB
PUSH
MOV
PUSH
CALL
STOSB
ADO
DEC
LOOP
POP
POP
POP
MOV
MOV
MOV
CALL
PUSH
PUSH
PUSH
MOV
PUSH
CALL
ASSUME
MOV
POP
ASSUME
MOV
MOV
MOV
INC
ADD
DEC
JNZ
POP
POP
SUB
POP
INC
LOOP
MOV
MOV
CALL
MOV
MOV
CALL
JMP
GRX_WRT ENOP
SUBTTL
AH,AH
POI NTS
AX
GR CUR
OI~AX
BP, POINTS
[S,OAOOOH
DX,OAOOOH
ES,DX
OS, S I ,GRX_SET
SI,GRX_SET
AX
SI,AX
dh,3
BL,080H
NO XOR
OL~GRAPH_AOOR
AX,0318H
OUT OX
f_2-
01
OL, SEQ_AODR
AX,020fH
OUT OX
AX,AX
CX
CX,BP
OS
DOS
OI,CRT_COLS
01
S13A
OS
CX
01
OL, SEQ_AOOR
AH,02H
AL, BL
OUT OX
01 -
BX
CX
BX,BP
OS
DOS
OS:ABSO
CX,CRT_COLS
OS
OS: NOTH I NG
AL,OS:[SIJ
AH, ES: [01 )
ES: [01 J,AL
SI
OI,CX
BX
SlK
CX
BX
SI, BP
01
01
S20A
OL, GRAPH_AOOR
AX,0300H
OUT OX
OL, SEQ_AOOR
AX,020FH
OUT OX
V_RET
SET COLOR PALETTE
AHB:
not4ahb:
ASSUME
CMP
JE
test
JZ
I NT
JMP
sub
may
I es
add
les
moy
or
jz
inc
CALL
OR
JNZ
OS:ABSO
BYTE PTR AODR_6845, OB4H
M21 B
i nfa ~
2
M21 A
42H-
V_RET
ax,ax
bp,ax
d i,
save_ptr
di ,4
di,dword ptr es:[di]
ax, es
ax,d
i
not4ahb
bp
PAL I N IT
BH,
BH
M20
; ----- HANDLE BH
=
0 HERE
ALPHA MODES
=>
BL
=
OVERSCAN COLOR
; 640x350 graph.lcs
; base card
; 85h,
xor
c2 cO mask
; expand cO to c1, c2 to c3
; bui
Id ?(80hl + (O,3,c,f)
; ZERO
, OffSET fONT TABLE BASE
;
fONT TABLE 0 I SPLACEMENT
; GET OffSET I NTO REGEN
INTO DESTINATION
BYTES PER CHAR
REGEN SEGEMNT
; ADDRESS I NG TO fONTS
,
RECOVER OffSET
; CHARACTER IN TABLE
TEST fOR XOR
NO XOR
GRAPH I CS CH I P XOR
SET REG I STER
SKI P BLANK
BLANK BOX fOR CHAR
SAVE REGEN PO INTER
;
ENABLE ALL MAPS
STORE ZERO
SAVE CHARACTER COUNT
GET BYTE COUNT
ZERO REGEN BYTE
NEXT BYTE OF BOX
ADJUST
NEXT BYTE
RECOVER CHARACTER COUNT
RECOVER REGEN PO INTER
SET MAP MASK
FOR COLOR
SET THE CHIP
SAVE OFFSET IN REGEN
SAVE COLOR VALUE
SAVE CHACTER COUNT
;
LOOP CONTROL, BYTES/CHAR
;
SAVE fONT SEGMENT
;
SET LOW RAM SEGMENT
GET COLUMN COUNT
RESTORE FONT SEGMENT
WR I TE OUT THE CHARACTER
CODE PO I NT
LATCH DATA
WR I TE ONE BYTE OF FONT
NEXT FONT PO I NT
ONE ROW BELOW LAST PO I NT
BYTES PER CHAR COUNTER
DO NEXT ROW OF CHARACTER
, CHARACT ER COUNT
; COLOR VALUE
; ADJUST PTR TO fONT TABLE
, REGEN PO INTER
;
NEXT CHAR POSN I N REGEN
; WR ITE ANOTHER CHARACTER
NORMAL WR I TE, NO ROTATE
SET THE CH I P
ENABLE ALL MAPS
SET THE CH I P
ca
II
va
I id
only for color
see
if
its the old color card
if not, handle it here
old code ca II
; back to caller
GRAPH I CS
=>
BL
=
OVERSCAN AND BACKGROUND COLOR
140 IBM Enhanced Graphics Adapter
Advertisement
Chapters
Table of Contents
