ULONG RGOM_RegisterUI(SW_IDATA *idata, SWP_RegUI *UI) { Object *g; LONG x; if (!idata->RegWin) { idata->RegWin = WindowObject, MUIA_Window_Title, "Registration", MUIA_Window_ID, MAKE_ID('r','g','s','r'), WindowContents, VGroup, Child, ScrollgroupObject, MUIA_Scrollgroup_FreeHoriz, FALSE, MUIA_Scrollgroup_Contents, VirtgroupObject, VirtualFrame, Child, g = ColGroup(3), GroupFrameT("Registration Information"), End, End, End, Child, HGroup, GroupFrame, Child, idata->B_Generate = SimpleButton("_Generate"), Child, idata->B_Cancel = SimpleButton("_Cancel"), End, End, End; if (!idata->RegWin) return FAILURE; for (x=0; RG_ParseTable[x].Keyword; x++) { DoMethod(g, OM_ADDMEMBER, Label2(RG_ParseTable[x].Keyword)); DoMethod(g, OM_ADDMEMBER, idata->Gads[x] =String("", SWF_CryptLineSize)); set(idata->Gads[x], MUIA_CycleChain, 1); set(idata->Gads[x], MUIA_String_AdvanceOnCR, 1); DoMethod(g, OM_ADDMEMBER, Label2(RG_ParseTable[x].Required ? "Req" : "Opt")); } set(idata->B_Generate, MUIA_CycleChain, 1); set(idata->B_Cancel, MUIA_CycleChain, 1); DoMethod(idata->B_Generate, MUIM_Notify, MUIA_Pressed, FALSE, UI->App, 6, MUIM_CallHook, &RGOM_Hook_Generate, idata, UI->Prog, UI->Cost1, UI->Cost2); SW_NOTIFYSINGLE(idata->B_Cancel, MUIA_Pressed, FALSE, idata->RegWin, MUIA_Window_Open, FALSE); SW_NOTIFYCLOSEWIN(idata->RegWin); DoMethod(UI->App, OM_ADDMEMBER, idata->RegWin); } if (!idata->RegWin) return FAILURE; set(idata->RegWin, MUIA_Window_Open, TRUE); return SUCCESS; }
static APTR build_gui_plus4(void) { static const struct Hook BT0Hook = { { NULL, NULL }, (VOID *)BT0Click, NULL, NULL }; static const struct Hook BT1Hook = { { NULL, NULL }, (VOID *)BT1Click, NULL, NULL }; APTR BT0, BT1; APTR gui = GroupObject, Child, GroupObject, MUIA_Group_Horiz, TRUE, Child, GroupObject, MUIA_Frame, MUIV_Frame_Group, MUIA_FrameTitle, translate_text(IDS_JOYSTICK_1), CYCLE(ui_to_from_plus4[0].object, "", ui_joystick) End, Child, GroupObject, MUIA_Frame, MUIV_Frame_Group, MUIA_FrameTitle, translate_text(IDS_JOYSTICK_2), CYCLE(ui_to_from_plus4[1].object, "", ui_joystick) End, End, Child, GroupObject, MUIA_Group_Horiz, TRUE, Child, GroupObject, MUIA_Frame, MUIV_Frame_Group, MUIA_FrameTitle, translate_text(IDS_SIDCART_JOY), CYCLE(ui_to_from_plus4[3].object, "", ui_joystick_enable) End, End, Child, GroupObject, MUIA_Group_Horiz, TRUE, Child, GroupObject, MUIA_Frame, MUIV_Frame_Group, MUIA_FrameTitle, translate_text(IDS_JOYSTICK_IN_SIDCART_PORT), CYCLE(ui_to_from_plus4[2].object, "", ui_joystick) End, End, Child, GroupObject, MUIA_Group_Horiz, TRUE, Child, BT0 = SimpleButton("Config AI/Keyset A"), Child, BT1 = SimpleButton("Config AI/Keyset B"), End, End; if (gui != NULL) { DoMethod(BT0, MUIM_Notify, MUIA_Pressed, FALSE, BT0, 2, MUIM_CallHook, &BT0Hook); DoMethod(BT1, MUIM_Notify, MUIA_Pressed, FALSE, BT1, 2, MUIM_CallHook, &BT1Hook); } return gui; }
ULONG __inline wordsasobjects(Object *grp, char *instr) { char *token; char *str; ULONG added = 0, len; len = strlen(instr); if(len) { if(str = AllocMem(len + 1, MEMF_ANY | MEMF_CLEAR)) { CopyMem(instr, str, len + 1); token = strtok(str, " "); while(token) { if(token[0] == '@') { token++; if(token[0] != '@') DoMethod(grp, OM_ADDMEMBER, SimpleButton(token)); else DoMethod(grp, OM_ADDMEMBER, TextObject, MUIA_Text_Contents, token, End); } else if(token[0] == '#') { token++; if(token[0] != '#') DoMethod(grp, OM_ADDMEMBER, StringObject, StringFrame, MUIA_String_Contents, token, End); else DoMethod(grp, OM_ADDMEMBER, TextObject, MUIA_Text_Contents, token, End); } else DoMethod(grp, OM_ADDMEMBER, TextObject, MUIA_Text_Contents, token, End); added++; token = strtok(NULL, " "); } FreeMem(str, len + 1); } } return(added); }
int main(void) { Object *wnd, *app, *but; // GUI creation app = ApplicationObject, SubWindow, wnd = WindowObject, MUIA_Window_Title, "Hello world!", WindowContents, VGroup, Child, TextObject, MUIA_Text_Contents, "\33cHello world!\nHow are you?", End, Child, but = SimpleButton("_Ok"), End, End, End; if (app != NULL) { ULONG sigs = 0; // Click Close gadget or hit Escape to quit DoMethod(wnd, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, (APTR)app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); // Click the button to quit DoMethod(but, MUIM_Notify, MUIA_Pressed, FALSE, (APTR)app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); // Open the window set(wnd, MUIA_Window_Open, TRUE); while((LONG)DoMethod(app, MUIM_Application_NewInput, (APTR)&sigs) != MUIV_Application_ReturnID_Quit) { if (sigs) { sigs = Wait(sigs | SIGBREAKF_CTRL_C); if (sigs & SIGBREAKF_CTRL_C) break; } } // Destroy our application and all its objects MUI_DisposeObject(app); } return 0; }
main (int argc, char *argv[]) { int rc = 10; Object *App, *win, *b, *ls; App = ApplicationObject, MUIA_Application_Title , "ListSearchTest", MUIA_Application_Version , "$VER: ListSearchTest 01.1 (09.01.96)", MUIA_Application_Copyright , "©1997 by Steve Koren", MUIA_Application_Author , "Steve Koren", MUIA_Application_Description, "Test of ListSearch class", SubWindow, win = WindowObject, MUIA_Window_Title, "Show the Listsearch class", MUIA_Window_ID , MAKE_ID('T','s','l','s'), WindowContents, VGroup, Child, b = SimpleButton("SearchWin"), End, End, End; if (!App) goto Done; ls = MUI_NewObject(SWC_ListSearch, TAG_DONE); if (!ls) goto Done; DoMethod(b, MUIM_Notify, MUIA_Pressed, FALSE, ls, 2, SWM_ListSearch_OpenWin, App); SW_NOTIFYQUIT(win); SWEventLoop(App, win, NULL, TRUE); rc = 0; Done: MUI_DisposeObject(ls); MUI_DisposeObject(App); exit (rc); }
int main(void) { Object *application, *window, *b1, *b2, *b3; application = ApplicationObject, SubWindow, window = WindowObject, MUIA_Window_Title, (IPTR) "Hide & Show", MUIA_Window_Activate, TRUE, WindowContents, (IPTR) VGroup, Child, (IPTR) HGroup, Child, (IPTR) SimpleButton("Visible all the time"), Child, (IPTR) (b1 = ImageButton("Click Hide or Show", "THEME:Images/Gadgets/Prefs/Test")), Child, (IPTR) SimpleButton("Visible all the time too"), End, Child, (IPTR) HGroup, Child, (IPTR) (b2 = SimpleButton("Hide")), Child, (IPTR) (b3 = SimpleButton("Show")), End, End, End, End; if (application) { ULONG sigs = 0; DoMethod ( window, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, (IPTR) application, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit ); DoMethod ( b2, MUIM_Notify, MUIA_Pressed, FALSE, (IPTR) b1, 3, MUIM_Set, MUIA_ShowMe, FALSE ); DoMethod ( b3, MUIM_Notify, MUIA_Pressed, FALSE, (IPTR) b1, 3, MUIM_Set, MUIA_ShowMe, TRUE ); set(window,MUIA_Window_Open,TRUE); while ( DoMethod ( application, MUIM_Application_NewInput, (IPTR) &sigs ) != MUIV_Application_ReturnID_Quit ) { if (sigs) { sigs = Wait(sigs | SIGBREAKF_CTRL_C | SIGBREAKF_CTRL_D); if (sigs & SIGBREAKF_CTRL_C) break; if (sigs & SIGBREAKF_CTRL_D) break; } } MUI_DisposeObject(application); } return 0; }
void main (int argc, char *argv[]) { ULONG State = 0; MUI_PenSpec ps[2]; Object *pp, *CT1, *CT2, *Win, *App, *vg, *b1, *CT3; static STRPTR Lines1[] = { "Foo bar test", "dummy test " CTxtFont("times/24") "gqah de absoflipping" CTxtFont("") " blah", "now is the time\n\n", "for " CTxtFont("courier/15/U") "all" CTxtFont("//I") " good men " CTxtFont("") "to come" CTxtFont("") " to the aid", "(of their country)", NULL, }; static STRPTR Lines2 = "This\tis lines 2 test\n" "It's plain\t\t and boring.\n" "But sometimes that's ok for\n" "just testing purposes, eh?\n"; static STRPTR Lines3[] = { CTxtFont("topaz/8")CTxtFont("courier/15/U") "BBB" CTxtFont("//I") " CCCC ", "Nonterm " CTxtFont("times/24") "gqah de absoflipping" CTxtFont("") " blah", NULL, }; static STRPTR Lines4[] = { "wefwef " CTxtFont("") "boofar fwfw " CTxtFont("") "wefwfww", NULL, }; if (!(pp = PendisplayObject, End)) exit(0); DoMethod(pp,MUIM_Pendisplay_SetMUIPen,MPEN_SHINE); get(pp, MUIA_Pendisplay_Spec, &ps[0]); DoMethod(pp,MUIM_Pendisplay_SetMUIPen,MPEN_HALFSHADOW); get(pp, MUIA_Pendisplay_Spec, &ps[1]); sprintf(Buff, "abc\ndef \\033CV{%08lx}this\\033CV{} is a test\nghi\nwfwf\nawf\n", &ps[0]); App = ApplicationObject, MUIA_Application_Title, "CText Test", SubWindow, Win = WindowObject, MUIA_Window_ID, 2, WindowContents, VGroup, Child, b1 = SimpleButton("Howdy"), Child, ScrollgroupObject, MUIA_Scrollgroup_Contents, vg = VirtgroupObject, VirtualFrame, MUIA_Group_Horiz, FALSE, MUIA_Background, MUII_TextBack, MUIA_Group_Spacing, 0, MUIA_UserData, SWV_CText_ClickGrpRoot, Child, CT1 = CTextObject, MUIA_VertWeight, 1, SWA_CText_Lines, Lines1, End, Child, CT2 = CTextObject, MUIA_VertWeight, 1, SWA_CText_PrevCText, CT1, SWA_CText_Contents, Lines2, End, Child, CTextObject, MUIA_VertWeight, 1, SWA_CText_Contents, Buff, End, Child, CT3 = CTextObject, MUIA_VertWeight, 1, SWA_CText_Lines, Lines3, End, Child, CTextObject, MUIA_VertWeight, 1, SWA_CText_PrevCText, CT3, SWA_CText_Lines, Lines4, End, Child, RectangleObject, MUIA_VertWeight, 1000, End, End, End, End, End, End; if (!App) exit(0); DoMethod(Win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, App, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); DoMethod(vg, SWM_ListSearch_Setup, &State); DoMethod(b1, MUIM_Notify, MUIA_Pressed, FALSE, vg, 1, SWM_CText_SelAll); set(Win, MUIA_Window_Open, TRUE); DoMethod(vg, MUIM_List_Jump, 10); SWEventLoop(App, Win, NULL, TRUE); DoMethod(CT1, SWM_CText_Clip); MUI_DisposeObject(App); MUI_DisposeObject(pp); }
BOOL BuildGUI(char *screenname) { Object *MUISave, *MUIUse, *MUICancel; Object *page1,*page2; Object *MUITFreq,*MUITChannels,*MUITOutvol,*MUITMonvol,*MUITGain,*MUITInput,*MUITOutput,*MUITDebug,*MUITEcho,*MUITSurround,*MUITClipvol,*MUITCpu,*MUITACTime,*MUITScalemode; UpdateStrings(); MUIMasterBase = (void *)OpenLibrary("muimaster.library", MUIMASTER_VLATEST); if(MUIMasterBase == NULL) { Printf((char *) msgTextNoOpen, (ULONG) "muimaster.library", MUIMASTER_VLATEST); Printf("\n"); return FALSE; } page1 = HGroup, Child, VGroup, Child, MUIUnit = CycleObject, MUIA_CycleChain, 1, MUIA_Cycle_Entries, Units, MUIA_Cycle_Active, state.UnitSelected, End, Child, ListviewObject, MUIA_CycleChain, 1, MUIA_Listview_List, MUIList = ListObject, InputListFrame, MUIA_List_AutoVisible, TRUE, End, End, Child, HGroup, ReadListFrame, MUIA_Background, MUII_TextBack, Child, TextObject, MUIA_Text_Contents, msgProperties, MUIA_Text_SetMax, TRUE, End, Child, MUIInfos = TextObject, MUIA_Text_Contents, "\n\n\n\n\n\n", MUIA_Text_SetMin, FALSE, End, End, End, Child, BalanceObject, End, Child, VGroup, Child, HVSpace, Child, ColGroup(3), GroupFrameT(msgOptions), Child, MUITFreq = SpecialButton((STRPTR)msgOptFrequency), Child, MUIFreq = SpecialSlider(0,max(state.Frequencies-1,0),state.FreqSelected), Child, MUILFreq = SpecialLabel(getFreq()), Child, MUITChannels = SpecialButton((STRPTR)msgOptChannels), Child, MUIChannels = SpecialSlider(1,state.Channels,state.ChannelsSelected), Child, MUILChannels = SpecialLabel(getChannels()), Child, MUITOutvol = SpecialButton((STRPTR)msgOptVolume), Child, MUIOutvol = SpecialSlider(0,max(state.OutVols-1,0),state.OutVolSelected), Child, MUILOutvol = SpecialLabel(getOutVol()), Child, MUITMonvol = SpecialButton((STRPTR)msgOptMonitor), Child, MUIMonvol = SpecialSlider(0,max(state.MonVols-1,1),state.MonVolSelected), Child, MUILMonvol = SpecialLabel(getMonVol()), Child, MUITGain = SpecialButton((STRPTR)msgOptGain), Child, MUIGain = SpecialSlider(0,max(state.Gains-1,0),state.GainSelected), Child, MUILGain = SpecialLabel(getGain()), Child, MUITInput = SpecialButton((STRPTR)msgOptInput), Child, MUIInput = SpecialSlider(0,max(state.Inputs-1,0),state.InputSelected), Child, MUILInput = SpecialLabel(getInput()), Child, MUITOutput = SpecialButton((STRPTR)msgOptOutput), Child, MUIOutput = SpecialSlider(0,max(state.Outputs-1,0),state.OutputSelected), Child, MUILOutput = SpecialLabel(getOutput()), End, Child, MUIPlay = SimpleButton(msgButtonPlay), Child, HVSpace, End, End; page2 = VGroup, Child, HVSpace, Child, HGroup, Child, HVSpace, Child, ColGroup(2), GroupFrameT(msgGlobalOptions), Child, MUITDebug = SpecialButton((STRPTR)msgGlobOptDebugLevel), Child, MUIDebug = CycleObject, MUIA_CycleChain, 1, MUIA_Cycle_Entries, DebugLabels, MUIA_Cycle_Active, globalprefs.ahigp_DebugLevel, End, Child, MUITEcho = SpecialButton((STRPTR)msgGlobOptEcho), Child, MUIEcho = CycleObject, MUIA_CycleChain, 1, MUIA_Cycle_Entries, EchoLabels, MUIA_Cycle_Active, (globalprefs.ahigp_DisableEcho ? 2 : 0) | (globalprefs.ahigp_FastEcho ? 1 : 0), MUIA_Disabled, AHIBase->lib_Version >= 5, End, Child, MUITSurround = SpecialButton((STRPTR)msgGlobOptSurround), Child, MUISurround = CycleObject, MUIA_CycleChain, 1, MUIA_Cycle_Entries, SurroundLabels, MUIA_Cycle_Active, globalprefs.ahigp_DisableSurround, MUIA_Disabled, AHIBase->lib_Version >= 5, End, Child, MUITClipvol = SpecialButton((STRPTR)msgGlobOptMasterVol), Child, MUIClipvol = CycleObject, MUIA_CycleChain, 1, MUIA_Cycle_Entries, ClipMVLabels, MUIA_Cycle_Active, globalprefs.ahigp_ClipMasterVolume, MUIA_Disabled, AHIBase->lib_Version >= 5, End, Child, MUITCpu = SpecialButton((STRPTR)msgGlobOptCPULimit), Child, MUICpu = SliderObject, MUIA_CycleChain, 1, MUIA_Slider_Horiz, TRUE, MUIA_Numeric_Min, 0, MUIA_Numeric_Max, 100, MUIA_Numeric_Value,(globalprefs.ahigp_MaxCPU * 100 + 32768) / 65536, MUIA_Numeric_Format,"%ld%%", End, Child, MUITACTime = SpecialButton((STRPTR)msgGlobOptACTime), Child, MUIACTime = SliderObject, MUIA_CycleChain, 1, MUIA_Slider_Horiz, TRUE, MUIA_Numeric_Min, 0, MUIA_Numeric_Max, 100, MUIA_Numeric_Value,(globalprefs.ahigp_AntiClickTime * 1000 + 32768) >> 16, MUIA_Numeric_Format,"%ld ms", MUIA_Disabled, AHIBase->lib_Version <= 4, End, Child, MUITScalemode = SpecialButton((STRPTR)msgOptScalemode), Child, MUIScalemode = CycleObject, MUIA_CycleChain, 1, MUIA_Cycle_Entries, ScaleLabels, MUIA_Cycle_Active, globalprefs.ahigp_ScaleMode, MUIA_Disabled, AHIBase->lib_Version <= 4, End, End, Child, HVSpace, End, Child, HVSpace, End; MUIApp = ApplicationObject, MUIA_Application_Title, (char *) msgTextProgramName, MUIA_Application_Version, Version, MUIA_Application_Copyright, "©1996-2004 Martin Blom", MUIA_Application_Author, "Stéphane Barbaray/Martin Blom", MUIA_Application_Base, "AHI", MUIA_Application_HelpFile, HELPFILE, MUIA_Application_Menustrip, MUIMenu = MUI_MakeObject(MUIO_MenustripNM,Menus,0), MUIA_Application_SingleTask, TRUE, SubWindow, MUIWindow = WindowObject, MUIA_Window_Title, (char *) msgTextProgramName, MUIA_Window_ID , MAKE_ID('M','A','I','N'), MUIA_HelpNode, "AHI", WindowContents, VGroup, Child, RegisterGroup(PageNames), MUIA_CycleChain, 1, Child, page1, Child, page2, End, Child, HGroup, Child, MUISave = SimpleButton(msgButtonSave), Child, MUIUse = SimpleButton(msgButtonUse), Child, MUICancel = SimpleButton(msgButtonCancel), End, End, End, End; if( MUIApp != NULL ) { APTR item = (APTR)DoMethod(MUIMenu,MUIM_FindUData,ACTID_ICONS); if(item) { set(item, MUIA_Menuitem_Checked, SaveIcons); } DoMethod(MUIWindow, MUIM_MultiSet, MUIA_Text_PreParse,"\033l",MUILFreq,MUILChannels,MUILOutvol,MUILMonvol,MUILGain,MUILInput,MUILOutput,NULL); DoMethod(MUIWindow, MUIM_MultiSet, MUIA_CycleChain, 1, MUISave,MUIUse,MUICancel,NULL); DoMethod(MUITFreq, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIFreq); DoMethod(MUITChannels, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIChannels); DoMethod(MUITOutvol, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIOutvol); DoMethod(MUITMonvol, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIMonvol); DoMethod(MUITGain, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIGain); DoMethod(MUITInput, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIInput); DoMethod(MUITOutput, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIOutput); DoMethod(MUIPlay, MUIM_Notify, MUIA_Pressed, FALSE, MUIApp, 2, MUIM_Application_ReturnID, ACTID_PLAY); DoMethod(MUITDebug, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIDebug); DoMethod(MUITEcho, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIEcho); DoMethod(MUITSurround, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUISurround); DoMethod(MUITClipvol, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIClipvol); DoMethod(MUITCpu, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUICpu); DoMethod(MUITACTime, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIACTime); DoMethod(MUITScalemode, MUIM_Notify, MUIA_Pressed, TRUE, MUIWindow, 3, MUIM_Set, MUIA_Window_ActiveObject, MUIScalemode); DoMethod(MUIWindow, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, MUIApp, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); DoMethod(MUISave, MUIM_Notify, MUIA_Pressed, FALSE, MUIApp, 2, MUIM_Application_ReturnID, ACTID_SAVE); DoMethod(MUIUse, MUIM_Notify, MUIA_Pressed, FALSE, MUIApp, 2, MUIM_Application_ReturnID, ACTID_USE); DoMethod(MUICancel, MUIM_Notify, MUIA_Pressed, FALSE, MUIApp, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); DoMethod(MUIUnit, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_UNIT); DoMethod(MUIList, MUIM_Notify, MUIA_List_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_MODE); DoMethod(MUIDebug, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_DEBUG); DoMethod(MUISurround, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_SURROUND); DoMethod(MUIEcho, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_ECHO); DoMethod(MUICpu, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_CPULIMIT); DoMethod(MUIClipvol, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_CLIPMV); DoMethod(MUIACTime, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_ACTIME); DoMethod(MUIScalemode, MUIM_Notify, MUIA_Cycle_Active, MUIV_EveryTime, MUIApp, 2, MUIM_Application_ReturnID, ACTID_SCALEMODE); DoMethod(MUIFreq, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); DoMethod(MUIChannels, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); DoMethod(MUIOutvol, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); DoMethod(MUIMonvol, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); DoMethod(MUIGain, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); DoMethod(MUIInput, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); DoMethod(MUIOutput, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, MUIV_Notify_Self, 3, MUIM_CallHook, &hookSlider, MUIV_TriggerValue); set(MUIWindow, MUIA_Window_Open, TRUE); GUINewUnit(); return TRUE; } return FALSE; }
int main(void) { if((DiskfontBase = OpenLibrary("diskfont.library", 38)) && GETINTERFACE(IDiskfont, DiskfontBase)) if((GfxBase = OpenLibrary("graphics.library", 38)) && GETINTERFACE(IGraphics, GfxBase)) if((IntuitionBase = (APTR)OpenLibrary("intuition.library", 38)) && GETINTERFACE(IIntuition, IntuitionBase)) if((KeymapBase = OpenLibrary("keymap.library", 37)) && GETINTERFACE(IKeymap, KeymapBase)) if((LocaleBase = OpenLibrary("locale.library", 38)) && GETINTERFACE(ILocale, LocaleBase)) if((LayersBase = OpenLibrary("layers.library", 38)) && GETINTERFACE(ILayers, LayersBase)) if((UtilityBase = (APTR)OpenLibrary("utility.library", 38)) && GETINTERFACE(IUtility, UtilityBase)) if((MUIMasterBase = OpenLibrary("muimaster.library", MUIMASTER_VMIN)) && GETINTERFACE(IMUIMaster, MUIMasterBase)) if((IFFParseBase = OpenLibrary("iffparse.library", 36)) && GETINTERFACE(IIFFParse, IFFParseBase)) { struct MUI_CustomClass *mcc; Object *a1, *a2, *app, *window, *bstring, *bstring2, *bpos, *ssize, *button, *numbutton; Object *menu; const char *classes[] = {"BetterString.mcp", NULL}; #if defined(DEBUG) SetupDebug(); #endif mcc = MUI_CreateCustomClass(NULL, "Area.mui", NULL, sizeof(struct InstData), ENTRY(_Dispatcher)); /* menu = MenustripObject, MUIA_Family_Child, MenuObject, MUIA_Menu_Title, "Test", MUIA_Family_Child, MenuitemObject, MUIA_Menuitem_Title, "Dummy", MUIA_Menuitem_Enabled, TRUE, MUIA_Menuitem_Shortcut, "V", End, End, End, */ app = ApplicationObject, MUIA_Application_Author, "BetterString.mcc Open Source Team", MUIA_Application_Base, "BetterString-Test", MUIA_Application_Copyright, "(C) 2005-2009 by BetterString.mcc Open Source Team", MUIA_Application_Description, "BetterString.mcc demonstration program", MUIA_Application_Title, "BetterString-Test", MUIA_Application_Version, "$VER: BetterString-Demo V1.0 (18.05.2007)", MUIA_Application_UsedClasses, classes, MUIA_Application_Window, window = WindowObject, MUIA_Window_Title, "BetterString-Test", MUIA_Window_ID, MAKE_ID('M','A','I','N'), //MUIA_Window_Menustrip, menu, MUIA_Window_RootObject, VGroup, Child, PopaslObject, MUIA_Popstring_String, NewObject(mcc->mcc_Class, NULL, StringFrame, MUIA_BetterString_NoInput, TRUE, MUIA_CycleChain, TRUE, End, MUIA_Popstring_Button, MUI_MakeObject(MUIO_PopButton, MUII_PopUp), MUIA_Popasl_Type, ASL_FontRequest, End, Child, ColGroup(2), StringFrame, MUIA_Background, MUII_GroupBack, Child, TextObject, MUIA_Weight, 0, MUIA_Text_Contents, "\33rName:", End, Child, a1 = (Object *)NewObject(mcc->mcc_Class, NULL, MUIA_CycleChain, TRUE, MUIA_Background, MUII_GroupBack, MUIA_String_AdvanceOnCR, TRUE, MUIA_String_MaxLen, 10, MUIA_ObjectID, MAKE_ID('N','A','M','E'), End, Child, TextObject, MUIA_Weight, 0, MUIA_Text_Contents, "\33rStreet:", End, Child, a2 = (Object *)NewObject(mcc->mcc_Class, NULL, MUIA_CycleChain, TRUE, MUIA_Background, MUII_GroupBack, MUIA_String_AdvanceOnCR, TRUE, MUIA_ObjectID, MAKE_ID('S','T','R','T'), End, Child, TextObject, MUIA_Weight, 0, MUIA_Text_Contents, "\33rZip, City:", End, Child, NewObject(mcc->mcc_Class, NULL, MUIA_CycleChain, TRUE, MUIA_Background, MUII_GroupBack, MUIA_String_AdvanceOnCR, TRUE, MUIA_ObjectID, MAKE_ID('C','I','T','Y'), End, End, Child, TextObject, MUIA_Font, MUIV_Font_Tiny, MUIA_Text_Contents, "\33cBetterString.mcc", End, Child, NewObject(mcc->mcc_Class, NULL, StringFrame, MUIA_CycleChain, TRUE, MUIA_String_Secret, TRUE, // MUIA_String_MaxLen, 20, MUIA_String_AdvanceOnCR, TRUE, MUIA_BetterString_StayActive, TRUE, // MUIA_String_Accept, "0123456789", MUIA_String_Contents, "This is a wonderful example string!", End, Child, NewObject(mcc->mcc_Class, NULL, StringFrame, MUIA_CycleChain, TRUE, MUIA_BetterString_InactiveContents, "This is a wonderful example string!", End, Child, NewObject(mcc->mcc_Class, NULL, StringFrame, MUIA_CycleChain, TRUE, MUIA_String_Secret, TRUE, MUIA_BetterString_InactiveContents, "This is a wonderful example string!", End, Child, TextObject, MUIA_Font, MUIV_Font_Tiny, MUIA_Text_Contents, "\33cCentered", End, Child, bstring = (Object *)NewObject(mcc->mcc_Class, NULL, ButtonFrame, MUIA_Font, MUIV_Font_Big, // StringFrame, MUIA_String_AdvanceOnCR, TRUE, MUIA_String_Format, MUIV_String_Format_Center, MUIA_String_Contents, "This is a wonderful example string!", MUIA_CycleChain, TRUE, End, Child, TextObject, MUIA_Font, MUIV_Font_Tiny, MUIA_Text_Contents, "\33cRight-Aligned", End, Child, bstring2 = NewObject(mcc->mcc_Class, NULL, MUIA_CycleChain, TRUE, // StringFrame, MUIA_String_AdvanceOnCR, TRUE, MUIA_String_Contents, "This is a wonderful example string!", MUIA_String_Format, MUIV_String_Format_Right, End, Child, TextObject, MUIA_Font, MUIV_Font_Tiny, MUIA_Text_Contents, "\33cStringObject", End, Child, StringObject, StringFrame, MUIA_String_AdvanceOnCR, TRUE, MUIA_String_Contents, "This is a standard StringObject", MUIA_String_Format, MUIV_String_Format_Right, MUIA_String_MaxLen, 1024, MUIA_CycleChain, TRUE, End, Child, HGroup, Child, button = SimpleButton("Insert"), Child, bpos = SliderObject, MUIA_Slider_Horiz, TRUE, MUIA_Numeric_Max, 60, End, Child, ssize = SliderObject, MUIA_Slider_Horiz, TRUE, MUIA_Numeric_Min, -30, MUIA_Numeric_Max, 30, MUIA_Numeric_Value, 0, End, Child, numbutton = NumericbuttonObject, MUIA_Numeric_Min, -30, MUIA_Numeric_Max, 30, MUIA_Numeric_Value, 0, MUIA_Disabled, TRUE, End, End, End, End, End; if(app) { ULONG sigs; DoMethod(app, MUIM_Application_Load, MUIV_Application_Load_ENV); DoMethod(a1, MUIM_Notify, MUIA_String_Contents, MUIV_EveryTime, a2, 3, MUIM_Set, MUIA_String_Contents, MUIV_TriggerValue); DoMethod(a2, MUIM_Notify, MUIA_String_Contents, MUIV_EveryTime, a1, 3, MUIM_Set, MUIA_String_Contents, MUIV_TriggerValue); DoMethod(ssize, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, numbutton, 3, MUIM_Set, MUIA_Numeric_Value, MUIV_TriggerValue); DoMethod(bpos, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, bstring, 3, MUIM_Set, MUIA_String_BufferPos, MUIV_TriggerValue); DoMethod(ssize, MUIM_Notify, MUIA_Numeric_Value, MUIV_EveryTime, bstring, 3, MUIM_Set, MUIA_BetterString_SelectSize, MUIV_TriggerValue); DoMethod(button, MUIM_Notify, MUIA_Pressed, FALSE, bstring, 3, MUIM_BetterString_Insert, "*Test*", MUIV_BetterString_Insert_BufferPos); DoMethod(window, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, MUIV_Notify_Application, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); set(bstring, MUIA_BetterString_KeyDownFocus, bstring2); set(bstring2, MUIA_BetterString_KeyUpFocus, bstring); set(window, MUIA_Window_ActiveObject, bstring); set(window, MUIA_Window_DefaultObject, bstring); set(window, MUIA_Window_Open, TRUE); while((LONG)DoMethod(app, MUIM_Application_NewInput, &sigs) != MUIV_Application_ReturnID_Quit) { if(sigs) { sigs = Wait(sigs | SIGBREAKF_CTRL_C); if(sigs & SIGBREAKF_CTRL_C) break; } } DoMethod(app, MUIM_Application_Save, MUIV_Application_Save_ENV); MUI_DisposeObject(app); if(mcc) MUI_DeleteCustomClass(mcc); } DROPINTERFACE(IMUIMaster); CloseLibrary(MUIMasterBase); MUIMasterBase = NULL; } if(IFFParseBase) { DROPINTERFACE(IIFFParse); CloseLibrary(IFFParseBase); IFFParseBase = NULL; } if(UtilityBase) { DROPINTERFACE(IUtility); CloseLibrary((struct Library *)UtilityBase); } if(LayersBase) { DROPINTERFACE(ILayers); CloseLibrary(LayersBase); } if(LocaleBase) { DROPINTERFACE(ILocale); CloseLibrary(LocaleBase); } if(KeymapBase) { DROPINTERFACE(IKeymap); CloseLibrary(KeymapBase); } if(IntuitionBase) { DROPINTERFACE(IIntuition); CloseLibrary((struct Library *)IntuitionBase); } if(GfxBase) { DROPINTERFACE(IGraphics); CloseLibrary(GfxBase); } if(DiskfontBase) { DROPINTERFACE(IDiskfont); CloseLibrary(DiskfontBase); } return 0; }
void main( void ) { int Done = FALSE; ULONG sig; static STRPTR styleoptions[] = { "IRC", "Email", "HTML", NULL }; if( !( MUIMasterBase = OpenLibrary( MUIMASTER_NAME, 19 ) ) ) return; if( app = ApplicationObject, MUIA_Application_Title, "TextInputDemo", MUIA_Application_Version, "$VER: TextInput Demo 2.0", MUIA_Application_Copyright, "© 1997-99 by Oliver Wagner, All Rights Reserved", MUIA_Application_Author, "Oliver Wagner", MUIA_Application_Description, "Demo for Textinput.mcc", MUIA_Application_Base, "TEXTINPUT-DEMO", SubWindow, win = WindowObject, MUIA_Window_ID, 42, MUIA_Window_Title, "TextInput Demo", WindowContents, VGroup, Child, HGroup, Child, Label1( "Style:" ), Child, Cycle( styleoptions ), End, Child, HGroup, GroupFrameT( "Single line" ), Child, ColGroup( 2 ), Child, Label2( "Input:" ), Child, ti1 = TextinputObject, StringFrame, MUIA_CycleChain, 1, MUIA_ControlChar, 'a', MUIA_Textinput_Multiline, FALSE, MUIA_Textinput_Contents, C1, End, Child, Label2( "NoInput:" ), Child, ti2 = TextinputObject, TextFrame, MUIA_Background, MUII_TextBack, MUIA_Textinput_NoInput, TRUE, MUIA_Textinput_Contents, C1, End, End, End, Child, VGroup, GroupFrameT( "Multi line with scroll" ), Child, timl1 = TextinputscrollObject, StringFrame, MUIA_CycleChain, 1, MUIA_ControlChar, 'b', MUIA_Textinput_Multiline, TRUE, MUIA_Textinput_Contents, C2, End, Child, bt_get = SimpleButton( "Get contents (to shell window)" ), End, Child, HGroup, GroupFrameT( "NoInput multi line with Scroll" ), Child, timl2 = TextinputscrollObject, TextFrame, MUIA_Background,MUII_TextBack,MUIA_CycleChain, 1, MUIA_ControlChar, 'c', MUIA_Textinput_NoInput, TRUE, MUIA_Textinput_Multiline, TRUE, MUIA_Textinput_AutoExpand, TRUE, MUIA_Textinput_Contents, C2, MUIA_Textinput_MinVersion, 12, MUIA_Textinput_WordWrap, 60, End, End, Child, HGroup, GroupFrameT( "Old stringgadget" ), Child, String( C1, 256 ), End, End, End, End ) { DoMethod( win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit ); DoMethod( bt_get, MUIM_Notify, MUIA_Pressed, FALSE, app, 2, MUIM_Application_ReturnID, 2 ); DoMethod( ti1, MUIM_Notify, MUIA_String_Contents, MUIV_EveryTime, ti2, 3, MUIM_Set, MUIA_Text_Contents, MUIV_TriggerValue ); DoMethod( timl1, MUIM_Notify, MUIA_String_Contents, MUIV_EveryTime, timl2, 3, MUIM_Set, MUIA_Text_Contents, MUIV_TriggerValue ); DoMethod( ti1, MUIM_Notify, MUIA_String_Acknowledge, MUIV_EveryTime, ti1, 3, MUIM_Set, MUIA_Textinput_Contents, "" ); set( win, MUIA_Window_Open, TRUE ); while( !Done ) { LONG id; id = DoMethod( app, MUIM_Application_Input, &sig ); switch( id ) { case MUIV_Application_ReturnID_Quit: Done = TRUE; case 2: { char *p; get( timl1, MUIA_Textinput_Contents, &p ); PutStr( ">>>>>\n" ); PutStr( p ); PutStr( "<<<<<\n" ); } break; } if( sig ) if( Wait( sig | SIGBREAKF_CTRL_C ) & SIGBREAKF_CTRL_C ) Done = TRUE; } MUI_DisposeObject( app ); } CloseLibrary( MUIMasterBase ); }
void nwNewWindow ( ) { templates[0] = "32x32"; templates[1] = "48x48"; templates[2] = "64x64"; templates[3] = "160x120"; templates[4] = "320x240"; templates[5] = "640x480"; templates[6] = "800x600"; templates[7] = "1024x768"; templates[8] = "1280x1024"; nwWindow = WindowObject, MUIA_Window_ScreenTitle, _(MSG_NEW_IMAGE_SCR), MUIA_Window_Title, _(MSG_NEW_IMAGE_WIN), MUIA_Window_CloseGadget, FALSE, MUIA_Window_Screen, ( IPTR )lunaPubScreen, MUIA_Window_ID, MAKE_ID('L','P','W','P'), WindowContents, ( IPTR )VGroup, Child, ( IPTR )GroupObject, MUIA_Frame, MUIV_Frame_Group, Child, ( IPTR )HGroup, Child, ( IPTR )VGroup, Child, ( IPTR )HGroup, Child, ( IPTR )TextObject, MUIA_Text_Contents, _(MSG_NEW_IMAGE_PRJNAME), End, Child, ( IPTR )( nwStringPrjName = StringObject, MUIA_String_MaxLen, 128, MUIA_String_Format, MUIV_String_Format_Left, MUIA_Frame, MUIV_Frame_String, MUIA_String_Contents, _(MSG_NEW_IMAGE_UNNAMED), MUIA_CycleChain, 1, End ), End, Child, ( IPTR )HGroup, Child, ( IPTR )TextObject, MUIA_Text_Contents, _(MSG_NEW_IMAGE_TEMPLATES), End, Child, ( IPTR )( nwTemplates = CycleObject, MUIA_Cycle_Entries, templates, MUIA_Cycle_Active, 5, MUIA_CycleChain, 1, End ), End, Child, ( IPTR )HGroup, Child, ( IPTR )TextObject, MUIA_Text_Contents, _(MSG_NEW_IMAGE_CANVASW), End, Child, ( IPTR )( nwStringWidth = StringObject, MUIA_String_MaxLen, 5, MUIA_String_Format, MUIV_String_Format_Right, MUIA_Frame, MUIV_Frame_String, MUIA_String_Integer, 640, MUIA_CycleChain, 1, End ), End, Child, ( IPTR )HGroup, Child, ( IPTR )TextObject, MUIA_Text_Contents, _(MSG_NEW_IMAGE_CANVASH), End, Child, ( IPTR )( nwStringHeight = StringObject, MUIA_String_MaxLen, 5, MUIA_String_Format, MUIV_String_Format_Right, MUIA_Frame, MUIV_Frame_String, MUIA_String_Integer, 480, MUIA_CycleChain, 1, End ), End, Child, ( IPTR )HGroup, Child, ( IPTR )TextObject, MUIA_Text_Contents, _(MSG_NEW_IMAGE_NB_FRAMES), End, Child, ( IPTR )( nwStringFrames = StringObject, MUIA_String_MaxLen, 5, MUIA_String_Format, MUIV_String_Format_Right, MUIA_Frame, MUIV_Frame_String, MUIA_String_Integer, 1, MUIA_CycleChain, 1, End ), End, End, End, End, Child, ( IPTR )HGroup, Child, ( IPTR )( nwBtnOk = SimpleButton ( _(MSG_NEW_IMAGE_OK) ) ), Child, ( IPTR )( nwBtnCancel = SimpleButton ( _(MSG_NEW_IMAGE_CANCEL) ) ), End, End, End; }
int main(void) { struct Hook addHook, displayHook, mutateHook; addHook.h_Entry = HookEntry; addHook.h_SubEntry = (HOOKFUNC) AddFunc; displayHook.h_Entry = HookEntry; displayHook.h_SubEntry = (HOOKFUNC) DynlistDisplayFunc; mutateHook.h_Entry = HookEntry; mutateHook.h_SubEntry = (HOOKFUNC) MutateFunc; app = ApplicationObject, SubWindow, wnd = WindowObject, MUIA_Window_Title, "Dynamic list", MUIA_Window_Activate, TRUE, WindowContents, VGroup, Child, list = ListObject, MUIA_List_DisplayHook, &displayHook, MUIA_List_Format, "BAR,BAR,", MUIA_List_Title, TRUE, End, Child, HGroup, Child, str1 = StringObject, End, Child, str2 = StringObject, End, Child, str3 = StringObject, End, End, Child, HGroup, Child, bt1 = SimpleButton("Add"), Child, bt2 = SimpleButton("Remove"), Child, bt3 = SimpleButton("Grow"), End, End, End, End; if (app) { ULONG sigs = 0; DoMethod(wnd, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, app, (IPTR) 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit); DoMethod(bt1, MUIM_Notify, MUIA_Pressed, FALSE, (IPTR) bt1, 3, MUIM_CallHook, &addHook, list); DoMethod(bt2, MUIM_Notify, MUIA_Pressed, FALSE, (IPTR) list, 2, MUIM_List_Remove, MUIV_List_Remove_First); DoMethod(bt3, MUIM_Notify, MUIA_Pressed, FALSE, (IPTR) list, 3, MUIM_CallHook, &mutateHook, NULL); set(wnd,MUIA_Window_Open,TRUE); while (DoMethod(app, MUIM_Application_NewInput, (IPTR) &sigs) != MUIV_Application_ReturnID_Quit) { if (sigs) { sigs = Wait(sigs | SIGBREAKF_CTRL_C); if (sigs & SIGBREAKF_CTRL_C) break; } } MUI_DisposeObject(app); } return 0; }