Basic structure for all drawing actions
Source position: agraphics.pas line 602
type TRastPort = record |
||
Layer: PLayer; |
|
Pointer to Layer of Rastport |
BitMap: PBitMap; |
|
Pointer to Bitmap data |
AreaPtrn: PWord; |
|
Area Fill pattern |
TmpRas: PTmpRas; |
|
Temporary Rastport, needed for Area actions |
AreaInfo: PAreaInfo; |
|
|
GelsInfo: PGelsInfo; |
|
|
Mask: Byte; |
|
Write mask for this raster |
FgPen: ShortInt; |
|
Foreground pen for this raster |
BgPen: ShortInt; |
|
Background pen for this raster |
AOlPen: ShortInt; |
|
AreaFill outline pen |
DrawMode: ShortInt; |
|
Drawing mode for fill, lines, and text (JAM1, JAM2, COMPLEMENT, INVERSVID) |
AreaPtSz: ShortInt; |
|
2**n words for areafill pattern |
LinPatCnt: ShortInt; |
|
current line drawing pattern preshift |
dummy: ShortInt; |
|
|
Flags: Word; |
|
|
LinePtrn: Word; |
|
16 bits for textured lines |
cp_x: SmallInt; |
|
Current x pen position |
cp_y: SmallInt; |
|
Current y pen position |
minterms: array [0..7] of Byte; |
|
|
PenWidth: SmallInt; |
|
|
PenHeight: SmallInt; |
|
|
Font: PTextFont; |
|
PTextFont current font Pointer |
AlgoStyle: Byte; |
|
The algorithmically generated style |
TxFlags: Byte; |
|
Text specific flags |
TxHeight: Word; |
|
Text height |
TxWidth: Word; |
|
Text nominal width |
TxBaseline: Word; |
|
Text baseline |
TxSpacing: SmallInt; |
|
Text spacing (per character) |
RP_User: Pointer; |
|
|
longreserved: array [0..1] of NativeUInt; |
|
|
wordreserved: array [0..6] of Word; |
|
Used to be a node |
reserved: array [0..7] of Byte; |
|
For future use |
end; |
|
Blit from source bitmap to destination rastport. |
|
|
Blit from source bitmap to destination rastport with masking of source image. |
|
|
Using standard drawing rules for areafill, blit through a mask. |
|
|
Clear from current position to end of line. |
|
|
Clear from current position to end of RastPort. |
|
|
Calls BltBitMap() after accounting for windows |
|
|
This function creates a new RastPort. |
|
|
This function creates a copy of a RastPort. |
|
|
Frees the extra contents associated with a RastPort structure. |
|
|
This frees a RastPort obtained with CloneRastPort() or CreateRastPort(). |
|
|
Draw a line between the current pen position and the new x,y position. |
|
|
Draw an ellipse centered at cx,cy with vertical and horizontal radii of a,b respectively |
|
|
Process the gel list, queueing VSprites, drawing Bobs. |
|
|
Fill a defined rectangular area using the current BackFill hook. |
|
|
Flood rastport like areafill. |
|
|
Move graphics pen position. |
|
|
Initialize raster port structure |
|
|
Draw lines from table of (x,y) values. |
|
|
read the pen number value of the pixel at a specified x,y location within a certain RastPort. |
|
|
Change the pen num of one specific pixel in a specified RastPort. |
|
|
Write text characters (no formatting). |