Index

Package: Drawing

Description

package Allegro.Drawing is
Allegro 4.4.2 - Drawing primitives This package is missing: _putpixel, _putpixel15, _putpixel16, _putpixel24, _putpixel32, _getpixel, _getpixel15, _getpixel16, _getpixel24, _getpixel32, calc_spline, spline

Types

Point

type Point is
        record
            x, y : Integer;
        end record;

Point_Array

type Point_Array is array (Integer range <>) of Point;

A_Draw_Proc

type A_Draw_Proc is
        access procedure( bmp : A_Bitmap; x, y : Integer; d : Integer );

Subprograms & Entries

Arc

procedure Arc
( bmp: not null A_Bitmap;
x, y: Integer;
ang1, ang2: Fixed;
r: Integer;
color: Color_Type );

Circle

procedure Circle
( bmp: not null A_Bitmap;
x, y, radius: Integer;
color: Color_Type );

Circlefill

procedure Circlefill
( bmp: not null A_Bitmap;
x, y, radius: Integer;
color: Color_Type );

Clear_Bitmap

procedure Clear_Bitmap
( bmp: not null A_Bitmap );

Clear_To_Color

procedure Clear_To_Color
( bmp: not null A_Bitmap;
color: Color_Type );

Clear_To_Transparent

procedure Clear_To_Transparent
( bmp: not null A_Bitmap );

Do_Arc

procedure Do_Arc
( bmp: not null A_Bitmap;
x, y, a1, a2: Fixed;
r: Integer;
d: Integer;
proc: not null A_Draw_Proc );

Do_Circle

procedure Do_Circle
( bmp: not null A_Bitmap;
x, y, radius: Integer;
d: Integer;
proc: not null A_Draw_Proc );

Do_Ellipse

procedure Do_Ellipse
( bmp: not null A_Bitmap;
x, y, rx, ry: Integer;
d: Integer;
proc: not null A_Draw_Proc );

Do_Line

procedure Do_Line
( bmp: not null A_Bitmap;
x1, y1, x2, y2: Integer;
d: Integer;
proc: not null A_Draw_Proc );

Ellipse

procedure Ellipse
( bmp: not null A_Bitmap;
x, y, rx, ry: Integer;
color: Color_Type );

Ellipsefill

procedure Ellipsefill
( bmp: not null A_Bitmap;
x, y, rx, ry: Integer;
color: Color_Type );

Fastline

procedure Fastline
( bmp: not null A_Bitmap;
x1, y1, x2, y2: Integer;
color: Color_Type );

Floodfill

procedure Floodfill
( bmp: not null A_Bitmap;
x, y: Integer;
color: Color_Type );

Getpixel

function Getpixel
( bmp: not null A_Bitmap;
x, y: Integer ) return Color_Type;

Hline

procedure Hline
( bmp: not null A_Bitmap;
x1, y, x2: Integer;
color: Color_Type );

Line

procedure Line
( bmp: not null A_Bitmap;
x1, y1, x2, y2: Integer;
color: Color_Type );

Polygon

procedure Polygon
( bmp: not null A_Bitmap;
points: Point_Array;
color: Color_Type );

Putpixel

procedure Putpixel
( bmp: not null A_Bitmap;
x, y: Integer;
color: Color_Type );

Rect

procedure Rect
( bmp: not null A_Bitmap;
x1, y1, x2, y2: Integer;
color: Color_Type );

Rectfill

procedure Rectfill
( bmp: not null A_Bitmap;
x1, y1, x2, y2: Integer;
color: Color_Type );

Triangle

procedure Triangle
( bmp: not null A_Bitmap;
x1, y1, x2, y2, x3, y3: Integer;
color: Color_Type );

Vline

procedure Vline
( bmp: not null A_Bitmap;
x, y1, y2: Integer;
color: Color_Type );