home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computerworld 1996 March
/
Computerworld_1996-03_cd.bin
/
idg_cd3
/
grafika
/
fraktaly
/
frasr192
/
fractsrc.doc
< prev
next >
Wrap
Text File
|
1995-03-05
|
16KB
|
402 lines
The source code for Fractint is freely available.
Enhancements to it are appreciated. If you want to add something to
Fractint and join the Stone Soup Group, please do! To submit changes,
see "Contacting the Authors" in Fractint's online help.
Copyright Information:
======================
Some parts of the source are from the public domain and are not
copyrighted.
Some parts of the source bear explicit copyright notices from the
author and are subject to the conditions listed there by the author.
The remainder of the source (not already public domain, no explicit
author's copyright notice) is Copyright 1990, 1991 by the Stone Soup Group
(a loosely associated and ever-growing group of fanatic programmers).
The source code may be copied freely and may be used in other programs
under the following conditions:
It may not be used in a commercial program which produces fractal images.
Please credit the author (in general, credit Fractint and the Stone Soup
Group) as the source of the code.
Distribution of modified versions of Fractint:
==============================================
If you enhance Fractint and want to distribute the results to others, the
preferred approach is to join the Stone Soup Group - send us your
enhancements and get your name in lights in future versions of Fractint.
We prefer that a modified Fractint executable program not be distributed to
others, but understand that you might want to give copies to friends. This
is permitted, under the following conditions:
o The modified executable has a different name than "fractint.exe".
o The distribution includes a full unmodified copy of the corresponding
original version of fraint.exe. (The easiest way is to copy fraint.exe
to yournew.exe, then "pkzip -a fraint.exe newfract.exe" to add your
version, and perhaps add a read.me file to describe it.)
o The heading displayed by the modified program clearly indicates that
it is a non-standard release. E.g. you might change the heading to
say "Non-standard Fractint, Modified by John Doe".
o All author credits and distribution information in the online help
are unchanged (adding lines for your work is of course ok.)
The source code for a modified version of Fractint may not be distributed.
(This is because we don't want any chance of confusion over which version
of a source file is the official release.)
Compiling Fractint:
===================
FRASRC.EXE includes the complete source code for FRACTINT (.C and .ASM).
Recognizing that not everyone HAS (or even wants) an assembler, much less
either MASM 5.1 or Turbo-ASM, which are the only two assemblers that the
authors are aware of that can handle these particular files, it also contains
a complete set of .OBJ files from the assembler code,
The distributed source will not compile to exactly match the Fractint
release - it compiles with a different version number and heading.
The Microsoft 6.00A C compiler and Microsoft 5.1 assembler are used for
Fractint releases, so that is the one combination of compiler/assembler
which is pretty much guaranteed to handle FRACTINT in all of its various
mutations.
Given that several of FRACTINT's co-authors now prefer (or only have!)
alternate combinations, we have re-arranged the code to (usually) handle
several popular alternatives. In particular:
Microsoft C 7/8 and MASM 6.x:
-------------------------------
Just run MAKEFRAC.BAT, which invokes the Microsoft NMK utility using the
files FRACHELP.MAK, FRACTINT.MAK, and FRACTINT.LN7. Note that the assembler
.OBJ files have been included in the .ZIP file, so that you don't really
need MASM unless you are going to modify one or more of them. If you ARE
going to modify one of the assembler files, note that the distributed
versions rely on some nifty features added to version 6.0 (like the '.model
medium,c' option) and will not assemble under older versions of MASM without
a LOT of work.
Warning: FRACTINT.MAK uses the most aggressive optimizations that we *think*
are safe. Every time Microsoft comes out with a new compiler, something
usually breaks, and we have to back of of our optimizations a little.
Microsoft C (earlier versions):
----------------
Edit MAKEFRAC.BAT: comment out the two "nmk ..." lines and uncomment
the lines for earlier versions. These probably need some work.
Borland C++ 3.0 and 3.1 Users
-----------------------------
See the BC*.* files.
Help System
===========
You'll need to set up the help files to get any online help from a modified
version of Fractint.
For MSC users the MAKEFRAC.BAT file contains the necessary steps, you don't
need to do anything special.
TC++ users should:
start by creating HC.EXE using the supplied HC.PRJ file
run "hc /c" to create the file FRACTINT.HLP
each time you create a new fractint.exe, afterward run "hc /a" to append
FRACTINT.HLP to the new FRACTINT.EXE
You don't need to understand the rest of this section unless you have a
problem.
The source for Fractint's help is in the files HELP.SRC, HELP2.SRC, HELP3.SRC,
HELP4.SRC, and HELP5.SRC. The format of these files is described in HC.DOC.
The program HC.C ("help compiler") is used to convert the help text into
the form Fractint uses at run time.
Running "hc /c" compiles HELPx.SRC. It produces the file HELPDEFS.H for
use when compiling Fractint, and the file FRACTINT.HLP.
Running "hc /a" appends the FRACTINT.HLP file to FRACTINT.EXE to make the
compiled help info available at run time.
Overlays
========
Note: generally you won't have to worry about this!
Only the addition of huge code (new overlays), or work which changes the
relationship between major components of Fractint, are likely to affect
the overlay structure.
Fractint uses the new Microsoft Link overlay feature, to reduce the runtime
memory required (which would otherwise exceed what DOS can give it.)
Some caution is required with overlays. Those source modules which are
part of an overlay have a comment to indicate this at the start. See the
fractint.def file for the current overlay structure.
Some notes about overlays:
o The obvious one: control should not switch to different overlays
frequently, else Fractint will become sluggish. If the overlay structure
changes, a test from floppy disk with no disk caching is a good idea.
o The overlay manager logic (inserted by the linker) does handle calls
from within one overlay to another - the new overlay is brought in
from disk (displacing the old one in memory), when the subroutine
finishes the old overlay is brought back into memory.
o To save memory, Fractint overlays data. The FCODE type accomplishes this.
Make sure that overlayed data is used immediately. If a pointer to
overlayed data is passed to a routine in a different overlay, and the
first overlay swaps out, the data with be trashed.
Where the Goodies are
=====================
It has come to our attention that people who have no interest in fractals
at all have been wandering through the FRACTINT source code just to get at
some of the neat tricks buried therein. Here are a few hints as to where
to look:
FRACTINT.C - The main routine. Nothing special here.
FRAMAIN2.C
FRACTINT.H - General Include file. Nothing special here, either.
FRACTYPE.H - Fractal type-specific Include file.
PROMPTS1.C - The full-screen prompting code (using support routines
PROMPTS2.C in VIDEO.ASM)
CMDFILES.C - Command line and sstools.ini parsing.
FRACTALS.C, - Most of the fractal-specific code. If you want to know
FRASETUP.C how a fractal is calculated, look in here. Specific
CALCFRAC.C, speed-em-up support for special fractal types is in:
FRACSUBR.C
FRACSUBA.ASM
FRACTALB.C - Arbitrary precision fractal implementations
FRACTALP.C - El Grande fractalspecific structure
ANT.C - Ant automaton
CALCMAND.ASM - Mandelbrot/Julia set calculations.
NEWTON.ASM - Newton calculations
LORENZ.C - Attractor fractals and IFS
JB.C - "Julibrot" fractal type calculations
TESTPT.C - "Roll-your-own" fractal routine
JIIM.C - Inverse julia and orbits window code
LSYS.C - Lsystems code
LSYS.H
LSYSA.ASM
LSYSAF.ASM
LSYSF.C
LYAPUNOV.ASM - Lyapunov speedup code
MPMATH_C.C, - Mark Peterson's "fast-math" support routines.
MPMATH_A.ASM, (this stuff puts some of the routines supplied by your
FPU387.ASM, favorite "C" compiler to shame!)
FPU087.ASM, ...
FMATH.H, ...
MPMATH.H ...
CMPLX.H - Complex math defines
HCMPLX.C - 4D Hypercomplex math
PARSER.C - The "type=formula" formula parser routines
BIGFLT.C - Wes Loewer's arbitrary precision library. All ASM code
BIGFLT.H exists as C also for portability.
BIGFLTA.ASM
BIGFLTC.C
BIGINIT.C
BIGINIT.H
BIGNUM.C
BIGNUM.H
BIGNUMA.ASM
BIGNUMC.C
VIDEO.ASM - Assembler code containing all of the video routines
(setting up the video, reading/writing pixels, zoom-box
code, color-cycling, graphics-to-text "help" switch,
... with help from the routines below for special adapters:
LOADMAP.C - Load .map files.
TARGA.C, - TARGA Video Routines
TARGA.H, ...
FR8514A.ASM - 8514/A Routines
TPLUS.C - Targa+ video routines
TPLUS.H ...
TPLUS_A.ASM ...
HGCFRA.ASM - Hercules Video Routines
DISKVID.C - "DISK'RAM" video routines
YOURVID.C - "Roll-your-own" video routines
GENERAL.ASM - General assembler code having nothing to do with fractals.
Lots of the tricky stuff is in here, and many of the "C"
routines that perform tricky functions rely on support
code buried in here. In particular, this routine has the:
CPU, FPU Detectors
Keyboard routines
Mouse routines
Expanded memory routines
32-bit scaled integer multiply and divide routines
ENCODER.C - GIF Encoder routine.
GIFVIEW.C, - GIF Decoder routines.
DECODER.C,
TGAVIEW.C, (including a TARGA-format decoder currently used only for
F16.C, loading obsolete .tga format "Continuous Potential" files)
TARGA_LC.H ...
LOADFILE.C - Loads the Fractint parameter info from a GIF file.
LOADFDOS.C subroutines for DOS Fractint only
LINE3D.C, - 3D manipulation routines
3D.C
PLOT3D - 3D subroutines for LINE3D.C and LORENZ.C
STEREO.C - RDS stereo module
ROTATE.C - routines which "spin" the VGA video-DAC.
EDITPAL.C - palette-editing mode
HELP.C - HELP support
INTRO.C - title screen
ZOOM.C - Zoombox manipulation.
PRINTER.C, - The Printer Routines
PRINTERA.ASM Data used by PRINTER.C
MISCRES.C - Miscellaneous resident subroutines; nothing special.
MISCOVL.C - Miscellaneous overlayed subroutines; includes <B>atch
command.
REALDOS.C - Some subroutines isolated from Windows development work;
nothing special in here.
SLIDESHW.C - Autokey interpreter
PORT.H - Some portability stuff, nothing special here.
EXTERNS.H - All external variable declarations
PROTOTYP.H - All function prototypes
How things are set up
=====================
I've had to go through a lot of the code to figure out how things are set
up. These are my rough notes, which I'm including in case they can help
someone else. -- Ken Shirriff
The control flow is very confusing. Here are some details:
Each fractal type has an entry in the fractalspecific table in fractalp.c.
Entries that are not displayed are marked with an asterisk. Each entry is
marked as int or not int, and either has a pointer to another entry
(tofloat) or NOFRACTAL. If you select float and the type is int or vice
versa, you will end up with the tofloat type. (e.g. If you select entry
MANDEL, and select floating point, you will get entry MANDELFP). There are
also pointers tojulia and tomandel, which allow you to switch between mandel
and julia. The four functions listed are curfractalspecific->orbitcalc,
curfractalspecific->per_pixel, curfractalspecific->per_image, and
curfractalspecific->calctype.
main calls calcfracinit.
calcfractint: this sets up curfractalspecific, which is the appropriate entry
from the fractalspecific table. This routine does the int/float
conversion.
main calls calcfract, which calls timer, which calls perform_worklist
perform_worklist calls curfractalspecific->per_image, which is eg. MandelSetup
MandelSetup: sets calctype to curfractalspecific->calctype, or for special
cases (eg. decomposition) to StandardFractal
perform_worklist calls solidguess (or whatever drawing system)
solidguess calls *calctype for each pixel; calctype is eg. StandardFractal
StandardFractal calls curfractalspecific->per_pixel once, and then loops over
each iteration calling curfractalspecific->orbitcalc. These routines
are eg. mandel_per_pixel and JuliaFractal.
Here is the structure of the main routine. For overlay reasons a lot of
this logic is now in FRAMAIN2.C.
main()
{
initialize things
restorestart:
if loading, look after specifying image
imagestart:
while (adapter<0) {
process keys from short main menu
}
while (1) {
if (calc_status != 2 || showfile==0) {
initialize videoentry from videotable[adapter]
initialize size, color, etc. from videoentry
setvideomode()
}
if (showfile==0) {
load file
}
calcfracinit();
save corners, zoom data
if (showfile != 0) {
calcfract(); /* calculates the fractal until interrupted */
}
resumeloop:
if (no key pressed) {
set keypress = 13 to continue
} else if (key pressed) {
check input key
} else if (batch mode) {
look after batch key
}
process key from long menu
}
}
How the video entries are managed:
get_video_mode(fractal_info): This routine is used to select a video mode
to match a picture we're loading. It loads vidtbl and then tries to
find a video mode that matches that in fractal_info. Asks the user to
select one if there's no good match. Figures out how to reduce the image
to fit the screen.
select_video_mode(curmode): This is the main-menu routine for the user to
pick a video mode. picks default video mode, lets user select mode
from menu, copies entry to videoentry, puts entry in videotable if not
there, calls update_fractint_cfg if key reassigned, returns key
corresponding to mode
check_vidmode_key(option, keypress): if keypress corresponds to a videomode in
videotable (for option 0) or vidtbl (for option 1) return the videomode
index, else -1.
check_vidmode_keyname: converts ascii key name into key number
adapter_detect: checks for type of video (ega, cga, etc) and set video_type,
mode7text, textsafe.
load_videotable: reads the entries in fractint.cfg into vidtbl
copies entries with an associated function key into videotable
load_fractint_cfg: reads video modes in fractint.cfg into vidtbl
(or copies from videotable) if fractint.cfg missing or bad
update_fractint_cfg: writes the entry in videoentry into the fractint.cfg file.
vidtbl: contains the video modes from fractint.cfg
videotable: contains video modes with function keys; initialized in video.asm
video_type: contains type: hgc, egc, cga, mcga
Here is how the floating point modes are set up.
parser.c uses the MathTypes:
D_MATH: uses double precision routines, such as dStkMul, and FPUsincos
This is used if we have a fpu.
M_MATH: uses MP type (mantissa, exponent). These routines such as mStkAdd
call MPCadd, which call pMPadd, which calls MPadd086 or MPadd386.
The MP routines work on multiple precision, MPC works on complex pairs
of multiple precision.
L_MATH: uses integer math. Routines such as lStkAdd.