winfract.rc

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

    CONTROL "", ID_ANS8, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   150, 90, 32, 12
    CONTROL "&Map File name      ", ID_ANS10, "static", SS_LEFT | WS_CHILD,                      5,100, 80, 8
    CONTROL "", ID_ANS9, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   100,100, 82, 12
    CONTROL "OK", IDOK, "button", BS_DEFPUSHBUTTON | WS_TABSTOP | WS_CHILD,                      40, 125, 32, 14
    CONTROL "Cancel", IDCANCEL, "button", BS_PUSHBUTTON | WS_TABSTOP | WS_CHILD,                110, 125, 32, 14
END

Select3DPlanar DIALOG LOADONCALL MOVEABLE DISCARDABLE						 11, 19, 200, 200
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractint for Windows"
BEGIN
    CONTROL "Planar 3D Parameters", 3, "static", SS_CENTER | WS_CHILD,                           5,  5, 175, 8
    CONTROL "&X-axis Rotation in degrees", 3, "static", SS_LEFT | WS_CHILD,                       5, 20, 130, 8
    CONTROL "", ID_ANS1, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 20, 32, 12
    CONTROL "&Y-axis Rotation in degrees", 3, "static", SS_LEFT | WS_CHILD,                       5, 30, 130, 8
    CONTROL "", ID_ANS2, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 30, 32, 12
    CONTROL "&Z-axis Rotation in degrees", 3, "static", SS_LEFT | WS_CHILD,                       5, 40, 130, 8
    CONTROL "", ID_ANS3, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 40, 32, 12
    CONTROL "X-axis &Scaling Fact in Pct", 3, "static", SS_LEFT | WS_CHILD,                       5, 50, 130, 8
    CONTROL "", ID_ANS4, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 50, 32, 12
    CONTROL "Y-axis S&caling Fact in Pct", 3, "static", SS_LEFT | WS_CHILD,                       5, 60, 130, 8
    CONTROL "", ID_ANS5, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 60, 32, 12
    CONTROL "Surface Sc&aling Fact in Pct", 3, "static", SS_LEFT | WS_CHILD,                      5, 70, 130, 8
    CONTROL "", ID_ANS6, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 70, 32, 12
    CONTROL "&Water Level (Min color val)", 3, "static", SS_LEFT | WS_CHILD,                      5, 80, 130, 8
    CONTROL "", ID_ANS7, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 80, 32, 12
    CONTROL "&Perspective Distance (0=none)", 3, "static", SS_LEFT | WS_CHILD,                    5, 90, 130, 8
    CONTROL "", ID_ANS8, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 90, 32, 12
    CONTROL "X S&hift with Perspective  ", 3, "static", SS_LEFT | WS_CHILD,                       5,100, 130, 8
    CONTROL "", ID_ANS9, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,100, 32, 12
    CONTROL "Y Sh&ift with Perspective  ", 3, "static", SS_LEFT | WS_CHILD,                       5,110, 130, 8
    CONTROL "", ID_ANS10, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,110, 32, 12
    CONTROL "&Non-Perspective X-adjust  ", 3, "static", SS_LEFT | WS_CHILD,                       5,120, 130, 8
    CONTROL "", ID_ANS11, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,120, 32, 12
    CONTROL "N&on-Perspective Y-adjust  ", 3, "static", SS_LEFT | WS_CHILD,                       5,130, 130, 8
    CONTROL "", ID_ANS12, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,130, 32, 12
    CONTROL "&First Transparent Color   ", 3, "static", SS_LEFT | WS_CHILD,                       5,140, 130, 8
    CONTROL "", ID_ANS13, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,140, 32, 12
    CONTROL "&Last  Transparent Color   ", 3, "static", SS_LEFT | WS_CHILD,                       5,150, 130, 8
    CONTROL "", ID_ANS14, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,150, 32, 12
    CONTROL "&Randomize Colors (0 - 7)  ", 3, "static", SS_LEFT | WS_CHILD,                       5,160, 130, 8
    CONTROL "", ID_ANS15, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,160, 32, 12
    CONTROL "OK", IDOK, "button", BS_DEFPUSHBUTTON | WS_TABSTOP | WS_CHILD,                     40, 180, 32, 14
    CONTROL "Cancel", IDCANCEL, "button", BS_PUSHBUTTON | WS_TABSTOP | WS_CHILD,               110, 180, 32, 14
END


