Stream Timeout

Archived
1 

if m.progress < 100  'Video is currently buffering
checkprogress=m.progress
while true
  msg=(15000,m.port)
        If checkprogress=m.progress  'If after 15 seconds no change exit while-reset screen to menu
           exit while
           else
           list.Push({
            Color: "#80000000"
            TargetRect: m.layout.right
        })
        
		list.Push({
		url: "pkg:/images/tvpattern1.jpg"
		TargetRect: m.layout.right
		'TargetRect: {x:325, y:1200, w: 210, h: 420}
		})
		list.Push({
            'Text: "Loading..." + m.progress.tostr() + "%"
			Text: m.progress.tostr() + "%"
            TargetRect: m.layout.right
        })
	
else  'Video is currently playing
        if m.paused
            list.Push({
                Color: "#80000000"
                TargetRect: m.layout.right
                CompositionMode: "Source"
            })
            list.Push({
                Text: "Paused"
                TargetRect: m.layout.right
            })
        else  'not paused
            list.Push({
                Color: "#00000000"
                TargetRect: m.layout.right
                CompositionMode: "Source"
            })
		end if
end if
end while
                        if m.paint = PaintFullscreenCanvas
                        m.setup = SetupFramedCanvas
			m.paint = PaintFramedCanvas
			rect = m.layout.right
                        end if
                        m.setup()
                       m.player.SetDestinationRect(rect)
			
endif

m.canvas.SetLayer(1, list)  'PLAYER