"Enable" 1080 1920 "0xeae6e1" SoundVolume ; On open Var Timeout = 0 SAVELOG UnitTestType If UnitTestType = "1" Then Var CoffeePoint = 10 Open "ROOT/taobin_project/xml/page_show_consent.xml" EndIf Var TaobinLevel = 0 Var Point2X = 0 Var Seeker.TaobinErrorNetwork = 0 If PayOfflineMode = 1 Then Var Seeker.TaobinErrorNetwork = 1 ;Var Seeker.PointTaobinStr = "" + PayAmount ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + "/1/0" Var Seeker.PointTaobinStr = ParamCP Var TelephoneNumber = TelephoneNumberX Var Seeker.TNumberTaobinMember= TelephoneNumber Open "ROOT/taobin_project/xml/page_collect_point_error.xml" EndIf 1000 Var CountDownBrewing = BREW_CNT Var ShowCountDownBrewing = CountDownBrewing Var Timeout = Timeout + 1 If Timeout > 30 Then If StepGetPoint = 0 Then Open "ROOT/taobin_project/xml/page_show_consent.xml" Else Var TaobinLevel = 0 Var CoffeePoint = 1 Var Seeker.TaobinErrorNetwork = 1 ;Var Seeker.PointTaobinStr = "" + PayAmount ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + "/1/0" Var Seeker.PointTaobinStr = ParamCP Var TelephoneNumber = TelephoneNumberX Var Seeker.TNumberTaobinMember= TelephoneNumber Open "ROOT/taobin_project/xml/page_collect_point_error.xml" EndIf EndIf TimerReset Refresh Open "/media/bt/xml/security_alarm.xml" If StepGetPoint = 0 Then If PdpaAsk = 0 Then Open "ROOT/taobin_project/xml/page_show_consent.xml" Else Var StepGetPoint = 1 Var TelephoneNumber = TelephoneNumberX GETACCEXT TelephoneNumber 14 Var Ext1a = "" Open "ROOT/taobin_project/xml/page_collect_point_2.xml" EndIf Else If Ext1a = "" Then Var Seeker.TaobinErrorNetwork = 1 ;Var Seeker.PointTaobinStr = "" + PayAmount ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + "/1/0" Var Seeker.PointTaobinStr = ParamCP Var TelephoneNumber = TelephoneNumberX Var Seeker.TNumberTaobinMember = TelephoneNumber Open "ROOT/taobin_project/xml/page_collect_point_error.xml" Else If Ext1a = "ok" Then Var TaobinName = Ext1d Var TaobinCoupons = Ext1g Var TaobinExpire = Ext1f Var TaobinLevel = Ext1e Var TaobinPDPA = Ext1h DEBUGVAR TaobinPDPA Var PointTaobinTmp = Ext1i DEBUGVAR PointTaobinTmp INT PointTaobinTmp INT TaobinPDPA Var TelephoneNumber = TelephoneNumberX Var TNumberTaobinMemberXXX = TelephoneNumber ;Var PointTaobinTmp = 4 Var PointTaobin = PointTaobinTmp Var pTaobin = PointTaobin If TaobinLevel = 1 Then Var pTaobin = PayAmount / 20 Else Var pTaobin = PayAmount / 15 EndIf If pTaobin > 0 Then Var pTaobinX = PointTaobin / pTaobin If pTaobinX >= 2 Then Var Point2X = 1 EndIf EndIf ;Var Seeker.PointTaobinStr = "" + PointTaobin ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + "/" ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + PointTaobin Var Seeker.PointTaobinStr = ParamCP Var CoffeePointRank = Ext1b INT CoffeePointRank Var CoffeePoint1 = Ext1c INT CoffeePoint1 Var CoffeePoint = PointTaobin + CoffeePoint1 Var CoffeePointOld = CoffeePoint1 If TaobinLevel = 1 Then Var CoffeePointRank = CoffeePointRank + 0 Else Var CoffeePointRank = CoffeePointRank + PointTaobin EndIf Var CoffeePointRankTmp = CoffeePointRank If TaobinPDPA = 0 Then Open "ROOT/taobin_project/xml/page_show_consent.xml" EndIf Open "ROOT/taobin_project/xml/page_collect_point_3.xml" Else Var Seeker.TaobinErrorNetwork = 1 ;Var Seeker.PointTaobinStr = "" + PayAmount ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + "/1/0" Var Seeker.PointTaobinStr = ParamCP Var TelephoneNumber = TelephoneNumberX Var Seeker.TNumberTaobinMember = TelephoneNumber Open "ROOT/taobin_project/xml/page_collect_point_error.xml" EndIf EndIf EndIf If StepGetPoint = 0 Then Open "ROOT/taobin_project/xml/page_show_consent.xml" Else ;Var CoffeePoint = 1 Var Seeker.TaobinErrorNetwork = 1 ;Var Seeker.PointTaobinStr = "" + PayAmount ;Var Seeker.PointTaobinStr = Seeker.PointTaobinStr + "/1/0" Var Seeker.PointTaobinStr = ParamCP Var TelephoneNumber = TelephoneNumberX Var Seeker.TNumberTaobinMember= TelephoneNumber Open "ROOT/taobin_project/xml/page_collect_point_error.xml" EndIf If MachineStage = "drink-success" Then Var MachineState_Result = 1 EndIf If MachineStage = "drink-failed" Then Var MachineState_Result = 2 EndIf 178 680 "ROOT/taobin_project/image/collectiing/text20.png" ; ; 0 ; 0 ; "ROOT/taobin_project/image/ad_medium_2.png" ; 0 873 1080 Center 62 RobotoBlack 0x513C2F TelephoneNumber Telnum-mask-1 ; 751 413 "ROOT/taobin_project/image/page_doing/img2.png" ; XPosiShowCountDownBrew 470 End 153 88 RobotoBold 0x513C2F ShowCountDownBrewing