Pre-Roll I need a way to not accept a button press

Hello,

I have a Pre-Roll set in videoplayer that uses xml to read the preroll line. I cannot seem to get the Pre-Roll video to not accept a Button press. I want the pre-roll to play until done no matter what button is pressed except Home, then allow the content to play as usual with button presses. I know roVideoPlayer disables trickmode or button presses, but I can't seem to get it working. I will attach my appVideoScreen.brs here for anyone that has some input to make it work. My pre-roll plays now and if I press the Up arrow on remote it goes to the content. Reply here or PM me

'**********************************************************
'**  Video Player Example Application - Video Playback 
'**  November 2009
'**  Copyright (c) 2009 Roku Inc. All Rights Reserved.
'**********************************************************

'***********************************************************
'** Create and show the video screen.  The video screen is
'** a special full screen video playback component.  It 
'** handles most of the keypresses automatically and our
'** job is primarily to make sure it has the correct data 
'** at startup. We will receive event back on progress and
'** error conditions so it's important to monitor these to
'** understand what's going on, especially in the case of errors
'***********************************************************  
Function showVideoScreen(episode As Object)

    if type(episode) <> "roAssociativeArray" then
        print "invalid data passed to showVideoScreen"
        return -1
    endif

    'Uncomment his line to dump the contents of the episode to be played
    'PrintAA(episode)
	
    If Episode.PrePlay<>""
		
		port=CreateObject("roMessagePort")
		screen=CreateObject("roVideoScreen")
		screen.SetMessagePort(port)
		screen.SetPositionNotificationPeriod(30)
		
		ContentToPlay=CreateObject("roAssociativeArray")
		ContentToPlay.Title="The show will play after this message..."
		ContentToPlay.ContentType="movie"
		ContentToPlay.StreamFormat="mp4"
		ContentToPlay.ContentQuality="SD"
		ContentToPlay.StreamQualities=[]
		ContentToPlay.StreamBitrates=[]
		ContentToPlay.StreamUrls=[]
		ContentToPlay.StreamQualities.Push("SD")
		ContentToPlay.StreamBitrates.Push(0)
		ContentToPlay.StreamUrls.Push(episode.PrePlay)
		screen.SetContent(ContentToPlay)
		screen.show()
    while true
        msg = wait(0, port)

        if type(msg) = "roVideoScreenEvent" then
            print "showHomeScreen | msg = "; msg.getMessage() " | index = "; msg.GetIndex()
            if msg.isfullresult()
            	print "Video Completed Playback Normally"
            	RegDelete(episode.ContentId)
            	print "deleted bookmark for playback position"
            else if msg.isScreenClosed()
                print "Screen closed"
                exit while
            elseif msg.isRequestFailed()
                print "Video request failure: "; msg.GetIndex(); " " msg.GetData() 
            elseif msg.isStatusMessage()
                print "Video status: "; msg.GetIndex(); " " msg.GetData() 
            elseif msg.isButtonPressed()
                print "Button pressed: "; msg.GetIndex(); " " msg.GetData()
            elseif msg.isPlaybackPosition() then
                nowpos = msg.GetIndex()
                RegWrite(episode.ContentId, nowpos.toStr())
            else
                print "Unexpected event type: "; msg.GetType()
            end if
        else
            print "Unexpected message class: "; type(msg)
        end if
    end while
	screen.close()
  End if
                port=CreateObject("roMessagePort")
		screen=CreateObject("roVideoScreen")
		screen.SetMessagePort(port)
		screen.SetPositionNotificationPeriod(30)
		screen.SetContent(episode)
		screen.Show()
		
		while true
        msg = wait(0, port)

        if type(msg) = "roVideoScreenEvent" then
            print "showHomeScreen | msg = "; msg.getMessage() " | index = "; msg.GetIndex()
            if msg.isfullresult()
            	print "Video Completed Playback Normally"
            	RegDelete(episode.ContentId)
            	print "deleted bookmark for playback position"
            else if msg.isScreenClosed()
                print "Screen closed"
                exit while
            elseif msg.isRequestFailed()
                print "Video request failure: "; msg.GetIndex(); " " msg.GetData() 
            elseif msg.isStatusMessage()
                print "Video status: "; msg.GetIndex(); " " msg.GetData() 
            elseif msg.isButtonPressed()
                print "Button pressed: "; msg.GetIndex(); " " msg.GetData()
            elseif msg.isPlaybackPosition() then
                nowpos = msg.GetIndex()
                RegWrite(episode.ContentId, nowpos.toStr())
            else
                print "Unexpected event type: "; msg.GetType()
            end if
        else
            print "Unexpected message class: "; type(msg)
        end if
    end while

End Function