- add led v4 animations - extend timeout page test color - add elock

button for newui
This commit is contained in:
Pakin 2025-07-03 14:55:55 +07:00
parent 3b1cda6b64
commit 05543413ec
26 changed files with 705 additions and 406 deletions

View file

@ -55,15 +55,15 @@
Var DirImageDoing = "ROOT/taobin_project/image/page_doing"
;inter-image
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImageDoing = "ROOT/taobin_project/image/page_doing_en"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var DirImageDoing = "ROOT/taobin_project/image/page_doing_mmr/"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
Var DirImageDoing = "ROOT/taobin_project/inter/hkg/image/page_doing/"
EndIf
@ -133,8 +133,8 @@
Var XStraw = 142
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
;for test
Var IMG_CNT = DirImageDoing + "/img2_en.png"
;Var IMG_CNT = DirImageDoing + "/img2_mmr.png"
@ -161,7 +161,7 @@
Var XStraw = 142
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
;for test
Var IMG_CNT = DirImageDoing + "/img2_en.png"
@ -335,12 +335,12 @@
Var DirImage2 = "ROOT/taobin_project/image/topping2"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_mmr/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/topping_mmr"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
Var DirImage = "ROOT/taobin_project/image/page_payment_msc/page_payment"
Var DirImage2 = "ROOT/taobin_project/image/topping_en"
EndIf
@ -565,11 +565,11 @@
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
@ -599,10 +599,10 @@
Else
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
Var LangString = "LANG: &#34TH&#34\r\n"
EndIf
@ -901,10 +901,10 @@
PlayLong PlaySoundLag
EndIf
;inter-image
If LanguageShow = "MYANMAR" Then
If LanguageShow = "MYANMAR" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/next_drink.mp3"
EndIf
If LanguageShow = "MSC" Then
If LanguageShow = "MSC" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/next_drink.mp3"
EndIf
EndIf
@ -931,6 +931,10 @@
Var ShowCountDownBrewing = CountDownBrewing
If FrontDoorVersionInt > 19999 Then
LEDv2 LED_POS On 100 20 0 LED_TIMES LED_DIM_TIMES
EndIf
DEBUGVAR EnableDoubleCupNoError
DEBUGVAR HURR_FOREVER
If EnableDoubleCupNoError = 1 Then