add topup credit while brewing

This commit is contained in:
miggaze 2024-05-16 11:03:12 +07:00
parent cca40820d4
commit 6d5a24547a
27 changed files with 4289 additions and 1 deletions

View file

@ -30,6 +30,11 @@
Var next_pic_bp = DirImage + "/bp_add_order.png"
Var text_next_order = DirImage + "/text_next_order.png"
Var topup_credit_bn = DirImage + "/bn_topup_credit.png"
Var topup_credit_bp = DirImage + "/bp_topup_credit.png"
Var EnableTopupCreditBetweenBrew = "Invisible"
If NextOrder = "true" Then
Var EnableSelectMenuBetweenBrew = "Invisible"
Else
@ -38,6 +43,7 @@
If GetFreeFromError = 1 Then
Var EnableSelectMenuBetweenBrew = "Invisible"
Var EnableTopupCreditBetweenBrew = "Invisible"
EndIf
If EnableSelectMenuBetweenBrew = "Enable" Then
@ -857,6 +863,7 @@
If MachineState_Result > 0 Then
Var EnableSelectMenuBetweenBrew = "Invisible"
Var EnableTopupCreditBetweenBrew = "Invisible"
EndIf
If EnableSelectMenuBetweenBrew = "Enable" Then
@ -1086,6 +1093,42 @@
</EventClick>
</Button>
<Button>
<X> 792 </X>
<Y> 1687 </Y>
<State>EnableTopupCreditBetweenBrew</State>
<Filename> topup_credit_bn </Filename>
<FilenamePress> topup_credit_bp </FilenamePress>
<EventClick>
If MachineState_Result = 0 Then
If NextOrder = "true" Then
Var topupCreditWithCash = "Disable"
Var SeekerTmp = "next"
Var TelephoneNumber = SeekerTmp.TNumberTaobinCredit
Else
Var topupCreditWithCash = "Enable"
Var SeekerTmp = "curr"
Var TelephoneNumber = SeekerTmp.TNumberTaobinCredit
EndIf
SAVELOG "User click topup-credit button"
Var Seeker = "topupCredit"
CoinPause
Var PayCredit = 0
If TelephoneNumber = "" Then
Open "ROOT/taobin_project/xml/page_topup_credit.xml"
Else
Open "ROOT/taobin_project/xml/page_topup_credit-ChooseNumber.xml"
EndIf
EndIf
</EventClick>
</Button>
<GIF>