edit spiral

This commit is contained in:
worawut 2022-11-16 13:09:13 +07:00
parent 04b54a9574
commit f0b89e646d
8 changed files with 558 additions and 275 deletions

View file

@ -6,6 +6,9 @@
<Sound> "ROOT/taobin_project/sounds/chaching.mp3" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
Var SpiralText1 = 0
DEBUGVAR SpiralText1
Var Timeout = 0
Var ShowPictureFail = 0
If ChangeOK = 1 Then
@ -26,6 +29,10 @@
<EventActionOk>
If CreditCardVoid = 1 Then
Var ChangeOK = 3
EndIf
If SpiralCodeOk = 1 Then
If CheckAckCode = 1 Then
@ -191,6 +198,7 @@ If SpiralCodeOk = 1 Then
EndIf
EndIf
Else
Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID3 PriceDrink ServiceCharge Donate
If SpiralCodeOk = 1 Then
Var CheckAckCode = 1
@ -206,6 +214,31 @@ If SpiralCodeOk = 1 Then
If LastMakeSpiralResult = 2 Then
If Seeker.PayWithQR = 0 Then
If Seeker.CreditCard = 1 Then
If CreditCardVoid = 0 Then
Var ChangeFlag = 1
Var CreditCardVoid = 1
; Var ChangeOK = 3
EndIf
If CoinAmount > 0 Then
If ChangeFlag = 0 Then
Var ChangeFlag = 1
Var ServiceAmount3 = ServiceAmount2 - Seeker.IntVendingCampaign
If Seeker.StoreCreditFlag = 1 Then
Var ChangeOK = 2
Else
Change ServiceAmount3
Var ChangeFlag2 = 1
Var ChangeTimeout = 30
EndIf
EndIf
;Else
; Var ChangeOK = 3
EndIf
Else
If Seeker.CodeChannel = 0 Then
If ChangeFlag = 0 Then
Var ChangeFlag = 1
@ -234,6 +267,7 @@ If SpiralCodeOk = 1 Then
Var ChangeOK = 2
EndIf
EndIf
EndIf
Else
Var ChangeOK = 3
EndIf
@ -337,7 +371,7 @@ If SpiralCodeOk = 1 Then
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "CheckAckCode" </Value>
;<Value> "Seeker.CreditCard" </Value>
;</Text>
;
;
@ -347,7 +381,7 @@ If SpiralCodeOk = 1 Then
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> CheckAckCode </Value>
;<Value> Seeker.CreditCard </Value>
;</Text>
;
;
@ -523,7 +557,7 @@ If SpiralCodeOk = 1 Then
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "CheckAckCodeTimer" </Value>
;<Value> "CoinAmount" </Value>
;</Text>
;
;<Text>
@ -532,11 +566,7 @@ If SpiralCodeOk = 1 Then
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> CheckAckCodeTimer </Value>
;<Value> CoinAmount </Value>
;</Text>
</Popup>

View file

