"ALL" HeadScreenWidth HeadScreenHeight Int VideoAdvIndex Var VideoAdvIndex = VideoAdvIndex + 1 If VideoAdvIndex = 1 Then Var HeadVideoFilename = "/mnt/sdcard/coffeevending/taobin_project/video/taobin_adv1.mp4" EndIf If VideoAdvIndex = 2 Then Var HeadVideoFilename = "/mnt/sdcard/coffeevending/taobin_project/video/taobin_adv3.mp4" EndIf DEBUGVAR VideoAdvIndex If VideoAdvIndex > 1 Then Var VideoAdvIndex = 0 EndIf Open "ROOT/taobin_project/xml/video_loop2.xml" 5000 Open "/mnt/sdcard/coffeevending/xml/security_alarm.xml" 870 0 200 200 "/mnt/sdcard/coffeevending/wav/click.wav" SoundVolume OpenInst 0 "//mnt/sdcard/coffeevending/taobin_project/xml/vending_info.xml" ;OpenInst 0 "//mnt/sdcard/coffeevending/taobin_project/xml/page_remove_cup.xml"