🚀 go-pugleaf

From: prindle@NADC

.in 10
.rm 70
.he /GRAFPAK/by Mark R. Rinfret/Rich Helms/
.fo //Version 1.00/page #/
.ti -5
DESCRIPTION
.br
The purpose of GRAFPAK is to provide a collection of graphics commands for the C64 and the C-Power compiler. The package was written by Mark R. Rinfret. This documentation was written by Rich Helms.

Mark's id on the C-Power BBS is MARK RINFRET.

Rich's id is RICH HELMS.

.nf
.ti -5
VERSIONS
.br
1.00 12/14/85

.ne 6
.ti -5
FILES

GRAFPAK0.C system variables
GRAFPAK1.C main routines
GRAFPAK2.C CIRCLE and ARC routines
GRAFPAK.H  standard include source

.ti -5
LINKing A PROGRAM

.fi
When linking a program load LINK. Then
answer with your program object. Then 
add the list:
.nf
GRAFPAK0.O
GRAFPAK1.O
GRAFPAK2.O (if circle or arc used)
MATH.L     (you need COS.OBJ and SIN.OBJ with this)
^          (system list)
 
.ti -5
SCREEN LAYOUT

    ?????????????????????????
    ? (0,0)                 ? 
    ?                       ? 
    ?                       ? 
    ?                       ? 
    ?                       ? 
    ?                       ? 
    ? Multi-Color (159,199) ? 
    ? Hi-Res      (319,199) ? 
     ???????????????????????
.ne 59
.ti -5
COMMANDS

.ne 12
ARC(xorigin,yorigin,xrad,yrad,start,end,angl,incr,pen);
   unsigned xorigin = x coordinate
            yorigin = y coordinate
            xrad    = x radius
            yrad    = y radius
            start   = start in degrees
            end     = end in degrees
   float    angl    = degree of rotation (not implimented)
   unsigned incr    = incriment
            pen     = (0-3) pen to draw with

   NOTE: Start is at 3 o'clock for 0 degrees.

.ne 2
BMFILL(value);
   unsigned value   = value to fill screen with

.ne 2
CFILL();
   NOTE: Fill screen with default colours

.ne 5
CIRCLE(xorigin,yorigin,radius,pen);
   unsigned xorigin = x coordinate
            yorigin = y coordinate
            radius  = radius
            pen     = (0-3) pen to draw with

.ne 8
COLORS(border,backgrd,pen1,pen2,pen3);
   int      border  = border colour
            backgrn = background
            pen1    = pen 1
            pen3    = pen 3

   NOTE: Colours < 0 cause no change

.ne 5
DRAWCHAR(x,y,c,pen);
   unsigned x       = x coordinate
            y       = y coordinate
            c       = character to print
            pen     = (0-3) pen to draw with


.ne 6
DRAWTEXT(x,y,s,angle,pen);
   unsigned x       = x coordinate
            y       = y coordinate
   char    *s       = characters to print
   float    angle   = angle to rotate
   unsigned pen     = (0-3) pen to draw with

.ne 2
GINIT();
   NOTE: Initialize graphics package

.ne 6
GRAPHICS(mode,clear);
   unsigned mode    = 0 textmode
                      1 hi-res
                      2 multi-color
            clear   = 0 no clear
   unsigned x1      = x coordinate
            y1      = y coordinate
            x2      = x coordinate
            y2      = y coordinate
            pen     = (0-3) pen to draw with

.ne 4
PSET(xcord,ycord,pen);
   unsigned xcord   = x coordinate
            ycord   = y coordinate
            pen     = (0-3) pen to draw with