This commit is contained in:
kong 2022-06-10 19:22:40 +07:00
parent 9cc9fe2fc5
commit 7823468da7
13 changed files with 53 additions and 59 deletions

BIN
adv/taobin_adv_09.mp4 Executable file → Normal file

Binary file not shown.

BIN
adv/taobin_adv_10.mp4 Executable file → Normal file

Binary file not shown.

BIN
adv/taobin_adv_11.mp4 Executable file → Normal file

Binary file not shown.

Binary file not shown.

BIN
adv/taobin_adv_menu2_09.mp4 Executable file → Normal file

Binary file not shown.

BIN
adv/taobin_adv_menu2_10.mp4 Executable file → Normal file

Binary file not shown.

BIN
adv/taobin_adv_menu2_11.mp4 Executable file → Normal file

Binary file not shown.

Binary file not shown.

BIN
adv/taobin_adv_menu_09.mp4 Executable file → Normal file

Binary file not shown.

BIN
adv/taobin_adv_menu_10.mp4 Executable file → Normal file

Binary file not shown.

BIN
adv/taobin_adv_menu_11.mp4 Executable file → Normal file

Binary file not shown.

Binary file not shown.

View file

@ -55,23 +55,15 @@
DEBUGVAR Seeker.StoreCreditFlag DEBUGVAR Seeker.StoreCreditFlag
If Seeker = "curr" Then DEBUGVAR Seeker
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR Seeker.ServiceAmount2
If Seeker = "curr" Then
SAVELOG " cannot on curr" SAVELOG " cannot on curr"
;Topping "Select" Seeker.selected_a_drink
; Set option toppinng and pack
;Topping "Select1-ID" Seeker.topping1
;Topping "Select2-ID" Seeker.topping2
;Topping "Select3-ID" Seeker.topping3
; Pack
Topping "Pack" ExtendDataCurr
DEBUGVAR ExtendDataCurr
Var Seeker.ExtendData = ExtendDataCurr
Var ExtendData = Seeker.ExtendData Var ExtendData = Seeker.ExtendData
Var SessionID2 = SelectSlot + ":" Var SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData Var SessionID2 = SessionID2 + Seeker.ExtendData
@ -99,9 +91,6 @@
Var SelectDrink = Seeker.selected_a_drink Var SelectDrink = Seeker.selected_a_drink
Var ServiceAmount2 = Seeker.ServiceAmount2 Var ServiceAmount2 = Seeker.ServiceAmount2
DEBUGVAR Seeker
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR Seeker.ServiceAmount2
; On open move from page_brewing3.xml ; On open move from page_brewing3.xml
Var countClick2 = 0 Var countClick2 = 0
@ -130,27 +119,27 @@
If ChangeFlag2 = 1 Then If ChangeFlag2 = 1 Then
Var TelephoneNumber = "0899999999" Var TelephoneNumber = "0899999999"
Var PayO2 = "" Var PayO2 = ""
Var VendingDiscount = 0 Var VendingDiscount = 0
Var VendingCampaign = 0 Var VendingCampaign = 0
Var ServiceType = "credit" Var ServiceType = "credit"
Var SessionID2 = SelectDrink Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee" Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else Else
If Seeker.StoreCreditFlag = 1 Then If Seeker.StoreCreditFlag = 1 Then
Var VendingDiscount = 0 Var VendingDiscount = 0
Var VendingCampaign = 0 Var VendingCampaign = 0
Var ServiceType = "credit" Var ServiceType = "credit"
Var SessionID2 = SelectDrink Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee" Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf EndIf
EndIf EndIf
EndIf EndIf
@ -450,20 +439,22 @@
If NextOrderStatus = "Disable" Then If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/" Var PayDetail="1/F:1221/0/"
Else
DEBUGVAR error_code_stop_now DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now Var PayDetail="1/F:" + error_code_stop_now
Var PayDetail = PayDetail + "/0/" Var PayDetail = PayDetail + "/0/"
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf EndIf
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf EndIf
@ -509,19 +500,20 @@
If NextOrderStatus = "Disable" Then If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/" Var PayDetail="1/F:1221/0/"
Else
DEBUGVAR error_code_stop_now DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now Var PayDetail="1/F:" + error_code_stop_now
Var PayDetail = PayDetail + "/0/" Var PayDetail = PayDetail + "/0/"
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf EndIf
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf EndIf
;Var PayDetail="1/F:404/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1" ;Var PayDetail="1/F:404/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1"
@ -560,19 +552,21 @@
If NextOrderStatus = "Disable" Then If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/" Var PayDetail="1/F:1221/0/"
Else
DEBUGVAR error_code_stop_now DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now Var PayDetail="1/F:" + error_code_stop_now
Var PayDetail = PayDetail + "/0/" Var PayDetail = PayDetail + "/0/"
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf EndIf
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf EndIf