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
If Seeker = "curr" Then
DEBUGVAR Seeker
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR Seeker.ServiceAmount2
If Seeker = "curr" Then
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 SessionID2 = SelectSlot + ":"
Var SessionID2 = SessionID2 + Seeker.ExtendData
@ -99,9 +91,6 @@
Var SelectDrink = Seeker.selected_a_drink
Var ServiceAmount2 = Seeker.ServiceAmount2
DEBUGVAR Seeker
DEBUGVAR Seeker.selected_a_drink
DEBUGVAR Seeker.ServiceAmount2
; On open move from page_brewing3.xml
Var countClick2 = 0
@ -130,27 +119,27 @@
If ChangeFlag2 = 1 Then
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
Var VendingDiscount = 0
Var VendingCampaign = 0
Var ServiceType = "credit"
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Var TelephoneNumber = "0899999999"
Var PayO2 = ""
Var VendingDiscount = 0
Var VendingCampaign = 0
Var ServiceType = "credit"
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
Else
If Seeker.StoreCreditFlag = 1 Then
Var VendingDiscount = 0
Var VendingCampaign = 0
Var ServiceType = "credit"
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
If Seeker.StoreCreditFlag = 1 Then
Var VendingDiscount = 0
Var VendingCampaign = 0
Var ServiceType = "credit"
Var SessionID2 = SelectDrink
Var ServiceCredit = "coffee"
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate
EndIf
EndIf
EndIf
EndIf
@ -450,20 +439,22 @@
If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/"
Else
DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now
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
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf
@ -509,19 +500,20 @@
If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/"
Else
DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now
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
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
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"
@ -560,19 +552,21 @@
If NextOrderStatus = "Disable" Then
Var PayDetail="1/F:1221/0/"
Else
DEBUGVAR error_code_stop_now
If error_code_stop_now > 0 Then
Var PayDetail="1/F:" + error_code_stop_now
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
Else
Var PayDetail = "1/" + HURR_FOREVER
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + SAMESALARY
Var PayDetail = PayDetail + "/"
Var PayDetail = PayDetail + NOBONUS
EndIf