Table of Contents
Advertisement
TH I S ROUT I NE OUTPUTS THE CX REG I STER TO THE 6845 REG I STERS NAMED IN (AH)
oETERM I NE NUMBER OF COLUMNS, BOTH FOR ENT I RE 0 I SPLA Y
AND THE NUMBER TO BE USED FOR TTY I NTERF ACE
5-65
POINT TO OTHER DATA REGISTER
SET FOR SECOND REG I STER
ADDRESS REG I STER
GET VALUE
REG I STER SET
DATA REGISTER
DATA
SET OVERSCAN PORT TO A DEFAULT
30H VALUE FOR ALL MODES EXCEPT 640X200
SEE I F THE MODE IS 640X200 BW
I F NOT 640X200, THEN GO TO REGULAR
IF IT IS 640X200, THEN PUT IN 3FH
OUTPUT THE CORRECT VALUE TO 309 PORT
SAVE THE VALUE FOR FUTURE USE
WORD OFFSET I NTO CLEAR LENGTH TABLE
LENGTH TO CLEAR
SAVE LENGTH OF CRT -- NOT USED FOR BW
CLEAR ALL CURSOR pas I T IONS
EST ABL I SH SEGMENT
ADDRESSING
GET NUMBER OF COLUMNS ON TH I 5 SCREEN
CLEAR HIGH BYTE
I NIT I AL I ZE NUMBER OF COLUMNS COUNT
;
SECOND DATA VALUE
;
6845 REG I STER FOR CURSOR SET
;
SAVE I N DATA AREA
; OUTPUT CX REG I STER
; FILL WITH ZEROES
; PREPARE TO OUTPUT TO V IDEO ENABLE PORT
; PO I NT TO THE MODE CONTROL REG I STER
; GET THE MODE SET VALUE
;
SET V IDEO ENABLE PORT
I
INITIALIZATION LOOP
I GET 6845 REGI STER NUMBER
; POINT TO DATA PORT
; NEXT REG I STER VALUE
; GET TABLE VALUE
; OUT TO CHIP
; NEXT IN TABLE
; BACK TO PO I NTER REG I STER
; DO THE WHOLE TABLE
; GET MODE BACK INTO (AL )
; RECOVER SEGMENT VALUE
VIDEO (01/10/86)
1-4
01-10-86
DX,OAooR 6845
AL,AH
-
DX,AL
OX
AL,CH
DX,AL
OX
AL,AH
AL
oX,AL
OX
AL,CL
OX
AL,30H
OCRT MOoE,6
M14 -
AL,3FH
oX,AL
OCRT_PALETTE, AL
SI,OOOEH
AX,CS: [SI
+ OFFSET M5]
OCRT LEN,AX
CX,8-
01 ,OFFSET OCURSOR POSN
OS
-
ES
AX,AX
STOSW
AL ,CS: [5 I
+ OFFSET M6]
OCRT_ COLS , AX
oX,OAooR 6845
OX,4
-
AL,OCRT MODE SET
oX,AL
-
-
MOV
MOV
OUT
INC
MOV
OUT
DEC
MOV
INC
OUT
INC
MOV
OUT
MOV
SET UP OVERSCAN REG I STER
SET CURSOR pas I T IONS
INC
MOV
CMP
JNZ
MOV
AND
MOV
MOV
MOV
MOV
PUSH
POP
XOR
REP
MOV
CBW
MOV
MOV
ADD
MOV
OUT
M16:
POP
CX
POP
OX
POP
OS
POP
ES
RECOVER SEGMENTS
I RET
ALL DONE
SET_MODE
ENDP
;
-
----
---
---
----
---
-
----
---
---
--
--
-
-
-------------- --
;
SET CTYPE
;
I
NP~T
TH I 5 ROUT I NE SET S THE CUR SOR VALUE
;
(CX)
HAS CURSOR VALUE CH-START LINE, CL-SToP LINE
; OUTPUT
;
NONE
.
--
--
----
-
-
----
-------
--
----
---
--------
-
-------
---
---
SET CTYPE
PROC
NEAR
-
MQV
AH,10
MOV
OCURSOR MODE,CX
CALL
M16
-
..IMP
V IDEO_RETURN
NORMAL RETURN FROM ALL V IDEO RETURNS
V IDEO RETURN:
-
POP
BP
POP
01
POP
51
POP
BX
M14:
SET UP PO I NTER FOR REGEN
START ADDRESS SAVED IN GLOBAL
SET PAGE VALUE
NUMBER OF WORDS I N COLOR CARD
TEST FOR GRAPH I CS
NO GRAPHICS INIT
TEST FOR BW-CARo
BW CARD INIT
FILL FOR GRAPH I CS MODE
CLEAR BUFFER
BW CARD INIT
BUFFER SIZE ON BW CARD (2048)
; NO GRAPHICS INIT
; FILL CHAR FOR ALPHA + ATTR I BUTE
; CLEAR BUFFER
; FILL THE REGEN BUFFER WITH BLANKS
; - - - - -
ENABLE V IDEO AND CORRECT PORT SETT I NG
0001
MIO:
0001
8A C4
MOV
AL,AH
0003 EE
OUT
oX,AL
0004 42
INC
OX
0005 FE C4
INC
AH
00.07 8A 07
MQV
AL, [BX]
0009 EE
OUT
oX,AL
OOoA 43
INC
BX
OOoB 4A
DEC
OX
OOOC E2 F3
LOOP
Ml0
aOOE 58
POP
AX
OOoF IF
POP
os
ASSUME
OS :oATA
FILL REGEN AREA WITH BLANK
OOEO 33 FF
XOR
01,01
00E2 89 3E 004E
R
MOV
OCRT_START ,01
00E6 C6 06 0062 R 00
MOV
OACT I VE_PAGE, 0
OOEB B9 2000
MOV
CX,8192
OOEE 3C 04
CMP
AL,4
OOFO 72 OA
JC
MI2
00F2 3C 07
CMP
AL,7
00F4 74> 04
..IE
Mil
00F6 33 CO
XOR
AX,AX
00F8
EB 05
..IMP
SHORT M13
OOFA
Mil:
OOFA B5 08
MOV
CH,08H
OOFC
M12:
OOFC B8 0720
MOV
AX,
'+7·H
OOF'F
M13:
OOFF F3,f· AB
REP
STOSW
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
0101
8B 16 00'63 R
379
0105 83 C2 04
380
0 I 08 AO 0065 R
381
010B EE
382
383
384
38S
386
0 10C 2E: 8A 84 0000 E
387
0 I I 1 98
388
01 12 A3 004AR
389
390
391
392
01 15 81 E6 OOOE
393
0 I 19 2E: 8B 84 0000 E
394
01 IE A3 004C R
395
0121 B9 0008
396
0124 BF 0050 R
397
0127
IE
398
012807
399
0 I 29 33 CO
400
01 2B F31 AB
401
402
403
404
0120 42
405
01 2E BO 30
406
013080 3E 0049 R 06
407
0135 75 02
408
0137 BO 3F
409
0139
410
0139 EE
41 I
013A A2 0066 R
412
413
414
415
0130
416
0130 50
417
013E 5F
418
013F 5E
419
0140 5B
420
0141
421
0141
59
422
0142 5A
423
0143 IF
424
0144 07
425
0145 CF
426
0146
+27
428
429
430
431
432
433
434
435
0146
436
0146 B4 OA
437
0148 89 OE 0060 R
438
014C ES 0151 R
439
014F EB EC
440
441
442
443
444
0151
....45
0151
89 16 0063 R
446
0 I 55 8A C4
447
0157 EE
448
0158 4.2
449
0159 8A C5
.... 50
015B EE:
451
015C 4A
452
0 I 508A C4
453
01 5F FE CO
454
0161 EE
455
0162 42
456
0 I 63 8A C 1
I BM Persona I Computer MACRO Assemb I er
Vers
i
on 2.00
V 10EO - - - -
0 1 I I 0/86
V IDEO 0 I SPLA Y B I as
- Quick Links:
- Section 1. System Board
- 64/256K System Board
Hide quick links:
Advertisement
Chapters
Table of Contents
