# unit fastgraph

### Unit to handle screen graphics, accelerated bitmap modes

author: Tomasz Biela (Tebe/Madteam)

http://www.freepascal.org/docs-html/rtl/graph/index-5.html
Marcin �ukowski (Eru/TQA): fLine

## Interface:

name: | description:
--- | ---
SetBkColor | #### procedure SetBkColor(color: byte); assembler; Sets the background color to Color
SetColor | #### procedure SetColor(color: byte); assembler; Sets the foreground color to Color
PutPixel | #### procedure PutPixel(x,y: smallint); assembler; register; Puts a point at (X,Y) using color Color
GetPixel | #### function GetPixel(x,y: smallint): byte; assembler; Return color of pixel
Line | #### procedure Line(x1,y1,x2,y2: smallint); Bresenham line
Hline | #### procedure Hline(x0,x1,y: smallint); Draw horizintal line, fast as possible
fLine | #### procedure fLine(x0,y0,x1,y1: byte); assembler; DRAWTO in Graphics 8, 9, 15 A quick hack by eru
LineTo | #### procedure LineTo(x, y: smallint); Draw a line starting from current position to a given point
fRectangle | #### procedure fRectangle(x1, y1, x2, y2: Smallint); Draws a rectangle with corners at (X1,Y1) and (X2,Y2), using the current color and style
SetActiveBuffer | #### procedure SetActiveBuffer(a: word); assembler; overload;
SetActiveBuffer | #### procedure SetActiveBuffer(var a: TDisplayBuffer); overload;
InitGraph | #### procedure InitGraph(mode: byte); overload; Init graphics mode
Scanline | #### function Scanline(y: smallint): PByte;