winfract.rc

frasr200的win 版本源码(18.21),使用make文件,使用的vc版本较低,在我的环境下编译有问题! 很不错的分形程序代码!

#include "windows.h"
#include "winfract.h"
#include "dialog.h"

FracIcon     ICON winfract.ico

#include "mathtool.rc"

WinFracMenu MENU
BEGIN
    POPUP	 "&File"
    BEGIN
	MENUITEM   "&Open...",                 IDM_OPEN
	MENUITEM   "&Save As...",              IDM_SAVE
	MENUITEM   "&Print...",                IDM_PRINT
	MENUITEM   "&3D Restore...",           IDM_3D
	MENUITEM   "3D O&verlay...",           IDM_3DOVER
	MENUITEM   SEPARATOR
        MENUITEM   "Read &@Batchfile...",      IDM_PARFILE
        MENUITEM   "Save @&Batchfile...",      IDM_SAVEPAR
	MENUITEM   SEPARATOR
	MENUITEM   "&Copy to ClipBrd",         IDM_COPY
	MENUITEM   SEPARATOR
	MENUITEM   "E&xit",                    IDM_EXIT
    END

    POPUP	 "F&ractals"
    BEGIN
	MENUITEM   "&Fractal Formula...",      IDM_FORMULA
	MENUITEM   "&Basic Options...",        IDM_DOODADX
	MENUITEM   "&Extended Options...",     IDM_DOODADY
	MENUITEM   "Fractal &Params...",       IDM_DOODADZ
	MENUITEM   "&3D Params...",            IDM_IFS3D
	MENUITEM   "&Reset All Options",       IDM_RESTART
        MENUITEM   SEPARATOR
        MENUITEM   "&Starfield...",            IDM_STARFIELD
    END


    POPUP	 "&View"
    BEGIN
	MENUITEM   "&Image Settings...",       IDM_IMAGE
	MENUITEM   SEPARATOR
/*
	MENUITEM   "&Math Tools",              IDM_MATH_TOOLS
*/
        MENUITEM   "&Zoom In Box",             IDM_ZOOMIN
        MENUITEM   "Zoom &Out Box",            IDM_ZOOMOUT
	MENUITEM   "Zoom &Bar",                IDM_ZOOM
	MENUITEM   SEPARATOR
	MENUITEM   "Coor&dinate Box",          IDM_COORD
	MENUITEM   "&Window Sizing",           IDM_SIZING, CHECKED
	MENUITEM   "&Pixel-by-Pixel Update",   IDM_PIXELS
	POPUP      "&Hotkey Actions"
	    BEGIN
                MENUITEM  "&Fractint-style prompts",  IDF_FRACTINTSTYLE
	        MENUITEM  "&Windows-style menus",     IDF_WINFRACTSTYLE
	    END
	MENUITEM   SEPARATOR
	MENUITEM   "&Status!",          IDS_STATUS
    END

    POPUP	 "&Colors"
    BEGIN
	MENUITEM   "&Load Color-Map...",       IDM_MAPIN
	MENUITEM   "&Write Color-Map...",      IDM_MAPOUT
	MENUITEM   SEPARATOR
	MENUITEM   "&Color-Cycling...",        IDM_CYCLE
    END

    POPUP	 "\a&Help"
    BEGIN
	MENUITEM    "&Index",                   IDM_HELP_INDEX
	MENUITEM    "Using &Help",              IDM_HELP_HELP
	MENUITEM    SEPARATOR
	MENUITEM    "&Fractint Help",           IDM_HELP_FRACTINT
	MENUITEM    SEPARATOR
	MENUITEM   "&About WinFract...",        IDM_ABOUT
    END

END

