unit fastgraph

author: Tomasz Biela (Tebe)


http://www.freepascal.org/docs-html/rtl/graph/index-5.html

Interface:

name:description:
fLine

procedure fLine(x0,y0,x1,y1: byte); assembler;


DRAWTO in Graphics 8, 9, 15 A quick hack by eru
    FrameBuffer

    procedure FrameBuffer(a: word); assembler;



      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
        GetPixel

        function GetPixel(x,y: smallint): byte; assembler;


        Return color of pixel
          InitGraph

          procedure InitGraph(mode: byte); overload;


          Init graphics mode
            LineTo

            procedure LineTo(x, y: smallint);


            Draw a line starting from current position to a given point
              PutPixel

              procedure PutPixel(x,y: smallint); assembler; register;


              Puts a point at (X,Y) using color Color
                SetBkColor

                procedure SetBkColor(color: byte); assembler;


                Sets the background color to Color
                  SetColor

                  procedure SetColor(color: byte); assembler;


                  Sets the foreground color to Color