IBM 5170 Technical Reference page 269

TITLE 08/18/83 VIDEOl
• LI ST
includes are postequ.src, dseg.src
0000
:=
0010
; NClUOE SEGMENT. SRC
CODE SEGMENT BYTE PUBLIC
EXTRN DDS; NEAR
EXTRN M5; WORD
EXTRN M6: BYTE
EXTRN M7: BYTE
EXTRN CRT _CHAR_GEN: NEAR
EXTRN BEEP: NEAR
PUBLIC VIDEO 10 1
Mi, EQU - D010H
I NT 10 -------- -.------- ---------------~---------------------- --­
VIDEO
10
-THESE ROUTINES PROVIDE THE CRT INTERFACE
THE FOllOWING FUNCTIONS ARE PROVIDED:
(AH)=O SET MODE (Al) CONTAINS MODE VALUE
(AL)"-O 40X25 BW (POWER ON DEFAULT)
(Al)=1 40X25 COLOR
(ALI=2 BOX25 BW
(AL
)=3 BOX25
COLOR
GRAPH ICS MODES
(Al )::4 320X200 COLOR
(Al)""'5 320X200 BW
(AL)=6 640X200 BW
CRT MODE = 7 80X25
B&I-I
CARD (USED INTERNAL TO VIDEO ONLY)
***
NOTES -BW MODES OPERATE SAME AS COLOR MODES, BUT COLOR
BURST IS NOT ENABLED
-CURSOR I S NOT 0 I SPLAYED I N GRAPH I CS MODE
(AH)=1 SET CURSOR TYPE
(CHI BITS 4-0 = START LINE FOR CURSOR
**
HARDWARE Will ALWAYS CAUSE Bl I NK
**
SETTING BIT
5
OR 6 WILL CAUSE ERRATIC BLINKING
OR NO CURSOR AT All
(Cl) '" BITS
4-0
= END liNE FOR CURSOR
(AH)=2 SET CURSOR POSITION
(DH,Dl) = ROW,COlUMN (0,0) IS UPPER LEFT
(BH) = PAGE NUI·mER (MUST BE 0 fOR GRAPHICS MODES)
(AH )=3 READ CURSOR POS I T ION
(BH) = PAGE NUMBER (MUST BE 0 FOR GRAPH I CS MODES)
ON EXIT (DH,Dll = ROW,COlUMN OF CURRENT CURSOR
(CH,CL)
=
CURSOR MODE CURRENTLY SET
(AH)=4 READ LIGHT PEN POSITION
ON EXIT:
(AH) = 0 -- liGHT PEN SW I TCH NOT DOWN/NOT TR I GGEREO
(AH)
= 1 --
VALID liGHT PEN VALUE IN REGISTERS
(DH,DL) = ROW,COlUMN Of CHARACTER lP POSN
(CH) = RASTER LINE (0-199)
(BX) '"' PIXEL COLUMN (0-319,639)
(AH)=5 SELECT ACTIVE DISPLAY PAGE (VALID ONLY FOR ALPHA MODES)
(AL)="NEW PAGE VALUE (0-7 fOR MODES 0&1, 0-3 FOR MODES 2&3)
(AH)=6 SCROll ACTIVE PAGE UP
(AL) = NUMBER OF LINES, INPUT LINES BLANKED AT BOTTOM OF WINDOW
Al =
0
MEANS BLANK ENT I RE WINDOW
(CH,CL) "" ROW,COlUMN Of UPPER LEFT CORNER OF SCROLL
(OH,Dll ROW,COLUMN OF LOWER RIGHT CORNER OF SCROLL
""0
(BH) = ATTR I BUTE TO BE USED ON BLANK Ll NE
(AH)=7 SCROLL ACTIVE PAGE DOWN
(Al)
=
NUMBER
or
LINES, INPUT LINES BLANKED AT TOP OF WINDOW
Al
=
0 MEANS BLANK [NT I RE WINDOW
(CH,CL) = ROW,COLUMN OF UPPER lEFT CORNER Of SCROLL
(DH,DL)
=
ROW,COlUMN Of LOWER RIGHT CORNER OF SCROll
(BH)
=
ATTRIBUTE TO BE USED ON BLANK LINE
CHARACTER HAMDL I NG ROUT I NES
(AH) =
8
READ ATTRIBUTE/CHARACTER AT CURRENT CURSOR POSITION
(BH) = DISPLAY PAGE (VAllO FOR ALPHA MODES ONLY)
ON EXIT;
(AL) :: CHAR READ
(All) '" ATTRIBUTE OF CHARACTER RfAD (ALPHA MODES ONLY)
(AH)
=
9 WR I TE ATTR J BU I E/CHARACTER AT CURRENT CURSOR POS I T I ON
(SH)
==
DISPLAY PAGE (VALID FOR ALPHA MODES ONLY)
(CX)
=
COUNT Of CHARACTERS TO WRITE
(Al) "" CHAR TO WRITE
(Bll = ATTRIBUTE OF CHARACTER (ALPHA)/COlOR Of CHAR (GRAPHICS)
SEE NOTE ON WRITE DOT FOR BIT 7 OF Bl =
1.
(AH)
=
10 WRITE CHARACTER ONLY AT CURRENT CURSOR POSITION
(BH)
=
DISPLAY PAGE (VALID FOR ALPHA MODES ONLY)
(CX)
=
COUNT OF CHARACTERS TO WR
J
TE
(Al) :: CHAR TO WRITE
FOR READ/WRITE CHARACTER INTERfACE WHilE IN GRAPHICS MODE, THE
CHARACTERS ARE
FOR~1ED
FROM A CHARACTER GENERATOR IMAGE
MAINTAINED IN THE SYSfEM ROM. ONLY THE 1ST 128 CHARS
ARE CONTAINED THERE. TO READ/WRITE THE SECOND 128 CHARS,
THE USER MUST INIIIALIZE THE POINTER AT INTERRUPT lFH
(lOCATION 0007CH) TO POINT TO THE lK BYTE TABLE CONTAINING
THE CODE POI NTS FOR THE SECOND 128 CHARS (128-255).
FOR WRITE CHARACTER INTERFACE IN GRAPHICS MODE, THE REPLICATION FACTOR
CONTAINED IN (CX) ON ENTRY Will PRODUCE VALID RESULTS ONLY
FOR CHARACTERS CONTAINED ON THE SAME ROW. CONTINUATION TO
SUCCEEDING LINES WILL NOT PRODUCE CORRECTLY.
GRAPH I CS INTERfACE
(AH) = 11 SET COLOR PALETTE
(RH)
=
PALLETTE COLOR
ID BEING Sr:T (0-127)
(Bl) = COLOR VALUE TO BE USED WITH THAT COLOR 10
NOTE: FOR THE CURRENT COLOR CARD, THIS ENTRY POINT HAS
MEAN I NG ONLY FOR 320X200 GRAPH I CS.
COLOR to
=
0 SELECTS THE BACKGROUND COLOR (0-15)
COLOR 10
=
1 SELECTS THE PAlLETTE TO BE USED:
o ::;; GREEN( 1 )/REO(21/YEllOW( 3)
1:= CYAN(1)/MAGENTA(21/WHJTE(3)
IN 40X25 OR 80X25 ALPHA MODES, THE VALUE SET FOR
PALLETTE COLOR 0 INDICATES THE BORDER COLOR
TO BE USED (VALUES 0-31. WHERE 16-31 SELECT THE
HIGH I NTENS I TY BACKGROU.W SET.
(AH) 12 WRITE DOT
( OX)
:=
ROW NUMBER
(CX) "" COLUMN NUMBER
(AL) '" COLOR VALUE
IF BIT 7 Of Al '" 1, THEN THE COLOR VALUE IS EXCLUSIVE
OR'D WITH THE CURRENT CONTENTS Of THE DOT
(AH)
=
13 READ DOT
(OX) = ROW NUMBER
(Cx) = COLUMN NUMBER
(Al) RETURNS THE DOT READ
Video
5-127