/* FRACTINT.H - common structures and values for the FRACTINT routines */ #if defined(PUTTHEMHERE) /* this MUST be defined ONLY in FRACTINT.C */ struct videoinfo videoentry; int helpmode; #endif #ifndef FRACTINT_H #define FRACTINT_H #if !defined(PUTTHEMHERE) extern struct videoinfo videoentry; extern int helpmode; #endif #include #include "port.h" typedef BYTE BOOLEAN; #ifndef C6 #define _fastcall /* _fastcall is a Microsoft C6.00 extension */ #endif #ifndef XFRACT typedef int SEGTYPE; typedef unsigned USEGTYPE; #ifdef __TURBOC__ # define _bios_printer(a,b,c) biosprint((a),(c),(b)) # define _bios_serialcom(a,b,c) bioscom((a),(c),(b)) #else #ifndef __WATCOMC__ #ifndef MK_FP # define MK_FP(seg,off) (VOIDFARPTR )( (((long)(seg))<<16) | \ ((unsigned)(off)) ) #endif #endif #endif #else typedef char * SEGTYPE; typedef char * USEGTYPE; # define MK_FP(seg,off) (VOIDFARPTR )(seg+off) #endif #ifndef XFRACT #define clock_ticks() clock() #endif #ifdef XFRACT #define _fstrcpy(to,from) strcpy(to,from) #endif /* these are used to declare arrays for file names */ #define FILE_MAX_PATH 80 /* max length of path+filename */ #define FILE_MAX_DIR 80 /* max length of directory name */ #define FILE_MAX_DRIVE 3 /* max length of drive letter */ #define FILE_MAX_FNAME 9 /* max length of filename */ #define FILE_MAX_EXT 5 /* max length of extension */ #define MAXPARAMS 10 /* maximum number of parameters */ #define MAXPIXELS 2048 /* Maximum pixel count across/down the screen */ #define DEFAULTASPECT 0.75 /* Assumed overall screen dimensions, y/x */ struct videoinfo { /* All we need to know about a Video Adapter */ char name[26]; /* Adapter name (IBM EGA, etc) */ char comment[26]; /* Comments (UNTESTED, etc) */ int keynum; /* key number used to invoked this mode */ /* 2-10 = F2-10, 11-40 = S,C,A{F1-F10} */ int videomodeax; /* begin with INT 10H, AX=(this) */ int videomodebx; /* ...and BX=(this) */ int videomodecx; /* ...and CX=(this) */ int videomodedx; /* ...and DX=(this) */ /* NOTE: IF AX==BX==CX==0, SEE BELOW */ int dotmode; /* video access method used by asm code */ /* 1 == BIOS 10H, AH=12,13 (SLOW) */ /* 2 == access like EGA/VGA */ /* 3 == access like MCGA */ /* 4 == Tseng-like SuperVGA*256 */ /* 5 == P'dise-like SuperVGA*256 */ /* 6 == Vega-like SuperVGA*256 */ /* 7 == "Tweaked" IBM-VGA ...*256 */ /* 8 == "Tweaked" SuperVGA ...*256 */ /* 9 == Targa Format */ /* 10 = Hercules */ /* 11 = "disk video" (no screen) */ /* 12 = 8514/A */ /* 13 = CGA 320x200x4, 640x200x2 */ /* 14 = Tandy 1000 */ /* 15 = TRIDENT SuperVGA*256 */ /* 16 = Chips&Tech SuperVGA*256 */ int xdots; /* number of dots across the screen */ int ydots; /* number of dots down the screen */ int colors; /* number of colors available */ }; #define INFO_ID "Fractal" #define FRACTAL_INFO struct fractal_info /* * Note: because non-MSDOS machines store structures differently, we have * to do special processing of the fractal_info structure in loadfile.c. * Make sure changes to the structure here get reflected there. */ #ifndef XFRACT #define FRACTAL_INFO_SIZE sizeof(FRACTAL_INFO) #else /* This value should be the MSDOS size, not the Unix size. */ #define FRACTAL_INFO_SIZE 502 #endif struct fractal_info /* for saving data in GIF file */ { char info_id[8]; /* Unique identifier for info block */ short iterations; short fractal_type; /* 0=Mandelbrot 1=Julia 2= ... */ double xmin; double xmax; double ymin; double ymax; double creal; double cimag; short videomodeax; short videomodebx; short videomodecx; short videomodedx; short dotmode; short xdots; short ydots; short colors; short version; /* used to be 'future[0]' */ float parm3; float parm4; float potential[3]; short rseed; short rflag; short biomorph; short inside; short logmap; float invert[3]; short decomp[2]; short symmetry; /* version 2 stuff */ short init3d[16]; short previewfactor; short xtrans; short ytrans; short red_crop_left; short red_crop_right; short blue_crop_left; short blue_crop_right; short red_bright; short blue_bright; short xadjust; short eyeseparation; short glassestype; /* version 3 stuff, release 13 */ short outside; /* version 4 stuff, release 14 */ double x3rd; /* 3rd corner */ double y3rd; char stdcalcmode; /* 1/2/g/b */ char useinitorbit; /* init Mandelbrot orbit flag */ short calc_status; /* resumable, finished, etc */ long tot_extend_len; /* total length of extension blocks in .gif file */ short distest; short floatflag; short bailout; long calctime; BYTE trigndx[4]; /* which trig functions selected */ short finattract; double initorbit[2]; /* init Mandelbrot orbit values */ short periodicity; /* periodicity checking */ /* version 5 stuff, release 15 */ short pot16bit; /* save 16 bit continuous potential info */ float faspectratio; /* finalaspectratio, y/x */ short system; /* 0 for dos, 1 for windows */ short release; /* release number, with 2 decimals implied */ short flag3d; /* stored only for now, for future use */ short transparent[2]; short ambient; short haze; short randomize; /* version 6 stuff, release 15.x */ short rotate_lo; short rotate_hi; short distestwidth; /* version 7 stuff, release 16 */ double dparm3; double dparm4; /* version 8 stuff, release 17 */ short fillcolor; /* version 9 stuff, release 18 */ double mxmaxfp; double mxminfp; double mymaxfp; double myminfp; short zdots; float originfp; float depthfp; float heightfp; float widthfp; float distfp; float eyesfp; short orbittype; short juli3Dmode; short maxfn; short inversejulia; double dparm5; double dparm6; double dparm7; double dparm8; double dparm9; double dparm10; short future[50]; /* for stuff we haven't thought of yet */ }; #define MAXVIDEOMODES 300 /* maximum entries in fractint.cfg */ #ifndef XFRACT #define MAXVIDEOTABLE 40 /* size of the resident video modes table */ #else #define MAXVIDEOTABLE 2 /* size of the resident video modes table */ #endif #define AUTOINVERT -123456.789 #define N_ATTR 8 /* max number of attractors */ extern long l_at_rad; /* finite attractor radius */ extern double f_at_rad; /* finite attractor radius */ #define NUMIFS 64 /* number of ifs functions in ifs array */ #define IFSPARM 7 /* number of ifs parameters */ #define IFS3DPARM 13 /* number of ifs 3D parameters */ #define ITEMNAMELEN 18 /* max length of names in .frm/.l/.ifs/.fc */ struct moreparams { int type; /* index in fractalname of the fractal */ char *param[MAXPARAMS-4]; /* name of the parameters */ double paramvalue[MAXPARAMS-4]; /* default parameter values */ }; struct fractalspecificstuff { char *name; /* name of the fractal */ /* (leading "*" supresses name display) */ char *param[4]; /* name of the parameters */ double paramvalue[4]; /* default parameter values */ int helptext; /* helpdefs.h HT_xxxx, -1 for none */ int helpformula; /* helpdefs.h HF_xxxx, -1 for none */ int flags; /* constraints, bits defined below */ float xmin; /* default XMIN corner */ float xmax; /* default XMAX corner */ float ymin; /* default YMIN corner */ float ymax; /* default YMAX corner */ int isinteger; /* 1 if integerfractal, 0 otherwise */ int tojulia; /* mandel-to-julia switch */ int tomandel; /* julia-to-mandel switch */ int tofloat; /* integer-to-floating switch */ int symmetry; /* applicable symmetry logic 0 = no symmetry -1 = y-axis symmetry (If No Params) 1 = y-axis symmetry -2 = x-axis symmetry (No Parms) 2 = x-axis symmetry -3 = y-axis AND x-axis (No Parms) 3 = y-axis AND x-axis symmetry -4 = polar symmetry (No Parms) 4 = polar symmetry 5 = PI (sin/cos) symmetry 6 = NEWTON (power) symmetry */ int (*orbitcalc)(); /* function that calculates one orbit */ int (*per_pixel)(); /* once-per-pixel init */ int (*per_image)(); /* once-per-image setup */ int (*calctype)(); /* name of main fractal function */ int orbit_bailout; /* usual bailout value for orbit calc */ }; /* defines for symmetry */ #define NOSYM 0 #define XAXIS_NOPARM -1 #define XAXIS 1 #define YAXIS_NOPARM -2 #define YAXIS 2 #define XYAXIS_NOPARM -3 #define XYAXIS 3 #define ORIGIN_NOPARM -4 #define ORIGIN 4 #define PI_SYM_NOPARM -5 #define PI_SYM 5 #define XAXIS_NOIMAG -6 #define XAXIS_NOREAL 6 #define NOPLOT 99 #define SETUP_SYM 100 /* defines for inside/outside */ #define ITER -1 #define REAL -2 #define IMAG -3 #define MULT -4 #define SUM -5 #define ZMAG -59 #define BOF60 -60 #define BOF61 -61 #define EPSCROSS -100 #define STARTRAIL -101 #define PERIOD -102 /* bitmask defines for fractalspecific flags */ #define NOZOOM 1 /* zoombox not allowed at all */ #define NOGUESS 2 /* solid guessing not allowed */ #define NOTRACE 4 /* boundary tracing not allowed */ #define NOROTATE 8 /* zoombox rotate/stretch not allowed */ #define NORESUME 16 /* can't interrupt and resume */ #define INFCALC 32 /* this type calculates forever */ #define TRIG1 64 /* number of trig functions in formula*/ #define TRIG2 128 #define TRIG3 192 #define TRIG4 256 #define WINFRAC 512 /* supported in WinFrac */ #define PARMS3D 1024 /* uses 3d parameters */ #define OKJB 2048 /* works with Julibrot */ #define MORE 4096 /* more than 4 parms */ extern struct fractalspecificstuff far fractalspecific[]; extern struct fractalspecificstuff far *curfractalspecific; #define DEFAULTFRACTALTYPE ".gif" #define ALTERNATEFRACTALTYPE ".fra" #ifndef _CMPLX_DEFINED #define _CMPLX_DEFINED struct DHyperComplex { double x,y; double z,t; }; struct LHyperComplex { long x,y; long z,t; }; struct DComplex { double x,y; }; struct LComplex { long x,y; }; typedef struct DComplex _CMPLX; typedef struct LComplex _LCMPLX; typedef struct DHyperComplex _HCMPLX; typedef struct LHyperComplex _LHCMPLX; #endif #ifndef sqr #define sqr(x) ((x)*(x)) #endif #ifndef lsqr #define lsqr(x) (multiply((x),(x),bitshift)) #endif #define CMPLXmod(z) (sqr((z).x)+sqr((z).y)) #define CMPLXconj(z) ((z).y = -((z).y)) #define LCMPLXmod(z) (lsqr((z).x)+lsqr((z).y)) #define LCMPLXconj(z) ((z).y = -((z).y)) typedef _LCMPLX LCMPLX; /* 3D stuff - formerly in 3d.h */ #ifndef dot_product #define dot_product(v1,v2) ((v1)[0]*(v2)[0]+(v1)[1]*(v2)[1]+(v1)[2]*(v2)[2]) /* TW 7-09-89 */ #endif #define CMAX 4 /* maximum column (4 x 4 matrix) */ #define RMAX 4 /* maximum row (4 x 4 matrix) */ #define DIM 3 /* number of dimensions */ typedef double MATRIX [RMAX] [CMAX]; /* matrix of doubles */ typedef int IMATRIX [RMAX] [CMAX]; /* matrix of ints */ typedef long LMATRIX [RMAX] [CMAX]; /* matrix of longs */ /* A MATRIX is used to describe a transformation from one coordinate system to another. Multiple transformations may be concatenated by multiplying their transformation matrices. */ typedef double VECTOR [DIM]; /* vector of doubles */ typedef int IVECTOR [DIM]; /* vector of ints */ typedef long LVECTOR [DIM]; /* vector of longs */ /* A VECTOR is an array of three coordinates [x,y,z] representing magnitude and direction. A fourth dimension is assumed to always have the value 1, but is not in the data structure */ #define PI 3.14159265358979323846 #define SPHERE init3d[0] /* sphere? 1 = yes, 0 = no */ #define ILLUMINE (FILLTYPE>4) /* illumination model */ /* regular 3D */ #define XROT init3d[1] /* rotate x-axis 60 degrees */ #define YROT init3d[2] /* rotate y-axis 90 degrees */ #define ZROT init3d[3] /* rotate x-axis 0 degrees */ #define XSCALE init3d[4] /* scale x-axis, 90 percent */ #define YSCALE init3d[5] /* scale y-axis, 90 percent */ /* sphere 3D */ #define PHI1 init3d[1] /* longitude start, 180 */ #define PHI2 init3d[2] /* longitude end , 0 */ #define THETA1 init3d[3] /* latitude start,-90 degrees */ #define THETA2 init3d[4] /* latitude stop, 90 degrees */ #define RADIUS init3d[5] /* should be user input */ /* common parameters */ #define ROUGH init3d[6] /* scale z-axis, 30 percent */ #define WATERLINE init3d[7] /* water level */ #define FILLTYPE init3d[8] /* fill type */ #define ZVIEWER init3d[9] /* perspective view point */ #define XSHIFT init3d[10] /* x shift */ #define YSHIFT init3d[11] /* y shift */ #define XLIGHT init3d[12] /* x light vector coordinate */ #define YLIGHT init3d[13] /* y light vector coordinate */ #define ZLIGHT init3d[14] /* z light vector coordinate */ #define LIGHTAVG init3d[15] /* number of points to average */ #ifndef TRUE #define TRUE 1 #define FALSE 0 #endif /* Math definitions (normally in float.h) that are missing on some systems. */ #ifndef FLT_MIN #define FLT_MIN 1.17549435e-38 #endif #ifndef FLT_MAX #define FLT_MAX 3.40282347e+38 #endif #ifndef DBL_EPSILON #define DBL_EPSILON 2.2204460492503131e-16 #endif #ifndef XFRACT #define UPARR "\x18" #define DNARR "\x19" #define RTARR "\x1A" #define LTARR "\x1B" #else #define UPARR "K" #define DNARR "J" #define RTARR "L" #define LTARR "H" #endif #define JIIM 0 #define ORBIT 1 struct workliststuff /* work list entry for std escape time engines */ { int xxstart; /* screen window for this entry */ int xxstop; int yystart; int yystop; int yybegin; /* start row within window, for 2pass/ssg resume */ int sym; /* if symmetry in window, prevents bad combines */ int pass; /* for 2pass and solid guessing */ }; #define MAXCALCWORK 12 extern BYTE trigndx[]; extern void (*ltrig0)(void), (*ltrig1)(void), (*ltrig2)(void), (*ltrig3)(void); extern void (*dtrig0)(void), (*dtrig1)(void), (*dtrig2)(void), (*dtrig3)(void); struct trig_funct_lst { char *name; void (*lfunct)(void); void (*dfunct)(void); void (*mfunct)(void); } ; extern struct trig_funct_lst trigfn[]; /* function prototypes */ extern void (_fastcall *plot)(int, int, int); /* for overlay return stack */ #define ENTER_OVLY(ovlyid)\ extern int active_ovly;\ int prev_ovly;\ prev_ovly = active_ovly;\ active_ovly = ovlyid #define EXIT_OVLY active_ovly = prev_ovly #define BIG 100000.0 #define OVLY_MISCOVL 1 #define OVLY_CMDFILES 2 #define OVLY_HELP 3 #define OVLY_PROMPTS1 4 #define OVLY_PROMPTS2 5 #define OVLY_LOADFILE 6 #define OVLY_ROTATE 7 #define OVLY_PRINTER 8 #define OVLY_LINE3D 9 #define OVLY_ENCODER 10 #define OVLY_CALCFRAC 11 #define OVLY_INTRO 12 #define OVLY_DECODER 13 #define CTL(x) ((x)&0x1f) /* nonalpha tests if we have a control character */ #define nonalpha(c) ((c)<32 || (c)>127) /* keys */ #define INSERT 1082 #define DELETE 1083 #define PAGE_UP 1073 #define PAGE_DOWN 1081 #define CTL_HOME 1119 #define CTL_END 1117 #define LEFT_ARROW 1075 #define RIGHT_ARROW 1077 #define UP_ARROW 1072 #define DOWN_ARROW 1080 #define LEFT_ARROW_2 1115 #define RIGHT_ARROW_2 1116 #define UP_ARROW_2 1141 #define DOWN_ARROW_2 1145 #define HOME 1071 #define END 1079 #define ENTER 13 #define ENTER_2 1013 #define CTL_ENTER 10 #define CTL_ENTER_2 1010 #define CTL_PAGE_UP 1132 #define CTL_PAGE_DOWN 1118 #define CTL_MINUS 1142 #define CTL_PLUS 1144 #define CTL_INSERT 1146 #define CTL_DEL 1147 #define F1 1059 #define F2 1060 #define F3 1061 #define F4 1062 #define F5 1063 #define F6 1064 #define F7 1065 #define F8 1066 #define F9 1067 #define F10 1068 #define TAB 9 #define ESC 27 #define SPACE 32 #define SF1 1084 #define SF2 1085 #define SF3 1086 #define SF4 1087 #define SF5 1088 #define SF6 1089 #define SF7 1090 #define SF8 1091 #define SF9 1092 #define SF10 1093 /* text colors */ #define BLACK 0 #define BLUE 1 #define GREEN 2 #define CYAN 3 #define RED 4 #define MAGENTA 5 #define BROWN 6 /* dirty yellow on cga */ #define WHITE 7 /* use values below this for foreground only, they don't work background */ #define GRAY 8 /* don't use this much - is black on cga */ #define L_BLUE 9 #define L_GREEN 10 #define L_CYAN 11 #define L_RED 12 #define L_MAGENTA 13 #define YELLOW 14 #define L_WHITE 15 #define INVERSE 0x8000 /* when 640x200x2 text or mode 7, inverse */ #define BRIGHT 0x4000 /* when mode 7, bright */ /* and their use: */ extern BYTE txtcolor[]; #define C_TITLE txtcolor[0]+BRIGHT #define C_TITLE_DEV txtcolor[1] #define C_HELP_HDG txtcolor[2]+BRIGHT #define C_HELP_BODY txtcolor[3] #define C_HELP_INSTR txtcolor[4] #define C_HELP_LINK txtcolor[5]+BRIGHT #define C_HELP_CURLINK txtcolor[6]+INVERSE #define C_PROMPT_BKGRD txtcolor[7] #define C_PROMPT_TEXT txtcolor[8] #define C_PROMPT_LO txtcolor[9] #define C_PROMPT_MED txtcolor[10] #ifndef XFRACT #define C_PROMPT_HI txtcolor[11]+BRIGHT #else #define C_PROMPT_HI txtcolor[11] #endif #define C_PROMPT_INPUT txtcolor[12]+INVERSE #define C_PROMPT_CHOOSE txtcolor[13]+INVERSE #define C_CHOICE_CURRENT txtcolor[14]+INVERSE #define C_CHOICE_SP_INSTR txtcolor[15] #define C_CHOICE_SP_KEYIN txtcolor[16]+BRIGHT #define C_GENERAL_HI txtcolor[17]+BRIGHT #define C_GENERAL_MED txtcolor[18] #define C_GENERAL_LO txtcolor[19] #define C_GENERAL_INPUT txtcolor[20]+INVERSE #define C_DVID_BKGRD txtcolor[21] #define C_DVID_HI txtcolor[22]+BRIGHT #define C_DVID_LO txtcolor[23] #define C_STOP_ERR txtcolor[24]+BRIGHT #define C_STOP_INFO txtcolor[25]+BRIGHT #define C_TITLE_LOW txtcolor[26] #define C_AUTHDIV1 txtcolor[27]+INVERSE #define C_AUTHDIV2 txtcolor[28]+INVERSE #define C_PRIMARY txtcolor[29] #define C_CONTRIB txtcolor[30] /* structure for xmmmoveextended parameter */ struct XMM_Move { unsigned long Length; unsigned int SourceHandle; unsigned long SourceOffset; unsigned int DestHandle; unsigned long DestOffset; }; /* structure passed to fullscreen_prompts */ struct fullscreenvalues { int type; /* 'd' for double, 'f' for float, 's' for string, */ /* 'D' for integer in double, '*' for comment */ /* 'i' for integer, 'y' for yes=1 no=0 */ /* 0x100+n for string of length n */ /* 'l' for one of a list of strings */ union { double dval; /* when type 'd' or 'f' */ int ival; /* when type is 'i' */ char sval[16]; /* when type is 's' */ char *sbuf; /* when type is 0x100+n */ struct { /* when type is 'l' */ int val; /* selected choice */ int vlen; /* char len per choice */ char **list; /* list of values */ int llen; /* number of values */ } ch; } uval; }; #endif