spiral pay

This commit is contained in:
worawut 2023-06-07 18:36:37 +07:00
parent 326a9f4f71
commit a1e7e4be1e
3 changed files with 6420 additions and 33 deletions

File diff suppressed because it is too large Load diff

View file

@ -8,8 +8,8 @@
<EventOpen>
Var SetPayMuti = 0
Var Timeout3 = 0
;Var LastMakeDrinkResult = "-"
;Var MachineState_Result = 2
Var LastMakeDrinkResult = "-"
Var MachineState_Result = 2
Var ChangeFlag3 = 0
Var ChangeFailSpiral = 0
@ -513,6 +513,11 @@ If Seeker.thankToppingFlag = 1 Then
;CashlessReq FAIL
EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Var sendPayMultiFlag = 2
@ -524,6 +529,10 @@ If Seeker.thankToppingFlag = 1 Then
;CashlessReq FAIL
EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Var sendPayMultiFlag = 2
@ -547,6 +556,11 @@ If Seeker.thankToppingFlag = 1 Then
EndIf
;PAYEXT SVT ACC VendingTSIDTmp DEE
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Var sendPayMultiFlag = 2

View file

@ -222,6 +222,10 @@ If Seeker.thankToppingFlag = 1 Then
EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
Else
@ -231,7 +235,11 @@ If Seeker.thankToppingFlag = 1 Then
;CashlessReq FAIL
EndIf
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
@ -253,7 +261,12 @@ If Seeker.thankToppingFlag = 1 Then
EndIf
;PAYEXT SVT ACC VendingTSIDTmp DEE
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
If SessionID2 = "2:00000" Then
Var SessionID2 = "1:00000"
EndIf
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 PriceDrinkTopping ServiceCharge Donate
EndIf