pakin/taobin_project
1
0
Fork 0
Code Issues Pull requests Projects 1 Releases 1 Packages Wiki Activity Actions

Merge branch 'masterpiece' of ssh://192.168.10.159:/1TBHDD/ikong/taobin_project into masterpiece

Browse source
This commit is contained in:
wanlop run 2024-11-28 16:17:50 +07:00
commit d57ec5db0e
22 changed files with 1235 additions and 707 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
image/page_payment_en/page_payment/img_popup_ema.png
View file

Binary file not shown.
Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 17 KiB

After

Width:  |  Height:  |  Size: 15 KiB

Before After
Before After

BIN
image/page_payment_en/page_payment/img_popup_ema_error.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 10 KiB

BIN
image/page_payment_en/page_payment/img_popup_ema_success.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 14 KiB

0
inter/aus/image/payment_cash/bd_eam_enter_code.png → inter/aus/image/payment_cash/bd_ema_enter_code.png
View file

Side by side Swipe Overlay

Before

Width:  |  Height:  |  Size: 3.7 KiB

After

Width:  |  Height:  |  Size: 3.7 KiB

Before After
Before After

BIN
inter/aus/image/payment_cash/bd_try_again.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 2.7 KiB

BIN
inter/aus/image/payment_cash/bn_try_again.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.4 KiB

BIN
inter/aus/image/payment_cash/bp_try_again.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.4 KiB

BIN
inter/aus/image/payment_cash/edit_border.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 2.6 KiB

BIN
inter/aus/image/payment_cash/ema_member_icon.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 3.5 KiB

BIN
inter/aus/image/payment_cash/enter_ema_number_text.png Normal file
View file

Binary file not shown.
Side by side

After

Width:  |  Height:  |  Size: 8.8 KiB

2
inter/aus/xml/page_catalog_group_other.lxml
View file

@ -897,7 +897,7 @@
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var DescLang[0][5] = ""
Var NameLang[1][0] = "FLYING TURTLE\nENERGY DRINK SODA"
Var NameLang[1][0] = "FLYING TURTLE ENERGY DRINK SODA"
Var NameLang[1][1] = "เต่าทรงพลังโซดา"
Var NameLang[1][2] = ""
Var NameLang[1][3] = ""

2
inter/aus/xml/page_catalog_group_recommend.lxml
View file

@ -11580,7 +11580,7 @@
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var DescLang[0][5] = ""
Var NameLang[1][0] = "FLYING TURTLE\nENERGY DRINK SODA"
Var NameLang[1][0] = "FLYING TURTLE ENERGY DRINK SODA"
Var NameLang[1][1] = "เต่าทรงพลังโซดา"
Var NameLang[1][2] = ""
Var NameLang[1][3] = ""

2
inter/aus/xml/page_catalog_group_recommend_multi_pro.lxml
View file

@ -11557,7 +11557,7 @@
Var DescLang[0][3] = ""
Var DescLang[0][4] = ""
Var DescLang[0][5] = ""
Var NameLang[1][0] = "FLYING TURTLE\nENERGY DRINK SODA"
Var NameLang[1][0] = "FLYING TURTLE ENERGY DRINK SODA"
Var NameLang[1][1] = "เต่าทรงพลังโซดา"
Var NameLang[1][2] = ""
Var NameLang[1][3] = ""

166
inter/aus/xml/page_collect_point_1.lxml
View file

