THAI INTER: thai inter new-layout with 3 langs

This commit is contained in:
Ittipat Lusuk 2024-11-27 17:56:12 +07:00
commit c4135c748f
1324 changed files with 182160 additions and 281147 deletions

View file

@ -6,6 +6,7 @@
<Volume> SoundVolume </Volume>
<EventOpen>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
;include="ROOT/taobin_project/inter/tha/xml/multi/tab_menu_hide.lxml"
Machine WakeUp
@ -554,13 +555,28 @@
Strlen showname show_name_len
If show_eng = "true" Then
Else
EndIf
If LanguageShow = "ENG" Then
If show_name_len > 24 Then
Var showname = showname + "###size=54"
EndIf
Else
EndIf
If LanguageShow = "THAI" Then
If show_name_len > 0 Then
Var showname = showname + "###size=68"
EndIf
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "true"
DEBUGVAR show_eng
If show_name_len > 24 Then
Var showname = showname + "###size=54"
EndIf
EndIf
Var StringToppingOatMilkWithPrice = ""
@ -1119,14 +1135,104 @@
</Button>
<LangSwitch>
<X> 1000 </X>
<Y> 381 </Y>
<Filename> show_btn </Filename>
<FilenamePress> show_btp </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
;
</EventClick>
</LangSwitch>
<EventLanguageOnChange>
DEBUGVAR LanguageShowByIndex
DEBUGVAR LanguageShow
If LanguageShow = "ENG" Then
Var topping_shot_price_x = 630
Var text_x_add_oreo_price = 510
Var text_show_normal_x = 408
Var text_show_blend_x = 872
Var SugarZeroCalPrice_X = 540
If BGSugar = "Enable" Then
Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Sweet.mp3"
EndIf
EndIf
If LanguageShow = "THAI" Then
Var topping_shot_price_x = 600
Var text_x_add_oreo_price = 490
Var text_show_normal_x = 386
Var text_show_blend_x = 852
Var SugarZeroCalPrice_X = 482
Play "/mnt/sdcard/coffeevending/taobin_project/sound_thai/select_level.mp3"
EndIf
If LanguageShow = "MALAY" Then
Var topping_shot_price_x = 630
Var text_x_add_oreo_price = 510
Var text_show_normal_x = 408
Var text_show_blend_x = 872
Var SugarZeroCalPrice_X = 540
Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Sweet.mp3"
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "true"
DEBUGVAR show_eng
Var topping_shot_price_x = 630
Var text_x_add_oreo_price = 470
Var text_show_normal_x = 568
Var text_show_blend_x = 872
Var SugarZeroCalPrice_X = 540
Var DirImage = "ROOT/taobin_project/image/topping_mmr"
EndIf
If SelectDrinkType = 1 Then
Var showname = NameLang[IndexDrinktType][LanguageShowByIndex]
Var showdesc = DescLang[IndexDrinktType][LanguageShowByIndex]
Else
Var showname = aliasName[LanguageShowByIndex]
Var showdesc = aliasName[LanguageShowByIndex]
EndIf
DEBUGVAR showname
DEBUGVAR showdesc
BackslashNToEnter showname
BackslashNToEnter showdesc
CRLFToSpace showname
CRLFToSpace showdesc
If LanguageShow = "ENG" Then
If show_name_len > 24 Then
Var showname = showname + "###size=54"
EndIf
EndIf
If LanguageShow = "THAI" Then
If show_name_len > 0 Then
Var showname = showname + "###size=68"
EndIf
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "true"
DEBUGVAR show_eng
If show_name_len > 24 Then
Var showname = showname + "###size=54"
EndIf
EndIf
Var Timeout = 0
OpenInst 3 "ROOT/taobin_project/xml/topview2.xml"
RefreshAll
</EventLanguageOnChange>
@ -2649,7 +2755,7 @@
<Y> 752 </Y>
<Width> 1080</Width>
<Align> Center </Align>
<Size> 68 </Size>
<Size> Auto </Size>
<Font> KanitMediumTTF </Font>
<Color> 0x513C2F </Color>
<Value> showname </Value>
@ -8800,18 +8906,25 @@
DEBUGVAR showname
DEBUGVAR showdesc
Strlen showname show_name_len
If show_eng = "true" Then
If LanguageShow = "ENG" Then
If show_name_len > 24 Then
Var showname = showname + "###size=54"
EndIf
Else
EndIf
If LanguageShow = "THAI" Then
If show_name_len > 0 Then
Var showname = showname + "###size=68"
EndIf
EndIf
If LanguageShow = "MYANMAR" Then
Var show_eng = "true"
DEBUGVAR show_eng
If show_name_len > 24 Then
Var showname = showname + "###size=54"
EndIf
EndIf
Var Timeout = 0
RefreshAll
@ -8994,6 +9107,7 @@
)</Value>
</Text>
;
<Text>
<X> 1 </X>
<Y> 1 </Y>
@ -9002,41 +9116,8 @@
<Width> 1080 </Width>
<Align> end </Align>
<Color> 0xFF0000 </Color>
<Value> "#7"</Value>
<Value> "ITH6 "</Value>
</Text>
;
<EventUnitTest1>
__CMD "UpdateCupOnArm" UserSelectProductCode "-"
</EventUnitTest1>
<EventUnitTest2>
</EventUnitTest2>
<EventUnitTest4>
Topping "Select" UserSelectProductCode
; Set option toppinng and pack
Topping "Select1-ID" topping1
Topping "Select2-ID" topping2
Topping "Select3-ID" topping3
;Topping "Select6-ID" topping6
Topping "Select7-ID" topping7
Topping "Select8-ID" topping8
Topping "Select9-ID" topping9
Topping "Select10-ID" topping10
Topping "ClearMultiTopping" "Test 4"
Var strMulti6_1 = "TPID=311,multiply=2"
Var strMulti6_2 = "TPID=313,multiply=1"
Topping "Multiply6-ID" strMulti6_1
Topping "Multiply6-ID" strMulti6_2
Topping "Pack" ExtendDataCurr
</EventUnitTest4>
</Popup>
</Page>