Select3DSpherical DIALOG LOADONCALL MOVEABLE DISCARDABLE					    11, 19, 200, 200
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractint for Windows"
BEGIN
    CONTROL "Spherical 3D Parameters", 3, "static", SS_CENTER | WS_CHILD,                        5,  5, 175, 8
    CONTROL "Lon&gitudinal Start (degrees)", 3, "static", SS_LEFT | WS_CHILD,                     5, 20, 130, 8
    CONTROL "", ID_ANS1, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 20, 32, 12
    CONTROL "Longit&udinal Stop (degrees)", 3, "static", SS_LEFT | WS_CHILD,                      5, 30, 130, 8
    CONTROL "", ID_ANS2, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 30, 32, 12
    CONTROL "Latitude &Start (degrees)"   , 3, "static", SS_LEFT | WS_CHILD,                      5, 40, 130, 8
    CONTROL "", ID_ANS3, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 40, 32, 12
    CONTROL "Latitude S&top (degrees)"    , 3, "static", SS_LEFT | WS_CHILD,                      5, 50, 130, 8
    CONTROL "", ID_ANS4, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 50, 32, 12
    CONTROL "Radius S&caling Fact in Pct", 3, "static", SS_LEFT | WS_CHILD,                       5, 60, 130, 8
    CONTROL "", ID_ANS5, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 60, 32, 12
    CONTROL "Surface Sc&aling Fact in Pct", 3, "static", SS_LEFT | WS_CHILD,                      5, 70, 130, 8
    CONTROL "", ID_ANS6, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 70, 32, 12
    CONTROL "&Water Level (Min color val)", 3, "static", SS_LEFT | WS_CHILD,                      5, 80, 130, 8
    CONTROL "", ID_ANS7, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 80, 32, 12
    CONTROL "&Perspective Distance (0=none)", 3, "static", SS_LEFT | WS_CHILD,                    5, 90, 130, 8
    CONTROL "", ID_ANS8, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150, 90, 32, 12
    CONTROL "X S&hift with Perspective  ", 3, "static", SS_LEFT | WS_CHILD,                       5,100, 130, 8
    CONTROL "", ID_ANS9, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,100, 32, 12
    CONTROL "Y Sh&ift with Perspective  ", 3, "static", SS_LEFT | WS_CHILD,                       5,110, 130, 8
    CONTROL "", ID_ANS10, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,110, 32, 12
    CONTROL "&Non-Perspective X-adjust  ", 3, "static", SS_LEFT | WS_CHILD,                       5,120, 130, 8
    CONTROL "", ID_ANS11, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,120, 32, 12
    CONTROL "N&on-Perspective Y-adjust  ", 3, "static", SS_LEFT | WS_CHILD,                       5,130, 130, 8
    CONTROL "", ID_ANS12, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,130, 32, 12
    CONTROL "&First Transparent Color   ", 3, "static", SS_LEFT | WS_CHILD,                       5,140, 130, 8
    CONTROL "", ID_ANS13, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,140, 32, 12
    CONTROL "&Last  Transparent Color   ", 3, "static", SS_LEFT | WS_CHILD,                       5,150, 130, 8
    CONTROL "", ID_ANS14, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,150, 32, 12
    CONTROL "&Randomize Colors (0 - 7)  ", 3, "static", SS_LEFT | WS_CHILD,                       5,160, 130, 8
    CONTROL "", ID_ANS15, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                  150,160, 32, 12
    CONTROL "OK", IDOK, "button", BS_DEFPUSHBUTTON | WS_TABSTOP | WS_CHILD,                     40, 180, 32, 14
    CONTROL "Cancel", IDCANCEL, "button", BS_PUSHBUTTON | WS_TABSTOP | WS_CHILD,               110, 180, 32, 14
END

SelectLightSource DIALOG LOADONCALL MOVEABLE DISCARDABLE					 11, 19, 200, 100
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractint for Windows"
BEGIN
    CONTROL "Light Source Parameters", 3, "static", SS_CENTER | WS_CHILD,                         5,  5, 175, 8
    CONTROL "&X value light vector", 3, "static", SS_LEFT | WS_CHILD,                             5, 20, 130, 8
    CONTROL "", ID_ANS1, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   150, 20, 32, 12
    CONTROL "&Y value light vector", 3, "static", SS_LEFT | WS_CHILD,                             5, 30, 130, 8
    CONTROL "", ID_ANS2, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   150, 30, 32, 12
    CONTROL "&Z value light vector", 3, "static", SS_LEFT | WS_CHILD,                             5, 40, 130, 8
    CONTROL "", ID_ANS3, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   150, 40, 32, 12
    CONTROL "&Light Source Smoothing Factor", 3, "static", SS_LEFT | WS_CHILD,                    5, 50, 130, 8
    CONTROL "", ID_ANS4, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   150, 50, 32, 12
    CONTROL "&Ambient", 3, "static", SS_LEFT | WS_CHILD,                                          5, 60, 130, 8
    CONTROL "", ID_ANS5, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD,                   150, 60, 32, 12
    CONTROL "OK", IDOK, "button", BS_DEFPUSHBUTTON | WS_TABSTOP | WS_CHILD,                      40, 80, 32, 14
    CONTROL "Cancel", IDCANCEL, "button", BS_PUSHBUTTON | WS_TABSTOP | WS_CHILD,                110, 80, 32, 14
