home *** CD-ROM | disk | FTP | other *** search
- /* some emulation routines for the calcomp plotting calls */
-
- #include <stdlib.h>
- #include <stdio.h>
- #include <ctype.h>
- #include <string.h>
- #include <assert.h>
- #include <math.h>
-
- #define true (!false)
- #define false 0
-
- /*main(int argc, char **argv)
- */
-
- number_(float *x, float *y, float *z, float *v, float *c1, long *c2)
- {
- printf("! Number %g %g %g {%g} %g %d \n",(double) *x,(double) *y,(double)
- *z,(double) *v,(double) *c1,c2);
- printf("amove %g %g \n",(double) *x,(double) *y);
- printf("text %g \n",(double) *v);
-
- }
- symbol_(float *x, float *y, float *z, char *s, float *c1, long *c2, long c3)
- {
- printf("!Symbol %g %g %g {%s} %g %d %d \n",*x,*y,*z,s,*c1,*c2,c3);
- printf("amove %g %g \n",(double) *x,(double) *y);
- printf("text %c \n",*s);
- }
- plot_(float *x1, float *y1, int *cmd)
- {
- switch (*cmd) {
- case 2:
- printf("aline %g %g \n",*x1,*y1);
- break;
- case 3:
- printf("amove %g %g \n",*x1,*y1);
- break;
- default:
- printf("! %d %g %g \n",*cmd,*x1,*y1);
- break;
- }
- }
-
-