Blob


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