version 1.3, 2000/08/22 05:04:31 |
version 1.26, 2018/03/29 01:32:55 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/plot/ifplot.h,v 1.2 2000/08/21 08:31:50 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/plot/ifplot.h,v 1.25 2017/09/04 01:57:53 noro Exp $ |
*/ |
*/ |
#if defined(THINK_C) |
#if defined(VISUAL) || defined(__MINGW32__) |
#include <QuickDraw.h> |
/* for Visual C++ */ |
#include <Windows.h> |
#include <windows.h> |
#include <Events.h> |
|
#include <OSUtils.h> |
|
#include <ToolUtils.h> |
|
#include <Fonts.h> |
|
/* #include <Strings.h> */ |
|
#else |
#else |
#include <sys/types.h> |
#include <sys/types.h> |
#include <X11/Xlib.h> |
#include <X11/Xlib.h> |
|
|
#define C_APLOT C_PRIV+7 |
#define C_APLOT C_PRIV+7 |
#define C_DRAWCIRCLE C_PRIV+8 |
#define C_DRAWCIRCLE C_PRIV+8 |
|
|
#define MAXCANVAS 16 |
#define MAXCANVAS 64 |
#define MAXGC 16 |
#define MAXGC 16 |
#if defined(THINK_C) |
#define DEFAULTPOLARSTEP 400 |
#define DEFAULTWIDTH 200 |
|
#define DEFAULTHEIGHT 200 |
|
#else |
|
#define DEFAULTWIDTH 400 |
#define DEFAULTWIDTH 400 |
#define DEFAULTHEIGHT 400 |
#define DEFAULTHEIGHT 400 |
#endif |
|
|
|
#define MODE_IFPLOT 0 |
#define IFPLOT "ifplot" |
#define MODE_CONPLOT 1 |
#define CONPLOT "conplot" |
#define MODE_PLOT 2 |
#define PLOT "plot" |
|
#define INTERACTIVE "interactive" |
|
#define POLARPLOT "polarplot" |
|
#define POLARPLOTD "polarplotD" |
|
#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_obj" |
|
#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 POLARPLOTD 38 |
|
*/ |
|
|
#define DIR_X 0 |
#define DIR_X 0 |
#define DIR_Y 1 |
#define DIR_Y 1 |
#define DIR_Z 2 |
#define DIR_Z 2 |
|
|
#if defined(THINK_C) |
#if defined(VISUAL) || defined(__MINGW32__) |
#define COPYBITS |
/* for Visual C++ */ |
|
#define XC(a) ((a).x) |
#define POINT Point |
#define YC(a) ((a).y) |
#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 DISPLAY int |
#define WINDOW WindowPtr |
#define WINDOW void * |
#define CURSOR CursHandle |
#define CURSOR int |
#ifndef COPYBITS |
#define DRAWABLE HDC |
#define DRAWABLE PicHandle |
|
|
/* XXX : use GC argument as the color */ |
|
#define DRAWPOINT(d,p,g,x,y) SetPixel(p,x,y,0) |
|
|
|
#define DRAWLINE(d,p,g,x,y,u,v) MoveToEx(p,x,y,&oldpos); LineTo(p,u,v) |
|
#define DRAWSTRING(d,p,g,x,y,s,l) TextOut(p,x,y,s,l) |
|
/* #define TEXTWIDTH(f,s,l) */ |
#else |
#else |
#define DRAWABLE BitMap |
/* for UNIX */ |
#endif |
|
#else |
|
#define POINT XPoint |
#define POINT XPoint |
#define XC(a) ((a).x) |
#define XC(a) ((a).x) |
#define YC(a) ((a).y) |
#define YC(a) ((a).y) |
|
|
#endif |
#endif |
|
|
struct pa { |
struct pa { |
int length; |
int length; |
POINT *pos; |
POINT *pos; |
}; |
}; |
|
|
|
typedef struct RealVect { |
|
int len; |
|
int body[1]; |
|
} RealVect; |
|
|
|
#define MKRVECT2(v,x,y)\ |
|
((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+sizeof(int)),\ |
|
(v)->len=2,(v)->body[0]=(x),(v)->body[1]=(y)) |
|
#define MKRVECT3(v,x,y,z)\ |
|
((v)=(RealVect *)MALLOC_ATOMIC(sizeof(RealVect)+2*sizeof(int)),\ |
|
(v)->len=3,(v)->body[0]=(x),(v)->body[1]=(y),(v)->body[2]=(z)) |
|
#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 |
|
#define RV_ARC 3 |
|
|
struct canvas { |
struct canvas { |
int index; |
int index; |
#if defined(THINK_C) |
#if defined(VISUAL) || defined(__MINGW32__) |
Rect rect; |
/* for Visual C++ */ |
WindowRecord record; |
void *window; /* pointer to CMainFrame */ |
WindowPtr window; |
HWND hwnd; /* handle to the canvas window */ |
#ifndef COPYBITS |
HDC pix; /* shadow DC on memory */ |
PicHandle pix; |
char *prefix; |
|
int percentage; |
|
struct canvas *real_can; |
#else |
#else |
BitMap pix,wbits; |
Widget shell,xcoord,ycoord,xdone,ydone,level,wideb,preciseb,noaxisb; |
RgnHandle rgnsav; |
Window window; |
|
Pixmap pix; |
#endif |
#endif |
#else |
char *wname; |
Widget shell,xcoord,ycoord,xdone,ydone,level,wideb,preciseb,noaxisb; |
int mode; |
Window window; |
char wide; |
Pixmap pix; |
char precise; |
#endif |
char noaxis; |
char *wname; |
V vx,vy; |
char mode; |
P formula; |
char wide; |
int width,height; |
char precise; |
double xmin,xmax; |
char noaxis; |
double ymin,ymax; |
V vx,vy; |
double zmin,zmax; |
P formula; |
double vmin,vmax; |
int width,height; |
int nzstep; |
double xmin,xmax; |
Q qxmin,qxmax; |
double ymin,ymax; |
Q qymin,qymax; |
double zmin,zmax; |
struct pa *pa; |
int nzstep; |
/* to register the history in the interactive mode */ |
Q qxmin,qxmax; |
NODE history; |
Q qymin,qymax; |
unsigned int color; |
struct pa *pa; |
int division; |
|
int prec; |
}; |
}; |
|
|
extern struct canvas *canvas[]; |
extern struct canvas *canvas[]; |
|
extern struct canvas *closed_canvas[]; |
extern struct canvas *current_can; |
extern struct canvas *current_can; |
|
extern char* pfn[]; |
|
|
#ifdef INET |
#if defined(INTERVAL) |
|
extern int Itvplot; |
|
#endif |
|
|
extern VL CO; |
extern VL CO; |
extern int stream; |
extern int stream; |
#endif |
|
|
|
extern DISPLAY *display; |
extern DISPLAY *display; |
extern CURSOR normalcur,runningcur,errorcur; |
extern CURSOR normalcur,runningcur,errorcur; |
|
|
#if !defined(THINK_C) |
#if defined(VISUAL) || defined(__MINGW32__) |
|
extern POINT start_point,end_point; |
|
extern SIZE cansize; |
|
#else |
extern Window rootwin; |
extern Window rootwin; |
extern GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC; |
extern GC drawGC,dashGC,hlGC,scaleGC,clearGC,xorGC,colorGC,cdrawGC; |
extern XFontStruct *sffs; |
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 polarcalcNG(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,int); |
|
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 ifplotmain(struct canvas *); |
|
void ifplotmainNG(struct canvas *); |
|
void qifplotmain(struct canvas *); |
|
void if_printNG(DISPLAY *,double **,struct canvas *,int); |
|
void if_print(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 *,unsigned int); |
|
void draw_point(DISPLAY *,struct canvas *,int,int,unsigned int); |
|
void draw_line(DISPLAY *,struct canvas *,int,int,int,int,unsigned 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) || defined(__MINGW32__) |
|
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 |
#endif |