1*3e12c5d1SDavid du Colombier #define arc(_x,_y,_X,_Y,_u,_v,_r) printf("a %d %d %d %d %d %d %d\n",_x,_y,_X,_Y,_u,_v,_r) 2*3e12c5d1SDavid du Colombier #define box(_x,_y,_X,_Y) printf("bo %d %d %d %d\n", _x,_y,_X,_Y) 3*3e12c5d1SDavid du Colombier #define bspline(_num,_ff) {printf("bs {\n"); putnum(_num,_ff); printf("}\n");} 4*3e12c5d1SDavid du Colombier #define call(_sname,_x) printf("ca %s %d\n", _sname,_x) 5*3e12c5d1SDavid du Colombier #define cfill(_s) printf("cf %s\n", _s) 6*3e12c5d1SDavid du Colombier #define circle(_x,_y,_r) printf("ci %d %d %d\n", _x,_y,_r) 7*3e12c5d1SDavid du Colombier #define closepl() printf("cl\n") 8*3e12c5d1SDavid du Colombier #define color(_s) printf("co %s\n", _s) 9*3e12c5d1SDavid du Colombier #define cspline(_num,_ff) {printf("cs {\n"); putnum(_num,_ff); printf("}\n");} 10*3e12c5d1SDavid du Colombier #define pdefine(_sname, _str) printf("de %s {\n%s\n",_sname, _str) 11*3e12c5d1SDavid du Colombier #define dspline(_num,_ff) {printf("ds {\n");putnum(_num,_ff);printf("}\n");} 12*3e12c5d1SDavid du Colombier #define erase() printf("e\n") 13*3e12c5d1SDavid du Colombier #define ffill(_s) printf("ff %s\n", _s) 14*3e12c5d1SDavid du Colombier #define fill(_num,_ff) {printf("fi {\n"); putnum(_num,_ff); printf("}\n");} 15*3e12c5d1SDavid du Colombier #define fpoly(_s) printf("fp %s\n", _s) 16*3e12c5d1SDavid du Colombier #define frame(_x,_y,_X,_Y) printf("fr %g %g %g %g\n", _x,_y,_X,_Y) 17*3e12c5d1SDavid du Colombier #define fspline(_s) printf("fs %s\n", _s) 18*3e12c5d1SDavid du Colombier #define grade(_x) printf("g %d\n", _x) 19*3e12c5d1SDavid du Colombier #define idle() 20*3e12c5d1SDavid du Colombier #define line(_x1,_y1,_x2,_y2) printf("li %d %d %d %d\n", _x1,_y1,_x2,_y2) 21*3e12c5d1SDavid du Colombier #define lspline(_num,_ff) {printf("ls {\n"); putnum(_num,_ff); printf("}\n");} 22*3e12c5d1SDavid du Colombier #define move(_x, _y) printf("m %d %d\n", _x, _y) 23*3e12c5d1SDavid du Colombier #define openpl() printf("o\n") 24*3e12c5d1SDavid du Colombier #define parabola(_x,_y,_X,_Y,_u,_v) printf("\npa %d %d %d %d %d %d\n", _x,_y,_X,_Y,_u,_v) 25*3e12c5d1SDavid du Colombier #define pen(_s) printf("pe %s\n", _s) 26*3e12c5d1SDavid du Colombier #define point(_x,_y) printf("poi %d %d\n", _x,_y) 27*3e12c5d1SDavid du Colombier #define poly(_num,_ff) {printf("pol {\n"); putnum(_num,_ff); printf("}\n");} 28*3e12c5d1SDavid du Colombier #define ppause() printf("pp\n") 29*3e12c5d1SDavid du Colombier #define range(_x,_y,_X,_Y) printf("ra %d %d %d %d\n", _x,_y,_X,_Y) 30*3e12c5d1SDavid du Colombier #define restore() printf("re\n") 31*3e12c5d1SDavid du Colombier #define rmove(_x,_y) printf("rm %d %d\n", _x,_y) 32*3e12c5d1SDavid du Colombier #define rvec(_x,_y) printf("rv %d %d\n", _x,_y) 33*3e12c5d1SDavid du Colombier #define save() printf( "sa\n") 34*3e12c5d1SDavid du Colombier #define sbox(_x,_y,_X,_Y) printf("sb %d %d %d %d\n", _x,_y,_X,_Y) 35*3e12c5d1SDavid du Colombier #define spline(_num,_ff) {printf("sp {\n"); putnum(_num,_ff); printf("}\n");} 36*3e12c5d1SDavid du Colombier #define text(_s) {if(*(_s) == ' ')printf("t \"%s\"\n",_s); else printf("t %s\n", _s); } 37*3e12c5d1SDavid du Colombier #define vec(_x,_y) printf("v %d %d\n", _x,_y) 38*3e12c5d1SDavid du Colombier void putnum(int [], double *[]); 39*3e12c5d1SDavid du Colombier char *whoami(void); 40