diff --git a/inter/aus/xml/page_brewing3.lxml b/inter/aus/xml/page_brewing3.lxml index 355192a5..8cdde064 100644 --- a/inter/aus/xml/page_brewing3.lxml +++ b/inter/aus/xml/page_brewing3.lxml @@ -581,9 +581,6 @@ EndIf EndIf - - CashlessReq SUCCESS - Var XPosiShowCountDownBrew = 768 diff --git a/inter/aus/xml/page_brewing3Conti.xml b/inter/aus/xml/page_brewing3Conti.xml new file mode 100644 index 00000000..2c578ee8 --- /dev/null +++ b/inter/aus/xml/page_brewing3Conti.xml @@ -0,0 +1,1293 @@ + + "Enable" + 1080 + 1920 + "0xeae6e1" + SoundVolume + + + Var ActionOKCase = 0 + Var Seeker = "curr" + + If PayCredit = 0 Then + Var PayCredit = 1 + CoinBack + EndIf + + ;Var PayCredit = 0 + + If show_eng = "true" Then + Var DirImage = "ROOT/taobin_project/image/page_payment_en/page_payment" + Var DirImage2 = "ROOT/taobin_project/image/topping2_en" + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2_eng.png" + Else + Var DirImage = "ROOT/taobin_project/image/page_payment" + Var DirImage2 = "ROOT/taobin_project/image/topping2" + Var IMG_CNT = "ROOT/taobin_project/image/page_doing/img2.png" + EndIf + + Var next_pic_bn = DirImage + "/bn_add_order.png" + 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 + Var EnableSelectMenuBetweenBrew = "Enable" + EndIf + + If GetFreeFromError = 1 Then + Var EnableSelectMenuBetweenBrew = "Invisible" + Var EnableTopupCreditBetweenBrew = "Invisible" + EndIf + + If EnableSelectMenuBetweenBrew = "Enable" Then + Var EnableSelectMenuBetweenBrewBlink = "Enable" + Else + Var EnableSelectMenuBetweenBrewBlink = "Invisible" + EndIf + + + Var bg_strawlid = DirImage2 + "/bg_strawlidSmall.png" + If Seeker.thankLidFlag = 1 Then + Var bg_strawlid = DirImage2 + "/bg_strawSmall.png" + Var LidStateX = "Invisible" + EndIf + + Var TimeoutWaitPay = 10 + + Var PayReference = "" + Var PayType = "newpay" + Var MachineState_Result = 0 + + If LastMakeDrinkResult = "success" Then + Var MachineState_Result = 1 + EndIf + + If LastMakeDrinkResult = "fail" Then + Var MachineState_Result = 2 + EndIf + + + Var ExtendData = Seeker.ExtendData + Var SelectDrink = Seeker.selected_a_drink + Var ServiceAmount2 = Seeker.ServiceAmount2 + + DEBUGVAR Seeker + DEBUGVAR Seeker.selected_a_drink + DEBUGVAR Seeker.ServiceAmount2 + + DEBUGVAR Seeker.CodeNumber + + Var SessionID2 = SelectSlot + ":" + Var SessionID2 = SessionID2 + ExtendData + + + ; On open move from page_brewing3.xml + Var countClick2 = 0 + + Var Timeout = 0 + + Var PrintCoinAmount = 0 + + Var AddData = 0 + + DEBUGVAR Seeker.TNumberTaobinMember + DEBUGVAR Seeker.PointTaobinStr + + If Seeker.TNumberTaobinMember = "" Then + + Else + If Seeker.PayWithQR = 1 Then + Var VendingTSIDTmp1 = VendingTSIDTmp + Else + Var VendingTSIDTmp1 = "" + EndIf + + + Var BmiYear = Seeker.PointTaobinStr + Var PointCrm = "" + If Seeker.FromConsent = 1 Then + Var PointCrm = "pdpa1" + EndIf + Var GetScore = VendingTSIDTmp1 + If Seeker.TaobinErrorNetwork = 0 Then + Var Cid = 11 + Var AddData = 1 + ;AddData Cid Seeker.TNumberTaobinMember BmiYear PointCrm GetScore + Else + Var PointCrm = "" + Var Cid = 14 + Var AddData = 1 + ;AddData Cid Seeker.TNumberTaobinMember BmiYear PointCrm GetScore + EndIf + + Var VendingTSIDTmp1 = "" + EndIf + + If Seeker.VendingCode = "MKFOO" Then + Var AddData = 0 + EndIf + + If MyMintEnable = 1 Then + If FromMyMintPro = 1 Then + Var AddData = 0 + EndIf + EndIf + + If ProBadValentineEnable = 1 Then + If FromBadValentinePro = 1 Then + Var AddData = 0 + EndIf + EndIf + + If LipitPro = 1 Then + If FromLipitPro = 1 Then + If Seeker.CodeChannel = 1 Then + If Seeker.CollectPointMain = 1 Then + Else + Var AddData = 0 + EndIf + EndIf + EndIf + EndIf + + If LedLidBlink = "true" Then + Var LedLidBlink = "no" + LED LedDoorLid Blink 255 255 255 255 + EndIf + + + Var CreditReference = Seeker.CreditReferenceTmp + Var VendingDiscount = Seeker.VendingDiscount + Var VendingCampaign = Seeker.VendingCampaign + Var TxReference = Seeker.TxRef1 + DEBUGVAR TxReference + + + Var DirImage = "ROOT/taobin_project/image/complete/" + Var next_pic_bg = DirImage + "/Preparing.png" + + Var bg_strawlid_ST = "Invisible" + Var bg_strawProblem_ST = "Invisible" + Var StrawStateX = "Invisible" + Var LidStateX = "Invisible" + + If Seeker.CreditCard = 1 Then + Var EnableSelectMenuBetweenBrew = "Invisible" + EndIf + + Var CreditCardVoid = 0 + + DEBUGVAR ButtonGameCountDownState + + + + + + + If CreditCardVoid = 1 Then + Var ChangeOK = 2 + EndIf + + If ActionOKCase = 1 Then + If Seeker.CodeChannel = 1 Then + Var SessionID2 = SelectSlot + ":" + Var SessionID2 = SessionID2 + ExtendData + + DEBUGVAR SessionID2 + + Var CreditAmount1 = "" + Var ServiceAmountFlow = "" + Var TelephoneNumber = "0899999999" + Var ServiceType = "coffee" + Var ECommerce = "" + Var ECommerce = ECommerce + PriceDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + DiscountDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + SessionID2 + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + SelectDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + Seeker.VendingCode + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + Seeker.CodeNumber + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + "C:" + Var ECommerce = ECommerce + Seeker.IntVendingCampaign + Var ServiceParameter = "max" + Var ServiceCharge = 0 + Var AccountType = "new" + Var testservice = "kbank" + Var tc = "" + Var GetScore = "" + Var OperatorName = "" + Var SessionID = "" + + GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc + ;Var Timeout = 0 + Var ActionOKCase = 2 + + SAVELOG "back_to_main from line > 142." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + + Else + + SAVELOG "back_to_main from line > 147." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + EndIf + + Else + + + + EndIf + + If waitAckPay = 1 Then + SAVELOG "waitAckPay = 1" + Open "ROOT/taobin_project/xml/page_drinkok.xml" + + EndIf + + + + + If ActionOKCase = 1 Then + If Seeker.CodeChannel = 1 Then + Var SessionID2 = SelectSlot + ":" + Var SessionID2 = SessionID2 + ExtendData + + DEBUGVAR SessionID2 + + Var CreditAmount1 = "" + Var ServiceAmountFlow = "" + Var TelephoneNumber = "0899999999" + Var ServiceType = "coffee" + Var ECommerce = "" + Var ECommerce = ECommerce + PriceDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + DiscountDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + SessionID2 + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + SelectDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + Seeker.VendingCode + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + Seeker.CodeNumber + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + "C:" + Var ECommerce = ECommerce + Seeker.IntVendingCampaign + Var ServiceParameter = "max" + Var ServiceCharge = 0 + Var AccountType = "new" + Var testservice = "kbank" + Var tc = "" + Var GetScore = "" + Var OperatorName = "" + Var SessionID = "" + + GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc + ;Var Timeout = 0 + Var ActionOKCase = 2 + + SAVELOG "back_to_main from line > 204." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + + Else + SAVELOG "back_to_main from line > 173." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + EndIf + + Else + + + + EndIf + + + + 1000 + + + Var Timeout = Timeout + 1 + + If MOVE_CUP_TO_DOOR = "true" Then + Var MOVE_CUP_TO_DOOR = "false" + EndIf + + If BREW_COUNT_DOWN_FROM_APP = "on" Then + Var CountDownBrewing = BREW_CNT + Else + + If CountDownBrewing > 0 Then + Var CountDownBrewing = CountDownBrewing - 1 + EndIf + Endif + + If Simulation = "true" Then + If CountDownBrewing = 0 Then + ;Open "ROOT/taobin_project/xml/page_drinkok.xml" + EndIf + EndIf + + If Timeout = 4 Then + PlayLong "/mnt/sdcard/coffeevending/taobin_project/sounds/music1.mp3" + EndIf + + ; run test; + ;If CountDownBrewing = 40 Then + ; Open "ROOT/taobin_project/xml/page_drinkok.xml" + ;EndIf + If CountDownBrewing = 0 Then + ;Open "ROOT/taobin_project/xml/page_drinkok.xml" + EndIf + + Var ShowCountDownBrewing = CountDownBrewing + + + If Timeout > 540 Then + SAVELOG "back_to_main from line > 217." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + EndIf + + + If Timeout > 480 Then + Var MachineState_Result = 2 + EndIf + + If ChangeFlag = 1 Then + Var ChangeTimeout = ChangeTimeout + 1 + EndIf + + If waitAckPay = 1 Then + If Timeout > 60 Then + Var VendingTSIDTmp1 = "" + SAVELOG "waitAckPay = 1 tineout > 60" + + Open "ROOT/taobin_project/xml/page_drinkok.xml" + + EndIf + EndIf + + If waitAckPay = 2 Then + If Timeout > TimeoutWaitPay Then + + If Seeker.CodeChannel = 1 Then + Var SessionID2 = SelectSlot + ":" + Var SessionID2 = SessionID2 + ExtendData + + DEBUGVAR SessionID2 + + Var CreditAmount1 = "" + Var ServiceAmountFlow = "" + Var TelephoneNumber = "0899999999" + Var ServiceType = "coffee" + Var ECommerce = "" + Var ECommerce = ECommerce + PriceDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + DiscountDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + SessionID2 + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + SelectDrink + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + Seeker.VendingCode + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + Seeker.CodeNumber + Var ECommerce = ECommerce + "/" + Var ECommerce = ECommerce + "C:" + Var ECommerce = ECommerce + Seeker.IntVendingCampaign + Var ServiceParameter = "max" + Var ServiceCharge = 0 + Var AccountType = "new" + Var testservice = "kbank" + Var tc = "" + Var GetScore = "" + Var OperatorName = "" + Var SessionID = "" + + GetPayInfo TelephoneNumber ECommerce ServiceType ServiceParameter SessionID OperatorName CreditAmount1 ServiceAmountFlow GetScore tc + ;Var Timeout = 0 + EndIf + + SAVELOG "back_to_main from line > 309." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + EndIf + EndIf + + + If ChangeOK = 2 Then + If ActionOKCase = 0 Then + + If Seeker.TNumberTaobinCredit = "" Then + Var TelephoneNumber = "0899999999" + Var PayO2 = "" + + If Seeker.TNumberTaobinMember = "" Then + Else + Var TelephoneNumber = Seeker.TNumberTaobinMember + EndIf + + Else + Var TelephoneNumber = Seeker.TNumberTaobinCredit + Var PayO2 = Seeker.CoffeePinNumber + EndIf + + + If HURR_FOREVER = "S:0" Then + Var HURR_FOREVER = "F:1303" + EndIf + + + Var PayDetail = "2/" + HURR_FOREVER + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + SAMESALARY + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + NOBONUS + Var PayDetail = PayDetail + "/XML|" + Var PayDetail = PayDetail + Seeker.OrderChanel + + + + ;Var PayDetail="1/F:404/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1" + + Var ServiceType = "coffee" + Var ServiceCredit = SelectDrink + Var SuggestID = "" + Var SessionID2 = "" + + + Var PayDetail2 = Seeker.PayDetail2 + Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate + + + ;If Seeker.CodeChannel = 0 Then + ; SAVELOG "back_to_main from line > 315." + ; Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + ;EndIf + + Var waitAckPay = 2 + Var TimeoutWaitPay = 45 + Var Timeout = 5 + Var ActionOKCase = 1 + + EndIf + EndIf + + If ChangeTimeout > 30 Then + If ActionOKCase = 0 Then + If Seeker.TNumberTaobinCredit = "" Then + Var TelephoneNumber = "0899999999" + Var PayO2 = "" + + If Seeker.TNumberTaobinMember = "" Then + Else + Var TelephoneNumber = Seeker.TNumberTaobinMember + EndIf + + Else + Var TelephoneNumber = Seeker.TNumberTaobinCredit + Var PayO2 = Seeker.CoffeePinNumber + EndIf + + + If HURR_FOREVER = "S:0" Then + Var HURR_FOREVER = "F:1303" + EndIf + + Var PayDetail = "2/" + HURR_FOREVER + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + SAMESALARY + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + NOBONUS + Var PayDetail = PayDetail + "/XML|" + Var PayDetail = PayDetail + Seeker.OrderChanel + + ;Var PayDetail="1/F:404/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1" + + + Var ServiceType = "coffee" + Var ServiceCredit = SelectDrink + Var SuggestID = "" + Var SessionID2 = "" + + + Var PayDetail2 = Seeker.PayDetail2 + Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate + + ;If Seeker.CodeChannel = 0 Then + ; SAVELOG "back_to_main from line > 357." + ; Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + ;EndIf + + Var waitAckPay = 2 + Var TimeoutWaitPay = 45 + Var Timeout = 5 + Var ActionOKCase = 1 + + EndIf + EndIf + + If ChangeOK = 3 Then + If ActionOKCase = 0 Then + + Var SVT = "coffee" + Var ACC = "0899999999" + + If Seeker.TNumberTaobinMember = "" Then + Else + Var ACC = Seeker.TNumberTaobinMember + EndIf + + + If HURR_FOREVER = "S:0" Then + Var HURR_FOREVER = "F:1303" + EndIf + + Var PayDetail = "2/" + HURR_FOREVER + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + SAMESALARY + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + NOBONUS + Var PayDetail = PayDetail + "/XML|" + Var PayDetail = PayDetail + Seeker.OrderChanel + + + + + Var DEE = PayDetail + + PAYEXT SVT ACC VendingTSIDTmp DEE + + CoinBack + + + Var ActionOKCase = 1 + If Seeker.CodeChannel = 0 Then + SAVELOG "back_to_main from line > 391." + Open "ROOT/taobin_project/xml/page_drinkfail2.xml" + EndIf + + Var waitAckPay = 2 + Var TimeoutWaitPay = 45 + Var Timeout = 5 + + + + + EndIf + EndIf + + If MachineState_Result = 1 Then + + ;Var MachineState_Result = 2 + + EndIf + + If MachineState_Result = 1 Then + DEBUGVAR PaySuccessWithDaemonTask + + If waitAckPay = 0 Then + + Var waitAckPay = 0 + Var Timeout = 0 + + Var ProcessText = "" + + If Seeker.TNumberTaobinCredit = "" Then + Var TelephoneNumber = "0899999999" + Var PayO2 = "" + + If Seeker.TNumberTaobinMember = "" Then + Else + Var TelephoneNumber = Seeker.TNumberTaobinMember + EndIf + + Else + Var TelephoneNumber = Seeker.TNumberTaobinCredit + Var PayO2 = Seeker.CoffeePinNumber + EndIf + + If AddData = 1 Then + Var Cid = 26 + DEBUGVAR "Brewing3Conti" + DEBUGVAR Seeker + DEBUGVAR Seeker.UseGet15Discount + If NewCollectPoint = 1 Then + If Seeker.UseGet15Discount = 1 Then + Var Cid = 39 + Else + Var Cid = 40 + Var PreviousSeeker.UseGetDrink5Bath = 0 + EndIf + EndIf + + AddData Cid Seeker.TNumberTaobinMember Seeker.PointTaobinStr PointCrm GetScore + EndIf + + Var ServiceType = "coffee" + Var ServiceCredit = SelectDrink + Var SuggestID = "" + + Var PayDetail = "2/" + HURR_FOREVER + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + SAMESALARY + Var PayDetail = PayDetail + "/" + Var PayDetail = PayDetail + NOBONUS + Var PayDetail = PayDetail + "/XML|" + Var PayDetail = PayDetail + Seeker.OrderChanel + + + ;Var PayDetail="1/S:0/500/1:430|1001:12|1002:15|1020:7|1042:5|1050:50|9501:1|9502:1|9701:1|9702:1" + + If GetFreeFromError = 1 Then + Var Seeker.CodeChannel = 1 + Var Seeker.VendingCode = "C48" + Var Seeker.CodeNumber = "0000000000" + Var VendingCampaign = ServiceAmount2 + EndIf + + If Seeker.PayWithQR = 0 Then + If Seeker.CodeChannel = 1 Then + Var SessionID2 = SessionID2 + "/" + Var SessionID2 = SessionID2 + "" + Var SessionID2 = SessionID2 + "/" + Var SessionID2 = SessionID2 + Seeker.VendingCode + Var SessionID2 = SessionID2 + "/" + Var SessionID2 = SessionID2 + SelectDrink + Var SessionID2 = SessionID2 + "/" + Var SessionID2 = SessionID2 + BoxID + Var SessionID2 = SessionID2 + "/" + Var SessionID2 = SessionID2 + "S" + Var SessionID2 = SessionID2 + "/" + Var SessionID2 = SessionID2 + Seeker.CodeNumber + Var SessionID2 = SessionID2 + "/" + + If Seeker.CreditCard = 1 Then + + CashlessReq SUCCESS + ;CashlessReq FAIL + + EndIf + Var PayDetail2 = Seeker.PayDetail2 + Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate + Else + + + If Seeker.CreditCard = 1 Then + + + CashlessReq SUCCESS + ;CashlessReq FAIL + + EndIf + Var PayDetail2 = Seeker.PayDetail2 + Pay ServiceType TelephoneNumber ServiceCredit SuggestID SessionID2 ServiceAmount2 ServiceCharge Donate + + + EndIf + + + Else + + ;no wait ack pay + Var waitAckPay = 0 + + Var SVT = "coffee" + Var ACC = "0899999999" + Var DEE = PayDetail + + If Seeker.TNumberTaobinMember = "" Then + Else + Var ACC = Seeker.TNumberTaobinMember + EndIf + + PAYEXT SVT ACC VendingTSIDTmp DEE + + CoinBack + + + EndIf + + EndIf + + __CMD "clear-stock-data" 0 "-" "-" + + Var ServiceSuccess = "yes" + If waitAckPay = 0 Then + + SAVELOG "waitAckPay = 0 Timeout" + + Open "ROOT/taobin_project/xml/page_drinkok.xml" + EndIf + + EndIf + + If MachineState_Result = 2 Then + + SAVELOG MachineStage + + If ErrTimeout = 0 Then + Var ErrTimeout = 1 + + If AddData = 1 Then + Var Cid = 26 + + If NewCollectPoint = 1 Then + If Seeker.UseGet15Discount = 1 Then + Var Cid = 39 + Else + Var Cid = 40 + Var PreviousSeeker.UseGetDrink5Bath = 0 + EndIf + EndIf + + AddData Cid Seeker.TNumberTaobinMember Seeker.PointTaobinStr PointCrm GetScore + EndIf + + + If Seeker.PayWithQR = 0 Then + + If Seeker.CreditCard = 1 Then + CashlessReq FAIL + Var ChangeFlag = 1 + Var CreditCardVoid = 1 + Else + + + If Seeker.CodeChannel = 0 Then + If ChangeFlag = 0 Then + Var ChangeFlag = 1 + + If Seeker.StoreCreditFlag = 1 Then + Var ChangeOK = 2 + Else + If GetFreeFromError = 1 Then + Var ChangeOK = 2 + Else + Change ServiceAmount2 + EndIf + + EndIf + + EndIf + + Else + + If Seeker.VendingCode = "MKFOO" Then + Var Cid = 33 + Var PointCrm = "0" + Var GetScore = "1" + Var TelephoneNumberx = "0899999999" + AddData Cid Seeker.TNumberTaobinMember Seeker.CodeNumber PointCrm GetScore + Var Seeker.CodeChannel = 0 + 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 + EndIf + + EndIf + Else + Var ChangeOK = 2 + EndIf + + + EndIf + EndIf + + Else + Var ChangeOK = 3 + EndIf + + + + + + + + + + + + ;OpenInst 0 "/mnt/sdcard/coffeevending/taobin_project/xml/page_drinkfail.xml" + + ;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" + + ;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/test_video_loop.xml" + ;Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_list.xml" + + EndIf + EndIf + + + + DEBUGVAR LastMakeDrinkResult + DEBUGVAR MachineStage + + + If LastMakeDrinkResult = "success" Then + Var MachineState_Result = 1 + EndIf + + If LastMakeDrinkResult = "fail" Then + Var MachineState_Result = 2 + EndIf + + If MachineStage = "drink-success" Then + Var MachineState_Result = 1 + EndIf + + If MachineStage = "drink-failed" Then + If RoadShow = "true" Then + Open "ROOT/taobin_project/xml/page_back_to_error.xml" + Else + Var MachineState_Result = 2 + EndIf + EndIf + + If MachineState_Result > 0 Then + Var EnableSelectMenuBetweenBrew = "Invisible" + Var EnableTopupCreditBetweenBrew = "Invisible" + EndIf + + If EnableSelectMenuBetweenBrew = "Enable" Then + If EnableSelectMenuBetweenBrewBlink = "Enable" Then + Var EnableSelectMenuBetweenBrewBlink = "Invisible" + Else + Var EnableSelectMenuBetweenBrewBlink = "Enable" + EndIf + + Else + Var EnableSelectMenuBetweenBrewBlink = "Invisible" + EndIf + + DEBUGVAR CountUpBrewing + ; animation video loop + If AnimationOn = "true" Then + Var CountUpBrewing = CountUpBrewing + 1 + + Var SlotVideo = CountUpBrewing / AnimationVideoPlayTime + + If PreviseStepVideo = SlotVideo Then + ;SAVELOG SlotVideo + Else + Var PreviseStepVideo = SlotVideo + ;SAVELOG PreviseStepVideo + ;SAVELOG SlotVideo + ;SAVELOG CountUpBrewing + + ;Var CountDownVideoTime = CountDownVideoTimeReload + + Var StepVideo = SlotVideo + 2 + + ;SAVELOG StepVideo + + If StepVideo = 1 Then + Var videoID = VideoID1 + EndIf + If StepVideo = 2 Then + Var videoID = VideoID2 + EndIf + If StepVideo = 3 Then + Var videoID = VideoID3 + EndIf + If StepVideo = 4 Then + Var videoID = VideoID4 + EndIf + If StepVideo = 5 Then + Var videoID = VideoID5 + EndIf + If StepVideo = 6 Then + Var videoID = VideoID6 + EndIf + If StepVideo = 7 Then + Var videoID = VideoID7 + EndIf + If StepVideo = 8 Then + Var videoID = VideoID8 + EndIf + If StepVideo = 9 Then + Var videoID = VideoID9 + EndIf + + ;SAVELOG videoID + + If videoID = 0 Then + + Else + If videoID = "---" Then + + Else + + Var VideoPlayFile = VideoPath + Var VideoPlayFile = VideoPlayFile + VideoFileBegin + Var VideoPlayFile = VideoPlayFile + videoID + Var VideoPlayFile = VideoPlayFile + VideoFileEnd + + Var PictureFile = PicturePath + Var PictureFile = PictureFile + PictureBegin + Var PictureFile = PictureFile + videoID + Var PictureFile = PictureFile + PictureEnd + + DEBUGVAR VideoPlayFile + DEBUGVAR PictureFile + EndIf + EndIf + EndIf + EndIf + + + If IgnoreNetCore = "true" Then + If CountDownBrewing = 0 Then + SAVELOG "CountDownBrewing = 0" + Open "ROOT/taobin_project/xml/page_drinkok.xml" + EndIf + EndIf + + + If ButtonGameCountDown > 0 Then + If ButtonGameCountDown = 1 Then + Var ButtonGameCountDownState = "Invisible" + Var ButtonGamePressToPlayState = "Enable" + EndIf + Var ButtonGameCountDown = ButtonGameCountDown - 1 + DEBUGVAR ButtonGameCountDown + EndIf + + + DEBUGVAR BREW_CNT + DEBUGVAR ButtonGamePressToPlayState + If BREW_CNT > 60 Then + + Else + Var ButtonGamePressToPlayState = "Invisible" + Var Game01Enable = 0 + EndIf + + + + + + Refresh + TimerReset + + + + + + + +; this copy in file menu_brew2.xml and menu_lid_straw.xml + + If ChangeStatus = "payout-end" Then + If ChangeFlag = 1 Then + Var ChangeOK = 2 + EndIf + EndIf + + + + +;include="ROOT/taobin_project/inc/video.inc" + + +; +; 0 +; 0 +; "ROOT/taobin_project/image/ad_medium_2.png" +; + + + + + + + 60 + 1290 + PictureFile + + +; +; 60 +; 1649 +; BottomText +; + + + 0 + 1655 +EnableSelectMenuBetweenBrew + text_next_order + + + + 835 + 1735 +EnableSelectMenuBetweenBrewBlink + "ROOT/taobin_project/image/page_payment/arrow_1.png" + + + + + +; + + 751 + 413 + IMG_CNT + +; + + XPosiShowCountDownBrew + 470 + End + 153 + 88 + RobotoBold + 0x513C2F + ShowCountDownBrewing + + + + + + + + + + 526 + 1680 + 241 + 204 + ButtonGamePressToPlayState + "ROOT/taobin_project/app/game/TAMATIAN-01.gif" + + + + 526 + 1680 + 241 + 204 + ButtonGamePressToPlayState + + DEBUGVAR Game01Enable + SAVELOG "Press play game conti" + Var Game01Enable = 0 + Var ButtonGamePressToPlayState = "Invisible" + RunApp "com.NDF.taobin" + + + + + + + +; straw left + + + + + + +; LID left + + + + + + + + diff --git a/xml/event/nam_hom_coconut/page_nam_hom_coconut_random.xml b/xml/event/nam_hom_coconut/page_nam_hom_coconut_random.xml index c9863b72..eba49d72 100644 --- a/xml/event/nam_hom_coconut/page_nam_hom_coconut_random.xml +++ b/xml/event/nam_hom_coconut/page_nam_hom_coconut_random.xml @@ -55,46 +55,6 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "clear_gel" Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "clear_gel" - Var MaxRandomIndex = MaxRandomIndex + 1 EndIf If TumbleBottleOutOfStock = 0 Then @@ -108,26 +68,6 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "tumble_bottle" Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "tumble_bottle" - Var MaxRandomIndex = MaxRandomIndex + 1 EndIf If CleansingGelOutOfStock = 0 Then @@ -147,6 +87,20 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "cleansing_gel" Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "cleansing_gel" + Var MaxRandomIndex = MaxRandomIndex + 1 EndIf If BalanceEssenceTonerOutOfStock = 0 Then @@ -160,6 +114,26 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "balance_essence_toner" Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "balance_essence_toner" + Var MaxRandomIndex = MaxRandomIndex + 1 EndIf If SuperSetOutOfStock = 0 Then @@ -167,6 +141,22 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "super_set" Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "super_set" + Var MaxRandomIndex = MaxRandomIndex + 1 EndIf If E_GiftCard100BathOutOfStock = 0 Then @@ -180,26 +170,6 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 - Var rewardList[MaxRandomIndex] = "e_gift_card_100bath" - Var MaxRandomIndex = MaxRandomIndex + 1 EndIf If ClearGel4mlOutOfStock = 0 Then @@ -233,6 +203,36 @@ Var MaxRandomIndex = MaxRandomIndex + 1 Var rewardList[MaxRandomIndex] = "clear_gel_4ml" Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 + Var rewardList[MaxRandomIndex] = "clear_gel_4ml" + Var MaxRandomIndex = MaxRandomIndex + 1 EndIf diff --git a/xml/event/tricker.ev b/xml/event/tricker.ev index 1edbcbf5..14ed50df 100644 --- a/xml/event/tricker.ev +++ b/xml/event/tricker.ev @@ -164,9 +164,7 @@ EndIf If SystemDateMonthInt = 6 Then If SystemDateDayInt >= 3 Then - If SystemDateDayInt <= 30 Then - Var NamHomCoconutPro = 1 - EndIf + Var NamHomCoconutPro = 1 EndIf If SystemDateDayInt <= 15 Then @@ -189,6 +187,12 @@ If SystemDateMonthInt = 6 Then EndIf EndIf +If SystemDateMonthInt = 7 Then + If SystemDateDayInt <= 7 Then + Var NamHomCoconutPro = 1 + EndIf +EndIf + If SystemDateMonthInt >= 7 Then Var CheckMemberPageCampaign = 1 EndIf diff --git a/xml/page_check_member2_campaign.xml b/xml/page_check_member2_campaign.xml index bed88da1..b5d7df4b 100644 --- a/xml/page_check_member2_campaign.xml +++ b/xml/page_check_member2_campaign.xml @@ -1051,9 +1051,9 @@ - 654 + 620 1076 - 120 + 164 80 RobotoBold 64 diff --git a/xml/page_payment_cash-AUS.xml b/xml/page_payment_cash-AUS.xml index 7fce15ed..35d204c0 100644 --- a/xml/page_payment_cash-AUS.xml +++ b/xml/page_payment_cash-AUS.xml @@ -697,7 +697,9 @@ EndIf Var Seeker.CreditCard = 1 Var Seeker.CreditCardRef = CreditCardRef - + + CashlessReq SUCCESS + Open "ROOT/taobin_project/xml/page_thankyou.xml" EndIf