DECLARE FUNCTION EGetBorder% () DECLARE FUNCTION EGetPalette% (BYVAL PalReg%) DECLARE FUNCTION GetBFont% () DECLARE FUNCTION G1GetPel% (BYVAL X%, BYVAL Y%) DECLARE FUNCTION G2GetPel% (BYVAL X%, BYVAL Y%) DECLARE FUNCTION G7GetPel% (BYVAL X%, BYVAL Y%) DECLARE FUNCTION G8GetPel% (BYVAL X%, BYVAL Y%) DECLARE FUNCTION G9GetPel% (BYVAL X%, BYVAL Y%) DECLARE SUB BFont (BYVAL FontNr%) DECLARE SUB EBlink (BYVAL Blink%) DECLARE SUB EBorder (BYVAL Colour%) DECLARE SUB EPalette (BYVAL PalReg%, BYVAL Colour%) DECLARE SUB GetDisplay (Adapter%, Mono%) DECLARE SUB G1Banner (St$, X%, Y%, Xmul%, Ymul%) DECLARE SUB G1Border (BYVAL Colour%) DECLARE SUB G1Box (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%, BYVAL Fill%) DECLARE SUB G1Cls DECLARE SUB G1Color (BYVAL Foregnd%, BYVAL Backgnd%) DECLARE SUB G1GetColor (Foregnd%, Backgnd%) DECLARE SUB G1GetLocate (Row%, Column%) DECLARE SUB G1Line (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%) DECLARE SUB G1Locate (BYVAL Row%, BYVAL Column%) DECLARE SUB G1MirrorH (ImageA%(), ImageB%()) DECLARE SUB G1Mode (BYVAL ModeNr%) DECLARE SUB G1PaletteA (BYVAL PaletteNr%) DECLARE SUB G1PaletteB (BYVAL PaletteNr%) DECLARE SUB G1Plot (BYVAL X%, BYVAL Y%) DECLARE SUB G1Polygon (X%, Y%, Radius%, Vertices%, Angle!) DECLARE SUB G1Write (St$) DECLARE SUB G1WriteLn (St$) DECLARE SUB G2Banner (St$, X%, Y%, Xmul%, Ymul%) DECLARE SUB G2Box (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%, BYVAL Fill%) DECLARE SUB G2Cls DECLARE SUB G2Color (BYVAL Foregnd%, BYVAL Backgnd%) DECLARE SUB G2Get (X1%, Y1%, X2%, Y2%, Image%()) DECLARE SUB G2GetColor (Foregnd%, Backgnd%) DECLARE SUB G2GetLocate (Row%, Column%) DECLARE SUB G2Line (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%) DECLARE SUB G2LoadMAC (File$, Image%(), StartRow%) DECLARE SUB G2LoadPCX (File$, Image%(), ErrCode%) DECLARE SUB G2Locate (BYVAL Row%, BYVAL Column%) DECLARE SUB G2MirrorH (ImageA%(), ImageB%()) DECLARE SUB G2Mode (BYVAL ModeNr%) DECLARE SUB G2Plot (BYVAL X%, BYVAL Y%) DECLARE SUB G2Polygon (X%, Y%, Radius%, Vertices%, Angle!) DECLARE SUB G2Put (X%, Y%, Image%()) DECLARE SUB G2Write (St$) DECLARE SUB G2WriteLn (St$) DECLARE SUB G7Banner (St$, X%, Y%, Xmul%, Ymul%) DECLARE SUB G7Box (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%, BYVAL Fill%) DECLARE SUB G7Cls () DECLARE SUB G7Color (BYVAL Foreground%, BYVAL Background%) DECLARE SUB G7GetColor (Foreground%, Background%) DECLARE SUB G7GetLocate (Row%, Column%) DECLARE SUB G7Line (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%) DECLARE SUB G7Locate (BYVAL Row%, BYVAL Column%) DECLARE SUB G7Mode (BYVAL Graphics%) DECLARE SUB G7Plot (BYVAL x%, BYVAL y%) DECLARE SUB G7Polygon (X%, Y%, Radius%, Vertices%, Angle!) DECLARE SUB G7Write (St$) DECLARE SUB G7WriteLn (St$) DECLARE SUB G8Banner (St$, X%, Y%, Xmul%, Ymul%) DECLARE SUB G8Box (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%, BYVAL Fill%) DECLARE SUB G8Cls () DECLARE SUB G8Color (BYVAL Foreground%, BYVAL Background%) DECLARE SUB G8GetColor (Foreground%, Background%) DECLARE SUB G8GetLocate (Row%, Column%) DECLARE SUB G8Line (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%) DECLARE SUB G8Locate (BYVAL Row%, BYVAL Column%) DECLARE SUB G8Mode (BYVAL Graphics%) DECLARE SUB G8Plot (BYVAL x%, BYVAL y%) DECLARE SUB G8Polygon (X%, Y%, Radius%, Vertices%, Angle!) DECLARE SUB G8Write (St$) DECLARE SUB G8WriteLn (St$) DECLARE SUB G9Banner (St$, X%, Y%, Xmul%, Ymul%) DECLARE SUB G9Box (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%, BYVAL Fill%) DECLARE SUB G9Cls () DECLARE SUB G9Color (BYVAL Foreground%, BYVAL Background%) DECLARE SUB G9GetColor (Foreground%, Background%) DECLARE SUB G9GetLocate (Row%, Column%) DECLARE SUB G9Line (BYVAL X1%, BYVAL Y1%, BYVAL X2%, BYVAL Y2%) DECLARE SUB G9Locate (BYVAL Row%, BYVAL Column%) DECLARE SUB G9Mode (BYVAL Graphics%) DECLARE SUB G9Plot (BYVAL x%, BYVAL y%) DECLARE SUB G9Polygon (X%, Y%, Radius%, Vertices%, Angle!) DECLARE SUB G9Write (St$) DECLARE SUB G9WriteLn (St$) DECLARE SUB PrintScreen (ScreenMode%) DECLARE SUB ScreenSize (Rows%, Columns%)