More DAC support
This commit is contained in:
Jeff Parsons
parent
fbf48071a5
commit
d689753f37
5 changed files with 525 additions and 93 deletions
|
|
@ -199,6 +199,7 @@ Set320By400Mode proc near
|
|||
; line twice.
|
||||
;
|
||||
mov dx,CRTC_INDEX
|
||||
IF 1 ; the following code can be disabled to test memory access in 320x200 mode -JP
|
||||
mov al,MAX_SCAN_LINE
|
||||
out dx,al
|
||||
inc dx
|
||||
|
|
@ -206,6 +207,7 @@ Set320By400Mode proc near
|
|||
and al,not 1fh ;set maximum scan line = 0
|
||||
out dx,al
|
||||
dec dx
|
||||
ENDIF
|
||||
;
|
||||
; Change CRTC scanning from doubleword mode to byte mode, allowing
|
||||
; the CRTC to scan more than 64K of video data.
|
||||
|
|
|
|||
211
tests/pc/vga/L32-1.ASM
Normal file
211
tests/pc/vga/L32-1.ASM
Normal file
|
|
@ -0,0 +1,211 @@
|
|||
; C tiny/small/medium model-callable assembler
|
||||
; subroutines to:
|
||||
; * Set 360x480 256-color VGA mode
|
||||
; * Draw a dot in 360x480 256-color VGA mode
|
||||
; * Read the color of a dot in 360x480 256-color VGA mode
|
||||
;
|
||||
; Assembled with TASM
|
||||
;
|
||||
; The 360x480 256-color mode set code and parameters were provided
|
||||
; by John Bridges, who has placed them into the public domain.
|
||||
;
|
||||
VGA_SEGMENT equ 0a000h ;display memory segment
|
||||
SC_INDEX equ 3c4h ;Sequence Controller Index register
|
||||
GC_INDEX equ 3ceh ;Graphics Controller Index register
|
||||
MAP_MASK equ 2 ;Map Mask register index in SC
|
||||
READ_MAP equ 4 ;Read Map register index in GC
|
||||
SCREEN_WIDTH equ 360 ;# of pixels across screen
|
||||
WORD_OUTS_OK equ 1 ;set to 0 to assemble for
|
||||
; computers that can't handle
|
||||
; word outs to indexed VGA registers
|
||||
;
|
||||
_DATA segment public byte 'DATA'
|
||||
;
|
||||
; 360x480 256-color mode CRT Controller register settings.
|
||||
; (Courtesy of John Bridges.)
|
||||
;
|
||||
vptbl dw 06b00h ; horz total
|
||||
dw 05901h ; horz displayed
|
||||
dw 05a02h ; start horz blanking
|
||||
dw 08e03h ; end horz blanking
|
||||
dw 05e04h ; start h sync
|
||||
dw 08a05h ; end h sync
|
||||
dw 00d06h ; vertical total
|
||||
dw 03e07h ; overflow
|
||||
dw 04009h ; cell height
|
||||
dw 0ea10h ; v sync start
|
||||
dw 0ac11h ; v sync end and protect cr0-cr7
|
||||
dw 0df12h ; vertical displayed
|
||||
dw 02d13h ; offset
|
||||
dw 00014h ; turn off dword mode
|
||||
dw 0e715h ; v blank start
|
||||
dw 00616h ; v blank end
|
||||
dw 0e317h ; turn on byte mode
|
||||
vpend label word
|
||||
_DATA ends
|
||||
;
|
||||
; Macro to output a word value to a port.
|
||||
;
|
||||
OUT_WORD macro
|
||||
if WORD_OUTS_OK
|
||||
out dx,ax
|
||||
else
|
||||
out dx,al
|
||||
inc dx
|
||||
xchg ah,al
|
||||
out dx,al
|
||||
dec dx
|
||||
xchg ah,al
|
||||
endif
|
||||
endm
|
||||
;
|
||||
_TEXT segment byte public 'CODE'
|
||||
assume cs:_TEXT, ds:_DATA
|
||||
;
|
||||
; Sets up 360x480 256-color mode.
|
||||
; (Courtesy of John Bridges.)
|
||||
;
|
||||
; Call as: void Set360By480Mode()
|
||||
;
|
||||
; Returns: nothing
|
||||
;
|
||||
public _Set360x480Mode
|
||||
_Set360x480Mode proc near
|
||||
push si ;preserve C register vars
|
||||
push di
|
||||
mov ax,12h ; start with mode 12h
|
||||
int 10h ; let the bios clear the video memory
|
||||
|
||||
mov ax,13h ; start with standard mode 13h
|
||||
int 10h ; let the bios set the mode
|
||||
|
||||
mov dx,3c4h ; alter sequencer registers
|
||||
mov ax,0604h ; disable chain 4
|
||||
out dx,ax
|
||||
|
||||
mov ax,0100h ; synchronous reset
|
||||
out dx,ax ; asserted
|
||||
mov dx,3c2h ; misc output
|
||||
mov al,0e7h ; use 28 mHz dot clock
|
||||
out dx,al ; select it
|
||||
mov dx,3c4h ; sequencer again
|
||||
mov ax,0300h ; restart sequencer
|
||||
out dx,ax ; running again
|
||||
|
||||
mov dx,3d4h ; alter crtc registers
|
||||
|
||||
mov al,11h ; cr11
|
||||
out dx,al ; current value
|
||||
inc dx ; point to data
|
||||
in al,dx ; get cr11 value
|
||||
and al,7fh ; remove cr0 -> cr7
|
||||
out dx,al ; write protect
|
||||
dec dx ; point to index
|
||||
cld
|
||||
mov si,offset vptbl
|
||||
mov cx,((offset vpend)-(offset vptbl)) shr 1
|
||||
@b: lodsw
|
||||
out dx,ax
|
||||
loop @b
|
||||
pop di ;restore C register vars
|
||||
pop si
|
||||
ret
|
||||
_Set360x480Mode endp
|
||||
;
|
||||
; Draws a pixel in the specified color at the specified
|
||||
; location in 360x480 256-color mode.
|
||||
;
|
||||
; Call as: void Draw360x480Dot(int X, int Y, int Color)
|
||||
;
|
||||
; Returns: nothing
|
||||
;
|
||||
DParms struc
|
||||
dw ? ;pushed BP
|
||||
dw ? ;return address
|
||||
DrawX dw ? ;X coordinate at which to draw
|
||||
DrawY dw ? ;Y coordinate at which to draw
|
||||
Color dw ? ;color in which to draw (in the
|
||||
; range 0-255; upper byte ignored)
|
||||
DParms ends
|
||||
;
|
||||
public _Draw360x480Dot
|
||||
_Draw360x480Dot proc near
|
||||
push bp ;preserve caller's BP
|
||||
mov bp,sp ;point to stack frame
|
||||
push si ;preserve C register vars
|
||||
push di
|
||||
mov ax,VGA_SEGMENT
|
||||
mov es,ax ;point to display memory
|
||||
mov ax,SCREEN_WIDTH/4
|
||||
;there are 4 pixels at each address, so
|
||||
; each 360-pixel row is 90 bytes wide
|
||||
; in each plane
|
||||
mul [bp+DrawY] ;point to start of desired row
|
||||
mov di,[bp+DrawX] ;get the X coordinate
|
||||
shr di,1 ;there are 4 pixels at each address
|
||||
shr di,1 ; so divide the X coordinate by 4
|
||||
add di,ax ;point to the pixel's address
|
||||
mov cl,byte ptr [bp+DrawX] ;get the X coordinate again
|
||||
and cl,3 ;get the plane # of the pixel
|
||||
mov ah,1
|
||||
shl ah,cl ;set the bit corresponding to the plane
|
||||
; the pixel is in
|
||||
mov al,MAP_MASK
|
||||
mov dx,SC_INDEX
|
||||
OUT_WORD ;set to write to the proper plane for
|
||||
; the pixel
|
||||
mov al,byte ptr [bp+Color] ;get the color
|
||||
stosb ;draw the pixel
|
||||
pop di ;restore C register vars
|
||||
pop si
|
||||
pop bp ;restore caller's BP
|
||||
ret
|
||||
_Draw360x480Dot endp
|
||||
;
|
||||
; Reads the color of the pixel at the specified
|
||||
; location in 360x480 256-color mode.
|
||||
;
|
||||
; Call as: int Read360x480Dot(int X, int Y)
|
||||
;
|
||||
; Returns: pixel color
|
||||
;
|
||||
RParms struc
|
||||
dw ? ;pushed BP
|
||||
dw ? ;return address
|
||||
ReadX dw ? ;X coordinate from which to read
|
||||
ReadY dw ? ;Y coordinate from which to read
|
||||
RParms ends
|
||||
;
|
||||
public _Read360x480Dot
|
||||
_Read360x480Dot proc near
|
||||
push bp ;preserve caller's BP
|
||||
mov bp,sp ;point to stack frame
|
||||
push si ;preserve C register vars
|
||||
push di
|
||||
mov ax,VGA_SEGMENT
|
||||
mov es,ax ;point to display memory
|
||||
mov ax,SCREEN_WIDTH/4
|
||||
;there are 4 pixels at each address, so
|
||||
; each 360-pixel row is 90 bytes wide
|
||||
; in each plane
|
||||
mul [bp+DrawY] ;point to start of desired row
|
||||
mov si,[bp+DrawX] ;get the X coordinate
|
||||
shr si,1 ;there are 4 pixels at each address
|
||||
shr si,1 ; so divide the X coordinate by 4
|
||||
add si,ax ;point to the pixel's address
|
||||
mov ah,byte ptr [bp+DrawX]
|
||||
;get the X coordinate again
|
||||
and ah,3 ;get the plane # of the pixel
|
||||
mov al,READ_MAP
|
||||
mov dx,GC_INDEX
|
||||
OUT_WORD ;set to read from the proper plane for
|
||||
; the pixel
|
||||
lods byte ptr es:[si];read the pixel
|
||||
sub ah,ah ;make the return value a word for C
|
||||
pop di ;restore C register vars
|
||||
pop si
|
||||
pop bp ;restore caller's BP
|
||||
ret
|
||||
_Read360x480Dot endp
|
||||
_TEXT ends
|
||||
end
|
||||
201
tests/pc/vga/L32-2.C
Normal file
201
tests/pc/vga/L32-2.C
Normal file
|
|
@ -0,0 +1,201 @@
|
|||
/*
|
||||
* Sample program to illustrate VGA line drawing in 360x480
|
||||
* 256-color mode.
|
||||
*
|
||||
* Compiled with Borland C/C++.
|
||||
*
|
||||
* Must be linked with Listing 32.1 with a command line like:
|
||||
*
|
||||
* bcc l32-2.c l32-1.asm
|
||||
*
|
||||
* By Michael Abrash
|
||||
*/
|
||||
#include <dos.h> /* contains geninterrupt */
|
||||
|
||||
#define TEXT_MODE 0x03
|
||||
#define BIOS_VIDEO_INT 0x10
|
||||
#define X_MAX 360 /* working screen width */
|
||||
#define Y_MAX 480 /* working screen height */
|
||||
|
||||
extern void Draw360x480Dot();
|
||||
extern void Set360x480Mode();
|
||||
|
||||
/*
|
||||
* Draws a line in octant 0 or 3 ( |DeltaX| >= DeltaY ).
|
||||
* |DeltaX|+1 points are drawn.
|
||||
*/
|
||||
void Octant0(X0, Y0, DeltaX, DeltaY, XDirection, Color)
|
||||
unsigned int X0, Y0; /* coordinates of start of the line */
|
||||
unsigned int DeltaX, DeltaY; /* length of the line */
|
||||
int XDirection; /* 1 if line is drawn left to right,
|
||||
-1 if drawn right to left */
|
||||
int Color; /* color in which to draw line */
|
||||
{
|
||||
int DeltaYx2;
|
||||
int DeltaYx2MinusDeltaXx2;
|
||||
int ErrorTerm;
|
||||
|
||||
/* Set up initial error term and values used inside drawing loop */
|
||||
DeltaYx2 = DeltaY * 2;
|
||||
DeltaYx2MinusDeltaXx2 = DeltaYx2 - (int) ( DeltaX * 2 );
|
||||
ErrorTerm = DeltaYx2 - (int) DeltaX;
|
||||
|
||||
/* Draw the line */
|
||||
Draw360x480Dot(X0, Y0, Color); /* draw the first pixel */
|
||||
while ( DeltaX-- ) {
|
||||
/* See if it's time to advance the Y coordinate */
|
||||
if ( ErrorTerm >= 0 ) {
|
||||
/* Advance the Y coordinate & adjust the error term
|
||||
back down */
|
||||
Y0++;
|
||||
ErrorTerm += DeltaYx2MinusDeltaXx2;
|
||||
} else {
|
||||
/* Add to the error term */
|
||||
ErrorTerm += DeltaYx2;
|
||||
}
|
||||
X0 += XDirection; /* advance the X coordinate */
|
||||
Draw360x480Dot(X0, Y0, Color); /* draw a pixel */
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Draws a line in octant 1 or 2 ( |DeltaX| < DeltaY ).
|
||||
* |DeltaY|+1 points are drawn.
|
||||
*/
|
||||
void Octant1(X0, Y0, DeltaX, DeltaY, XDirection, Color)
|
||||
unsigned int X0, Y0; /* coordinates of start of the line */
|
||||
unsigned int DeltaX, DeltaY; /* length of the line */
|
||||
int XDirection; /* 1 if line is drawn left to right,
|
||||
-1 if drawn right to left */
|
||||
int Color; /* color in which to draw line */
|
||||
{
|
||||
int DeltaXx2;
|
||||
int DeltaXx2MinusDeltaYx2;
|
||||
int ErrorTerm;
|
||||
|
||||
/* Set up initial error term and values used inside drawing loop */
|
||||
DeltaXx2 = DeltaX * 2;
|
||||
DeltaXx2MinusDeltaYx2 = DeltaXx2 - (int) ( DeltaY * 2 );
|
||||
ErrorTerm = DeltaXx2 - (int) DeltaY;
|
||||
|
||||
Draw360x480Dot(X0, Y0, Color); /* draw the first pixel */
|
||||
while ( DeltaY-- ) {
|
||||
/* See if it's time to advance the X coordinate */
|
||||
if ( ErrorTerm >= 0 ) {
|
||||
/* Advance the X coordinate & adjust the error term
|
||||
back down */
|
||||
X0 += XDirection;
|
||||
ErrorTerm += DeltaXx2MinusDeltaYx2;
|
||||
} else {
|
||||
/* Add to the error term */
|
||||
ErrorTerm += DeltaXx2;
|
||||
}
|
||||
Y0++; /* advance the Y coordinate */
|
||||
Draw360x480Dot(X0, Y0,Color); /* draw a pixel */
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Draws a line on the EGA or VGA.
|
||||
*/
|
||||
void EVGALine(X0, Y0, X1, Y1, Color)
|
||||
int X0, Y0; /* coordinates of one end of the line */
|
||||
int X1, Y1; /* coordinates of the other end of the line */
|
||||
unsigned char Color; /* color in which to draw line */
|
||||
{
|
||||
int DeltaX, DeltaY;
|
||||
int Temp;
|
||||
|
||||
/* Save half the line-drawing cases by swapping Y0 with Y1
|
||||
and X0 with X1 if Y0 is greater than Y1. As a result, DeltaY
|
||||
is always > 0, and only the octant 0-3 cases need to be
|
||||
handled. */
|
||||
if ( Y0 > Y1 ) {
|
||||
Temp = Y0;
|
||||
Y0 = Y1;
|
||||
Y1 = Temp;
|
||||
Temp = X0;
|
||||
X0 = X1;
|
||||
X1 = Temp;
|
||||
}
|
||||
|
||||
/* Handle as four separate cases, for the four octants in which
|
||||
Y1 is greater than Y0 */
|
||||
DeltaX = X1 - X0; /* calculate the length of the line
|
||||
in each coordinate */
|
||||
DeltaY = Y1 - Y0;
|
||||
if ( DeltaX > 0 ) {
|
||||
if ( DeltaX > DeltaY ) {
|
||||
Octant0(X0, Y0, DeltaX, DeltaY, 1, Color);
|
||||
} else {
|
||||
Octant1(X0, Y0, DeltaX, DeltaY, 1, Color);
|
||||
}
|
||||
} else {
|
||||
DeltaX = -DeltaX; /* absolute value of DeltaX */
|
||||
if ( DeltaX > DeltaY ) {
|
||||
Octant0(X0, Y0, DeltaX, DeltaY, -1, Color);
|
||||
} else {
|
||||
Octant1(X0, Y0, DeltaX, DeltaY, -1, Color);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Subroutine to draw a rectangle full of vectors, of the
|
||||
* specified length and in varying colors, around the
|
||||
* specified rectangle center.
|
||||
*/
|
||||
void VectorsUp(XCenter, YCenter, XLength, YLength)
|
||||
int XCenter, YCenter; /* center of rectangle to fill */
|
||||
int XLength, YLength; /* distance from center to edge
|
||||
of rectangle */
|
||||
{
|
||||
int WorkingX, WorkingY, Color = 1;
|
||||
|
||||
/* Lines from center to top of rectangle */
|
||||
WorkingX = XCenter - XLength;
|
||||
WorkingY = YCenter - YLength;
|
||||
for ( ; WorkingX < ( XCenter + XLength ); WorkingX++ )
|
||||
EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color++);
|
||||
|
||||
/* Lines from center to right of rectangle */
|
||||
WorkingX = XCenter + XLength - 1;
|
||||
WorkingY = YCenter - YLength;
|
||||
for ( ; WorkingY < ( YCenter + YLength ); WorkingY++ )
|
||||
EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color++);
|
||||
|
||||
/* Lines from center to bottom of rectangle */
|
||||
WorkingX = XCenter + XLength - 1;
|
||||
WorkingY = YCenter + YLength - 1;
|
||||
for ( ; WorkingX >= ( XCenter - XLength ); WorkingX-- )
|
||||
EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color++);
|
||||
|
||||
/* Lines from center to left of rectangle */
|
||||
WorkingX = XCenter - XLength;
|
||||
WorkingY = YCenter + YLength - 1;
|
||||
for ( ; WorkingY >= ( YCenter - YLength ); WorkingY-- )
|
||||
EVGALine(XCenter, YCenter, WorkingX, WorkingY, Color++);
|
||||
}
|
||||
|
||||
/*
|
||||
* Sample program to draw four rectangles full of lines.
|
||||
*/
|
||||
void main()
|
||||
{
|
||||
char temp;
|
||||
|
||||
Set360x480Mode();
|
||||
|
||||
/* Draw each of four rectangles full of vectors */
|
||||
VectorsUp(X_MAX / 4, Y_MAX / 4, X_MAX / 4, Y_MAX / 4, 1);
|
||||
VectorsUp(X_MAX * 3 / 4, Y_MAX / 4, X_MAX / 4, Y_MAX / 4, 2);
|
||||
VectorsUp(X_MAX / 4, Y_MAX * 3 / 4, X_MAX / 4, Y_MAX / 4, 3);
|
||||
VectorsUp(X_MAX * 3 / 4, Y_MAX * 3 / 4, X_MAX / 4, Y_MAX / 4, 4);
|
||||
|
||||
/* Wait for the enter key to be pressed */
|
||||
scanf("%c", &temp);
|
||||
|
||||
/* Back to text mode */
|
||||
_AX = TEXT_MODE;
|
||||
geninterrupt(BIOS_VIDEO_INT);
|
||||
}
|
||||
Loading…
Reference in a new issue