@ -20,7 +20,7 @@
Var TimeOutPlay = 0
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage = "ROOT/taobin_project/image/collect_point1_en"
;Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
@ -53,7 +53,7 @@
Var CampaingRef1 = ""
Var CampaingRef2 = ""
SUBSTRING CampaingRef 0 6 CampaingRef1
SUBSTRING CampaingRef 12 18 CampaingRef2
@ -61,13 +61,13 @@
Var CampaingRef1 = CampaingRef1 + CampaingRef2
Var ParamCP = ParamCP + CampaingRef1
If Seeker.TNumberTaobinCredit = "" Then
If web_telnumOK = "" Then
If show_eng = "true" Then
If show_eng = "true" Then
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Else
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
@ -78,7 +78,7 @@
Var StepGetPoint = 1
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
@ -98,15 +98,15 @@
AddData 45 TelPhoneNum drink_price param2 param3
EndIf
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
GETACCEXT Param1 23
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_2.lxml"
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_2.lxml"
EndIf
Else
@ -124,7 +124,7 @@
Var StepGetPoint = 1
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
@ -133,15 +133,15 @@
SAVELOG "collect_point1-p71."
Var TelephoneNumberX = TelephoneNumber
DEBUGVAR TelephoneNumber
;GetAccInfo TelephoneNumber OperatorTemp CreditAmount OperatorStatus AccountType GetScore tc
Var Param1 = TelephoneNumber + "/"
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
GETACCEXT Param1 23
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_2.lxml"
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_2.lxml"
EndIf
@ -149,24 +149,24 @@
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
<EventTimeout>
Var CountDownBrewing = BREW_CNT
Var ShowCountDownBrewing = CountDownBrewing
StrLen TelephoneNumber TelNumLen
If TelNumLen > 0 Then
Var ShowTextNumber = "Invisible"
Else
; Add
Var TimeOutPlay = TimeOutPlay + 1
If TimeOutPlay > 10 Then
Var TimeOutPlay = 0
If show_eng = "true" Then
If show_eng = "true" Then
Play "ROOT/taobin_project/sound_eng/Reward_final.mp3"
Else
Play "ROOT/taobin_project/sound_thai/dontforget_number.mp3"
@ -175,17 +175,17 @@
;
EndIf
DEBUGVAR Timeout
Var Timeout = Timeout + 1
If Timeout > 30 Then
SAVELOG "collect_point1-p107."
;Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
If Timeout = 18 Then
@ -203,7 +203,7 @@
Refresh
TimerReset
</EventTimeout>
</EventTimeout>
@ -229,13 +229,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "1"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -245,9 +245,9 @@
TimerReset
Refresh
</EventClick>
</Button>
@ -259,13 +259,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "2"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -284,13 +284,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "3"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -309,13 +309,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "4"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -334,13 +334,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "5"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -359,13 +359,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "6"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -384,13 +384,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "7"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -409,13 +409,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "8"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -434,13 +434,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "9"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -449,7 +449,7 @@
TimerReset
Refresh
</EventClick>
</Button>
@ -460,13 +460,13 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Var TelephoneNumber = TelephoneNumber + "0"
Trim TelephoneNumber MaxPhoneNumber
StrLen TelephoneNumber TelNumLen
If TelNumLen >= MinPhoneNumber Then
If TelNumLen >= MinPhoneNumber Then
Var Tel_Confirm_State = "Enable"
EndIf
@ -485,24 +485,24 @@
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
Var Timeout = 0
Trim TelephoneNumber -1
StrLen TelephoneNumber TelNumLen
If TelNumLen < 10 Then
If TelNumLen < 10 Then
Var Tel_Confirm_State = "Invisible"
EndIf
If TelNumLen = 0 Then
If TelNumLen = 0 Then
Var ShowTextNumber = "Enable"
EndIf
TimerReset
Refresh
</EventClick>
</Button>
@ -526,11 +526,11 @@
<FilenamePress> Var( DirImage + "/bp_negative.png") </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
; goto lid straw
;Open "ROOT/taobin_project/xml/page_catalog.xml"
;Open "ROOT/taobin_project/xml/page_catalog.xml"
SAVELOG "collect_point1-p589."
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
</EventClick>
</Button>
@ -545,9 +545,9 @@
<FilenameDisable> Var( DirImage + "/bn_positive.png") </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
<EventClick>
If Tel_Confirm_Flag = 1 Then
@ -563,7 +563,7 @@
Var StepGetPoint = 1
Var PdpaAsk = 0
Var OperatorTemp = ""
Var CreditAmount = 0
Var OperatorStatus = ""
@ -582,25 +582,25 @@
AddData 45 TelPhoneNum drink_price param2 param3
EndIf
If ChildrenFree = 1 Then
Var Seeker.TNumberTaobinMember = TelephoneNumber
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
Open "ROOT/taobin_project/xml/page_lid_straw.xml"
EndIf
Var Param1 = TelephoneNumber + "/"
Var Param1 = TelephoneNumber + "/"
Var Param1 = Param1 + ParamCP
GETACCEXT Param1 23
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_2.lxml"
Open "ROOT/taobin_project/inter/aus/xml/page_collect_point_2.lxml"
Else
Else
If show_eng = "true" Then
If show_eng = "true" Then
Var DirImage2 = "ROOT/taobin_project/image/collectiing_en"
Else
Var DirImage2 = "ROOT/taobin_project/image/collectiing"
@ -613,7 +613,7 @@
Var Tel_Confirm_State = "Invisible"
Refresh
EndIf
@ -635,6 +635,12 @@
<Filename> Var( DirImage + "/text_edit.png") </Filename>
</Image>
<Image>
<X> 236 </X>
<Y> 699 </Y>
<Filename> Var( DirImage + "/text_2.png") </Filename>
</Image>
;include="ROOT/taobin_project/inc/video.inc"
@ -670,11 +676,11 @@
<State> ShowErrorText </State>
<Filename> text_show_error </Filename>
</Image>
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
<EventSecurity>
Open "/media/bt/xml/security_alarm.xml"
</EventSecurity>
<EventMachine>
If MachineStage = "drink-success" Then

1
inter/aus/xml/page_member_topup.lxml
View file

