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

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