Jump to content
Sign in to follow this  
First Spear

IntyBASIC Rough Song Loop - Boss Battle Tension

Recommended Posts

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

  • Like 2

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...