static void drawMenuCommand (ButtonEditor me, Praat_Command cmd, long i) {
static MelderString text { 0 };
bool isAdded = cmd -> uniqueID != 0 || cmd -> script != nullptr;
bool isHidden = cmd -> hidden;
bool isToggled = cmd -> toggled;
const char32 *clickText = isHidden ? (isToggled ? (isAdded ? U"REMOVED" : U"HIDDEN") : U"hidden") :
(isToggled ? U"SHOWN" : (isAdded ? (cmd -> uniqueID ? U"ADDED" : U"START-UP") : U"shown"));
MelderString_empty (& text);
if (cmd -> unhidable) {
MelderString_append (& text, U"#unhidable ");
} else {
MelderString_append (& text, U"@@m", i, U"|", clickText, U"@ ");
}
MelderString_append (& text, cmd -> window, U": ");
if (cmd -> menu) {
MelderString_append (& text, cmd -> menu, U": ");
}
if (cmd -> title) {
if (cmd -> executable) {
MelderString_append (& text, U"@@p", i, U"|", cmd -> title, U"@");
} else {
MelderString_append (& text, cmd -> title);
}
} else {
MelderString_append (& text, U"---------");
}
if (cmd -> after) {
MelderString_append (& text, U", %%%%after \"", cmd -> after, U"\"%%");
}
if (cmd -> script) {
MelderString_append (& text, U", script \"", Melder_peekExpandBackslashes (cmd -> script), U"\"");
}
HyperPage_any (me, text.string, my p_font, my p_fontSize, cmd -> callback ? 0 : Graphics_ITALIC, 0.0,
cmd -> depth * 0.3, 0.4, 0.0, 0.0, 0);
}
void ButtonEditor::drawMenuCommand (praat_Command cmd, long i) {
static MelderString text = { 0 };
int isAdded = cmd -> uniqueID != 0 || cmd -> script != NULL;
int isHidden = cmd -> hidden;
int isToggled = cmd -> toggled;
const wchar_t *clickText = isHidden ? (isToggled ? (isAdded ? L"REMOVED" : L"HIDDEN") : L"hidden") :
(isToggled ? L"SHOWN" : (isAdded ? (cmd -> uniqueID ? L"ADDED" : L"START-UP") : L"shown"));
MelderString_empty (& text);
if (cmd -> unhidable) {
MelderString_append1 (& text, L"#unhidable ");
} else {
MelderString_append5 (& text, L"@@m", Melder_integer (i), L"|", clickText, L"@ ");
}
MelderString_append2 (& text, cmd -> window, L": ");
if (cmd -> menu) {
MelderString_append2 (& text, cmd -> menu, L": ");
}
if (cmd -> title) {
if (cmd -> executable) {
MelderString_append5 (& text, L"@@p", Melder_integer (i), L"|", cmd -> title, L"@");
} else {
MelderString_append1 (& text, cmd -> title);
}
} else {
MelderString_append1 (& text, L"---------");
}
if (cmd -> after) {
MelderString_append3 (& text, L", %%%%after \"", cmd -> after, L"\"%%");
}
if (cmd -> script) {
MelderString_append3 (& text, L", script \"", Melder_peekExpandBackslashes (cmd -> script), L"\"");
}
any (text.string, _font, _fontSize, cmd -> callback ? 0 : Graphics_ITALIC, 0.0,
cmd -> depth * 0.3, 0.4, 0.0, 0.0, 0);
}
static void drawAction (ButtonEditor me, Praat_Command cmd, long i) {
static MelderString text { 0 };
bool isAdded = cmd -> uniqueID != 0 || cmd -> script != nullptr;
bool isHidden = cmd -> hidden, isToggled = cmd -> toggled;
const char32 *clickText = isHidden ? (isToggled ? (isAdded ? U"REMOVED" : U"HIDDEN") : U"hidden") :
(isToggled ? U"SHOWN" : (isAdded ? (cmd -> uniqueID ? U"ADDED" : U"START-UP") : U"shown"));
int n1 = cmd -> n1;
MelderString_empty (& text);
if (cmd -> class4) {
MelderString_append (& text, U"#unhidable ");
} else {
MelderString_append (& text, U"@@a", i, U"|", clickText, U"@ ");
}
MelderString_append (& text, cmd -> class1 -> className);
if (n1) {
MelderString_append (& text, U" (", n1, U")");
}
if (cmd -> class2) {
int n2 = cmd -> n2;
MelderString_append (& text, U" & ", cmd -> class2 -> className);
if (n2) {
MelderString_append (& text, U" (", n2, U")");
}
}
if (cmd -> class3) {
int n3 = cmd -> n3;
MelderString_append (& text, U" & ", cmd -> class3 -> className);
if (n3) {
MelderString_append (& text, U" (", n3, U")");
}
}
if (cmd -> class4) {
int n4 = cmd -> n4;
MelderString_append (& text, U" & ", cmd -> class4 -> className);
if (n4) {
MelderString_append (& text, U" (", n4, U")");
}
}
MelderString_append (& text, U": ");
if (cmd -> title) {
if (cmd -> executable) {
MelderString_append (& text, U"@@e", i, U"|", cmd -> title, U"@");
} else {
MelderString_append (& text, cmd -> title);
}
} else {
MelderString_append (& text, U"---------");
}
if (cmd -> after) {
MelderString_append (& text, U", %%%%after \"", cmd -> after, U"\"%%");
}
if (cmd -> script) {
MelderString_append (& text, U", script \"", Melder_peekExpandBackslashes (cmd -> script), U"\"");
}
HyperPage_any (me, text.string, my p_font, my p_fontSize, cmd -> callback ? 0 : Graphics_ITALIC, 0.0,
cmd -> depth * 0.3, 0.4, 0.0, 0.0, 0);
}
void ButtonEditor::drawAction (praat_Command cmd, long i) {
static MelderString text = { 0 };
int isAdded = cmd -> uniqueID != 0 || cmd -> script != NULL;
int isHidden = cmd -> hidden, isToggled = cmd -> toggled;
const wchar_t *clickText = isHidden ? (isToggled ? (isAdded ? L"REMOVED" : L"HIDDEN") : L"hidden") :
(isToggled ? L"SHOWN" : (isAdded ? (cmd -> uniqueID ? L"ADDED" : L"START-UP") : L"shown"));
int n1 = cmd -> n1;
MelderString_empty (& text);
if (cmd -> class4) {
MelderString_append1 (& text, L"#unhidable ");
} else {
MelderString_append5 (& text, L"@@a", Melder_integer (i), L"|", clickText, L"@ ");
}
MelderString_append (& text, ((Data_Table) cmd -> class1) -> _className);
if (n1) {
MelderString_append3 (& text, L" (", Melder_integer (n1), L")");
}
if (cmd -> class2) {
int n2 = cmd -> n2;
MelderString_append2 (& text, L" & ", ((Data_Table) cmd -> class2) -> _className);
if (n2) {
MelderString_append3 (& text, L" (", Melder_integer (n2), L")");
}
}
if (cmd -> class3) {
int n3 = cmd -> n3;
MelderString_append2 (& text, L" & ", ((Data_Table) cmd -> class3) -> _className);
if (n3) {
MelderString_append3 (& text, L" (", Melder_integer (n3), L")");
}
}
if (cmd -> class4) {
int n4 = cmd -> n4;
MelderString_append2 (& text, L" & ", ((Data_Table) cmd -> class4) -> _className);
if (n4) {
MelderString_append3 (& text, L" (", Melder_integer (n4), L")");
}
}
MelderString_append (& text, L": ");
if (cmd -> title) {
if (cmd -> executable) {
MelderString_append5 (& text, L"@@e", Melder_integer (i), L"|", cmd -> title, L"@");
} else {
MelderString_append1 (& text, cmd -> title);
}
} else {
MelderString_append1 (& text, L"---------");
}
if (cmd -> after) {
MelderString_append3 (& text, L", %%%%after \"", cmd -> after, L"\"%%");
}
if (cmd -> script) {
MelderString_append3 (& text, L", script \"", Melder_peekExpandBackslashes (cmd -> script), L"\"");
}
any (text.string, _font, _fontSize, cmd -> callback ? 0 : Graphics_ITALIC, 0.0,
cmd -> depth * 0.3, 0.4, 0.0, 0.0, 0);
}