@ -47,219 +47,219 @@
<Text>
<X> 92 </X>
<Y> 1121 </Y>
<Width>150</Width>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> Timeout </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1181 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> ChangeTimeout </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 650 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> LastMakeSpiralResult </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1350 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "PayOk" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1350 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> PayOk </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1400 </Y>
<Size> 40 </Size
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "ChangeOK" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1400 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> ChangeOK </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1450 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "Seeker.StoreCreditFlag" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1450 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> Seeker.StoreCreditFlag </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1500 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "ChangeFlag2" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1500 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> ChangeFlag2 </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1550 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "Seeker.PayWithQR" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1550 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> Seeker.PayWithQR </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1600 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "Seeker.CodeChannel" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1600 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> Seeker.CodeChannel </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1650 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "ChangeFlag" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1650 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> ChangeFlag </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1700 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "Canout" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1700 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> Canout </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1750 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "SpiralCodeOk" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1750 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> SpiralCodeOk </Value>
</Text>
<Text>
<X> 292 </X>
<Y> 1800 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> "CheckAckCodeTimer" </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 1800 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> CheckAckCodeTimer </Value>
</Text>
;<Text>
;<X> 92 </X>
;<Y> 1121 </Y>
;<Width>150</Width>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> Timeout </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1181 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> ChangeTimeout </Value>
;</Text>
;
;
;<Text>
;<X> 92 </X>
;<Y> 650 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> LastMakeSpiralResult </Value>
;</Text>
;
;
;<Text>
;<X> 292 </X>
;<Y> 1350 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "PayOk" </Value>
;</Text>
;
;
;<Text>
;<X> 92 </X>
;<Y> 1350 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> PayOk </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1400 </Y>
;<Size> 40 </Size
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "ChangeOK" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1400 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> ChangeOK </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1450 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "Seeker.StoreCreditFlag" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1450 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> Seeker.StoreCreditFlag </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1500 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "ChangeFlag2" </Value>
;</Text>
;
;
;<Text>
;<X> 92 </X>
;<Y> 1500 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> ChangeFlag2 </Value>
;</Text>
;
;
;<Text>
;<X> 292 </X>
;<Y> 1550 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "Seeker.PayWithQR" </Value>
;</Text>
;
;
;<Text>
;<X> 92 </X>
;<Y> 1550 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> Seeker.PayWithQR </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1600 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "Seeker.CodeChannel" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1600 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> Seeker.CodeChannel </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1650 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "ChangeFlag" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1650 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> ChangeFlag </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1700 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "Canout" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1700 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> Canout </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1750 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "SpiralCodeOk" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1750 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> SpiralCodeOk </Value>
;</Text>
;
;<Text>
;<X> 292 </X>
;<Y> 1800 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> "CheckAckCodeTimer" </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 1800 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> CheckAckCodeTimer </Value>
;</Text>
;
;
</Popup>

View file

@ -32,6 +32,7 @@
Var CountStepPackPayment = 0
Var Seeker.CreditCard = 0
Var Seeker.VendingCode = "C00"
Var Seeker.VendingCampaignRI3 = 0
Var Seeker.IntVendingCampaign = 0

View file

@ -22,7 +22,7 @@
DEBUGVAR SelectDrink
DEBUGVAR video_menu_0
Var CashlessPayFlag = 0
Var PayDetail = ""
Var FlagQROpened = 0
Var PayInfoCFlag = 0
@ -479,7 +479,10 @@
Var ReqPayInfoFromCashOther = 0
EndIf
If ReqPayInfoFromCashOther = 2 Then
Var alphaState = "Enable"
Var ReqPayInfoFromCashOther = 0
EndIf
</EventOpen>
<EventActionOk>
@ -602,10 +605,57 @@
EndIf
EndIf
If ReqPayInfoFlag = 5 Then
If VendingQRTypeResult = "LPY:2" Then
Var CashTextWarning = ""
Var QRErrorState = "Invisible"
Var QRCODE99Shoppy = ""
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext1
SAVELOG Ext1
SAVELOG QRCODE99Shoppy
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext2
Var QRCODE99Shoppy = QRCODE99Shoppy + Ext31
Var ReqPayInfoFlag = 0
Var ReqPayInfoFlag2 = 5
SAVELOG QRCODE99Shoppy
SAVELOG Ext2
Var QRCODE99 = QRCODE99Shoppy
Var LOADING_STATE = "Invisible"
EndIf
EndIf
Else
Var PayInfoCFlag = 1
EndIf
If VendingCashless = "OK" Then
DEBUGVAR CashlessCode
Var Timeout = 0
Var QRErrorState = "Invisible"
Var LOADING_STATE = "Invisible"
If ViewBill > 0 Then
CoinVending BILLREJECT
EndIf
VendingQR OFF
CoinVending OFF
Refresh
If Seeker = "curr" Then
; MakeDrinkV1 SelectDrink SelectSugarID
EndIf
Var Seeker.CreditCard = 1
Var Seeker.CreditCardRef = CreditCardRef
Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou_creditcard.xml"
EndIf
</EventActionOk>
<EventActionError>
@ -639,6 +689,13 @@
Var LOADING_STATE = "Invisible"
EndIf
EndIf
If ReqPayInfoFlag = 5 Then
Var QRErrorFlag = 1
If alphaState = "Enable" Then
Var QRErrorState = "Enable"
Var LOADING_STATE = "Invisible"
EndIf
EndIf
Else
Var PayInfoCFlag = 1
EndIf
@ -647,6 +704,29 @@
</EventActionError>
<EventCashlessCard>
Var CreditCardRef = ""
GenHashWithTimeStamp CreditCardRef
DEBUGVAR VendingCashless
If VendingCashless = "READY" Then
Var QRCODE99 = ""
Var Timeout = 0
Var QRErrorState = "Invisible"
Var QR_POPUP = "/img_popup8-2.png"
Var VendingCashless = "-"
Var LOADING_STATE = "Enable"
Var RemainAmountX = PayAmount - Seeker.IntVendingCampaign
CashlessPay RemainAmountX CreditCardRef
Var CashlessPayFlag = 1
EndIf
Refresh
</EventCashlessCard>
<Timeout> 1000 </Timeout>
<EventTimeout>
@ -764,6 +844,11 @@
Var CancelFlag = 1
Var cancelState = "Enable"
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
Var CancelCounter = 0
If CoinAmount = 0 Then
@ -1467,6 +1552,11 @@
Var CancelNumber = 12
EndIf
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
EndIf
EndIf
@ -1582,6 +1672,14 @@
Var QRCODE99 = ""
;CoinVending ON
;VendingQR OFF
CashlessReq OFF
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
Refresh
</EventClick>
</Button>
@ -1629,6 +1727,11 @@
If FlagQROpened = 1 Then
Var CancelNumber = 12
EndIf
If CashlessPayFlag = 1 Then
Var CashlessPayFlag = 0
CashlessReq FAIL
EndIf
EndIf
EndIf

