C=128 BASICv7 Graphics
Last Updated : "2026-01-04 19:41:30"
Configuration
GRAPHIC mode,[clear*][,start*] | CLR*
Allocate & activate graphic mode. (CLR clears & de-allocates.)
?? RDOT( mode ) ??
?? Returns the graphic mode. ??
RGR( 0 )
Returns the graphic mode. (0 is a dummy place holder.)
COLOR color_src, color
Assigned color to color_src.
SCNCLR mode
Clears the graphic screen mode.
WIDTH 1/2
Set line drawing width: single or double are only options.
RCLR(color_src)
Returns the color of color_src.
Shapes
DRAW [color_src (0-3)], [X1, Y1] [TO X2, Y2]...
Draw (open) polygon.
BOX [color_src (0-3)],X1, Y1 [,X2, Y2] [, [angle*][, paint*]]
Draw a box with optional rotation and fill.
CHAR [color_src (0-1), col, row [, string][,RVS]
Place text using text screen coords.
CIRCLE [color_src (0-3)], X, Y [, Xr] [, Yr] [,sd*] [,ed*] [,angle*] [,inc*]
Draw an arc with optional rotation and increment.
SSHAPE string_var, X1, Y1 [, X2, Y2]
Stores an area in string_var.
GSHAPE string_var, [X, Y] [, gmode*]
Place a saved object/area at (X,Y) via gmode.
PAINT [color_src (0-3)], X, Y [, pmode* ]
Fill area starting at (X, Y) with color_src or non-backgrd color.

color_srcmode
0Background 40 Column  040-column text
1Foreground Graphics  1Hi-Res Foreground
2Foreground color 1 (multi)  2Hi-Res Split Screen
3Foreground color 2 (multi)  3Hi-Res Multi-Color
4Border 40 Column  4Hi-Res Split Screen Multi-Color
5Char Color (Text screen)  580-column text
6Background 80 Column  

color (80 Col color in paren)
1Black 9Orange (Dark Purple)
2White 10Brown (Dark Yellow)
3(Dark) Red 11Light Red
4(Light) Cyan 12Dark Gray
5(Light) Purple 13Medium Gray
6(Dark) Green 14Light Green
7(Dark) Blue 15Light Blue
8(Light) Yellow 16Light Gray

*Keyword Details
starttext screen line to start text mode in split graphics
angleoption to rotate the object
 sdstart degree; 0 = North, 90 = East, etc.
 edend degree
 incincrement to connect dots; higher # - less smooth (def 2)
clear0 do not clear screen; 1 clears screen
CLRClear HiRes screen and de-allocate RAM
gmode:
0 - Place as-is
1 - Invert shape
2 - OR with area
3 - AND with area
4 - XOR with area
paint0 no fill; 1 fill with foreground color
pmode0 fill w/color_src; 1 = fill until any other color
rmode0-Xcoord of pixel cursor; 1-Ycoord; 2=pixel cursor color