void delete_multistring_class(void)
{
SM_ENTER;
if (CL_MultiString)
{
if (MUI_DeleteCustomClass(CL_MultiString))
{
SM_DEBUGF(15,("Deleted CL_MultiString: 0x%lx\n",CL_MultiString));
CL_MultiString = NULL;
} else
{
SM_DEBUGF(5,("FAILED! Delete CL_MultiString: 0x%lx\n",CL_MultiString));
}
}
if (CL_SingleString)
{
if (MUI_DeleteCustomClass(CL_SingleString))
{
SM_DEBUGF(15,("Deleted CL_SingleString: 0x%lx\n",CL_SingleString));
CL_SingleString = NULL;
} else
{
SM_DEBUGF(5,("FAILED! Delete CL_SingleString: 0x%lx\n",CL_SingleString));
}
}
SM_LEAVE;
}
VOID ClearClasses( void )
{
if(SLider)
{
MUI_DeleteCustomClass(SLider); SLider = NULL;
}
}
void disposeBrowserEditWinClass(void)
{
ENTER();
if(g_browserEditWinClass != NULL)
MUI_DeleteCustomClass(g_browserEditWinClass);
LEAVE();
}
void Cleanup(void)
{
CloseLocale(Locale);
if (ColorList) MUI_DeleteCustomClass(ColorList);
if (LocaleBase) CloseLibrary(LocaleBase);
if (MUIMasterBase) CloseLibrary(MUIMasterBase);
if (IntuitionBase) CloseLibrary(IntuitionBase);
if (GfxBase) CloseLibrary(GfxBase);
}
void disposeMailerEditWinClass(void)
{
ENTER();
if(g_mailerEditWinClass != NULL)
MUI_DeleteCustomClass(g_mailerEditWinClass);
LEAVE();
}
void disposeWinClass(void)
{
ENTER();
if(g_winClass != NULL)
MUI_DeleteCustomClass(g_winClass);
LEAVE();
}
void disposeAboutClass(void)
{
ENTER();
if(g_aboutClass != NULL)
MUI_DeleteCustomClass(g_aboutClass);
LEAVE();
}
void DeleteSubClasses(void)
{
if(text_mcc)
{
MUI_DeleteCustomClass(text_mcc);
text_mcc = NULL;
}
if(speedslider_mcc)
{
MUI_DeleteCustomClass(speedslider_mcc);
speedslider_mcc = NULL;
}
if(widthslider_mcc)
{
MUI_DeleteCustomClass(widthslider_mcc);
widthslider_mcc = NULL;
}
}
void DeleteSubClasses(void)
{
if(GammaSliderClass)
{
MUI_DeleteCustomClass(GammaSliderClass);
GammaSliderClass = NULL;
}
if(CacheSliderClass)
{
MUI_DeleteCustomClass(CacheSliderClass);
CacheSliderClass = NULL;
}
#if defined(__MORPHOS__)
if(PicClass)
{
MUI_DeleteCustomClass(PicClass);
PicClass = NULL;
}
#endif
}
void delete_pgplist_class(void)
{
SM_ENTER;
if (CL_PGPList)
{
if (MUI_DeleteCustomClass(CL_PGPList))
{
SM_DEBUGF(15,("Deleted CL_PGPList: 0x%lx\n",CL_PGPList));
CL_PGPList = NULL;
} else
{
SM_DEBUGF(5,("FAILED! Delete CL_PGPList: 0x%lx\n",CL_PGPList));
}
}
SM_LEAVE;
}
VOID delete_transwnd_class(VOID)
{
SM_ENTER;
if (CL_transwnd)
{
if (MUI_DeleteCustomClass(CL_transwnd))
{
SM_DEBUGF(15,("Deleted CL_transwnd: 0x%lx\n",CL_transwnd));
CL_transwnd = NULL;
} else
{
SM_DEBUGF(5,("FAILED! Delete CL_transwnd: 0x%lx\n",CL_transwnd));
}
}
SM_LEAVE;
}
/* /// "nHIDCtrlGUITaskCleanup()" */
void GM_UNIQUENAME(nHIDCtrlGUITaskCleanup)(struct NepClassHid *nch)
{
struct NepHidGItem *nhgi;
if(nch->nch_HCApp)
{
MUI_DisposeObject(nch->nch_HCApp);
nch->nch_HCApp = NULL;
nch->nch_HCActionObj = NULL;
}
nhgi = (struct NepHidGItem *) nch->nch_HCGUIItems.lh_Head;
while(nhgi->nhgi_Node.ln_Succ)
{
Remove(&nhgi->nhgi_Node);
psdFreeVec(nhgi->nhgi_Name);
psdFreeVec(nhgi);
nhgi = (struct NepHidGItem *) nch->nch_HCGUIItems.lh_Head;
}
if(nch->nch_HCActionClass)
{
MUI_DeleteCustomClass(nch->nch_HCActionClass);
nch->nch_HCActionClass = NULL;
}
if(MUIMasterBase)
{
CloseLibrary(MUIMasterBase);
MUIMasterBase = NULL;
}
if(IntuitionBase)
{
CloseLibrary(IntuitionBase);
IntuitionBase = NULL;
}
if(ps)
{
CloseLibrary(ps);
ps = NULL;
}
Forbid();
nch->nch_HCGUITask = NULL;
if(nch->nch_ReadySigTask)
{
Signal(nch->nch_ReadySigTask, 1L<<nch->nch_ReadySignal);
}
--nch->nch_ClsBase->nh_Library.lib_OpenCnt;
}
void disposeAppClass(void)
{
if(g_appClass != NULL)
MUI_DeleteCustomClass(g_appClass);
}
BOOPSI_DISPATCHER_END
int main(void) {
SetTaskPri(FindTask(NULL), 15);
struct MUI_CustomClass *mcc;
if((ps = OpenLibrary("poseidon.library", 4))) {
if((mcc = MUI_CreateCustomClass(NULL, "Area.mui", NULL, sizeof(struct InstData), classdispatcher))) {
mybug(-1,("mui custon class at %p\n", mcc));
Object *app, *window, *tick1, *custom;
app = ApplicationObject,
SubWindow, window = WindowObject,
MUIA_Window_Title, "PS3Eye",
MUIA_Window_Activate, TRUE,
WindowContents, HGroup,
Child, HGroup,
MUIA_Weight, 100,
Child, custom = NewObject(mcc->mcc_Class, NULL, TAG_DONE),
End,
Child, VGroup,
MUIA_Weight, 1,
MUIA_Group_SameWidth, TRUE,
GroupFrameT("Configuration"),
Child, HGroup,
Child, tick1 = MUI_MakeObject(MUIO_Checkmark, NULL),
Child, MUI_MakeObject(MUIO_Label,"640x480", 0),
End,
Child, (IPTR) VSpace(0),
End,
End,
End,
End;
if(app) {
ULONG sigs = 0;
DoMethod(tick1, MUIM_Notify, MUIA_Selected, TRUE, (IPTR)custom, 3, MUIM_Set, MUIA_Resolution, TRUE);
DoMethod(tick1, MUIM_Notify, MUIA_Selected, FALSE, (IPTR)custom, 3, MUIM_Set, MUIA_Resolution, FALSE);
DoMethod(window, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
set(window, MUIA_Window_Open, TRUE);
while((LONG)DoMethod(app, MUIM_Application_NewInput, &sigs) != (LONG)MUIV_Application_ReturnID_Quit) {
if(sigs) {
sigs = Wait(sigs | SIGBREAKF_CTRL_C);
if(sigs & SIGBREAKF_CTRL_C)
break;
}
}
MUI_DisposeObject(app);
}
MUI_DeleteCustomClass(mcc);
}
CloseLibrary(ps);
}
mybug(-1,("Exiting\n"));
return 0;
}
static VOID ClassExpunge(UNUSED struct Library *base)
{
ENTER();
#ifdef USEMUISTRINGS
if(StringClass)
{
MUI_DeleteCustomClass(StringClass);
StringClass = NULL;
}
#endif
if(ScrollGroupClass)
{
MUI_DeleteCustomClass(ScrollGroupClass);
ScrollGroupClass = NULL;
}
if(CyberGfxBase)
{
DROPINTERFACE(ICyberGfx);
CloseLibrary(CyberGfxBase);
CyberGfxBase = NULL;
}
if(DataTypesBase)
{
DROPINTERFACE(IDataTypes);
CloseLibrary(DataTypesBase);
DataTypesBase = NULL;
}
if(DiskfontBase)
{
DROPINTERFACE(IDiskfont);
CloseLibrary(DiskfontBase);
DiskfontBase = NULL;
}
if(CxBase)
{
DROPINTERFACE(ICommodities);
CloseLibrary(CxBase);
CxBase = NULL;
}
if(KeymapBase)
{
DROPINTERFACE(IKeymap);
CloseLibrary(KeymapBase);
KeymapBase = NULL;
}
if(LayersBase)
{
DROPINTERFACE(ILayers);
CloseLibrary(LayersBase);
LayersBase = NULL;
}
_fini();
LEAVE();
}
void ObjStringExit(void)
{
if (ObjStringClass) MUI_DeleteCustomClass(ObjStringClass);
}
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;
}
int main (int argc, char **argv)
{
Object *app;
Object *mainWin;
Object *dgroup;
Object *b[3];
struct MUI_CustomClass *cl_dyngroup;
int i;
g_print("use '--gdk-debug all --sync' to debug events\n");
MUI_Init(&argc, &argv);
cl_dyngroup = CreateDynTestClass();
app = ApplicationObject,
SubWindow, mainWin = WindowObject,
MUIA_Window_Title, "Dynamic add/remove",
WindowContents, VGroup,
Child, HGroup,
GroupFrame,
Child, b[0] = RectangleObject,
MUIA_CycleChain, TRUE,
MUIA_InputMode, MUIV_InputMode_Toggle,
MUIA_FixHeight, 20,
MUIA_Background, MUII_ButtonBack,
ButtonFrame,
End,
Child, b[1] = RectangleObject,
MUIA_CycleChain, TRUE,
MUIA_InputMode, MUIV_InputMode_Toggle,
MUIA_FixHeight, 20,
MUIA_Background, MUII_ButtonBack,
ButtonFrame,
End,
Child, b[2] = RectangleObject,
MUIA_CycleChain, TRUE,
MUIA_InputMode, MUIV_InputMode_Toggle,
MUIA_MaxWidth, 20,
MUIA_Background, MUII_ButtonBack,
ButtonFrame,
End,
End,
/* --- --- */
Child, dgroup = NewObject(cl_dyngroup->mcc_Class, NULL,
TAG_DONE),
End,
End,
End;
if (!app)
g_error("can't create application object.\n");
DoMethod(mainWin, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
app, 2,
MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
for (i = 0; i < 3; i++)
{
DoMethod(b[i], MUIM_Notify, MUIA_Selected, MUIV_EveryTime,
dgroup, 2, MUIM_DynTest_ToggleChild, i);
}
set(mainWin, MUIA_Window_Open, TRUE);
if (!xget(mainWin, MUIA_Window_Open))
{
MUI_DisposeObject(app);
g_error("can't open main window.\n");
}
{
ULONG sigs = 0;
while (DoMethod(app, MUIM_Application_NewInput, &sigs)
!= MUIV_Application_ReturnID_Quit)
{
}
}
set(mainWin, MUIA_Window_Open, FALSE);
MUI_DisposeObject(app);
if (cl_dyngroup)
MUI_DeleteCustomClass(cl_dyngroup);
return 0;
}
static void disposeLampClass(void)
{
if(lampClass != NULL)
MUI_DeleteCustomClass(lampClass);
}
int main(void)
{
if((IntuitionBase = (APTR)OpenLibrary("intuition.library", 38)) &&
GETINTERFACE(IIntuition, IntuitionBase))
if((KeymapBase = OpenLibrary("keymap.library", 37)) &&
GETINTERFACE(IKeymap, KeymapBase))
if((UtilityBase = (APTR)OpenLibrary("utility.library", 38)) &&
GETINTERFACE(IUtility, UtilityBase))
if((MUIMasterBase = OpenLibrary("muimaster.library", MUIMASTER_VMIN)) &&
GETINTERFACE(IMUIMaster, MUIMasterBase))
{
struct MUI_CustomClass *mcc;
Object *app, *window, *bstring, *button;
const char *classes[] = {"BetterString.mcc", NULL};
mcc = MUI_CreateCustomClass(NULL, "BetterString.mcc", NULL, sizeof(struct InstData), ENTRY(_Dispatcher));
app = ApplicationObject,
MUIA_Application_Author, "Allan Odgaard",
MUIA_Application_Base, "HotkeyString-Demo",
MUIA_Application_Copyright, "®1997 Allan Odgaard",
MUIA_Application_Description, "HotkeyString.mcc demonstration program",
MUIA_Application_Title, "HotkeyString-Demo",
MUIA_Application_Version, "$VER: HotkeyString-Demo V1.0 (3-Sep-97)",
MUIA_Application_UsedClasses, classes,
MUIA_Application_Window, window = WindowObject,
MUIA_Window_Title, "HotkeyString-Demo",
MUIA_Window_ID, MAKE_ID('M','A','I','N'),
MUIA_Window_RootObject, VGroup,
Child, TextObject,
MUIA_Font, MUIV_Font_Tiny,
MUIA_Text_Contents, "\33cHotkeyString.mcc",
End,
Child, HGroup,
Child, bstring = ((Object *)NewObject(mcc->mcc_Class, NULL,
StringFrame,
MUIA_CycleChain, TRUE,
MUIA_String_AdvanceOnCR, TRUE,
MUIA_HotkeyString_Snoop, FALSE,
End),
Child, button = TextObject, ButtonFrame,
MUIA_CycleChain, TRUE,
MUIA_Background, MUII_ButtonBack,
MUIA_Text_Contents, "Sample",
MUIA_Text_SetMax, TRUE,
MUIA_InputMode, MUIV_InputMode_Toggle,
End,
End,
Child, TextObject,
MUIA_Font, MUIV_Font_Tiny,
MUIA_Text_Contents, "\33cConstant snoop",
End,
Child, NewObject(mcc->mcc_Class, NULL,
StringFrame,
MUIA_CycleChain, TRUE,
End,
End,
End,
End;
if(app)
{
ULONG sigs;
DoMethod(window, MUIM_Notify, MUIA_Window_CloseRequest, TRUE, MUIV_Notify_Application, 3, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
DoMethod(button, MUIM_Notify, MUIA_Selected, TRUE, MUIV_Notify_Window, 3, MUIM_Set, MUIA_Window_ActiveObject, bstring);
DoMethod(button, MUIM_Notify, MUIA_Selected, MUIV_EveryTime, bstring, 3, MUIM_Set, MUIA_HotkeyString_Snoop, MUIV_TriggerValue);
DoMethod(bstring, MUIM_Notify, MUIA_String_Contents, MUIV_EveryTime, button, 3, MUIM_Set, MUIA_Selected, FALSE);
set(window, MUIA_Window_ActiveObject, bstring);
set(window, MUIA_Window_Open, TRUE);
while((LONG)DoMethod(app, MUIM_Application_NewInput, &sigs) != (LONG)MUIV_Application_ReturnID_Quit)
{
if(sigs)
{
sigs = Wait(sigs | SIGBREAKF_CTRL_C);
if(sigs & SIGBREAKF_CTRL_C)
break;
}
}
MUI_DisposeObject(app);
if(mcc)
MUI_DeleteCustomClass(mcc);
}
DROPINTERFACE(IMUIMaster);
CloseLibrary(MUIMasterBase);
}
if(UtilityBase)
{
DROPINTERFACE(IUtility);
CloseLibrary((struct Library *)UtilityBase);
}
if(KeymapBase)
{
DROPINTERFACE(IKeymap);
CloseLibrary(KeymapBase);
}
if(IntuitionBase)
{
DROPINTERFACE(IIntuition);
CloseLibrary((struct Library *)IntuitionBase);
}
return 0;
}
