"ALL" HeadScreenWidth HeadScreenHeight Int VideoAdvIndex Var VideoAdvIndex = VideoAdvIndex + 1 If VideoAdvIndex = 1 Then If TermTemOnline = "true" Then Open "ROOT/termtem_project/xml/test_video_loop.xml" Else Var HeadVideoFilename = video_main_0 EndIf EndIf If VideoAdvIndex = 2 Then Var HeadVideoFilename = video_main_1 EndIf If VideoAdvIndex = 3 Then Var HeadVideoFilename = video_main_2 EndIf DEBUGVAR VideoAdvIndex DEBUGVAR video_main_count If VideoAdvIndex >= video_main_count 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"