1080 1312 SoundVolume "ROOT/image/BG1SLOT_TAB.bmp" ; On open Var info_startX = 11 Var info_1Y = 250 Var info_2Y = 320 Var info_3Y = 390 Var info_4Y = 460 Var info_5Y = 530 Var info_6Y = 600 Var info_7Y = 670 Var info_8Y = 740 Var info_9Y = 810 Var info_10Y = 880 Var info_11Y = 950 Var info_12Y = 1020 Var info_13Y = 1090 Var info_cancel_y = info_13Y + 50 Var info_text_startX = info_startX + 22 Var info_text_1Y = info_1Y + 18 Var info_text_2Y = info_2Y + 18 Var info_text_3Y = info_3Y + 18 Var info_text_4Y = info_4Y + 18 Var info_text_5Y = info_5Y + 18 Var info_text_6Y = info_6Y + 18 Var info_text_7Y = info_7Y + 18 Var info_text_8Y = info_8Y + 18 Var info_text_9Y = info_9Y + 18 Var info_text_10Y = info_10Y + 18 Var info_text_11Y = info_11Y + 18 Var info_text_12Y = info_12Y + 18 Var info_text_13Y = info_13Y + 18 Var info2_startX = 550 Var info2_text_startX = info2_startX + 22 Var temphot = "น้ำร้อน องศา " Var temphot = temphot + BrewTemp Var temphot = temphot + " C" Var tempice = "น้าแข็ง องศา " Var tempice = tempice + IceTemp Var tempice = tempice + " C " If IceFull = 0 Then Var tempice = tempice + " ไม่เต็ม " Else Var tempice = tempice + " เต็มถัง " EndIf Var configfile = "CFG = " + ConfigNumer Var ice_version_text = " ICE version " + IceVersion Var brew_version_text = "Server status " + NetworkStatus Var show_version = brew_version_text Var show_boxid = "[ " + BoxID Var show_boxid = show_boxid + " ]" Var ShowVersionAll = BrewMachineFirmwareVersion + " | " Var ShowVersionAll = ShowVersionAll + XMLPageVersion Var ShowVersionAll = ShowVersionAll + " | " Var ShowVersionAll = ShowVersionAll + taobin_version Var ShowVersionAll = ShowVersionAll + " | " Var ShowVersionAll = ShowVersionAll + JXMLVersion Var IDCardState = "Invisible" Var Timeout = 0 Var IDFullNameEng = "เสียบบัตร" Var Text1_6 = "Door/Lid/Straw : " + Service_LidStraw Var Text2_6 = "ฝา : " + Lid1Status var Text1_7 = "CellSite :" + CellSite var Text2_7 = "ระดับสัญญาณ :" + SignalStrengthStr var Text2_7 = Text2_7 + " [" var Text2_7 = Text2_7 + SignalStrengthLevel var Text2_7 = Text2_7 + "]" Cart "DeleteMenuID" "ALL" Var Text1_8 = "IP " + MobileIPNetwork Var Text1_10 = "Spiral=" + SpiralStatus1 Var Text1_10 = Text1_10 + " Err=" Var Text1_10 = Text1_10 + SpiralErrcause1 Var Text2_10 = "Spiral=" + SpiralStatus2 Var Text2_10 = Text2_10 + " Err=" Var Text2_10 = Text2_10 + SpiralErrcause2 Var GoToCamera = 0 1000 Var Timeout = Timeout + 1 If Timeout > 15 Then Open "ROOT/taobin_project/xml/page_board.xml" EndIf If GoToCamera = 1 Then Var NextPage = "-" OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_camera.xml" TopView "show" Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" EndIf If GoToCamera > 0 Then Var GoToCamera = GoToCamera - 1 EndIf DEBUGVAR AdvertiseProfile Var Text1_8 = "IP " + MobileIPNetwork Var Text2_8 = "Camera " + CameraCount Var Text1_9 = SystemTime Var Text1_9 = Text1_9 + " " Var Text1_9 = Text1_9 + SystemDate Var skr = "curr" DEBUGVAR skr.NOBONUS Var skr = "next" DEBUGVAR skr.NOBONUS Refresh TimerReset info_startX info_1Y "ROOT/taobin_project/image/tab_1.png" Machine DoorOpen info_startX info_2Y "ROOT/taobin_project/image/tab_1.png" Machine Lid info_startX info_3Y "ROOT/taobin_project/image/tab_1.png" Machine Straw info_startX info_4Y "ROOT/taobin_project/image/tab_1.png" info_startX info_5Y "ROOT/taobin_project/image/tab_1.png" MainMenu info2_startX info_1Y "ROOT/taobin_project/image/tab_1.png" OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml" ;If TaobinOnline = "true" Then ; OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_catalog.xml" ;EndIf ;If TermTemOnline = "true" Then ; OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_tt_catalog.xml" ;EndIf TopView "show" Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" info2_startX info_2Y "ROOT/taobin_project/image/tab_1.png" ReloadAll ; FINISH info2_startX info_3Y "ROOT/taobin_project/image/tab_1.png" FINISH info2_startX info_4Y "ROOT/taobin_project/image/tab_1.png" ScreenRefresh ;LED LedDoorCup Off 255 255 255 255 ;LED LedDoorLid Off 255 255 255 255 ;Var ShowPrice = "Enable" info2_startX info_5Y "ROOT/taobin_project/image/tab_1.png" ;Var ShowPrice = "Invisible" Open "ROOT/xml/test_coin.xml" ;OpenInst 1 "/mnt/sdcard/coffeevending/taobin_project/xml/page_advert.xml" ;OpenInst 2 "/mnt/sdcard/coffeevending/taobin_project/xml/page_camera.xml" ;TopView "show" ;Open "/mnt/sdcard/coffeevending/taobin_project/xml/page_main_blank.xml" info1_startX info_6Y "ROOT/taobin_project/image/tab_1.png" Machine Straw LED LedDoorLid Blink 255 255 255 255 info2_startX info_6Y "ROOT/taobin_project/image/tab_1.png" Machine Lid LED LedDoorLid Blink 255 255 255 255 info2_text_startX info_text_5Y 30 fontType1 0x000000 "Test coin and bill" info2_text_startX info_text_1Y 30 fontType1 0x000000 ShowVersionAll info2_text_startX info_text_2Y 30 fontType1 0x000000 MainBoardStatus info2_text_startX info_text_3Y 30 fontType1 0x000000 IceBoardStatus info_text_startX info_text_1Y 30 fontType1 0x000000 temphot info_text_startX info_text_2Y 30 fontType1 0x000000 tempice info_text_startX info_text_3Y 30 fontType1 0x000000 configfile info_text_startX info_text_4Y 30 fontType1 0x000000 show_version info_text_startX info_text_5Y 30 fontType1 0x000000 show_boxid info2_text_startX info_text_4Y 30 IDCardState fontType1 0x000000 IDFullNameEng info_text_startX info_text_6Y 30 fontType1 0x000000 Text1_6 info2_text_startX info_text_6Y 30 fontType1 0x000000 Text2_6 info1_startX info_7Y "ROOT/taobin_project/image/tab_1.png" info2_startX info_7Y "ROOT/taobin_project/image/tab_1.png" info_text_startX info_text_7Y 30 fontType1 0x000000 Text1_7 info2_text_startX info_text_7Y 30 fontType1 0x000000 Text2_7 info1_startX info_8Y "ROOT/taobin_project/image/tab_1.png" CameraService "filter-remove-all" CameraService "add-filter=mClass=9,mSubclass=4" CameraService "add-filter=USB Camera" CameraService "Start" info2_startX info_8Y "ROOT/taobin_project/image/tab_1.png" If CameraCount = 1 Then CameraSetting "usbfront" "default" "Rotate=90,Resolution=1280x720,scaleX=1.0,scaleY=1.0" EndIf Var GoToCamera = 3 info_text_startX info_text_8Y 30 fontType1 0x000000 Text1_8 info2_text_startX info_text_8Y 30 fontType1 0x000000 Text2_8 info1_startX info_9Y "ROOT/taobin_project/image/tab_1.png" CameraService "Start" info2_startX info_9Y "ROOT/taobin_project/image/tab_1.png" info_text_startX info_text_9Y 30 fontType1 0x000000 Text1_9 info2_text_startX info_text_9Y 30 fontType1 0x000000 Text2_9 info1_startX info_10Y "ROOT/taobin_project/image/tab_1.png" info_text_startX info_text_10Y 30 fontType1 0x000000 Text1_10 info2_startX info_10Y "ROOT/taobin_project/image/tab_1.png" Open "ROOT/taobin_project/xml/test_qr.xml" info2_text_startX info_text_10Y 30 fontType1 0x000000 Text2_10 431 info_cancel_y "ROOT/taobin_project/image//bp_cancel.png" "ROOT/taobin_project/image/bp_cancel.png" "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume Open "ROOT/taobin_project/xml/page_board.xml" Var IDCardState = "Enable" SAVELOG IDFullNameEng