"Enable" 1080 1920 "0xeae6e1" SoundVolume "ROOT/sounds/Ding-dong.wav" ; On open Var LidState = "Enable" Var StarwState = "Enable" Var videoEnd = 0 If show_eng = "true" Then Var DirImage = "ROOT/taobin_project/image/complete_en/" Else Var DirImage = "ROOT/taobin_project/image/complete/" EndIf Var VideoPlayFile = VideoPath Var VideoPlayFile = VideoPlayFile + VideoFileBegin Var VideoPlayFile = VideoPlayFile + "24" Var VideoPlayFile = VideoPlayFile + VideoFileEnd Var Timeout = 0 If TNumberTaobinMember = "" Then Else If PayWithQR = 1 Then Var VendingTSID = VendingTSIDTmp EndIf Var BmiYear = PointTaobinStr Var PointCrm = "" If FromConsent = 1 Then Var PointCrm = "pdpa1" EndIf Var GetScore = VendingTSID AddData 11 TNumberTaobinMember BmiYear PointCrm GetScore Var TNumberTaobinMember = "" Var VendingTSID = "" EndIf StopLongPlay 500 If HaveCup = "false" Then Open "ROOT/taobin_project/xml/page_back_to_main.xml" EndIf If MachineStage = "remove-cup" Then Open "ROOT/taobin_project/xml/page_back_to_main.xml" EndIf If Timeout = 5 Then If show_eng = "true" Then Play "/mnt/sdcard/coffeevending/taobin_project/sound_eng/Straw.mp3" Else Play "/mnt/sdcard/coffeevending/taobin_project/sound_thai/drinkfinish.mp3" EndIf EndIf Var Timeout = Timeout + 1 TimerReset ; ; 0 ; 0 ; "ROOT/taobin_project/image/ad_medium_2.png" ; ; ; 0 ; 547 ; Var( DirImage + "/img2.png" ) ; 870 1860 200 50 "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume Var countClick2 = countClick2 + 1 If countClick2 = 3 Then EndIf If countClick2 >= 5 Then Open "ROOT/taobin_project/xml/page_back_to_main.xml" EndIf Refresh 0 1886 20 1080 end RobotoBlack 0x513C2F countClick2