0 380 1080 1920 "0xeae6e1" SoundVolume Var PassPhrase = "" Var showStatusText = "" ;try cache If EnableCreditCard = "" Then CacheVarStr "get" EnableCreditCard Else CacheVarStr "put" EnableCreditCard EndIf If EnableCreditCard = "true" Then If NetworkStatus = "ACTIVATE" Then Var showStatusText = "OK" Else Var showStatusText = "NETWORK DOWN" EndIf Else Var showStatusText = "OFF" EndIf 1000 Var Timeout = Timeout + 1 If Timeout > 20 Then Var showStatusText = "" Open "ROOT/taobin_project/xml/vending_info.xml" EndIf Refresh TimerReset ; back 19 420 "ROOT/taobin_project/image/page2/bn_back_arrow.png" "ROOT/taobin_project/image/page2/bn_back_arrow.png" "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume Open "ROOT/taobin_project/xml/vending_info.xml" 158 465 "ROOT/taobin_project/image/collectiing/img_popup1.png" 333 886 "ROOT/taobin_project/image/collectiing/bn_1.png" "ROOT/taobin_project/image/collectiing/bp_1.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "1" TimerReset Refresh 477 886 "ROOT/taobin_project/image/collectiing/bn_2.png" "ROOT/taobin_project/image/collectiing/bp_2.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "2" TimerReset Refresh 620 886 "ROOT/taobin_project/image/collectiing/bn_3.png" "ROOT/taobin_project/image/collectiing/bp_3.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "3" TimerReset Refresh 333 1030 "ROOT/taobin_project/image/collectiing/bn_4.png" "ROOT/taobin_project/image/collectiing/bp_4.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "4" TimerReset Refresh 477 1030 "ROOT/taobin_project/image/collectiing/bn_5.png" "ROOT/taobin_project/image/collectiing/bp_5.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "5" TimerReset Refresh 620 1030 "ROOT/taobin_project/image/collectiing/bn_6.png" "ROOT/taobin_project/image/collectiing/bp_6.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "6" TimerReset Refresh 333 1173 "ROOT/taobin_project/image/collectiing/bn_7.png" "ROOT/taobin_project/image/collectiing/bp_7.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "7" TimerReset Refresh 477 1173 "ROOT/taobin_project/image/collectiing/bn_8.png" "ROOT/taobin_project/image/collectiing/bp_8.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "8" TimerReset Refresh 620 1173 "ROOT/taobin_project/image/collectiing/bn_9.png" "ROOT/taobin_project/image/collectiing/bp_9.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "9" TimerReset Refresh 477 1317 "ROOT/taobin_project/image/collectiing/bn_0.png" "ROOT/taobin_project/image/collectiing/bp_0.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Var PassPhrase = PassPhrase + "0" TimerReset Refresh 620 1317 "ROOT/taobin_project/image/collectiing/bn_back-1.png" "ROOT/taobin_project/image/collectiing/bp_back-1.png" "ROOT/sounds/codebuttom.wav" SoundVolume Var Timeout = 0 Var showStatusText = "" Trim PassPhrase -1 StrLen PassPhrase PassLen If PassLen < 10 Then ;Var Tel_Confirm_State = "Invisible" EndIf If PassLen = 0 Then Var ShowTextNumber = "Enable" EndIf Refresh 577 1471 "Enable" "ROOT/taobin_project/image/collect_point1_en/bn_positive.png" "ROOT/taobin_project/image/collect_point1_en/bp_positive.png" "ROOT/taobin_project/image/collect_point1_en/bn_positive.png" "ROOT/sounds/codebuttom.wav" SoundVolume ; Validate If PassPhrase = "16583" Then If NetworkStatus = "ACTIVATE" Then Var EnableCreditCard = "true" Var showStatusText = "OK" CacheVarStr "put" EnableCreditCard Var PassPhrase = "" Else Var EnableCreditCard = "" Var showStatusText = "NETWORK DOWN" CacheVarStr "put" EnableCreditCard Var PassPhrase = "" EndIf Refresh Else If PassPhrase = "38561" Then Var EnableCreditCard = "" Var showStatusText = "OFF" CacheVarStr "put" EnableCreditCard Var PassPhrase = "" Refresh Else Var Timeout = 0 Var showStatusText = "Incorrect" Var PassPhrase = "" TimerReset Refresh EndIf EndIf 0 673 1080 Center 62 RobotoBlack 0x513C2F PassPhrase 0 473 1080 Center 72 RobotoBlack 0xFF0000 showStatusText