Help with loading retrieving icon & pause symbol

Archived
1

Can someone offer some input on how to show a loading retrieving icon? Pasting part of the main.brs for the If msg.GetMessage()=“startup progress”

I tried some changes but my changes didn’t work. Was close to having this channel in today but these 2 issues came up.

Else If Type(msg)="roVideoPlayerEvent"
			If msg.isStatusMessage()
				If msg.GetMessage()="startup progress"
					'Print"buffering=";msg.GetIndex()/10
					If msg.GetIndex()/10=100 Print "Playing Video #:";index
				Else If msg.GetMessage()="end of stream"
					Print"message is full result event - back to position 0"
					If index<max
						index=index+1
						RegWrite("indexpos",index.ToStr(),"studioc")
					Else
						index=0
						RegWrite("indexpos",index.ToStr(),"studioc")
					End If
					RegWrite("indextime","0","studioc")
				End If
			Else If msg.isPlaybackPosition()
				indextime=msg.GetIndex()
				RegWrite("indextime",msg.GetIndex().ToStr(),"studioc")
			Else If msg.isStreamStarted()
				Print"stream started event"
			Else If msg.isFullResult()
				Print"message is full result event"
			Else If msg.isRequestFailed()
				Print"Video #:";index;" ";msg.GetMessage()
			End If
		End If
		canvas.SwapBuffers()
	End While
End Sub

And how to draw a pause symbol on the screen when channel is paused?

Thanks much.