prindle@nadc (10/21/86)
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