=================================================================== RCS file: /home/cvs/OpenXM_contrib2/asir2000/plot/ifplot.h,v retrieving revision 1.6 retrieving revision 1.18 diff -u -p -r1.6 -r1.18 --- OpenXM_contrib2/asir2000/plot/ifplot.h 2000/11/09 02:30:44 1.6 +++ OpenXM_contrib2/asir2000/plot/ifplot.h 2014/05/13 20:02:40 1.18 @@ -45,17 +45,9 @@ * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. * - * $OpenXM: OpenXM_contrib2/asir2000/plot/ifplot.h,v 1.5 2000/11/09 01:51:12 noro Exp $ + * $OpenXM: OpenXM_contrib2/asir2000/plot/ifplot.h,v 1.17 2014/05/12 16:54:41 saito Exp $ */ -#if defined(THINK_C) -#include -#include -#include -#include -#include -#include -/* #include */ -#elif defined(VISUAL) +#if defined(VISUAL) /* for Visual C++ */ #include #else @@ -96,48 +88,104 @@ #define MAXCANVAS 64 #define MAXGC 16 -#if defined(THINK_C) -#define DEFAULTWIDTH 200 -#define DEFAULTHEIGHT 200 -#else +#define DEFAULTPOLARSTEP 400 #define DEFAULTWIDTH 400 #define DEFAULTHEIGHT 400 -#endif -#define MODE_IFPLOT 0 -#define MODE_CONPLOT 1 -#define MODE_PLOT 2 -#define MODE_INTERACTIVE 3 +#define IFPLOT "ifplot" +#define CONPLOT "conplot" +#define PLOT "plot" +#define INTERACTIVE "interactive" +#define POLARPLOT "polarplot" +#define PLOTOVER "plotover" +#define IFPLOTD "ifplotD" +#define IFPLOTQ "ifplotQ" +#define IFPLOTB "ifplotB" +#define INEQN "ineqn" +#define INEQND "ineqnD" +#define INEQNQ "ineqnQ" +#define INEQNB "ineqnB" +#define INEQNAND "ineqnand" +#define INEQNDAND "ineqnDand" +#define INEQNQAND "ineqnQand" +#define INEQNBAND "ineqnBand" +#define INEQNOR "ineqnor" +#define INEQNDOR "ineqnDor" +#define INEQNQOR "ineqnQor" +#define INEQNBOR "ineqnBor" +#define INEQNXOR "ineqnxor" +#define INEQNDXOR "ineqnDxor" +#define INEQNQXOR "ineqnQxor" +#define INEQNBXOR "ineqnBxor" +#define CONPLOTD "conplotD" +#define CONPLOTQ "conplotQ" +#define CONPLOTB "conplotB" +#define ITVIFPLOT "itvifplot" +#define PLOTOVERD "plotoverD" +#define PLOTOVERQ "plotoverQ" +#define PLOTOVERB "plotoverB" +#define MEMORY_IFPLOT "memory_ifplot" +#define MEMORY_CONPLOT "memory_conplot" +#define MEMORY_PLOT "memory_plot" +#define ARRAYPLOT "arrayplot" +#define OPEN_CANVAS "open_canvas" +#define DRAWCIRCLE "drawcircle" +#define DRAW_OBJ "draw_objc" +#define DRAW_STRING "draw_string" +#define OBJ_CP "obj_cp" +#define CLEAR_CANVAS "clear_canvas" +/* +#define IFPLOT 0 +#define CONPLOT 1 +#define PLOT 2 +#define INTERACTIVE 3 +#define POLARPLOT 4 +#define PLOTOVER 5 +#define IFPLOTD 6 +#define IFPLOTQ 7 +#define IFPLOTB 8 +#define INEQND 9 +#define INEQNQ 10 +#define INEQNB 11 +#define INEQNANDD 12 +#define INEQNANDQ 13 +#define INEQNANDB 14 +#define INEQNORD 15 +#define INEQNORQ 16 +#define INEQNORB 17 +#define INEQNXORD 18 +#define INEQNXORQ 19 +#define INEQNXORB 20 +#define CONPLOTD 21 +#define CONPLOTQ 22 +#define CONPLOTB 23 +#define ITVIFPLOT 24 +#define PLOTOVERD 25 +#define PLOTOVERQ 26 +#define PLOTOVERB 27 +#define MEMORY_IFPLOT 28 +#define MEMORY_CONPLOT 29 +#define MEMORY_PLOT 30 +#define ARRAYPLOT 31 +#define OPEN_CANVAS 32 +#define DRAWCIRCLE 33 +#define DRAW_OBJ 34 +#define DRAW_STRING 35 +#define OBJ_CP 36 +#define CLEAR_CANVAS 37 +*/ + #define DIR_X 0 #define DIR_Y 1 #define DIR_Z 2 -#if defined(THINK_C) -#define COPYBITS - -#define POINT Point -#define XC(a) ((a).h) -#define YC(a) ((a).v) -#define DRAWPOINT(d,p,g,x,y) MoveTo(x,y); Line(0,0) -#define DRAWLINE(d,p,g,x,y,u,v) MoveTo(x,y); LineTo(u,v) -#define DRAWSTRING(d,p,g,x,y,s,l) MoveTo(x,y); DrawText(s,0,l) -#define TEXTWIDTH(f,s,l) TextWidth(s,0,l) -#define DISPLAY int -#define WINDOW WindowPtr -#define CURSOR CursHandle -#ifndef COPYBITS -#define DRAWABLE PicHandle -#else -#define DRAWABLE BitMap -#endif - -#elif defined(VISUAL) +#if defined(VISUAL) /* for Visual C++ */ #define XC(a) ((a).x) #define YC(a) ((a).y) #define DISPLAY int -#define WINDOW int +#define WINDOW void * #define CURSOR int #define DRAWABLE HDC @@ -181,6 +229,9 @@ typedef struct RealVect { #define MKRVECT4(v,x,y,z,u)\ ((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+3*sizeof(int)),\ (v)->len=4,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z),(v)->body[3]=(u)) +#define MKRVECT5(v,x,y,z,u,w)\ +((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+4*sizeof(int)),\ + (v)->len=4,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z),(v)->body[3]=(u),(v)->body[4]=(w)) #define RV_POINT 1 #define RV_LINE 2 @@ -188,17 +239,7 @@ typedef struct RealVect { struct canvas { int index; -#if defined(THINK_C) - Rect rect; - WindowRecord record; - WindowPtr window; -#ifndef COPYBITS - PicHandle pix; -#else - BitMap pix,wbits; - RgnHandle rgnsav; -#endif -#elif defined(VISUAL) +#if defined(VISUAL) /* for Visual C++ */ void *window; /* pointer to CMainFrame */ HWND hwnd; /* handle to the canvas window */ @@ -222,21 +263,29 @@ struct canvas { double xmin,xmax; double ymin,ymax; double zmin,zmax; + double vmin,vmax; int nzstep; Q qxmin,qxmax; Q qymin,qymax; struct pa *pa; /* to register the history in the interactive mode */ NODE history; + int color; + int division; }; extern struct canvas *canvas[]; +extern struct canvas *closed_canvas[]; extern struct canvas *current_can; +extern char* pfn[]; -#ifdef INET +#if defined(INTERVAL) +extern Pixel BackPixel; +extern int Itvplot; +#endif + extern VL CO; extern int stream; -#endif extern DISPLAY *display; extern CURSOR normalcur,runningcur,errorcur; @@ -248,4 +297,115 @@ extern SIZE cansize; extern Window rootwin; extern GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC,cdrawGC; extern XFontStruct *sffs; +#endif + +struct xcolorForPS { + unsigned long pixel; + double r,g,b; + int print; +}; + +/* prototypes */ +int modeNO(char *); +void calc(double **,struct canvas *,int); +double usubstrp(P,double); +void qcalc(char **,struct canvas *); +void calcb(double **,struct canvas *,int); +void calcq(double **,struct canvas *,int); +void polarcalc(struct canvas *); +void sturmseq(VL,P,VECT *); +void seproot(VECT,int,int,int *); +int numch(VECT,Q,Q); +void usubstqp(P,Q,Q *); +void plotcalc(struct canvas *); +int open_canvas(NODE); +int plot(NODE,char *); +int ifplotold(NODE); +int polarplot(NODE); +int conplotD(NODE); +int memory_plot(NODE,LIST *); +int plotover(NODE); +int plotoverD(NODE); +int drawcircle(NODE); +int draw_obj(NODE); +int draw_string(NODE); +int clear_canvas(NODE); +void popup_canvas(int); +int arrayplot(NODE); +int ineqnover(NODE); +int ineqnand(NODE); +int ineqnor(NODE); +int ineqnxor(NODE); +int ifplotOP(NODE,int); +int ifplotNG(NODE,int); +int polarplotNG(NODE); +void ineqnmain(struct canvas *, int, int); +void conplotmainD(struct canvas *); +void obj_op(struct canvas *, struct canvas *, int); +void area_print(DISPLAY *,double **, struct canvas *, int); +void memory_print(struct canvas *,BYTEARRAY *); +void over_print(DISPLAY *,double **,struct canvas *,int); +void polar_print(DISPLAY *,struct canvas *); +unsigned long GetColor(DISPLAY *,char *); +void Pox_pop_local(NODE,Obj *); +void Pox_pop_cmo(NODE,Obj *); + +#if defined(INTERVAL) +int itvifplot(NODE); +//int itvplot1(NODE); +//int itvplot2(NODE); +//int itvplot3(NODE); +//int itvplot4(NODE); +int objcp(NODE); +int ineqn(NODE); +void obj_cp(struct canvas *,struct canvas *,int); +void itvcalc(double **, struct canvas *, int); +void itvplotmain(struct canvas *, int); +void itvplotmain1(struct canvas *); +#endif +void ifplot_resize(struct canvas *,POINT,POINT); +void plot_resize(struct canvas *,POINT,POINT); +void ifplotmainOld(struct canvas *); +void ifplotmain(struct canvas *); +void ifplotmains(struct canvas *); +void qifplotmain(struct canvas *); +void if_print(DISPLAY *,double **,struct canvas *,int); +void if_printOld(DISPLAY *,double **,struct canvas *); +void memory_if_print(double **,struct canvas *,BYTEARRAY *); +void con_print(DISPLAY *,double **,struct canvas *); +void memory_con_print(double **,struct canvas *,BYTEARRAY *); +void qif_print(DISPLAY *,char **,struct canvas *); +void plot_print(DISPLAY *,struct canvas *); +void set_drawcolor(unsigned int); +void draw_character_string(DISPLAY *,struct canvas *,int,int,char *,int); +void draw_point(DISPLAY *,struct canvas *,int,int,int); +void draw_line(DISPLAY *,struct canvas *,int,int,int,int,int); +void pline(DISPLAY *,struct canvas *,DRAWABLE); +double adjust_scale(double,double); +void initmarker(struct canvas *,char *); +void marker(struct canvas *,int,int); +void define_cursor(WINDOW,CURSOR); +void count_and_flush(); +void flush(); +int search_canvas(); +void create_canvas(struct canvas *can); +void copy_to_canvas(struct canvas *can); +void set_selection(); +void reset_selection(); +void set_busy(); +void reset_busy(); +void clear_pixmap(struct canvas *can); +void alloc_pixmap(struct canvas *can); +void copy_subimage(struct canvas *subcan,struct canvas *can,POINT pos); +int init_plot_display(int,char **); +void reset_current_computation(); +void process_xevent(); + +#if defined(VISUAL) +int search_active_canvas(); +void destroy_canvas(struct canvas *can); +void draw_wideframe(struct canvas *can,DRAWABLE d); +void create_brushes(); +void draw_frame0(DRAWABLE d,POINT spos,POINT epos); + #endif