#include "types.rez" #include "T2Common.Rez" // Include Twilight II rez header file #define bubbleCtlList 1 #define blueMenuItem 1 #define greenMenuItem 2 #define redMenuItem 3 #define turquoiseMenuItem 4 #define purpleMenuItem 5 #define yellowMenuItem 6 #define greyMenuItem 7 #define bubbleColorStr 10 #define circleStr 11 #define squareStr 12 #define bubbleStr 13 #define colorMenu 1 #define colorCtl 1 #define circleCtl 2 #define squareCtl 3 #define bubbleIconCtl 4 #define bubbleNameCtl 5 // --- Twilight II module flags resource resource rT2ModuleFlags (moduleFlags) { fSetup + // we support setup fFadeOut + // we want the screen to be faded out beforehand fFadeIn + // we want the screen to fade in at the end fLeavesUsableScreen + // we leave a "usable" screen (see G2MF) fGrafPort320, // module flags 0x01, // enabled flag (unimplemented right now) 0x0110, // minimum T2 version required - v1.1 minimum 0, // reserved "Bubbles" // module name }; // --- Icon Definition resource rIcon (moduleIcon) { $8000, // kind $0014, // height $0016, // width $"F00000000000000000000F" $"0FFFFFFFFFFFFFFFFFFFF0" $"0F000000000000000000F0" $"0F000199900000000000F0" $"0F000999990000000000F0" $"0F000999990000000000F0" $"0F000199900019900000F0" $"0F000000000099990000F0" $"0F000019000099990000F0" $"0F000099900019900000F0" $"0F000019000000000000F0" $"0F000000000000000000F0" $"0FFFFFFFFFFFFFFFFAFFF0" $"0000000000000000000000" $"F0FFFFFFFFFFFFFFFFFF0F" $"F0FFFFFFFFFFFFFFFFFF0F" $"F0FF4AFFFFFFFFFFFFFF0F" $"F0CCCCCCCCCCCCCCCCCC0F" $"F0FFFFFFFFFFFFFFFAFF0F" $"F00000000000000000000F", $"0FFFFFFFFFFFFFFFFFFFF0" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"FFFFFFFFFFFFFFFFFFFFFF" $"0FFFFFFFFFFFFFFFFFFFF0" $"0FFFFFFFFFFFFFFFFFFFF0" $"0FFFFFFFFFFFFFFFFFFFF0" $"0FFFFFFFFFFFFFFFFFFFF0" $"0FFFFFFFFFFFFFFFFFFFF0" $"0FFFFFFFFFFFFFFFFFFFF0"; }; // module message resource rTextForLETextBox2 (moduleMessage) { TBLeftJust TBBackColor TBColorF TBForeColor TBColor1 "Bubbles\n" TBForeColor TBColor0 "Copyright 1997 by Kelvin W. Sherlock\nWritten on August 24th, 1997" }; resource rTextForLETextBox2 (bubbleStr) { "Bubble Options" }; // --- Ball Control List Definition resource rControlList (bubbleCtlList) { { colorCtl, circleCtl, squareCtl, bubbleIconCtl, bubbleNameCtl }; }; // --- Control Templates // NOTE: IDs _must_ be numbered sequentially from 1..maximumID resource rControlTemplate (colorCtl) { colorCtl, // ID { 71,74,0,0}, // rect popUpControl {{ $0040, // flag $1002, // moreFlags 0, // refCon 0, // titleWidth colorMenu, // menuRef 1, // initialValue 0 // colorTableRef }}; }; resource rControlTemplate (circleCtl) { circleCtl, // ID { 85, 74, 0,0}, // rect radioControl {{ 0, // flag fCtlProcNotPtr+fCtlWantsEvents+refIsResource, // moreFlags 0, // refCon circleStr, // titleRef 1, // initialValue 0, // colorTableRef {"","",0,0} // key equivalents }}; }; resource rControlTemplate (squareCtl) { squareCtl, // ID { 95, 74, 0,0}, // rect radioControl {{ 0, // flag fCtlProcNotPtr+fCtlWantsEvents+refIsResource, // moreFlags 0, // refCon squareStr, // titleRef 0, // initialValue 0, // colorTableRef {"","",0,0} // key equivalents }}; }; resource rControlTemplate (bubbleIconCtl) { bubbleIconCtl, // ID { 26,138,49,186}, // rect 59,186 iconButtonControl {{ 0x000C, // flag 0x1020, // moreFlags 0, // refCon moduleIcon, // iconRef 0, // titleRef 0, // colorTableRef 0 // displayMode }}; }; resource rControlTemplate (bubbleNameCtl) { bubbleNameCtl, // ID { 50,74,60,182}, // rect statTextControl {{ 0, // flag 0x1002, // moreFlags 0, // refCon bubbleStr // textRef (rLeTextBox2) }}; }; // --- rPString Templates resource rPString (circleStr) { "Circle" }; resource rPString (squareStr) { "Square" }; resource rPString (bubbleStr) { "Bubbles Options" }; resource rPString (bubbleColorStr) { "Bubble Color: " }; resource rPString (RedMenuItem) { "Red" }; resource rPString (BlueMenuItem, $C018) { "Blue" }; resource rPString (GreenMenuItem, $C018) { "Green" }; resource rPString (PurpleMenuItem, $C018) { "Purple" }; resource rPString (YellowMenuItem, $C018) { "Yellow" }; resource rPString (TurquoiseMenuItem, $C018) { "Turquoise" }; resource rPString (greyMenuItem) { "Grey" }; // --- Menu Definitions resource rMenu (colorMenu) { 1, // menuID $A000, // menuFlag bubbleColorStr, { // menuTitleRef redMenuItem, blueMenuItem, greenMenuItem, purpleMenuItem, yellowMenuItem, turquoiseMenuItem, greyMenuItem }; }; // --- Menu Item Definitions resource rMenuItem (blueMenuItem, $C018) { $0001, // itemID "","", // itemChar, itemAltChar 0, // itemCheck 0x8000, // itemFlag BlueMenuItem // itemTitleRef }; resource rMenuItem (greenMenuItem, $C018) { $0010, // itemID "","", // itemChar, itemAltChar NIL, // itemCheck $8000, // itemFlag GreenMenuItem // itemTitleRef }; resource rMenuItem (purpleMenuItem, $C018) { $0101, // itemID "","", // itemChar, itemAltChar NIL, // itemCheck $8000, // itemFlag PurpleMenuItem // itemTitleRef }; resource rMenuItem (yellowMenuItem, $C018) { $0110, // itemID "","", // itemChar, itemAltChar NIL, // itemCheck $8000, // itemFlag YellowMenuItem // itemTitleRef }; resource rMenuItem (turquoiseMenuItem, $C018) { $0011, // itemID "","", // itemChar, itemAltChar NIL, // itemCheck $8000, // itemFlag TurquoiseMenuItem // itemTitleRef }; resource rMenuItem (redMenuItem) { $0100, // itemID "","", // itemChar, itemAltChar NIL, // itemCheck $8000, // itemFlag RedMenuItem // itemTitleRef }; resource rMenuItem (greyMenuItem) { $0111, // itemID "","", // itemChar, itemAltChar NIL, // itemCheck $8000, // itemFlag greyMenuItem // itemTitleRef }; resource rVersion (0x1, purgeable3, nocrossbank) { { 1, 0, 0, release, 0 }, verUS, "Bubbles T2 Blanker", "(C) 1997 Kelvin W Sherlock\n" "ksherloc@gnu.uvm.edu" };