IntyBASIC Rough Song Loop - Boss Battle Tension

[First Spear]

Something to play at the end of your great IntyBASIC game where you have to complete a "Boss Battle".

	Mode 0 , 0,0,0,0
	Wait
	Print At 0 Color 7 , "Boss Tension"
	Print At 80 Color 4  , "Press top side"
	Print At 100 Color 4 , "button to"
	Print At 120 Color 4 , "restart music."
	Print At 160 Color 1 , "Press bottom side "
	Print At 180 Color 1 , "button to exit."


	Wait
	Play Simple
	Wait
    Play MyMusic
    Wait
	Goto PlayLoop


	PlayLoop:
		Wait
		If Cont.B0 Then Wait : Play Off : Wait : Play MyMusic
        If Cont.B1 Then Goto ExitThis
		If Cont.B2 Then Goto ExitThis
        Wait
		Goto PlayLoop

	ExitThis:
        Wait
		Print At 235 Color (Rand and 7) , "Bye."
        For spinWait = 0 to 5
        	Wait
		Next
        Play Off




MyMusic:
	Data 6
	Music	  C3X
	Music	  A2#
	Music	  D2#
	Music	  F2
	Music	  C2
	Music	  C2
	Music	  C3
	Music	  A2#
	Music	  D2#
	Music	  F2
	Music	  C2
	Music	  C2
	Music	  -
        Music     -
	Music	 Repeat