@ -261,6 +261,7 @@
<Button>
<X> 287 </X>
<Y> 778 </Y>
<State> "Disable" </State>
<Filename> Var( DirImage2 + "/bn_fatzebra.png" ) </Filename>
<FilenamePress> Var( DirImage2 + "/bp_fatzebra.png" ) </FilenamePress>
<FilenameDisable> Var( DirImage2 + "/bd_fatzebra.png" ) </FilenameDisable>

336
inter/aus/xml/page_payment_with_ema.lxml Normal file
View file

@ -0,0 +1,336 @@
<Popup>
<Cache> "Enable" </Cache>
<Width> 1080 </Width>
<Height> 1920 </Height>
<Background> "0xeae6e1" </Background>
<Sound> PlaySoundCodeLang </Sound>
<Volume> SoundVolume </Volume>
<Refresh> "Partial" </Refresh>
<EventOpen>
Var Timeout = 0
Var EMAMemberID = ""
Var Tel_Confirm_State = "Invisible"
</EventOpen>
<Timeout> 1000 </Timeout>
<EventTimeout>
Var Timeout = Timeout + 1
If Timeout > 30 Then
SAVELOG "page_payment_with_ema > timeout"
Var EMAMemberID = ""
Open "ROOT/taobin_project/xml/page_payment_cash-AUS.xml"
EndIf
</EventTimeout>
<Image>
<X> 0 </X>
<Y> 380 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/alpha.png" </Filename>
</Image>
<Image>
<X> 158 </X>
<Y> 665 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/img_popup1.png" </Filename>
</Image>
<Image>
<X> 302 </X>
<Y> 710 </Y>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/enter_ema_number_text.png" </Filename>
</Image>
<Image>
<X> 217 </X>
<Y> 830 </Y>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/edit_border.png" </Filename>
</Image>
<Image>
<X> 273 </X>
<Y> 837 </Y>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/ema_member_icon.png" </Filename>
</Image>
<Text>
<X> 255 </X>
<Y> 856 </Y>
<Refresh> "Enable" </Refresh>
<Width> 570 </Width>
<Font> KanitRegularTTF </Font>
<Size> 48 </Font>
<Color> 0x000000 </Color>
<Align> center-vertical-horizontal </Align>
<Value> EMAMemberID </Value>
</Text>
<Button>
<X> 333 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "1"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_2.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_2.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "2"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1004 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_3.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_3.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "3"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_4.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_4.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "4"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_5.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_5.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "5"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1148 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_6.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_6.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "6"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 333 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_7.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_7.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "7"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_8.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_8.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "8"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1292 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_9.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_9.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "9"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 477 </X>
<Y> 1436 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_0.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_0.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Var EMAMemberID = EMAMemberID + "0"
Trim EMAMemberID 8
TimerReset
Refresh
StrLen EMAMemberID IDNumLen
If IDNumLen >= 8 Then
Var Tel_Confirm_State = "Enable"
EndIf
</EventClick>
</Button>
<Button>
<X> 620 </X>
<Y> 1436 </Y>
<Filename> "ROOT/taobin_project/image/collectiing/bn_back-1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_back-1.png" </FilenamePress>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var Timeout = 0
Trim EMAMemberID -1
Var Tel_Confirm_State = "Invisible"
TimerReset
Refresh
</EventClick>
</Button>
<Button>
<X> 218 </X>
<Y> 1623 </Y>
<Filename> "ROOT/taobin_project/image/collectiing_en/bn_back.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing_en/bn_back.png" </FilenamePress>
<EventClick>
Var EMAMemberID = ""
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
</EventClick>
</Button>
<Button>
<X> 577 </X>
<Y> 1623 </Y>
<Refresh> "Enable" </Refresh>
<State> Tel_Confirm_State </State>
<Filename> "ROOT/taobin_project/image/collectiing_en/bn_confirm.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing_en/bp_confirm.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing_en/bp_confirm.png" </FilenameDisable>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
</EventClick>
</Button>
</Popup>

889
inter/aus/xml/page_topping_select6.lxml
View file

File diff suppressed because it is too large Load diff

47
ui/lang.tsv
View file