WinfractAcc ACCELERATORS
BEGIN
VK_F1,      IDF_HELP_INDEX,    VIRTKEY
VK_F1,      IDF_HELP_FRACTINT, CONTROL,  VIRTKEY
VK_ESCAPE,  IDF_HOTNOZOOM,     VIRTKEY
VK_SPACE,   IDF_HOTCYCLEON,    VIRTKEY
VK_RIGHT,   IDF_HOTCYCLERIGHT, VIRTKEY
VK_ADD,     IDF_HOTCYCLERIGHT, VIRTKEY
VK_LEFT,    IDF_HOTCYCLELEFT,  VIRTKEY
VK_SUBTRACT,IDF_HOTCYCLELEFT,  VIRTKEY
VK_UP,      IDF_HOTCYCLEFAST,  VIRTKEY
VK_DOWN,    IDF_HOTCYCLESLOW,  VIRTKEY
VK_RETURN,  IDF_HOTCYCLERAND,  VIRTKEY
VK_TAB,     IDF_STATUS,        VIRTKEY
VK_DELETE,  IDF_IMAGE ,        VIRTKEY
VK_INSERT,  IDF_RESTART,       VIRTKEY
"<",        IDF_HOTCYCLELSTEP
">",        IDF_HOTCYCLERSTEP
",",        IDF_HOTCYCLELSTEP
".",        IDF_HOTCYCLERSTEP
"*",        IDM_ORBITS
"@",        IDF_PARFILE
"3",        IDF_3D
"a",        IDF_STARFIELD
"A",        IDF_STARFIELD
"b",        IDF_SAVEPAR
"B",        IDF_SAVEPAR
"c",        IDF_CYCLE
"C",        IDF_CYCLE
"i",        IDF_IFS3D
"I",        IDF_IFS3D
"l",        IDF_MAPIN
"L",        IDF_MAPIN
"o",        IDF_3DOVER
"O",        IDF_3DOVER
"p",        IDF_PRINT
"P",        IDF_PRINT
"r",        IDF_OPEN
"R",        IDF_OPEN
"s",        IDF_SAVE
"S",        IDF_SAVE
"t",        IDF_FORMULA
"T",        IDF_FORMULA
"w",        IDF_MAPOUT
"W",        IDF_MAPOUT
"x",        IDF_DOODADX
"X",        IDF_DOODADX
"y",        IDF_DOODADY
"Y",        IDF_DOODADY
"z",        IDF_DOODADZ
"Z",        IDF_DOODADZ
END

Open DIALOG							  10, 10, 150, 110
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractint for Windows"
BEGIN
	CONTROL "XX", ID_FILETITLE, "static", SS_CENTER | WS_CHILD,0,  5, 150, 12
	LTEXT "Open File &Name:", IDC_FILENAME,                    4, 14,  60, 10
	EDITTEXT		  IDC_EDIT,			   4, 26, 100, 12, ES_AUTOHSCROLL
	LTEXT "&Files in",        IDC_FILES,                       4, 38,  32, 10
	LTEXT "",                 IDC_PATH,                       40, 38,  70, 10
	LISTBOX,		  IDC_LISTBOX,			   4, 50,  70, 56, WS_TABSTOP|WS_VSCROLL|LBS_SORT
	DEFPUSHBUTTON "&Open" ,   IDOK,                           87, 60,  50, 14
	PUSHBUTTON "&Cancel",     IDCANCEL,                       87, 80,  50, 14
END

SelectFractal DIALOG LOADONCALL MOVEABLE DISCARDABLE				      10, 25, 150,180
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractint for Windows"
BEGIN
    CONTROL "XX", ID_LISTTITLE, "static", SS_CENTER | WS_CHILD,                        0,  5,150, 12
    LISTBOX,   IDM_FRACTAL,                                                            5, 20, 85,150, WS_TABSTOP|WS_VSCROLL
    CONTROL "OK" IDOK, "button", BS_DEFPUSHBUTTON | WS_TABSTOP | WS_CHILD,            95, 55, 45, 14
    CONTROL "&Cancel" IDCANCEL, "button", BS_PUSHBUTTON | WS_TABSTOP | WS_CHILD,      95, 75, 45, 14
END

SelectFracParams DIALOG LOADONCALL MOVEABLE DISCARDABLE 			     14,   21, 200, 230
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractal Parameters"
BEGIN
    CONTROL "", ID_FRACNAME, "static", SS_CENTER | WS_CHILD,                             20,  10, 150,  8
    CONTROL "Formula Parameters:", 3, "static", SS_LEFT | WS_CHILD,                      60,  20,  80,  8
    CONTROL "", ID_FRACPARTX1, "static", SS_LEFT | WS_CHILD,                             10,  40, 120,  8
    CONTROL  "0.0", ID_FRACPARAM1, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD, 130,  40,  60, 12
    CONTROL "", ID_FRACPARTX2, "static", SS_LEFT | WS_CHILD,                             10,  55, 120,  8
    CONTROL  "0.0", ID_FRACPARAM2, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD, 130,  55,  60, 12
    CONTROL "", ID_FRACPARTX3, "static", SS_LEFT | WS_CHILD,                             10,  70, 120,  8
    CONTROL  "0.0", ID_FRACPARAM3, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD, 130,  70,  60, 12
    CONTROL "", ID_FRACPARTX4, "static", SS_LEFT | WS_CHILD,                             10,  85, 120,  8