void BLT_lang_set(const char *str)
{
#ifdef WITH_INTERNATIONAL
int ulang = ULANGUAGE;
const char *short_locale = str ? str : LOCALE(ulang);
const char *short_locale_utf8 = NULL;
if ((U.transopts & USER_DOTRANSLATE) == 0)
return;
/* We want to avoid locales like '.UTF-8'! */
if (short_locale[0]) {
/* Hurrey! encoding needs to be placed *before* variant! */
char *variant = strchr(short_locale, '@');
if (variant) {
char *locale = BLI_strdupn(short_locale, variant - short_locale);
short_locale_utf8 = BLI_sprintfN("%s.UTF-8%s", locale, variant);
MEM_freeN(locale);
}
else {
short_locale_utf8 = BLI_sprintfN("%s.UTF-8", short_locale);
}
bl_locale_set(short_locale_utf8);
MEM_freeN((void *)short_locale_utf8);
}
else {
bl_locale_set(short_locale);
}
#else
(void)str;
#endif
blt_lang_check_ime_supported();
}
/* Get the current locale (short code, e.g. es_ES). */
const char *BLF_lang_get(void)
{
#ifdef WITH_INTERNATIONAL
const char *locale = LOCALE(ULANGUAGE);
if (locale[0] == '\0') {
/* Default locale, we have to find which one we are actually using! */
locale = bl_locale_get();
}
return locale;
#else
return "";
#endif
}
/* Get the current locale (short code, e.g. es_ES). */
const char *BLT_lang_get(void)
{
#ifdef WITH_INTERNATIONAL
if (BLT_translate()) {
const char *locale = LOCALE(ULANGUAGE);
if (locale[0] == '\0') {
/* Default locale, we have to find which one we are actually using! */
locale = bl_locale_get();
}
return locale;
}
return "en_US"; /* Kind of default locale in Blender when no translation enabled. */
#else
return "";
#endif
}
Object *CreatePrefs(struct Toolbar_DataP *data)
{
Object **objs = data->Gadgets;
Object *textgroup, *imagegroup;
Object *prefsgroup;
static STRPTR LookStrings[4];
static STRPTR BorderTypeStrings[4];
static STRPTR SelectionModeStrings[4];
static STRPTR PrecisionStrings[5];
static STRPTR GhostEffectStrings[5];
BorderTypeStrings[0] = LOCALE(MSG_BORDERTYPE_OLD, "Old");
BorderTypeStrings[1] = LOCALE(MSG_BORDERTYPE_OFF, "Off");
BorderTypeStrings[2] = LOCALE(MSG_BORDERTYPE_NEW, "New");
BorderTypeStrings[3] = NULL;
SelectionModeStrings[0] = LOCALE(MSG_SELECTIONMODE_OLD, "Old");
SelectionModeStrings[1] = LOCALE(MSG_SELECTIONMODE_OFF, "Off");
SelectionModeStrings[2] = LOCALE(MSG_SELECTIONMODE_NEW, "New");
SelectionModeStrings[3] = NULL;
LookStrings[0] = LOCALE(MSG_IMAGETEXT, "Image and Text");
LookStrings[1] = LOCALE(MSG_IMAGEONLY, "Image only");
LookStrings[2] = LOCALE(MSG_TEXTONLY, "Text only");
LookStrings[3] = NULL;
PrecisionStrings[0] = LOCALE(MSG_EXACT, "Exact");
PrecisionStrings[1] = LOCALE(MSG_IMAGE, "Image");
PrecisionStrings[2] = LOCALE(MSG_ICON, "Icon");
PrecisionStrings[3] = LOCALE(MSG_GUI, "GUI");
PrecisionStrings[4] = NULL;
// GhostEffectStrings[0] = LOCALE(MSG_DIMMMED, "Dimmed"); // Temporarily disabled - remember +-1
GhostEffectStrings[0] = LOCALE(MSG_LIGHT, "Light Grid");
GhostEffectStrings[1] = LOCALE(MSG_HEAVY, "Heavy Grid");
GhostEffectStrings[2] = LOCALE(MSG_SUPERLIGHT, "Superlight Grid");
GhostEffectStrings[3] = NULL;
prefsgroup =
VGroup,
Child, VGroup,
Child, HGroup,
// MUIA_Group_SameWidth, TRUE,
/********************************* General *********************************/
Child, HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_GENERAL, "General"),
Child, RectangleObject, End,
Child, VGroup,
Child, RectangleObject, End,
Child, objs[Look] = RadioObject,
// MUIA_FrameTitle, "Toolbar look",
MUIA_Radio_Entries, LookStrings,
End,
Child, RectangleObject, End,
End,
//ghosttype
Child, RectangleObject, End,
End,
/********************************* Image *********************************/
Child, imagegroup = HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_IMAGE, "Image"),
Child, RectangleObject, End,
Child, VGroup,
Child, RectangleObject, End,
Child, HGroup,
Child, RectangleObject, End,
Child, VGroup,
Child, Label(LOCALE(MSG_USEIMAGES1, "\33cUse ghosted/selected images")),
// Child, MUI_MakeObject(MUIO_Label, LOCALE(MSG_USEIMAGES2, "\33c(if they are available)"), MUIO_Label_Tiny),
Child, TextObject,
MUIA_Text_Contents, LOCALE(MSG_USEIMAGES2, "\33c(if they are available)"),
MUIA_Font, MUIV_Font_Tiny,
End,
End,
Child, objs[UseImages] = CheckMark(TRUE),
// Child, RectangleObject, End,
End,
Child, ColGroup(2),
// Child, HGroup,
Child, Label(LOCALE(MSG_REMAP, "Remap Precision")),
Child, objs[Precision] = Cycle(PrecisionStrings),
// End,
// Child, HGroup,
Child, Label(LOCALE(MSG_GHOSTEFFECT, "Ghosting effect")),
Child, objs[GhostEffect] = Cycle(GhostEffectStrings),
// End,
End,
Child, RectangleObject, End,
End,
Child, RectangleObject, End,
End,
End,
/********************************* Spacing *********************************/
Child, HGroup,
Child, HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_SPACING, "Spacing"),
Child, VGroup,
Child, RectangleObject, End,
Child, ColGroup(2),
Child, Label(LOCALE(MSG_GROUPSPACE, "Group Space")),
Child, objs[GroupSpace] = SliderObject,
MUIA_Slider_Min, -1,
MUIA_Slider_Max, 50,
End,
Child, Label(LOCALE(MSG_TOOLSPACE, "Tool Space")),
Child, objs[ToolSpace] = SliderObject,
MUIA_Slider_Min, -1,
MUIA_Slider_Max, 10,
End,
Child, VGroup,
Child, Label(LOCALE(MSG_INNERSPACE, "\33cInner Space")),
// Child, MUI_MakeObject(MUIO_Label,LOCALE(MSG_INNERSPACE_WITH, "\33c(with tooltext)"), MUIO_Label_Tiny),
Child, TextObject,
MUIA_Text_Contents, LOCALE(MSG_INNERSPACE_WITH, "\33c(with tooltext)"),
MUIA_Font, MUIV_Font_Tiny,
End,
End,
Child, objs[InnerSpace_Text] = SliderObject,
MUIA_Slider_Min, 0,
MUIA_Slider_Max, 10,
End,
Child, VGroup,
Child, Label(LOCALE(MSG_INNERSPACE, "\33cInner Space")),
// Child, MUI_MakeObject(MUIO_Label,LOCALE(MSG_INNERSPACE_WITHOUT, "\33c(without tooltext)"), MUIO_Label_Tiny),
Child, TextObject,
MUIA_Text_Contents, LOCALE(MSG_INNERSPACE_WITHOUT, "\33c(without tooltext)"),
MUIA_Font, MUIV_Font_Tiny,
End,
End,
Child, objs[InnerSpace_NoText] = SliderObject,
MUIA_Slider_Min, 0,
MUIA_Slider_Max, 10,
MUIA_Disabled, TRUE,
End,
// some kind of relative mode
// width: fixed/floating
End,
Child, RectangleObject, End,
End,
End,
/********************************* Text *********************************/
Child, textgroup = HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_TEXT, "Text"),
Child, VGroup,
Child, RectangleObject, End,
/* Child, HGroup,
Child, RectangleObject, End,
Child, Label(LOCALE(MSG_PLACEMENT, "Placement")),
Child, data->CY_Placement = Cycle(CY_textplacement),
// Child, RectangleObject, End,
End,
*/ Child, ColGroup(2),
// Child, VGroup,
Child, Label(LOCALE(MSG_COLOR, "Text Color")),
// End,
// Child, VGroup,
Child, objs[ToolPen] = PoppenObject,
MUIA_Window_Title, LOCALE(MSG_ADJUST, "Adjust Text Color"),
MUIA_Draggable, TRUE,
MUIA_ShortHelp, LOCALE(MSG_COLOR_HELP, "Color of the tool texts."),
End,
Child, Label2(LOCALE(MSG_FONT, "Text Font")),
Child, data->FontASL = PopaslObject,
MUIA_Popstring_String, objs[ToolFont] = String(0,35),
MUIA_Popstring_Button, PopButton(MUII_PopUp),
MUIA_Popasl_Type , ASL_FontRequest,
ASLFO_TitleText , LOCALE(MSG_SELECT, "Please select a text font..."),
End,
// End,
End,
Child, RectangleObject, End,
End,
End,
End,
// Sløringseffekt: Normal, 3D, ...
End,
/*
Child, HGroup,
Child, HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_BORDERTYPE, "Border Type"),
InnerSpacing(12, 12),
Child, objs[BorderType] = Cycle(BorderTypeStrings),
End,
Child, VGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_SELECTIONMODE, "Selection Border"),
InnerSpacing(12, 12),
Child, objs[SelectionMode] = Cycle(SelectionModeStrings),
Child, HGroup,
Child, Label2(LOCALE(MSG_AUTOACTIVE, "Show Active on Mousehi")),
Child, objs[AutoActive] = CheckMark(TRUE),
End,
End,
End,
*/
Child, HGroup,
Child, HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_BORDERTYPE, "Border Type"),
Child, RectangleObject, End,
Child, VGroup,
Child, RectangleObject, End,
Child, objs[BorderType] = Cycle(BorderTypeStrings),
Child, RectangleObject, End,
End,
Child, RectangleObject, End,
End,
Child, HGroup,
MUIA_Background, MUII_GroupBack,
MUIA_Frame , MUIV_Frame_Group,
MUIA_FrameTitle, LOCALE(MSG_SELECTIONMODE, "Selection Border"),
Child, RectangleObject, End,
Child, VGroup,
Child, RectangleObject, End,
MUIA_Weight, 200,
Child, objs[SelectionMode] = Cycle(SelectionModeStrings),
Child, HGroup,
Child, Label2(LOCALE(MSG_AUTOACTIVE, "Show Active on Mousehit")),
Child, objs[AutoActive] = CheckMark(TRUE),
End,
Child, RectangleObject, End,
End,
Child, RectangleObject, End,
End,
End,
Child, TextObject,
TextFrame,
MUIA_Background, MUII_TextBack,
MUIA_FixHeightTxt, "\n\n",
MUIA_Text_Contents, ABOUTTEXT,
End,
End;
if(prefsgroup)
{
DoMethod(objs[Look], MUIM_Notify, MUIA_Radio_Active, 0, textgroup, 6, MUIM_MultiSet, MUIA_Disabled, FALSE, textgroup, imagegroup, objs[InnerSpace_Text]);
DoMethod(objs[Look], MUIM_Notify, MUIA_Radio_Active, 1, textgroup, 5, MUIM_MultiSet, MUIA_Disabled, TRUE, textgroup, objs[InnerSpace_Text]);
DoMethod(objs[Look], MUIM_Notify, MUIA_Radio_Active, 2, textgroup, 5, MUIM_MultiSet, MUIA_Disabled, FALSE, textgroup, objs[InnerSpace_Text]);
DoMethod(objs[Look], MUIM_Notify, MUIA_Radio_Active, 0, objs[InnerSpace_NoText], 3, MUIM_Set, MUIA_Disabled, TRUE);
DoMethod(objs[Look], MUIM_Notify, MUIA_Radio_Active, 1, imagegroup, 5, MUIM_MultiSet, MUIA_Disabled, FALSE, imagegroup, objs[InnerSpace_NoText]);
DoMethod(objs[Look], MUIM_Notify, MUIA_Radio_Active, 2, imagegroup, 5, MUIM_MultiSet, MUIA_Disabled, TRUE, imagegroup, objs[InnerSpace_NoText]);
}
return prefsgroup;
}