END

Saveas DIALOG 9, 15, 180, 93
CAPTION "Fractint for Windows"
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
BEGIN
	CONTROL "XX", ID_FILETITLE, "static", SS_CENTER | WS_CHILD, 0, 5, 180, 12
	LTEXT "Save As File &Name:", IDC_FILENAME, 8, 17, 72, 10
	EDITTEXT IDC_EDIT, 6, 41, 100, 12
	DEFPUSHBUTTON "&Save", IDOK, 124, 41, 50, 14
	PUSHBUTTON "&Cancel", IDCANCEL, 124, 65, 50, 14
	CONTROL ".&GIF (89a)", ID_GIF89A, "BUTTON", BS_RADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 13, 61, 40, 12
	CONTROL ".GIF (8&7a)", ID_GIF87A, "BUTTON", BS_RADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 13, 73, 40, 12
	CONTROL ".&BMP", ID_BMP, "BUTTON", BS_RADIOBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 66, 61, 40, 12
	CONTROL "", IDC_PATH, "STATIC", SS_LEFT | WS_CHILD | WS_VISIBLE | WS_GROUP, 7, 30, 166, 8
END

Printabort DIALOG 21, 21, 90, 52
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
CAPTION "Fractint for Windows"
BEGIN
    DefPushButton  "Cancel",     IDCANCEL,     30, 27, 32, 14, WS_GROUP
    Ctext "Printing Image",      -1,            0,  8, 90,  8
END

Starfield DIALOG 18, 18, 156, 99
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION "Starfield"
BEGIN
        EDITTEXT ID_NUMSTARS, 111, 11, 34, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
        LTEXT "Number of Pixels per Star", -1, 15, 13, 91, 8
        EDITTEXT ID_CLUMPINESS, 111, 32, 34, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
        LTEXT "Percentage of Clumpiness", -1, 15, 34, 91, 8
        EDITTEXT ID_DIMRATIO, 111, 53, 34, 12, ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP
        LTEXT "Ratio of Dim to Bright stars", -1, 15, 55, 91, 8
        DEFPUSHBUTTON "OK", IDOK, 30, 77, 29, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
        PUSHBUTTON "Cancel", IDCANCEL, 97, 77, 29, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
END

Printoptions DIALOG LOADONCALL MOVEABLE DISCARDABLE 18, 20, 182, 151
CAPTION "Fractint for Windows, Print Options"
STYLE DS_MODALFRAME | WS_CAPTION | WS_SYSMENU
BEGIN
    CONTROL "Printing to", 3, "static", SS_LEFT | WS_CHILD, 18, 11, 35, 8
    CONTROL "", ID_PR_DEVICE, "static", SS_LEFT | WS_CHILD, 55, 11, 116, 8
    CONTROL "Print Orientation", ID_PR_ORIENT, "button", BS_GROUPBOX | WS_CHILD | WS_GROUP, 13, 27, 158, 36
    CONTROL "&Portrait", ID_PRO_PORTR, "button", BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD, 30, 41, 39, 12
    CONTROL "&Landscape", ID_PRO_LANDS, "button", BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD, 80, 42, 49, 12
    CONTROL "Print Size", ID_PR_SIZE, "button", BS_GROUPBOX | WS_CHILD | WS_GROUP, 14, 72, 159, 50
    CONTROL "&Maximum", ID_PRS_MAX, "button", BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD, 30, 85, 41, 12
    CONTROL "", ID_PRS_MAXSIZ, "static", SS_LEFT | WS_CHILD, 75, 87, 83, 8
    CONTROL "C&ustom", ID_PRS_CUST, "button", BS_AUTORADIOBUTTON | WS_TABSTOP | WS_CHILD, 30, 101, 40, 12
    CONTROL "W&idth (inches):", 3, "static", SS_LEFT | WS_CHILD | WS_GROUP, 75, 103, 55, 8
    CONTROL "", ID_PRS_WIDTH, "edit", ES_LEFT | WS_BORDER | WS_TABSTOP | WS_CHILD, 129, 101, 30, 12
    CONTROL "OK", IDOK, "button", BS_DEFPUSHBUTTON | WS_TABSTOP | WS_CHILD | WS_GROUP, 36, 129, 28, 14
    CONTROL "Cancel", IDCANCEL, "button", BS_PUSHBUTTON | WS_TABSTOP | WS_CHILD, 106, 130, 32, 14
END



StatusBox DIALOG 18, 18, 142, 59
CAPTION "StatusBox"
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU | WS_VISIBLE
BEGIN
	CONTROL "", ID_PERCENT, "STATIC", SS_BLACKFRAME | WS_CHILD | WS_VISIBLE, 13, 6, 115, 15
	CONTROL "Cancel", ID_CANCEL, "BUTTON", BS_DEFPUSHBUTTON | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 55, 30, 32, 20
END