Legacy program compatible with HD410?

Below is the program that we were using on a legacy product with a compact flash card. Is this program compatible with the HD410? Thank you!! debug = true REM DR PEPPER HOLOGRAM 5.30.08 REM This script starts with a static image, intro.bmp. REM It then plays a list of videos one after the other when button 0 is pressed REM The script waits for the video to stop playing before it allows you to advance REM to the next video. When the end of the list is reached, pressing button 0 REM starts at the top of the list again. After each video is played, the script REM returns to the static image. REM REM 1 bbcodeparser bbcode.php bbcode.pl bbcode.txt bbparse.php engine existusers.txt extstusers.parsed1.txt extstusers.parsed2.txt extstusers.parsed.txt htmlentdec.php logs nbbc_files phpbb2zendesk.log phpbb3-to-zd.log phpbb3-to-zdnew.log phpbb3-to-zd.sh phpbb3-to-zd-undo.sh phpbb_db phpbbdb3 phpbbusers.xls postids.tmp post_results.xml posts.xml SBBCodeParser.php stdout studioloft_phpbb.sql styles test2 test4 tests testtext.txt test.txt txt2html_func.php txt2html.php txthtmlencode.php users.json users.json.txt users_tmp.json users_tmp_nc.json zddelete zdget zdpost REM Initialize Objects REM 1 bbcodeparser bbcode.php bbcode.pl bbcode.txt bbparse.php engine existusers.txt extstusers.parsed1.txt extstusers.parsed2.txt extstusers.parsed.txt htmlentdec.php logs nbbc_files phpbb2zendesk.log phpbb3-to-zd.log phpbb3-to-zdnew.log phpbb3-to-zd.sh phpbb3-to-zd-undo.sh phpbb_db phpbbdb3 phpbbusers.xls postids.tmp post_results.xml posts.xml SBBCodeParser.php stdout studioloft_phpbb.sql styles test2 test4 tests testtext.txt test.txt txt2html_func.php txt2html.php txthtmlencode.php users.json users.json.txt users_tmp.json users_tmp_nc.json zddelete zdget zdpost REM Initialize Video & Button vid=CreateObject("roVideoPlayer") mode=CreateObject("roVideoMode") buttonpress=CreateObject("roGpioControlPort") p=CreateObject("roMessagePort") vid.SetPort(p) buttonpress.SetPort(p) REM 1 bbcodeparser bbcode.php bbcode.pl bbcode.txt bbparse.php engine existusers.txt extstusers.parsed1.txt extstusers.parsed2.txt extstusers.parsed.txt htmlentdec.php logs nbbc_files phpbb2zendesk.log phpbb3-to-zd.log phpbb3-to-zdnew.log phpbb3-to-zd.sh phpbb3-to-zd-undo.sh phpbb_db phpbbdb3 phpbbusers.xls postids.tmp post_results.xml posts.xml SBBCodeParser.php stdout studioloft_phpbb.sql styles test2 test4 tests testtext.txt test.txt txt2html_func.php txt2html.php txthtmlencode.php users.json users.json.txt users_tmp.json users_tmp_nc.json zddelete zdget zdpost REM Set Constants REM 1 bbcodeparser bbcode.php bbcode.pl bbcode.txt bbparse.php engine existusers.txt extstusers.parsed1.txt extstusers.parsed2.txt extstusers.parsed.txt htmlentdec.php logs nbbc_files phpbb2zendesk.log phpbb3-to-zd.log phpbb3-to-zdnew.log phpbb3-to-zd.sh phpbb3-to-zd-undo.sh phpbb_db phpbbdb3 phpbbusers.xls postids.tmp post_results.xml posts.xml SBBCodeParser.php stdout studioloft_phpbb.sql styles test2 test4 tests testtext.txt test.txt txt2html_func.php txt2html.php txthtmlencode.php users.json users.json.txt users_tmp.json users_tmp_nc.json zddelete zdget zdpost imagemode=1 videomode$="1280x720x60p" vidend=8 k=0 number_of_videos=3 vid_playing=false DIM videolist$(number_of_videos) videolist$(0)="video(0).mpg" videolist$(1)="video(1).mpg" videolist$(2)="video(2).mpg" rem --------------------------------- mode.SetMode(videomode$) rem rem Enter Video names into array REM Start Demo REM Now we wait for a button press.. wait_for_button: If debug print "Waiting for a button to be pressed." msg=wait(0, p) if type(msg)="roGpioButton" then if debug print "A button has been pressed, but not the correct button." button = msg.GetInt() if button = 0 and vid_playing=false then if debug print "Button 0 pressed, playing video." if videolist$(k) = "video(0).mpg" then vid.SetVolume(85) if videolist$(k) = "video(1).mpg" then vid.SetVolume(100) if videolist$(k) = "video(2).mpg" then vid.SetVolume(100) ok=vid.PlayFile(videolist$(k)) vid_playing=true k=k+1 if k=number_of_videos then k=0 if ok=0 then print "An error occurred playing this file." STOP endif endif else if type(msg)="roVideoEvent" then status=msg.GetInt() if status = vidend then if debug print "Video has finished playing..." vid_playing=false vid.StopClear() endif endif goto wait_for_button