View file

@ -336,6 +336,88 @@
</EventClick>
</Button>
<Button>
<X> 209 </X>
<Y> 1112 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_linepay.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_linepay.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_linepay.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup9.png"
Var LOADING_STATE = "Enable"
Var QRCODE99 = ""
Var FlagQROpened = 1
Var alphaState = "Enable"
;CoinVending OFF
VendingQR ON
Var SessionID2 = "1:00000"
Var CreditAmount1 = ""
Var ServiceAmountFlow = ""
Var TelephoneNumberQR = "0899999999"
Var ServiceType = "locker"
Var ECommerceQR = "locker5/"
Var ECommerceQR = ECommerceQR + PriceDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + DiscountDrink
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + SessionID2
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + ServiceCredit
Var ECommerceQR = ECommerceQR + "/"
Var ECommerceQR = ECommerceQR + "LPY:2/"
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
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 = ""
GetPayInfo TelephoneNumberQR ECommerceQR ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc
Var ReqPayInfoFlag = 5
Var ReqPayInfoFromCashOther = 1
Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_cash.xml"
</EventClick>
</Button>
<Button>
<X> 209 </X>
<Y> 1112 </Y>
@ -346,12 +428,31 @@
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
</EventClick>
</Button>
<Button>
<X> 441 </X>
<Y> 1112 </Y>
<State> "Invisible" </State>
<Filename> "ROOT/taobin_project/image/collectiing/bn_pay_with_ccard1.png" </Filename>
<FilenamePress> "ROOT/taobin_project/image/collectiing/bp_pay_with_ccard1.png" </FilenamePress>
<FilenameDisable> "ROOT/taobin_project/image/collectiing/bd_pay_with_ccard1.png" </FilenameDisable>
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Var QR_POPUP = "/img_popup8.png"
Var alphaState = "Enable"
Coin CARD
Var ReqPayInfoFromCashOther = 2
Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_cash.xml"
</EventClick>
</Button>
<Button>
<X> 441 </X>
<Y> 1112 </Y>

View file

@ -635,7 +635,7 @@
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_storeCredit.xml"
Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_storeCredit.xml"
</EventClick>
</Button>

View file