@ -95,7 +95,7 @@
000073 Pay now ซื้อเลย 现在付款 Pay now ဝယ်မယ်
Font=Kanit,Type=Regular,Size=36,Color=0x746253 Font=Kanit,Type=Regular,Size=36,Color=0x746253 Font=Kanit,Type=Regular,Size=36,Color=0x746253 Font=Kanit,Type=Regular,Size=36,Color=0x746254
Font=Kanit,Type=Regular,Size=36,Color=0xFFFFFF Font=Kanit,Type=Regular,Size=36,Color=0xFFFFFF Font=Kanit,Type=Regular,Size=36,Color=0xFFFFFF Font=Kanit,Type=Regular,Size=36,Color=0xFFFFFF
000074 Cancel ยกเลิก 取消 Cancel ပယ်ဖျက်ပါ။
000074 Cancel ยกเลิก 取消 Cancel ပယ်ပါ
Font=Kanit,Type=Light,Size=36,Color=0xFF0000 Font=Kanit,Type=Light,Size=36,Color=0xFF0000 Font=Kanit,Type=Light,Size=36,Color=0xFF0000 Font=Kanit,Type=Light,Size=36,Color=0xFF0001
000075 Please choose drink type โปรดเลือกประเภทเครื่องดื่ม Please choose drink type
@ -138,6 +138,10 @@
000109 Just Right กำลังพอดี လိုက်လျော
000110 Dark เข้ม ပြင်း
000111 Darker เข้มกว่า ပိုပြင်း
Font=Kanit,Type=Regular,Size=36,Color=0xDE794E,LineHeight=46 Font=Kanit,Type=Regular,Size=36,Color=0xDE794E,LineHeight=46 Font=Kanit,Type=Regular,Size=36,Color=0x513C2F,LineHeight=46 Font=Kanit,Type=Regular,Size=36,Color=0xDE794E,LineHeight=46
000112 Alternative Milk นมทางเลือก အစားထိုးနို့
Font=Kanit,Type=Regular,Size=36,Color=0x513C2F,LineHeight=46 Font=Kanit,Type=Regular,Size=36,Color=0x513C2F,LineHeight=46 Font=Kanit,Type=Regular,Size=36,Color=0x513C2F,LineHeight=46 Font=Kanit,Type=Regular,Size=36,Color=0x513C2F,LineHeight=46
000113 Oat milk\n[100% PLANT-BASED from Australian oats, No artificial colour or flavors, No preservatives, rich in dietary fiber.###Font=KanitLight,Size=15] นมโอ๊ต\n[100% PLANT-BASED นมโอ๊ต 94% น้ำมันมะพร้าว 6% ทำจากโอ๊ตออสเตรเลีย ไม่แต่งรสหรือใส่สีสังเคราะห์ ไม่ใส่วัตถุกันเสีย###Font=KanitLight,Size=15] 添加 1 杯浓缩咖啡将使您的定制饮品的处理时间延长 1 分钟。 1 Shot of Espresso\n[1 minutes will be added to the process.###Font=KanitLight,Size=15] Oat နို့\n[Australian oats မှ၊ အတုမရှိ အရောင်နှင့် အရသာမရှိ၊ ကြာရှည်ခံဆေးမရှိ၊ အမျှင်ဓာတ်ကြွယ်ဝသော###Font=KanitLight,Size=15]
@ -214,16 +218,11 @@
Page_before_check_member
Font=Montserrat,Type=Bold,Size=48,Color=0x513C2F,Align=Center,LineHeight=72 Font=Kanit,Type=Bold,Size=48,Color=0x513C2F,Align=Center,LineHeight=72 Font=Kanit,Type=Medium,Size=64,Color=0x513C2F,Align=Center Font=Montserrat,Type=Bold,Size=64,Color=0x513C2F,Align=Center Font=Montserrat,Type=Bold,Size=64,Color=0x513C2F,Align=Center Font=Montserrat,Type=Bold,Size=64,Color=0x513C2F,Align=Center,LineHeight=86
002001 Please enter your mobile number\nto topup Tao bin credit. กรุณาใส่เบอร์มือถือ\nเพื่อเติมเต่าบินเครดิต Tao bin ခရက်ဒစ်ငွေဖြည့်ရန်\nသင့်မိုဘိုင်းနံပါတ်ကို ထည့်သွင်းပါ။
002002 Please enter your mobile number\nto check reward point. กรุณาใส่เบอร์มือถือ\nเพื่อเช็กคะแนนสะสมของคุณ ဆုလာဘ်အမှတ်ကို စစ်ဆေးရန်\nသင့်မိုဘိုင်းနံပါတ်ကို ထည့်သွင်းပါ။
002003 Please enter your mobile number\nto change password. กรุณาใส่เบอร์มือถือ\nเพื่อเปลี่ยนรหัสผ่าน စကားဝှက်ပြောင်းရန်\nသင့်မိုဘိုင်းနံပါတ်ကို ထည့်ပါ။
@ -741,12 +740,12 @@
800634 OK รับทราบ
800635 Main Disc Not Close!!! ฐานจานหมุนไม่ได้ล็อค!!!
800636 Main Disc lock may loose, Please lock Main Disc before Full Test. ฐานจานหมุนอาจหลวม หรือลืมล็อค
800637 Powder Disc ตำแหน่งผง
800637 Powder ตำแหน่งผง
800638 ICE น้ำแข็ง
800639 Door Cup ประตูรับแก้ว
800639 Door cup ประตูรับแก้ว
800640 Powder Channel (falling powder!) ชุดผง (ช่องจ่าย) (ผงหล่น!)
800641 Arm Disc ตำแหน่งแขน
800642 Door Lid/Straw ประตูรับหลอดรับฝา
800641 Arm module switch ตำแหน่งแขน
800642 Door lid/straw ประตูรับหลอดรับฝา
800643 Whipper หัวชง
800644 Start เริ่ม
800645 Cancel ยกเลิก
@ -756,18 +755,18 @@
800649 Fail ล้มเหลว
800650 Testing List : รายการทดสอบ :
800651 Connection การสื่อสาร
800652 Tray ถาดกาแฟ
800653 ESP Module ตำแหนงเครื่องอัดกาแฟ
800654 Main Gate Switch สวิทช์ประตู Main
800655 Module Arm Switch สวิทช์ Module แขน
800656 Guard Bean Coffee Switch สวิทช์ Guard Bean กาแฟ
800652 Coffee: tray ถาดกาแฟ
800653 Coffee: press ตำแหนงเครื่องอัดกาแฟ
800654 Front Door สวิทช์ประตู Main
800655 Module Disc สวิทช์ Module แขน
800656 Coffee: guard สวิทช์ Guard Bean กาแฟ
800657 Degree องศา
800658 Coarse หยาบ
800659 Fine ละเอียด
800660 Bucket กระบะ
800661 Shutter ชัตเตอร์
800662 Motor แกนมอเตอร์
800663 Whipper clean water น้ำล้างหัวชง
Test (New UI)
800700 Active ทำงาน
@ -997,7 +996,7 @@
1000002 Full test ทดสอบทั้งระบบ
1000003 All ทั้งหมด
1000004 Main Test ทดสอบหลัก
1000005 Cup & Arms, Coffee, Whipper, Powder, Door cup, Door lid, Front door, Module disc แก้ว & แขน, กาแฟ, หัวชง, ผง, ประตูแก้ว, ประตูฝา, ประตูหน้า, ฐานจานหมุน
1000005 Cup & Arms, Coffee, Whipper, Powder, Door cup, Door lid, Front door, Module disc, Water clean whipper แก้ว & แขน, กาแฟ, หัวชง, ผง, ประตูแก้ว, ประตูฝา, ประตูหน้า, ฐานจานหมุน, น้ำล้างหัวชง
1000006 Ice Test ทดสอบน้ำแข็ง
1000007 Bucket, Shutter, Motor ถัง, ชัตเตอร์, มอเตอร์
1000008 Connection Test ทดสอบการสื่อสาร
@ -1075,7 +1074,7 @@
1300003 Beans module ชุดเมล็ดกาแฟ
1300004 Bean tray ถาดใส่เมล็ดกาแฟ
1300005 Switch tray : สวิตซ์ถาด :
1300006 Check tray shutter ตรวจสอบชัตเตอร์ถาด
1300006 Check tray shutter ตรวจสอบชัตเตอร์ของถาด
1300007 Pay beans จ่ายถั่ว
1300008 1. Select beans 1. เลือกเมล็ดกาแฟ
1300009 2. Select direction 2. เลือกทิศทาง
@ -1088,7 +1087,7 @@
1300016 Brew time:sec เวลาชง: วินาที
1300017 Test grind sizes ทดสอบขนาดบด
1300018 Coffee module type : ประเภทชุดกาแฟ :
1300019 1. Select grind sizes 1. เลือกขนาดการบด
1300019 1. Select grind sizes 1. เลือกขนาดบด
1300020 More coarse หยาบขึ้น
1300021 More fine ละเอียดขึ้น
1300022 2. Test grinding 2. ทดสอบการบด

Can't render this file because it has a wrong number of fields in line 21.

2
xml/event/tricker.ev
View file

@ -340,7 +340,7 @@ If BoxID = 105005 Then
Var WeekdayDiscountProEventOn = 0
Var OreoDiscount11Pro = 0
Var HappyTriosPro = 0
Var 12Day12MenuPro = 0
Var 12Day12MenuPro = 1
Var WinterWonderPro = 1
Var ThickTeaByBrewerPro = 1

12
xml/page_payment.xml
View file

@ -14,6 +14,16 @@
Var IndoQR = 0
Var EnableCashOtherAll = "true"
Var TWN_CashOtherEnable = ""
Var KBA_CashOtherEnable = ""
Var LPY_CashOtherEnable = ""
Var AIR_CashOtherEnable = ""
Var MAX_CashOtherEnable = ""
Var WEC_CashOtherEnable = ""
Var ALP_CashOtherEnable = ""
Var UNP_CashOtherEnable = ""
Var ACU_CashOtherEnable = ""
Var GetPayInfoFlag = 0
@ -132,6 +142,8 @@
Var Seeker.IntVendingCredit = 0
Var EMAMemberID = ""
Var Seeker.StoreCreditFlag = 0
Var Seeker.pageStoreCredit0 = 0
Var Seeker.TNumberTaobinCredit = ""

481
xml/page_payment_cash-AUS.xml
View file

@ -84,12 +84,17 @@
; Below original
; On open
Var popup_cancel_button_y = 1345
Var PopupCancelButtonState = "Invisible"
Var cancelState = "Invisible"
Var CameraState = "Invisible"
Var EMAEnterNumberButtonState = "Invisible"
Var EMAPopupSuccessState = "Invisible"
Var EMAPopupErrorState = "Invisible"
Var alphaState = "Invisible"
Var alphaState2 = "Invisible"
@ -427,6 +432,87 @@
Var PayState5 = "Invisible"
Var PayState6 = "Invisible"
EndIf
If EMAMemberID = "" Then
Else
Var CameraState = "Invisible"
Var alphaState = "Enable"
Var PopupCancelButtonState = "Enable"
Var EMAEnterNumberButtonState = "Disable"
Var popup_cancel_button_y = 1390
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup_ema.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 + "AUB:2:"
Var ECommerceQR = ECommerceQR + EMAMemberID
Var ECommerceQR = ECommerceQR + "/"
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
</EventOpen>
<EventActionOk>
@ -451,10 +537,12 @@
VendingQR OFF
CoinVending OFF
If ReqPayInfoFlag2 = 0 Then
Var Seeker.CampaignPayChanel = "unknown"
EndIf
If ReqPayInfoFlag2 = 1 Then
DEBUGVAR VendingBank
Var Seeker.CampaignPayChanel = "malaymbb"
Var Seeker.CampaignPayChanel = "fatzebra"
EndIf
If ReqPayInfoFlag2 = 2 Then
Var Seeker.CampaignPayChanel = "shopee"
@ -468,6 +556,9 @@
If ReqPayInfoFlag2 = 5 Then
Var Seeker.CampaignPayChanel = "linepay"
EndIf
If ReqPayInfoFlag2 = 6 Then
Var Seeker.CampaignPayChanel = "aubpay"
EndIf
@ -514,57 +605,6 @@
EndIf
If VendingQRTypeResult = "MBB:2" Then
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var QRCODE99KBANK = SessionID
Var QRCODE99KBANK = QRCODE99KBANK + Ext1a
SAVELOG Ext1a
SAVELOG QRCODE99KBANK
Var QRCODE99KBANK = QRCODE99KBANK + Ext21
Var QRCODETMP = QRCODE99KBANK
Var ReqPayInfoFlag = 0
Var ReqPayInfoFlag2 = 1
SAVELOG QRCODE99KBANK
SAVELOG Ext21
Var QRCODE99 = QRCODE99KBANK
Var LOADING_STATE = "Invisible"
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_mobile.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_mobile.mp3"
EndIf
EndIf
If VendingQRTypeResult = "IND:2" Then
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var QRCODE99KBANK = SessionID
Var QRCODE99KBANK = QRCODE99KBANK + Ext1a
SAVELOG Ext1a
SAVELOG QRCODE99KBANK
Var QRCODE99KBANK = QRCODE99KBANK + Ext21
Var QRCODETMP = QRCODE99KBANK
Var ReqPayInfoFlag = 0
Var ReqPayInfoFlag2 = 1
SAVELOG QRCODE99KBANK
SAVELOG Ext21
Var QRCODE99 = QRCODE99KBANK
Var LOADING_STATE = "Invisible"
If show_eng = "true" Then
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Please_scan_to_pay_via_e-wallet.mp3"
Else
PlayLong "/mnt/sdcard/coffeevending/taobin_project/sound_thai/Please_scan_to_pay_via_e-wallet.mp3"
EndIf
EndIf
EndIf
If ReqPayInfoFlag = 2 Then
@ -671,27 +711,37 @@
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
If ReqPayInfoFlag = 6 Then
; Var employeeName = "Jhon"
; Var
SPLIT ECommerceQR "/" 6 MemberData
; ;Var QRCODE99 = QRCODE99Shoppy
; Var LOADING_STATE = "Invisible"
; EndIf
;EndIf
If VendingQRTypeResult = "AUB" Then
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var ReqPayInfoFlag = 0
Var ReqPayInfoFlag2 = 6
SAVELOG QRCODE99Shoppy
SAVELOG Ext21
SPLIT MemberData ":" 1 _EMAMemberName
SPLIT MemberData ":" 2 EMAMemberSurname
SPLIT MemberData ":" 3 _EMAMemberBalance
Var EMAMemberName !assigned SprintFmt("[%s]", _EMAMemberName)
Var EMAMemberBalance !assigned SprintFmt("Remain Balance: $%s", _EMAMemberBalance)
DEBUGVAR EMAMemberName
DEBUGVAR EMAMemberSurname
DEBUGVAR EMAMemberBalance
Var QR_POPUP = "/img_popup_ema_success.png"
Var EMAPopupSuccessState = "Enable"
Var EMAEnterNumberButtonState = "Invisible"
Var PopupCancelButtonState = "Invisible"
Var EMAEnterNumberButtonState = "Invisible"
EndIf
EndIf
Else
Var PayInfoCFlag = 1
@ -762,12 +812,22 @@
Var LOADING_STATE = "Invisible"
EndIf
EndIf
If ReqPayInfoFlag = 5 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 QR_POPUP = "/img_popup_ema_error.png"
Var EMAPopupErrorState = "Enable"
Var EMAEnterNumberButtonState = "Invisible"
Var LOADING_STATE = "Invisible"
Var popup_cancel_button_y = 1225
EndIf
EndIf
Else
@ -806,6 +866,7 @@
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var alphaState = "Enable"
Var PopupCancelButtonState = "Enable"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
@ -851,26 +912,25 @@
Var Timeout = Timeout + 1
If Timeout >= 120 Then
Var alphaState = "Invisible"
If Timeout >= 120 Then
Var alphaState = "Invisible"
Var PopupCancelButtonState = "Invisible"
Var CameraState = "Invisible"
Var EMAEnterNumberButtonState = "Invisible"
Var EMAPopupErrorState = "Invisible"
If CameraState = "Enable" Then
Var CameraState = "Invisible"
EndIf
If RoadShow = "true" Then
Else
Var PayState3 = "Disable"
Var PayState5 = "Disable"
Var PayState6 = "Disable"
EndIf
If RoadShow = "true" Then
Else
Var PayState3 = "Disable"
Var PayState5 = "Disable"
Var PayState6 = "Disable"
EndIf
Var LOADING_STATE = "Invisible"
Var QRErrorState = "Invisible"
Var CreditCardErrorState = "Invisible"
EndIf
EndIf
If Timeout > 210 Then
@ -1228,6 +1288,7 @@
If CoinInFlag = 0 Then
;VendingQR OFF
Var alphaState = "Invisible"
Var PopupCancelButtonState = "Invisible"
EndIf
@ -1292,10 +1353,6 @@
If CoinInOK = 0 Then
Var RemainAmount = PayAmount - CoinAmount
Var RemainAmount = RemainAmount - Seeker.IntVendingCampaign
Var RemainAmount = RemainAmount - Seeker.IntVendingCredit
@ -1388,82 +1445,90 @@
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"
StrLen scanmsg textLen
If textLen = 8 Then
VendingQR ON
Var EMAMemberID = scanmsg
Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
If Timeout < 120 Then
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup_ema.png"
Var QRCODE99 = ""
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 LOADING_STATE = "Enable"
Var EMAEnterNumberButtonState = "Disable"
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
VendingQR ON
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 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 + "AUB:2:"
Var ECommerceQR = ECommerceQR + EMAMemberID
Var ECommerceQR = ECommerceQR + "/"
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 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
Var PayDetail2 = Seeker.PayDetail2
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 6
Refresh
EndIf
EndIf
EndIf
Else
Var QR_POPUP = "/img_popup_ema_error.png"
Var EMAPopupErrorState = "Enable"
Var alphaState = "Enable"
Var LOADING_STATE = "Invisible"
Var EMAEnterNumberButtonState = "Invisible"
Var popup_cancel_button_y = 1225
EndIf
Else
Var scanmsg = "Please try agin"
EndIf
Var CameraState = "Invisible"
@ -1565,6 +1630,7 @@ If alphaState = "Invisible" Then
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup8-AUS.png"
Var alphaState = "Enable"
Var PopupCancelButtonState = "Enable"
Coin CARD
EndIf
EndIf
@ -1636,9 +1702,10 @@ EndIf
</Button>
<Button>
<X> 328 </X>
<X> 552 </X>
<Y> 1499 </Y>
<State> PayState3</State>
;<State> PayState3</State>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/bn_pay_qrcode.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/aus/image/payment_cash/bp_pay_qrcode.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/aus/image/payment_cash/bd_pay_qrcode.png" </FilenameDisable>
@ -1658,6 +1725,7 @@ EndIf
Var FlagQROpened = 1
Var alphaState = "Enable"
Var PopupCancelButtonState = "Enable"
VendingQR ON
@ -1726,7 +1794,7 @@ EndIf
<Button>
<X> 552 </X>
<Y> 1499 </Y>
<State> "Invisible" </State>
<State> "Enable" </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>
@ -1738,7 +1806,7 @@ EndIf
</Button>
<Button>
<X> 552 </X>
<X> 328 </X>
<Y> 1499 </Y>
<State> PayState6 </State>
;<State> "Invisible" </State>
@ -1759,12 +1827,18 @@ EndIf
Var FlagQROpened = 1
Var alphaState = "Enable"
Var PopupCancelButtonState = "Enable"
Var EMAPopupErrorState = "Invisible"
Var scanresult = ""
Var scanmsg = ""
Var EMAMemberID = ""
INITSCANQR
Var CameraState = "Enable"
Var EMAEnterNumberButtonState = "Enable"
Var popup_cancel_button_y = 1390
Refresh
EndIf
@ -1878,19 +1952,92 @@ EndIf
</Image>
<CameraX>
<X> 50 </X>
<X> 120 </X>
<Y> 900 </Y>
<Name>"usbfront"</Name>
<Width> 1000 </Width>
<Height> 1000 </Height>
<Width> 850 </Width>
<Height> 800 </Height>
<State> CameraState </State>
</CameraX>
<Button>
<X> 398 </X>
<Y> 1275 </Y>
<State> EMAEnterNumberButtonState </State>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/bn_ema_enter_code.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/aus/image/payment_cash/bp_ema_enter_code.png" </FilenamePress>
<FilenamePress> "ROOT/taobin_project/inter/aus/image/payment_cash/bd_ema_enter_code.png" </FilenamePress>
<EventClick>
Open "ROOT/taobin_project/inter/aus/xml/page_payment_with_ema.lxml"
</EventClick>
</Button>
<Text>
<X> 249 </X>
<Y> 1186 </Y>
<State> EMAPopupSuccessState </State>
<Width> 583 </Width>
<Font> KanitLightTTF </Font>
<Size> 40 </Size>
<Color> 0x513C2F </Color>
<Align> center-vertical-horizontal </Align>
<Value> EMAMemberName </Value>
</Text>
<Text>
<X> 249 </X>
<Y> 1233 </Y>
<State> EMAPopupSuccessState </State>
<Width> 583 </Width>
<Font> KanitLightTTF </Font>
<Size> 40 </Size>
<Color> 0x513C2F </Color>
<Align> center-vertical-horizontal </Align>
<Value> EMAMemberBalance </Value>
</Text>
<Button>
<X> 402 </X>
<Y> 1080 </Y>
<State> EMAPopupErrorState </State>
<Filename> "ROOT/taobin_project/inter/aus/image/payment_cash/bn_try_again.png" </Filename>
<FilenamePress> "ROOT/taobin_project/inter/aus/image/payment_cash/bp_try_again.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/inter/aus/image/payment_cash/bd_try_again.png" </FilenameDisable>
<EventClick>
If Timeout < 120 Then
If CoinInFlag = 0 Then
If CancelFlag = 0 Then
Var QR_POPUP = "/img_popup_ema.png"
Var QRCODE99 = ""
Var FlagQROpened = 1
Var alphaState = "Enable"
Var PopupCancelButtonState = "Enable"
Var EMAPopupErrorState = "Invisible"
Var scanresult = ""
Var scanmsg = ""
Var EMAMemberID = ""
INITSCANQR
Var CameraState = "Enable"
Var EMAEnterNumberButtonState = "Enable"
Var popup_cancel_button_y = 1390
Refresh
EndIf
EndIf
EndIf
</EventClick>
</Button>
<Button>
<X> 438 </X>
<Y> 1345 </Y>
<State> alphaState </State>
<Y> popup_cancel_button_y </Y>
<State> PopupCancelButtonState </State>
<Filename> Var( DirImage + "/bn_cancel.png" )</Filename>
<FilenamePress> Var( DirImage + "/bp_cancel.png" )</FilenamePress>
<Sound> "/mnt/sdcard/coffeevending/wav/click.wav" </Sound>
@ -1901,8 +2048,14 @@ EndIf
Var QRErrorState = "Invisible"
Var CreditCardErrorState = "Invisible"
Var alphaState = "Invisible"
Var PopupCancelButtonState = "Invisible"
Var CameraState = "Invisible"
Var EMAEnterNumberButtonState = "Invisible"
Var EMAPopupErrorState = "Invisible"
Var QRCODE99 = ""
Var EMAMemberID = ""
Var popup_cancel_button_y = 1345
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0

2
xml/process/discount_from_promotion.ev
View file

@ -1,6 +1,6 @@
If From12Day12MenuPro = 1 Then
Var PriceDiff = OriginalPrice - PromotionPriceDrink
Var PriceDiff = PriceDrink - PromotionPriceDrink
Var Seeker.VendingCode = "PMD" + PriceDiff
Var Seeker.CodeNumber = "00000000"
Var Seeker.CodeChannel = 1