update อะไรเนี้ย

This commit is contained in:
wanlop run 2024-11-25 18:47:41 +07:00
commit 6286e03248
39 changed files with 922 additions and 426 deletions

Binary file not shown.

After

Width:  |  Height:  |  Size: 31 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 17 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.3 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.7 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.2 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.2 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.7 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.5 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.7 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 7 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.4 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.4 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 7.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.9 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 9.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 10 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 3.7 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 5.4 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.6 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 4.8 KiB

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.8 KiB

View file

@ -7,7 +7,7 @@
<EventOpen>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
TopView "show"
; On open
@ -26,16 +26,16 @@
Var web_telnumOK = ""
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
EndIf
If TermTemOnline = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml"
EndIf
If Seeker = "curr" Then
If Seeker = "curr" Then
Machine DoorLidClose
EndIf
@ -46,13 +46,13 @@
CoinVending OFF
; Clear value
Topping "clear" "-"
Var DirImage = "ROOT/taobin_project/image/page2_inter/"
Var StrawAutoRelease1 = "false"
Var StrawAutoRelease2 = "false"
@ -81,7 +81,7 @@
;GenHashWithTimeStamp QRCODE99x
WEB "ENABLE"
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
@ -97,9 +97,9 @@
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
EndIf
; 1035 is Coke.
STRCONTAIN "1035" MaterialAvailable CokeUI
STRCONTAIN "1035" MaterialAvailable CokeUI
Var bnSodaAndOther = DirImage + "/bn_soda_coke.png"
Var bpSodaAndOther = DirImage + "/bp_soda_coke.png"
@ -114,8 +114,8 @@
Var QRCODE99_Y = 1718
Var showCart = "Invisible"
If MultiPayEnable = "true" Then
If MultiPayEnable = "true" Then
If CART_COUNT = 1 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart1.png"
@ -124,7 +124,7 @@
Var QRCODE99_Y = 1580
EndIf
If CART_COUNT = 2 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart2.png"
@ -134,7 +134,7 @@
EndIf
If CART_COUNT = 3 Then
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
@ -150,10 +150,10 @@
If XMLProfile = "taobin_notopup" Then
Var ButtontoTopupMenu = "Disable"
EndIf
Var menu_name_eng_hot = ""
Var menu_desc_eng_hot = ""
Var menu_name_thai_hot = ""
@ -171,19 +171,19 @@
Var menu_desc_thai_blender = ""
If BoxID = 0 Then
If BoxID = 0 Then
RebootWithCause "BoxID was zero"
EndIf
DEBUGVAR ShowButtonClick2
DEBUGVAR MenuKidButtonState
DEBUGVAR $51-03-01-0035.Price
@ -191,7 +191,7 @@
RootLayoutVisible 3 "show"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
;SAVELOG SoundPlaying
@ -200,15 +200,15 @@
EndIf
If countDownRetrun = 0 Then
If Seeker = "next" Then
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
; zone cup on arm
If CupOnArm = "true" Then
@ -229,10 +229,10 @@
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
<EventChangeStatus>
;If ChangeStatus = "payout-end" Then
;If ChangeStatus = "payout-end" Then
; Var ChangeOK = 1
;EndIf
</EventChangeStatus>
@ -245,15 +245,15 @@
Cart "DeleteMenuID" "ALL"
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
</EventWebApp>
<Image>
@ -274,12 +274,12 @@
If LanguageShow = "MALAY" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_eng/What_would_you_like_to_drink_today.mp3"
EndIf
If LanguageShow = "THAI" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
EndIf
Play PlaySoundLag
Play PlaySoundLag
Var countDownRetrun = 300
Var LanguageButtonEnable = "Enable"
@ -302,10 +302,10 @@
<FilenamePress> "ROOT/taobin_project/image/page2/bn_back_arrow.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Seeker = "next" Then
<EventClick>
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
@ -341,10 +341,10 @@
<FilenamePress> Var(DirImage + "/bp_diy.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If CountryName = "Thailand" Then
If CountryName = "Thailand" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
Else
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
@ -368,12 +368,12 @@
<FilenamePress> Var(DirImage + "/bp_coffee.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_coffee.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
Open OpenFileXML
@ -396,10 +396,10 @@
<FilenamePress> Var(DirImage + "/bp_tea.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_tea.lxml"
Open OpenFileXML
@ -420,10 +420,10 @@
<FilenamePress> Var(DirImage + "/bp_cho_caramel.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_milk.lxml"
Open OpenFileXML
@ -446,11 +446,11 @@
<FilenamePress> Var(DirImage + "/bn_kidmenu.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_forkid.lxml"
Open OpenFileXML
</EventClick>
@ -471,10 +471,10 @@
<FilenamePress> Var(DirImage + "/bp_appfast.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_appfast.lxml"
Open OpenFileXML
@ -497,10 +497,10 @@
<FilenamePress> bpSodaAndOther </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_other.lxml"
Open OpenFileXML
@ -526,10 +526,10 @@
<FilenamePress> Var(DirImage + "/bp_protein.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_whey.lxml"
Open OpenFileXML
@ -553,12 +553,12 @@
<FilenamePress> Var(DirImage + "/bp_HealthyOption.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_health.lxml"
Open OpenFileXML
@ -581,12 +581,12 @@
<FilenamePress> Var(DirImage + "/bn_winter_warmers.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_winter_warmers.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_winter_warmers.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_winter_warmers_ignore.lxml"
Open OpenFileXML
@ -597,35 +597,18 @@
;###############################################################
<Button>
<X> 225 </X>
<X> 600 </X>
<Y> 424 </Y>
<State> ShowButtonClick2 </State>
<Filename> Var(DirImage + "/bn_main_page_member.png") </Filename>
<FilenamePress> Var(DirImage + "/bp_main_page_member.png") </FilenamePress>
<Filename> "ROOT/taobin_project/image/page2_en/page2/bn_main_page_member.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page2_en/page2/bp_main_page_member.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; eng
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
</EventClick>
</Button>
<Button>
<X> 696 </X>
<Y> 424 </Y>
<State> ButtontoTopupMenu </State>
<Filename> Var(DirImage + "/bn_main_page_topup.png") </Filename>
<FilenamePress> Var(DirImage + "/bp_main_page_topup.png") </FilenamePress>
<FilenameDisable> Var(DirImage + "/bp_main_page_topup.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; eng
Var PayDetail=""
Open "ROOT/taobin_project/xml/page_back_to_topup.xml"
</EventClick>
</Button>
@ -636,10 +619,10 @@
<Color> "0xFF0000" </Color>
<Width> 1080 </Width>
<Height> 60 </Height>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_camera.xml"
</EventClick>
</Button>
@ -665,12 +648,12 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<Interval> 400</Interval>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
</EventClick>
</Button>
@ -682,7 +665,7 @@
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Var web_app_prepar = "true"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
@ -690,7 +673,7 @@
EndIf
Else
EndIf
</EventWebApp>
@ -704,7 +687,7 @@
<Interval> 500 </Interval>
<Filename> Var(RootPath + "image/main_page_inter/bn_remove_cup.png") </Filename>
<Filename> Var(RootPath + "image/main_page_inter/bp_remove_cup.png") </Filename>
<EventClick>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
@ -726,12 +709,12 @@
<Height> 100 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var ClickCountMainTe = ClickCountMainTe + 1
DEBUGVAR ClickCountMainTe
If ClickCountMainTe = 2 Then
If ClickCountMainTe = 2 Then
Var OpenRouteManTest = 1
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Var ClickCountMainTe = 0
@ -747,7 +730,7 @@
Var bg_lidProblem_ST = "Invisible"
Var GetLidButtonState2 = "Enable"
Var bg_lidProblem_ST2 ="Invisible"
Var EnableGetMoreStrawFileName2 = "Enable"
Var bg_strawProblem_ST2 ="Invisible"
</EventUnitTest1>
@ -757,7 +740,7 @@
Var bg_lidProblem_ST = "Enable"
Var GetLidButtonState2 = "Invisible"
Var bg_lidProblem_ST2 ="Enable"
Var XStraw = 376
Var EnableGetMoreStrawFileName2 = "Invisible"
Var bg_strawProblem_ST2 ="Enable"
@ -771,7 +754,7 @@
Var CountDownBrewing = 122
Var MachineStage = "testing"
Var BREW_CNT = 122
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
Var LanguageObjectShow = "Enable"

View file

@ -7,7 +7,7 @@
<EventOpen>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml"
TopView "show"
; On open
@ -26,16 +26,16 @@
Var web_telnumOK = ""
Var PicturePath = "/mnt/sdcard/coffeevending/taobin_project/image/page_doing/"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
If CocktailShow = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog_cocktail.xml"
EndIf
If TermTemOnline = "true" Then
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml"
EndIf
If Seeker = "curr" Then
If Seeker = "curr" Then
Machine DoorLidClose
EndIf
@ -44,13 +44,13 @@
CoinVending OFF
; Clear value
Topping "clear" "-"
Var DirImage = "ROOT/taobin_project/image/page2_inter/"
Var StrawAutoRelease1 = "false"
Var StrawAutoRelease2 = "false"
@ -79,7 +79,7 @@
;GenHashWithTimeStamp QRCODE99x
WEB "ENABLE"
Else
Var ShowNetworkProblem = "Enable"
Var ShowButtonClick2 = "Invisible"
@ -95,9 +95,9 @@
Var ShowNetworkProblem = "Invisible"
Var ShowNetworkProblemText = ""
EndIf
; 1035 is Coke.
STRCONTAIN "1035" MaterialAvailable CokeUI
STRCONTAIN "1035" MaterialAvailable CokeUI
Var bnSodaAndOther = DirImage + "/bn_soda_coke.png"
Var bpSodaAndOther = DirImage + "/bp_soda_coke.png"
@ -112,8 +112,8 @@
Var QRCODE99_Y = 1718
Var showCart = "Invisible"
If MultiPayEnable = "true" Then
If MultiPayEnable = "true" Then
If CART_COUNT = 1 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart1.png"
@ -122,7 +122,7 @@
Var QRCODE99_Y = 1580
EndIf
If CART_COUNT = 2 Then
Var showCart = "Enable"
Var cart_image_bn = DirImageCart + "/bn_cart2.png"
@ -132,7 +132,7 @@
EndIf
If CART_COUNT = 3 Then
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
@ -148,10 +148,10 @@
If XMLProfile = "taobin_notopup" Then
Var ButtontoTopupMenu = "Disable"
EndIf
Var menu_name_eng_hot = ""
Var menu_desc_eng_hot = ""
Var menu_name_thai_hot = ""
@ -169,19 +169,19 @@
Var menu_desc_thai_blender = ""
If BoxID = 0 Then
If BoxID = 0 Then
RebootWithCause "BoxID was zero"
EndIf
DEBUGVAR ShowButtonClick2
DEBUGVAR MenuKidButtonState
DEBUGVAR $51-03-01-0035.Price
@ -189,7 +189,7 @@
RootLayoutVisible 3 "show"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
;SAVELOG SoundPlaying
@ -198,15 +198,15 @@
EndIf
If countDownRetrun = 0 Then
If Seeker = "next" Then
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
EndIf
; zone cup on arm
If CupOnArm = "true" Then
@ -227,10 +227,10 @@
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
<EventChangeStatus>
;If ChangeStatus = "payout-end" Then
;If ChangeStatus = "payout-end" Then
; Var ChangeOK = 1
;EndIf
</EventChangeStatus>
@ -243,15 +243,15 @@
Cart "DeleteMenuID" "ALL"
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
EndIf
Else
EndIf
</EventWebApp>
<Image>
@ -272,12 +272,12 @@
If LanguageShow = "MALAY" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_eng/What_would_you_like_to_drink_today.mp3"
EndIf
If LanguageShow = "THAI" Then
Var PlaySoundLag = "/mnt/sdcard/coffeevending/taobin_project/sound_thai/taobin_sawade.mp3"
EndIf
Play PlaySoundLag
Play PlaySoundLag
Var countDownRetrun = 300
Var LanguageButtonEnable = "Enable"
@ -300,10 +300,10 @@
<FilenamePress> "ROOT/taobin_project/image/page2/bn_back_arrow.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If Seeker = "next" Then
<EventClick>
If Seeker = "next" Then
RootLayoutVisible 3 "hide"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Open "ROOT/taobin_project/xml/page_brewing3Conti.xml"
Else
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
EndIf
@ -339,12 +339,12 @@
<FilenamePress> Var(DirImage + "/bn_winter_warmers.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_winter_warmers.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_winter_warmers.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_winter_warmers_ignore.lxml"
Open OpenFileXML
@ -358,10 +358,10 @@
<FilenamePress> Var(DirImage + "/bp_diy.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
If CountryName = "Thailand" Then
If CountryName = "Thailand" Then
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/event/script_common_for_open_promotion_xml.ev"
Else
Var OpenFileXML = CountryRootPath + "xml/event/script_common_for_open_promotion_xml.ev"
@ -386,10 +386,10 @@
<FilenamePress> Var(DirImage + "/bp_tea.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_tea.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_tea.lxml"
Open OpenFileXML
@ -410,10 +410,10 @@
<FilenamePress> Var(DirImage + "/bp_cho_caramel.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_milk.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_milk.lxml"
Open OpenFileXML
@ -436,11 +436,11 @@
<FilenamePress> Var(DirImage + "/bn_kidmenu.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_forkid.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_forkid.lxml"
Open OpenFileXML
</EventClick>
@ -461,10 +461,10 @@
<FilenamePress> Var(DirImage + "/bp_appfast.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_appfast.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_appfast.lxml"
Open OpenFileXML
@ -487,10 +487,10 @@
<FilenamePress> bpSodaAndOther </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_other.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_other.lxml"
Open OpenFileXML
@ -516,10 +516,10 @@
<FilenamePress> Var(DirImage + "/bp_protein.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_whey.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_whey.lxml"
Open OpenFileXML
@ -543,12 +543,12 @@
<FilenamePress> Var(DirImage + "/bp_HealthyOption.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
;Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
;Open "ROOT/taobin_project/xml/page_catalog_group_health.lxml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_health.lxml"
Open OpenFileXML
@ -571,12 +571,12 @@
<FilenamePress> Var(DirImage + "/bp_coffee.png") </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert2.xml"
Var OpenFileXML = CountryRootPath + "xml/page_catalog_group_coffee.lxml"
DEBUGVAR CountryRootPath
DEBUGVAR OpenFileXML
Open OpenFileXML
@ -598,32 +598,15 @@
<X> 225 </X>
<Y> 424 </Y>
<State> ShowButtonClick2 </State>
<Filename> Var(DirImage + "/bn_main_page_member.png") </Filename>
<FilenamePress> Var(DirImage + "/bp_main_page_member.png") </FilenamePress>
<Filename> "ROOT/taobin_project/image/page2_en/page2/bn_main_page_member.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/page2_en/page2/bp_main_page_member.png" </FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; eng
Var CheckMemberPage = CountryRootPath + "xml/page_check_member.lxml"
Open CheckMemberPage
</EventClick>
</Button>
<Button>
<X> 696 </X>
<Y> 424 </Y>
<State> ButtontoTopupMenu </State>
<Filename> Var(DirImage + "/bn_main_page_topup.png") </Filename>
<FilenamePress> Var(DirImage + "/bp_main_page_topup.png") </FilenamePress>
<FilenameDisable> Var(DirImage + "/bp_main_page_topup.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
; eng
Var PayDetail=""
Open "ROOT/taobin_project/xml/page_back_to_topup.xml"
</EventClick>
</Button>
@ -634,10 +617,10 @@
<Color> "0xFF0000" </Color>
<Width> 1080 </Width>
<Height> 60 </Height>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_camera.xml"
</EventClick>
</Button>
@ -663,12 +646,12 @@
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<Interval> 400</Interval>
<EventClick>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_multi.xml"
</EventClick>
</Button>
@ -680,7 +663,7 @@
Var web_readyOK = web_ready
Var web_telnumOK = web_telnum
Var web_app_prepar = "true"
Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_payment.xml"
@ -688,7 +671,7 @@
EndIf
Else
EndIf
</EventWebApp>
@ -700,12 +683,12 @@
<Height> 100 </Height>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var ClickCountMainTe = ClickCountMainTe + 1
DEBUGVAR ClickCountMainTe
If ClickCountMainTe = 2 Then
If ClickCountMainTe = 2 Then
Var OpenRouteManTest = 1
Open "ROOT/taobin_project/xml/page_back_to_main.xml"
Var ClickCountMainTe = 0
@ -722,7 +705,7 @@
<Interval> 500 </Interval>
<Filename> Var(RootPath + "image/main_page_inter/bn_remove_cup.png") </Filename>
<Filename> Var(RootPath + "image/main_page_inter/bp_remove_cup.png") </Filename>
<EventClick>
<EventClick>
Machine RemoveCup
Machine DoorLidOpen
@ -737,7 +720,7 @@
Var bg_lidProblem_ST = "Invisible"
Var GetLidButtonState2 = "Enable"
Var bg_lidProblem_ST2 ="Invisible"
Var EnableGetMoreStrawFileName2 = "Enable"
Var bg_strawProblem_ST2 ="Invisible"
</EventUnitTest1>
@ -747,7 +730,7 @@
Var bg_lidProblem_ST = "Enable"
Var GetLidButtonState2 = "Invisible"
Var bg_lidProblem_ST2 ="Enable"
Var XStraw = 376
Var EnableGetMoreStrawFileName2 = "Invisible"
Var bg_strawProblem_ST2 ="Enable"
@ -761,7 +744,7 @@
Var CountDownBrewing = 122
Var MachineStage = "testing"
Var BREW_CNT = 122
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
Var LanguageObjectShow = "Enable"

View file

@ -8,10 +8,12 @@
<EventOpen>
; On open
Var TargetTimeout = 30
Var Timeout = 0
Var BlurBackgroundState = "Invisible"
Var SelectOptionPopupState = "Invisible"
Var SelectedPaymentMedthod = ""
Var SumCreditAmount = TaobinCredit
Var CashlessPayFlag = 0
@ -21,6 +23,17 @@
Var AdditionalAmount = 0
Var ChangeOK = 0
Var QRCODE99 = ""
Var QRCODEImageState = "Invisible"
Var CancelButtonPaymentPopupState = "Invisible"
Var CancelingState = 0
Var CancelingTime = 0
Var ReqPayInfoFlag = 0
Var WaitQRPay = 0
Var QRErrorState = "Invisible"
@ -34,8 +47,6 @@
Var text_4 = "/text_4-AUS.png"
Var PayCreditChannel = "credit-card"
Var OptionAmount1 = 2900
Var OptionAmount2 = 3900
Var OptionAmount3 = 4900
@ -58,40 +69,104 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
If Timeout > TargetTimeout Then
Var alphaState = "Invisible"
Var LOADING_STATE = "Invisible"
Var QRErrorState = "Invisible"
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
Var CashlessPayFlag = 0
CashlessReq FAIL
Else
CashlessReq OFF
EndIf
VendingQR OFF
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
EndIf
If CancelingState = 1 Then
Var CancelingTime = CancelingTime + 1
If CancelingTime > 3 Then
Var Timeout = 0
Var TargetTimeout = 30
Var alphaState = "Invisible"
Var LOADING_STATE = "Invisible"
Var BlurBackgroundState = "Invisible"
Var CancelingState = 0
EndIf
EndIf
TimerReset
Refresh
</EventTimeout>
</EventTimeout>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventActionOk>
If WaitQRPay = 1 Then
If VendingExtResult = "" Then
Else
Var PayCreditChannel = "fatzebra"
Var ToppupSuccessPage = CountryRootPath + "xml/page_member_topupSuccess.lxml"
Open ToppupSuccessPage
EndIf
Var ReqPayInfoFlag = 0
EndIf
If ReqPayInfoFlag = 1 Then
Var VendingQRTypeResult = ""
DEBUGVAR ECommerceQR
SPLIT ECommerceQR "/" 5 VendingQRTypeResult
If VendingQRTypeResult = "FZB:2" Then
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var QRCODE99FZB = SessionID
Var QRCODE99FZB = QRCODE99FZB + Ext1a
SAVELOG Ext1a
SAVELOG QRCODE99FZB
Var QRCODE99FZB = QRCODE99FZB + Ext21
Var QRCODETMP = QRCODE99FZB
Var ReqPayInfoFlag = 0
SAVELOG QRCODE99FZB
SAVELOG Ext21
Var QRCODE99 = QRCODE99FZB
Var LOADING_STATE = "Invisible"
Var WaitQRPay = 1
Var TargetTimeout = 120
Var Timeout = 0
Var VendingExtResult = ""
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_mobile.mp3"
Refresh
EndIf
EndIf
If VendingCashless = "OK" Then
CashlessReq SUCCESS
Var PayCreditChannel = "credit-card"
Var ToppupSuccessPage = CountryRootPath + "xml/page_member_topupSuccess.lxml"
Open ToppupSuccessPage
EndIf
@ -100,18 +175,28 @@
<EventActionError>
If VendingCashless = "ERROR" Then
Var Timeout = 0
Var TargetTimeout = 30
Var Timeout = 0
;Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
Var LOADING_STATE = "Invisible"
EndIf
CashlessReq FAIL
EndIf
If ReqPayInfoFlag > 0 Then
Var TargetTimeout = 30
Var Timeout = 0
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorState = "Enable"
Var QRCODE99 = ""
EndIf
EndIf
Refresh
@ -122,7 +207,7 @@
Var CreditCardRef = ""
GenHashWithTimeStamp CreditCardRef
DEBUGVAR VendingCashless
DEBUGVAR VendingCashless
If VendingCashless = "READY" Then
Var Timeout = 0
@ -148,72 +233,150 @@
<Image>
<Text>
<X> 70 </X>
<Y> 499 </Y>
<Filename> Var( DirImage + "/text_3.png" )</Filename>
</Image>
<Width> 940 </Width>
<Font> MontserratBold </Font>
<Size> 50 </Size>
<Color> 0x513C2F </Color>
<Align> Center </Align>
<Value> "Choose a payment method" </Value>
</Text>
<Button>
<X> 287 </X>
<Y> 637 </Y>
<Filename> Var( DirImage2 + "/bn_credit_card.png" ) </Filename>
<FilenamePress> Var( DirImage2 + "/bp_credit_card.png" ) </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bd_credit_card.png" ) </FilenameDisable>
<EventOnClick>
Var Timeout = 0
Var SelectedPaymentMedthod = "credit_card"
Var SelectOptionPopupState = "Enable"
Var BlurBackgroundState = "Enable"
</EventOnClick>
</Button>
<Button>
<X> 287 </X>
<Y> 778 </Y>
<Filename> Var( DirImage2 + "/bn_fatzebra.png" ) </Filename>
<FilenamePress> Var( DirImage2 + "/bp_fatzebra.png" ) </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bd_fatzebra.png" ) </FilenameDisable>
<EventOnClick>
Var Timeout = 0
Var SelectedPaymentMedthod = "fatzebra"
Var SelectOptionPopupState = "Enable"
Var BlurBackgroundState = "Enable"
</EventOnClick>
</Button>
<Text>
<X> 70 </X>
<Y> 1134 </Y>
<Width> 940 </Width>
<Font> MontserratBold </Font>
<Size> 64 </Size>
<Color> 0x513C2F </Color>
<Align> Center </Align>
<Value> "Total balance" </Value>
</Text>
<Image>
<X> 252 </X>
<Y> 1223 </Y>
<Y> 1272 </Y>
<Filename> Var( DirImage + text_4 )</Filename>
</Image>
<Text>
<X> 0 </X>
<Y> 1280 </Y>
<Size> 120 </Size>
<X> 252 </X>
<Y> 1300 </Y>
<Size> 144 </Size>
<Align> Center </Align>
<Width> 1080 </Width>
<Width> 566 </Width>
<Font> KanitRegularTTF </Font>
<Color> 0xDE794E </Color>
<Value> TaobinCreditStr </Value>
</Text>
<Button>
<X> 397 </X>
<Y> 1622 </Y>
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel2.png" )</FilenamePress>
<EventClick>
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
</EventClick>
</Button>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<State> BlurBackgroundState </State>
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
</Image>
; ================= select option =================
<Image>
<X> 213 </X>
<Y> 653 </Y>
<State> SelectOptionPopupState </State>
<Filename> Var( DirImage2 + "/popup_option_bg.png" ) </Filename>
</Image>
<Text>
<X> 249 </X>
<Y> 710 </Y>
<State> SelectOptionPopupState </State>
<Width> 583 </Width>
<Font> KanitSemiBold </Font>
<Size> 41 </Size>
<Color> 0x513C2F </Color>
<Align> Center </Align>
<Value> "Please Select Option" </Value>
</Text>
<Button>
<X> 287 </X>
<Y> 670 </Y>
<Filename> Var( DirImage2 + "/bn_topup_29.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_29.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bp_topup_29.png") </FilenameDisable>
<Y> 836 </Y>
<State> SelectOptionPopupState </State>
<Filename> Var( DirImage2 + "/bn_topup_credit_option_29.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_credit_option_29.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bd_topup_credit_option_29.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var PayAmount = OptionAmount1
Var Timeout = 0
If PromotionAdditionCredit = 1 Then
Var AdditionalAmount = AmountAdditionCredit1
EndIf
If PromotionAdditionCredit = 1 Then
Var AdditionalAmount = AmountAdditionCredit1
EndIf
Function 2
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
EndIf
</EventClick>
</Button>
<Button>
<X> 287 </X>
<Y> 800 </Y>
<Filename> Var( DirImage2 + "/bn_topup_39.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_39.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bp_topup_39.png") </FilenameDisable>
<Y> 991 </Y>
<State> SelectOptionPopupState </State>
<Filename> Var( DirImage2 + "/bn_topup_credit_option_39.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_credit_option_39.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bd_topup_credit_option_39.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var PayAmount = OptionAmount2
@ -223,24 +386,21 @@
Var AdditionalAmount = AmountAdditionCredit2
EndIf
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
EndIf
Function 2
</EventClick>
</Button>
<Button>
<X> 287 </X>
<Y> 930 </Y>
<Filename> Var( DirImage2 + "/bn_topup_49.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_49.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bp_topup_49.png") </FilenameDisable>
<Y> 1146 </Y>
<State> SelectOptionPopupState </State>
<Filename> Var( DirImage2 + "/bn_topup_credit_option_49.png") </Filename>
<FilenamePress> Var( DirImage2 + "/bp_topup_credit_option_49.png") </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bd_topup_credit_option_49.png") </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var PayAmount = OptionAmount3
@ -250,43 +410,31 @@
Var AdditionalAmount = AmountAdditionCredit3
EndIf
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
EndIf
Function 2
</EventClick>
</Button>
<Button>
<X> 397 </X>
<Y> 1622 </Y>
<Filename> Var( DirImage + "/bn_cancel2.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel2.png" )</FilenamePress>
<X> 438 </X>
<Y> 1345 </Y>
<State> SelectOptionPopupState </State>
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
Var CheckMemberPage2 = CountryRootPath + "xml/page_check_member2.lxml"
Open CheckMemberPage2
Var SelectedPaymentMedthod = ""
Var SelectOptionPopupState = "Invisible"
Var BlurBackgroundState = "Invisible"
Refresh
</EventClick>
</Button>
; QR popup
<Image>
<X> 0 </X>
<Y> 380 </Y>
<State> alphaState </State>
<Filename> "ROOT/taobin_project/image/page_payment/alpha.png" </Filename>
</Image>
; ================ checkout ===========================
<Image>
<X> 249 </X>
@ -295,13 +443,18 @@
<Filename> Var( DirImage + QR_POPUP )</Filename>
</Image>
<Image>
<Text>
<X> 267 </X>
<Y> 1065 </Y>
<State> LOADING_STATE </State>
<Filename> Var( DirImage + "/loadingText.png" )</Filename>
</Image>
<Width> 546 </Width>
<Height> 75 </Height>
<Font> NotoSansThaiBold </Font>
<Size> 58 </Size>
<Color> 0x5A5A5A </Color>
<Value> LOADING_TEXT </Value>
<Align> center-vertical-horizontal </Align>
</Text>
<GIF>
<X> 493 </X>
@ -314,32 +467,54 @@
<Button>
<X> 438 </X>
<Y> 1345 </Y>
<State> alphaState </State>
<Y> 1365 </Y>
<State> CancelButtonPaymentPopupState </State>
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var LOADING_STATE = "Invisible"
Var QRErrorState = "Invisible"
Var alphaState = "Invisible"
<EventClick>
CashlessReq OFF
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
Var LOADING_STATE = "Enable"
Var QRErrorState = "Invisible"
Var CancelButtonPaymentPopupState = "Invisible"
Var QRCODEImageState = "Invisible"
Var QRCODE99 = ""
Var CancelingState = 1
Var CancelingTime = 0
Var LOADING_TEXT = "Canceling..."
If SelectedPaymentMedthod = "credit_card" Then
SAVELOG "Canceling credit card"
Var QR_POPUP = "/img_popup8-2.png"
CashlessReq OFF
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
EndIf
DEBUGVAR LOADING_STATE
DEBUGVAR QRErrorState
DEBUGVAR alphaState
If SelectedPaymentMedthod = "fatzebra" Then
SAVELOG "Canceling fatzebra"
VendingQR OFF
EndIf
Refresh
</EventClick>
</Button>
<QRCode>
<X> 445 </X>
<Y> 958 </Y>
<Width> 200 </Width>
<Height> 200 </Height>
<State> QRCODEImageState </State>
<Service> testservice </Service>
</QRCode>
<Button>
<X> 267 </X>
@ -348,16 +523,89 @@
<Filename> Var( DirImage + "/QRError.png" ) </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
</EventClick>
</Button>
<Function2>
Var SelectOptionPopupState = "Invisible"
Var alphaState = "Enable"
Var CancelButtonPaymentPopupState = "Enable"
if SelectedPaymentMedthod = "credit_card" Then
Var QR_POPUP = "/img_popup8-AUS.png"
Coin CARD
EndIf
if SelectedPaymentMedthod = "fatzebra" Then
Var QR_POPUP = "/img_popup1-AUS.png"
Var LOADING_TEXT = "Just Moment Please"
Var LOADING_STATE = "Enable"
Var QRCODEImageState = "Enable"
VendingQR ON
Var QRCODE99 = ""
Var PriceDrink = PayAmount
Var DiscountDrink = 0
Var SelectDrink = "00-00-00-0000"
Var SelectSlot = "1"
Var QRCODE1 = "A000000677010112"
Var QRCODE2 = "010755600066301"
Var QRCODE3 = "VDGN"
Var QRCODE4 = BoxID
Var QRCODE5 = SelectSlot
Var QRCODE6 = SelectDrink
Var QRCODE7 = PriceDrink
Var QRCODE8 = ""
Var SessionID2 = "00" + ":"
Var SessionID2 = SessionID2 + ""
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "coffee"
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "FZB:2/"
Var ECommerceQR = ECommerceQR + "CRX"
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + TelephoneNumber
Var ECommerceQR = ECommerceQR + ":0:"
Var ECommerceQR = ECommerceQR + AdditionalAmount
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 1
EndIf
Refresh
</Function2>
<EventUnitTest4>
Var MemberToppupSuccessPage = CountryRootPath + "xml/page_member_topupSuccess.lxml"
Open MemberToppupSuccessPage
</EventUnitTest4>
</Popup>

View file

@ -160,6 +160,10 @@ Var JemilaToppingFreeFlag = 0
; Sugar Zero Cal Free every day, start 20 Nov
Var SugarZeroCalFreeFlag = 0
; 12 Day 12 Menu, 1 - 12 Dec
Var 12Day12MenuPro = 0
Var From12Day12MenuPro = 0
Var NewCollectPoint = 1
Var PayMentCodeShouldCollectPromotionPoint = 0
Var NotCollectPointPromotion = 0
@ -307,15 +311,23 @@ If SystemDateMonthInt > 11 Then
EndIf
If SystemDateMonthInt = 12 Then
If SystemDateDayInt <= 12 Then
Var 12Day12MenuPro = 1
EndIf
EndIf
If BoxID = 105005 Then
Var NewFlowPaymentCode = 1
Var New_Payment = 1
Var JemilaPro = 0
Var HalloweenPro = 0
Var WeekdayDiscountPro = 1
Var WeekdayDiscountProEventOn = 1
Var OreoDiscount11Pro = 1
Var HappyTriosPro = 1
Var WeekdayDiscountPro = 0
Var WeekdayDiscountProEventOn = 0
Var OreoDiscount11Pro = 0
Var HappyTriosPro = 0
Var 12Day12MenuPro = 1
Var JemilaToppingFlag = 1
Var JemilaToppingFreeFlag = 1
@ -484,6 +496,8 @@ If taobin_nopro = "true" Then
Var HalloweenPro = 0
Var WeekdayDiscountPro = 0
Var OreoDiscount11Pro = 0
Var HappyTriosPro = 0
Var 12Day12MenuPro = 0
Var HappyTriosPro = 0

View file

@ -95,6 +95,7 @@
Var KanitRegularTTF = "ROOT/taobin_project/font/Kanit/Kanit-Regular.ttf"
Var KanitThinTTF = "ROOT/taobin_project/font/Kanit/Kanit-Thin.ttf"
Var KanitLightTTF = "ROOT/taobin_project/font/Kanit/Kanit-Light.ttf"
Var KanitSemiBold = "ROOT/taobin_project/font/Kanit/Kanit-SemiBold.ttf"
Var OpunMediumTTF = "ROOT/taobin_project/font/Opun/Opun-Medium.ttf"
Var OpunThinTTF = "ROOT/taobin_project/font/Opun/Opun-Thin.ttf"
@ -114,6 +115,8 @@
Var ChivoMonoBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-Bold.ttf"
Var ChivoMonoSemiBold = "ROOT/taobin_project/font/ChivoMono/ChivoMono-SemiBold.ttf"
Var MontserratBold = "ROOT/taobin_project/font/Montserrat/Montserrat-Bold.ttf"
Var InterRegular = "ROOT/taobin_project/font/Inter/Inter-Regular.ttf"
@ -1323,7 +1326,12 @@
If CountryName = "Thailand" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
<<<<<<< HEAD
=======
;TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/video/script_video.ev"
>>>>>>> 4d7e488313173bec282db0015199ea5afb5d2418
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"
@ -1357,13 +1365,13 @@
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Enable"
Var PriceUnitText = ""
;Var MemberButtonFileName = "ROOT/taobin_project/image/TermTempage2/bp_main_page_member.png"
;Var MemberButtonFileNameRest = "ROOT/taobin_project/image/TermTempage2/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
@ -1384,6 +1392,7 @@
EndIf
EndIf
<<<<<<< HEAD
If MyanmarLangEnable = "false" Then
If CountryName = "Thailand" Then
Var InternationalEnable = 1
@ -1449,6 +1458,9 @@
EndIf
EndIf
=======
>>>>>>> 4d7e488313173bec282db0015199ea5afb5d2418
If UsePepsiTheme = 1 Then
If InternationalEnable = 1 Then
; enable-color
@ -1621,7 +1633,7 @@ PRICE "Reset" "-"
If CountryName = "Thailand" Then
Var InternationalEnable = 1
DEBUGVAR InternationalEnable
;TRY "/mnt/sdcard/coffeevending/taobin_project/inter/tha/video/script_video.ev"
TRY "/mnt/sdcard/coffeevending/taobin_project/xml/multi_ads/ads_path.ev"
@ -1656,13 +1668,13 @@ PRICE "Reset" "-"
Var ShowButtonClick2 = "Invisible"
Var ButtontoTopupMenu = "Enable"
Var PriceUnitText = ""
;Var MemberButtonFileName = "ROOT/taobin_project/image/TermTempage2/bp_main_page_member.png"
;Var MemberButtonFileNameRest = "ROOT/taobin_project/image/TermTempage2/bn_main_page_member.png"
Var show_eng_button_stage = "Invisible"
Var CountDownShowButton = 35
@ -1909,15 +1921,15 @@ PRICE "Reset" "-"
Var CountDownPauseVideo2 = CountDownPauseVideo - 1
DEBUGVAR CountDownPauseVideo2
If CountDownPauseVideo = 2 Then
TapScreen 30 638
EndIf
If CountDownPauseVideo = 1 Then
TapScreen 860 1004
EndIf

View file

@ -88,6 +88,8 @@
Var cancelState = "Invisible"
Var CameraState = "Invisible"
Var alphaState = "Invisible"
Var alphaState2 = "Invisible"
@ -402,14 +404,6 @@
Machine DoorClose
If ShoppyPayEnable = "true" Then
Else
Var PayState5 = "Disable"
Var PayState6 = "Disable"
EndIf
If web_readyOK = "true" Then
Var web_readyOK = "false"
@ -432,7 +426,6 @@
Var PayState4 = "Invisible"
Var PayState5 = "Invisible"
Var PayState6 = "Invisible"
EndIf
</EventOpen>
@ -678,6 +671,28 @@
EndIf
EndIf
;If ReqPayInfoFlag = 6 Then
; If VendingQRTypeResult = "FZB:2" Then
; Var CashTextWarning = ""
; Var QRErrorState = "Invisible"
; Var QRCODE99Shoppy = SessionID
; Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1a
; SAVELOG Ext1a
; SAVELOG QRCODE99Shoppy
; Var QRCODE99Shoppy = QRCODE99Shoppy + Ext21
; Var ReqPayInfoFlag = 0
; Var ReqPayInfoFlag2 = 5
; SAVELOG QRCODE99Shoppy
; SAVELOG Ext21
; Var employeeName = "Jhon"
; Var
; ;Var QRCODE99 = QRCODE99Shoppy
; Var LOADING_STATE = "Invisible"
; EndIf
;EndIf
Else
Var PayInfoCFlag = 1
EndIf
@ -718,6 +733,7 @@
If ReqPayInfoFlag = 1 Then
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorImg = "/QRError.png"
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
@ -725,6 +741,7 @@
If ReqPayInfoFlag = 2 Then
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorImg = "/QRError.png"
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
@ -732,6 +749,7 @@
If ReqPayInfoFlag = 3 Then
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorImg = "/QRError.png"
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
@ -739,10 +757,19 @@
If ReqPayInfoFlag = 4 Then
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorImg = "/QRError.png"
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
EndIf
If ReqPayInfoFlag = 6 Then
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorImg = "/QRError.png"
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
EndIf
Else
Var PayInfoCFlag = 1
EndIf
@ -827,11 +854,16 @@
If Timeout >= 120 Then
Var alphaState = "Invisible"
If CameraState = "Enable" Then
Var CameraState = "Invisible"
EndIf
If RoadShow = "true" Then
Else
Var PayState3 = "Disable"
Var PayState5 = "Disable"
Var PayState6 = "Disable"
EndIf
Var LOADING_STATE = "Invisible"
@ -1351,6 +1383,96 @@
EndIf
</EventVDCancle>
<EventScanQRResult>
DEBUGVAR scanresult
DEBUGVAR scanmsg
;If scanresult = "true" Then
; Var employeeCode = scanmsg
; Open "ROOT/taobin_project/inter/aus/xml/page_payment_employee_ping
;Else
;EndIf
If scanresult = "true" Then
If Timeout < 120 Then
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup_AUS_QR.png"
Var QRCODE99 = ""
Var LOADING_STATE = "Enable"
VendingQR ON
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "coffee"
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "FZB:2/"
If Seeker.IntVendingCampaign > 0 Then
Var ECommerceQR = ECommerceQR + Seeker.VendingCode
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
EndIf
If Seeker.IntVendingCredit > 0 Then
If Seeker.IntVendingCampaign > 0 Then
Var ECommerceQR = ECommerceQR + "|"
EndIf
Var ECommerceQR = ECommerceQR + "CRD"
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.TNumberTaobinCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.IntVendingCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + PointCrm
EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
Var PayDetail2 = Seeker.PayDetail2
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 6
Refresh
EndIf
EndIf
EndIf
Else
Var scanmsg = "Please try agin"
EndIf
Var CameraState = "Invisible"
CLOSESCANQR
Refresh
</EventScanQRResult>
;include="ROOT/taobin_project/inc/video.inc"
@ -1441,7 +1563,7 @@
If alphaState = "Invisible" Then
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup8.png"
Var QR_POPUP = "/img_popup8-AUS.png"
Var alphaState = "Enable"
Coin CARD
EndIf
@ -1604,7 +1726,7 @@ EndIf
<Button>
<X> 552 </X>
<Y> 1499 </Y>
<State> "Enable" </State>
<State> "Invisible" </State>
<Filename> Var( DirImage + "/bn_pay_with_comingSoon.png") </Filename>
<FilenamePress> Var( DirImage + "/bn_pay_with_comingSoon.png") </FilenamePress>
<FilenameDisable> Var( DirImage + "/bn_pay_with_comingSoon.png") </FilenameDisable>
@ -1618,10 +1740,11 @@ EndIf
<Button>
<X> 552 </X>
<Y> 1499 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/bn_pay_with_codeOther.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/aus/image/payment_cash/bp_pay_with_codeOther.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/aus/image/payment_cash/bd_pay_with_codeOther.png" </FilenameDisable>
<State> PayState6 </State>
;<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/bn_pay_with_ema.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/aus/image/payment_cash/bp_pay_with_ema.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/aus/image/payment_cash/bd_pay_with_ema.png" </FilenameDisable>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
@ -1631,68 +1754,18 @@ EndIf
If CancelFlag = 0 Then
If alphaState = "Invisible" Then
Var QR_POPUP = "/img_popup1.png"
Var QR_POPUP = "/img_popup_ema.png"
Var QRCODE99 = ""
Var LOADING_STATE = "Enable"
Var FlagQROpened = 1
Var alphaState = "Enable"
VendingQR ON
Var scanresult = ""
Var scanmsg = ""
INITSCANQR
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CameraState = "Enable"
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "coffee"
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "FZB:2/"
If Seeker.IntVendingCampaign > 0 Then
Var ECommerceQR = ECommerceQR + Seeker.VendingCode
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
EndIf
If Seeker.IntVendingCredit > 0 Then
If Seeker.IntVendingCampaign > 0 Then
Var ECommerceQR = ECommerceQR + "|"
EndIf
Var ECommerceQR = ECommerceQR + "CRD"
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.TNumberTaobinCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + Seeker.IntVendingCredit
Var ECommerceQR = ECommerceQR + ":"
Var ECommerceQR = ECommerceQR + PointCrm
EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
Var PayDetail2 = Seeker.PayDetail2
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 1
Refresh
EndIf
EndIf
@ -1804,8 +1877,14 @@ EndIf
<Filename> Var( DirImage + "/loadingText.png" )</Filename>
</Image>
<CameraX>
<X> 50 </X>
<Y> 900 </Y>
<Name>"usbfront"</Name>
<Width> 1000 </Width>
<Height> 1000 </Height>
<State> CameraState </State>
</CameraX>
<Button>
@ -1822,6 +1901,7 @@ EndIf
Var QRErrorState = "Invisible"
Var CreditCardErrorState = "Invisible"
Var alphaState = "Invisible"
Var CameraState = "Invisible"
Var QRCODE99 = ""
If CashlessPayFlag = 1 Then
@ -2138,7 +2218,7 @@ EndIf
<X> 267 </X>
<Y> 960 </Y>
<State>QRErrorState</State>
<Filename> Var( DirImage + "/QRError.png" ) </Filename>
<Filename> Var( DirImage + QRErrorImg ) </Filename>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>

View file

@ -52,7 +52,7 @@
If CountryName = "Thailand" Then
If InternationalEnable = 1 Then
Open "ROOT/taobin_project/inter/tha/xml/page_payment_cash-THA.xml"
EndIf
EndIf
EndIf
@ -140,6 +140,10 @@
Var alphaState3 = "Invisible"
Var alphaState3_offline = "Invisible"
Var cancelButtonQRPopupState = "Invisible"
Var QRCodeImageState = "Invisible"
Var CoinInFlag = 0
;Var CoinAmount = 0
@ -599,6 +603,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -665,6 +671,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -718,6 +726,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -741,6 +751,14 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "TWN:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
@ -762,6 +780,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -785,6 +805,13 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "DOL:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
@ -806,6 +833,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -829,6 +858,13 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "LPY:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
@ -850,6 +886,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -873,6 +911,13 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "LZP:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
@ -894,6 +939,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -918,6 +965,14 @@
Var ECommerceQR = ECommerceQR + "MAX:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
@ -938,6 +993,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -962,6 +1019,14 @@
Var ECommerceQR = ECommerceQR + "WEC:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
@ -982,6 +1047,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -1005,6 +1072,13 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "ALP:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
@ -1026,6 +1100,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -1049,6 +1125,14 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "UNP:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
@ -1063,6 +1147,60 @@
Var ReqPayInfoFlag = 10
EndIf
If web_payment = "ACU" Then
Var QR_POPUP = "/img_popup22.png"
Var LOADING_STATE = "Enable"
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "coffee"
Var ECommerceQR = ""
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SelectDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "ACU:2/"
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.VendingCampaignRI3
;EndIf
Var ServiceParameter = "max"
Var ServiceCharge = 0
Var AccountType = "new"
Var testservice = "kbank"
Var tc = ""
Var GetScore = ""
Var OperatorName = ""
Var SessionID = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 11
EndIf
@ -1075,6 +1213,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
VendingQR ON
Var QRPopupOpenFlag = 1
@ -1833,6 +1973,8 @@
If Timeout >= 120 Then
Var alphaState = "Invisible"
Var cancelButtonQRPopupState = "Invisible"
Var QRCodeImageState = "Invisible"
If RoadShow = "true" Then
@ -2104,20 +2246,6 @@
Var CancelingPopupFlag = "Invisible"
Var alphaState = "Invisible"
If QRPopupOpenFlag = 1 Then
VendingQR OFF
EndIf
If ReqPayInfoFromCashOther = 2 Then
DEBUGVAR "CashlessReq OFF by user"
CashlessReq OFF
EndIf
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
EndIf
EndIf
@ -2263,6 +2391,8 @@
If CoinInFlag = 0 Then
;VendingQR OFF
Var alphaState = "Invisible"
Var cancelButtonQRPopupState = "Invisible"
Var QRCodeImageState = "Invisible"
EndIf
@ -2613,6 +2743,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -2753,6 +2885,7 @@
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Coin CARD
Var ReqPayInfoFromCashOther = 2
EndIf
@ -2941,7 +3074,7 @@ eval(
<Button>
<X> 438 </X>
<Y> 1345 </Y>
<State> alphaState </State>
<State> cancelButtonQRPopupState </State>
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
@ -2951,12 +3084,28 @@ eval(
If CancelingPopupFlag = "Invisible" Then
Var LOADING_STATE = "Invisible"
Var QRErrorState = "Invisible"
Var cancelButtonQRPopupState = "Invisible"
Var QRCodeImageState = "Invisible"
Var QRCODE99 = ""
;CoinVending ON
Var CancelingPopupFlag = "Enable"
Var CancelingPopupCountDown = 0
If QRPopupOpenFlag = 1 Then
VendingQR OFF
EndIf
If ReqPayInfoFromCashOther = 2 Then
DEBUGVAR "CashlessReq OFF by user"
CashlessReq OFF
EndIf
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
Refresh
EndIf
</EventClick>
@ -3244,7 +3393,7 @@ eval(
<Y> 958 </Y>
<Width> 200 </Width>
<Height> 200 </Height>
<State> alphaState </State>
<State> QRCodeImageState </State>
<Service> testservice </Service>
</QRCode>

View file

@ -184,6 +184,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -207,7 +209,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "TWN:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -251,6 +253,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -274,7 +278,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "KBA:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -317,6 +321,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -340,7 +346,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "LPY:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -386,6 +392,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -409,7 +417,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "AIR:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -452,6 +460,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -475,7 +485,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "MAX:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -518,6 +528,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -541,7 +553,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "WEC:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -585,6 +597,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -608,7 +622,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "KBA:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -653,6 +667,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -676,7 +692,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "ALP:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -720,6 +736,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -743,7 +761,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "UNP:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -772,6 +790,7 @@
<Button>
<X> 208 </X>
<Y> 1413 </Y>
;<State> WalletEnable </State>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_cashACU.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_cashACU.png" </FilenamePress>
@ -788,6 +807,8 @@
Var FlagQROpened = 1
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
;CoinVending OFF
VendingQR ON
Var QRPopupOpenFlag = 1
@ -811,7 +832,7 @@
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "ACU:2/"
;If IntVendingCampaign > 0 Then
;If Seeker.IntVendingCampaign > 0 Then
; Var ECommerceQR = ECommerceQR + Seeker.VendingCode
; Var ECommerceQR = ECommerceQR + ":"
; Var ECommerceQR = ECommerceQR + Seeker.CodeNumber
@ -897,6 +918,8 @@
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Var cancelButtonQRPopupState = "Enable"
Var QRCodeImageState = "Enable"
Coin CARD
Var ReqPayInfoFromCashOther = 2
Open "ROOT/taobin_project/xml/page_payment_cash.xml"

View file

@ -212,6 +212,10 @@
Var alphaPasswordPromptWithKeyboard = "Invisible"
Var alphaPasswordPrompt = "Invisible"
Var tmpPassPhrase = PassPhrase
DEBUGVAR tmpPassPhrase
Var PassPhrase = ""
Var HiddenPassPhrase = ""
@ -239,6 +243,10 @@
Var alphaPasswordPromptWithKeyboard = "Invisible"
Var alphaPasswordPrompt = "Invisible"
Var tmpPassPhrase = PassPhrase
DEBUGVAR tmpPassPhrase
Var PassPhrase = ""
Var HiddenPassPhrase = ""
@ -950,10 +958,6 @@
; CallCMDFromXML
__CMD "check-password" PassPhrase "-" "-"
Var tmpPassPhrase = PassPhrase
Var PassPhrase = ""
Var HiddenPassPhrase = ""
Var WaitPopup = "Enable"
</EventClick>