@ -42,7 +42,7 @@
Var Timeout = Timeout + 1
If Timeout > 30 Then
Open "ROOT/taobin_project/xml/page_spiral_payment_storeCredit.xml"
Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_storeCredit.xml"
EndIf
If FlagWaitUpdateCoinAmount = 1 Then
@ -50,7 +50,7 @@
If CART_COUNT >= 1 Then
Open "ROOT/taobin_project/xml/page_payment_cashMore.xml"
Else
Open "ROOT/taobin_project/xml/page_payment_cash.xml"
Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_cash.xml"
EndIf
EndIf
@ -574,7 +574,7 @@
<Sound> "ROOT/sounds/codebuttom.wav" </Sound>
<Volume> SoundVolume </Volume>
<EventClick>
Open "ROOT/taobin_project/xml/page_payment_storeCredit.xml"
Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_storeCredit.xml"
</EventClick>
</Button>

View file

@ -6,6 +6,8 @@
;<Sound> "ROOT/taobin_project/sounds/chaching.mp3" </Sound>
<Volume> SoundVolume </Volume>
<EventOpen>
Var SwapVDO = 0
Var TimeSwapVDO = 0
Var ShowSwapVDO = "ROOT/taobin_project/spiral/video/sp01.mp4"
@ -48,6 +50,31 @@
Var PayO2 = Seeker.CoffeePinNumber
EndIf
If show_eng = "true" Then
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2_eng.png"
Var show_btp = "ROOT/taobin_project/image/bn_thai_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_thai_lang.png"
Var BottomText = PicturePath + "text_bottom_eng.png"
Var DirImage = "ROOT/taobin_project/image/page_thankyou_en"
Else
Var ImageDoing = "ROOT/taobin_project/image/page_doing/img2.png"
Var show_btp = "ROOT/taobin_project/image/bn_eng_lang_press.png"
Var show_btn = "ROOT/taobin_project/image/bn_eng_lang.png"
Var BottomText = PicturePath + "text_bottom_thai2.png"
Var DirImage = "ROOT/taobin_project/image/page_thankyou"
EndIf
If VendingCreditRemain = "" Then
Var RemainCreditST = "Invisible"
Else
Var RemainCreditST = "Enable"
EndIf
Var CreditReference = ""
Var CreditReference = Seeker.CreditReferenceTmp
Var VendingDiscount = Seeker.VendingDiscount
@ -539,40 +566,61 @@
<Filename> video_menu_0 </Filename>
</Video>
Var SwapVDO = 0
Var TimeSwapVDO = 0
Var ShowSwapVDO = "
<Image>
<X> 760 </X>
<Y> 413 </Y>
<State>RemainCreditST</State>
<Filename> Var( DirImage + "/remainCredit.png" ) </Filename>
</Image>
<Text>
<X> 92 </X>
<Y> 650 </Y>
<Width>150</Width>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> SwapVDO </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 750 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> TimeSwapVDO </Value>
<X> 760 </X>
<Y> 477 </Y>
<Size> 70 </Size>
<Width> 413</Width>
<Align> Center </Align>
<Font> RobotoBlack </Font>
<Color> 0x513C2F </Color>
<Value> VendingCreditRemain </Value>
</Text>
<Text>
<X> 92 </X>
<Y> 850 </Y>
<Size> 40 </Size>
<Font> KanitTTF </Font>
<Color> 0xB78F24 </Color>
<Value> ShowSwapVDO </Value>
</Text>
; Var SwapVDO = 0
; Var TimeSwapVDO = 0
; Var ShowSwapVDO = "
;<Text>
;<X> 92 </X>
;<Y> 650 </Y>
;<Width>150</Width>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> SwapVDO </Value>
;</Text>
;
;<Text>
;<X> 92 </X>
;<Y> 750 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> TimeSwapVDO </Value>
;</Text>
;
;
;<Text>
;<X> 92 </X>
;<Y> 850 </Y>
;<Size> 40 </Size>
;<Font> KanitTTF </Font>
;<Color> 0xB78F24 </Color>
;<Value> ShowSwapVDO </Value>
;</Text>
;<Text>