"Enable" 1080 1920 "0xeae6e1" ; "ROOT/taobin_project/sounds/chaching.mp3" SoundVolume Var Timeout = 0 Var GotoStoreCredit0 = 0 Var LastMakeSpiralResult = 0 Var MachineSpiralStage = "" If SellLeaw = 0 Then SPIRAL_SELL ServiceCredit SpiralRef Var TestSellSpiral = 1 DEBUGVAR TestSellSpiral If Seeker.thankToppingFlag = 1 Then If StrawState = "Press" Then Machine StrawOrder Var LedLidBlink = "true" EndIf If LidState = "Press" Then Machine LidOrder Var LedLidBlink = "true" EndIf Var SelectDrink = "12-05-02-0017" Var SelectSugarID = 0 MakeDrinkV1 SelectDrink SelectSugarID EndIf Var SellLeaw = 1 EndIf 1000 Var Timeout = Timeout + 1 If Timeout = 3 Then If Seeker.PayWithQR = 0 Then If Seeker.FreeVendingCampaign = 0 Then If Seeker.IntVendingCampaign < PayAmount Then Var SumCoinAmount = CoinAmount + Seeker.IntVendingCampaign Var SumCoinAmount = SumCoinAmount + Seeker.IntVendingCredit If SumCoinAmount >= PayAmount Then Var Canout = SumCoinAmount - PayAmount If Canout > 0 Then Var GotoStoreCredit0 = 1 Var StoreCreditAmount = Canout EndIf EndIf EndIf Else Var Canout = CoinAmount If Canout > 0 Then Var GotoStoreCredit0 = 1 Var StoreCreditAmount = Canout EndIf EndIf Else Var Canout = CoinAmount If Canout > 0 Then Var GotoStoreCredit0 = 1 Var StoreCreditAmount = Canout EndIf EndIf If GotoStoreCredit0 = 1 Then Open "ROOT/taobin_project/spiral/xml/page_spiral_payment_storeCredit0.xml" Else Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou.xml" EndIf EndIf If Timeout >= 10 Then Open "ROOT/taobin_project/spiral/xml/page_spiral_thankyou.xml" EndIf Refresh TimerReset 89 700 902 902 "ROOT/taobin_project/spiral/image/page_spiral/spiral_wait.png" ; ; 492 ; 1121 ;150 ; 60 ; KanitTTF ; 0xB78F24 ; Timeout ; ; ; 92 ; 501 ; 60 ; KanitTTF ; 0xB78F24 ; GotoStoreCredit0 ; ; ; ; 92 ; 551 ; 60 ; KanitTTF ; 0xB78F24 ; Canout ; ; ; ; 92 ; 601 ; 60 ; KanitTTF ; 0xB78F24 ; clickedChangeFlag ; ; ; ; ; 92 ; 651 ; 60 ; KanitTTF ; 0xB78F24 ; StoreCreditAmount ;