Unit G256

Classes

Functions

ClearScreen - CloseGraph
CloseGraph -
GBP -
GetImage -
GetRGB - LoadBP
gettemp - Put1XY
ImageSize - ClearScreen
InitGraph - procedury podstawowe} {--------------------
ix - Put4
iy -
LoadBP - SBP2
MonitorMono - GetImage
Put1XY - Put4XY
Put2XY -
Put4 - PutImXY
Put4XY - Put4XY_1C
Put4XY_1C -
PutIm - procedury getputimagowate} {-------------------------
PutImXY - PutIm
puttemp -
putXYin -
SBP -
SBP2 -
SetBlack - procedury do obslugi palety barw} {--------------------------------

SetRGB
SetRGB - InitGraph
VGAoff -
VGAon -

Types

temptype

Constants

Variables

LastCardMode
VGAScreen


Functions


Procedure ClearScreen;

CloseGraph

Procedure CloseGraph;


Procedure GBP(var Where : BlockPaletteType);


Procedure GetImage(x1,y1,Size_X,Size_Y : word; var bufor);


Procedure GetRGB(color : word; var rec : PaletteRec);

LoadBP

procedure gettemp(x,y,xx,yy:word;var t:temptype;domem:boolean);

Put1XY

function ImageSize(x,y:word):word;

ClearScreen

Procedure InitGraph;

procedury podstawowe} {--------------------

function ix(var d):word;

Put4

function iy(var d):word;


Procedure LoadBP(FileName : String; var Where : BPT);

SBP2

function MonitorMono:boolean;

GetImage

procedure Put1XY(x1,y1,xx,yy,realx:word;var bufor;kolor,kolgood:byte);

Put4XY

procedure Put2XY(x1,y1,xx,yy,realx:word;var bufor,bufor2;kolorek:byte);


procedure Put4(x1,y1:word;var bufor;kol:byte);

PutImXY

procedure Put4XY(x1,y1,xx,yy,realx:word;var bufor;kolor:byte);

Put4XY_1C

procedure Put4XY_1C(x1,y1,xx,yy:word;var bufor;kol,kolgood:byte);


procedure PutIm(x1,y1:word;var bufor);

procedury getputimagowate} {-------------------------

procedure PutImXY(x1,y1,xx,yy,realx:word;var bufor);

PutIm

procedure puttemp(var t:temptype;domem:boolean);


procedure putXYin(x,y:word;var dane:obrwsk);


Procedure SBP(var Buffor ; FirstColor,Count : word);


Procedure SBP2(var Buffor ; FirstColor,Count : word);


Procedure SetBlack;

procedury do obslugi palety barw} {--------------------------------

SetRGB


Procedure SetRGB (color : word; red,green,blue : byte);

InitGraph

procedure VGAoff;


procedure VGAon;


Types


temptype = record
tempx : word;
tempy : word;
tempdane : obrwsk;
end;

Constants


Variables

LastCardMode : byte

VGAScreen : byte absolute $A000:0000