home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Club Amiga de Montreal - CAM
/
CAM_CD_1.iso
/
files
/
502b.lha
/
PCQ_v1.2
/
Include
/
Graphics
/
GFXBase.i
< prev
next >
Wrap
Text File
|
1991-05-07
|
2KB
|
71 lines
{
GfxBase.i for PCQ Pascal
}
{$I "Include:Exec/Lists.i"}
{$I "Include:Exec/Libraries.i"}
{$I "Include:Exec/Interrupts.i"}
type
GfxBaseRec = record
LibNode : Library;
ActiView : Address; { ViewPtr }
copinit : Address; { (copinitptr) ptr to copper start up list }
cia : Address; { for 8520 resource use }
blitter : Address; { for future blitter resource use }
LOFlist : Address;
SHFlist : Address;
blthd,
blttl : Address;
bsblthd,
bsblttl : Address; { Previous four are (bltnodeptr) }
vbsrv,
timsrv,
bltsrv : Interrupt;
TextFonts : List;
DefaultFont : Address; { TextFontPtr }
Modes : Short; { copy of current first bplcon0 }
VBlank : Byte;
Debug : Byte;
BeamSync : Short;
system_bplcon0 : Short; { it is ored into each bplcon0 for display }
SpriteReserved : Byte;
bytereserved : Byte;
Flags : Short;
BlitLock : Short;
BlitNest : Short;
BlitWaitQ : List;
BlitOwner : Address; { TaskPtr }
TOF_WaitQ : List;
DisplayFlags : Short; { NTSC PAL GENLOC etc}
{ Display flags are determined at power on }
SimpleSprites : Address; { SimpleSpritePtr ptr }
MaxDisplayRow : Short; { hardware stuff, do not use }
MaxDisplayColumn : Short; { hardware stuff, do not use }
NormalDisplayRows : Short;
NormalDisplayColumns : Short;
{ the following are for standard non interlace, 1/2 wb width }
NormalDPMX : Short; { Dots per meter on display }
NormalDPMY : Short; { Dots per meter on display }
LastChanceMemory : Address; { SignalSemaphorePtr }
LCMptr : Address;
MicrosPerLine : Short; { 256 time usec/line }
MinDisplayColumn : Short;
reserved : Array [0..22] of Integer; { for future use }
end;
GfxBasePtr = ^GfxBaseRec;
const
NTSC = 1;
GENLOC = 2;
PAL = 4;
BLITMSG_FAULT = 4;