\\
\\ Galaforce 1 ( BBC Micro ) from the original 6502 source code, adapted to assemble using beebasm
\\
\\ (c) Kevin Edwards 1986-2019
\\
\\ Twitter @KevEdwardsRetro
\\

\\ REM SAVE"MUSIC2"
\\ B%=P%
\\ [OPT pass
 
 \Game Start Music
 
 .STRT1
      EQUB 8+D3:EQUB 8+D1:EQUB 8+D2
      EQUB 8+D3:EQUB 8+D1:EQUB 8+D4
      EQUB 8+D2:EQUB 8+D2:EQUB 8+D2:EQUB 8+D2:EQUB 8+D2
      EQUB 11+D3:EQUB 11+D1:EQUB 11+D2
      EQUB 11+D3:EQUB 11+D1:EQUB 11+D4
      EQUB 13+D2:EQUB 13+D2:EQUB 13+D2:EQUB 13+D2:EQUB 13+D2:EQUB 8+D1
      EQUB 0
 .STRT2
      EQUB 11+D3:EQUB 11+D1:EQUB 11+D2
      EQUB 11+D3:EQUB 11+D1:EQUB 11+D4
      EQUB 11+D2:EQUB 11+D2:EQUB 11+D2:EQUB 11+D2:EQUB 11+D2
      EQUB 15+D3:EQUB 15+D1:EQUB 15+D2
      EQUB 15+D3:EQUB 15+D1:EQUB 15+D4
      EQUB 17+D2:EQUB 17+D2:EQUB 17+D2:EQUB 17+D2:EQUB 17+D2:EQUB 11+D1
      EQUB 0
 .STRT3
      EQUB 15+D3:EQUB 15+D1:EQUB 15+D2
      EQUB 15+D3:EQUB 15+D1:EQUB 15+D4
      EQUB 15+D2:EQUB 15+D2:EQUB 15+D2:EQUB 15+D2:EQUB 15+D2
      EQUB 18+D3:EQUB 18+D1:EQUB 18+D2
      EQUB 18+D3:EQUB 18+D1:EQUB 18+D4
      EQUB 20+D2:EQUB 20+D2:EQUB 20+D2:EQUB 20+D2:EQUB 20+D2:EQUB 15+D1
      EQUB 0
 
 
 .DEMa1
      EQUB 20+D1:EQUB 20+D1:EQUB 20+D1:EQUB 20+D1
      EQUB 20+D1:EQUB 20+D1:EQUB 20+D1:EQUB 20+D1
      EQUB 20+D2:EQUB 20+D2:EQUB 20+D2:EQUB 20+D2
      EQUB 20+D4:EQUB 20+D2:EQUB 20+D4:EQUB 20+D2:EQUB 20+D4
      EQUB 32+D1:EQUB 32+D1:EQUB 32+D1:EQUB 32+D1
      EQUB 32+D1:EQUB 32+D1:EQUB 32+D1:EQUB 32+D1
      EQUB 32+D2:EQUB 32+D2:EQUB 32+D2:EQUB 32+D2
      EQUB 32+D4:EQUB 32+D2:EQUB 32+D4:EQUB 32+D2:EQUB 32+D4
      EQUB 30+D1:EQUB 30+D1:EQUB 30+D1:EQUB 30+D1
      EQUB 30+D1:EQUB 30+D1:EQUB 30+D1:EQUB 30+D1
      EQUB 30+D2:EQUB 30+D2:EQUB 30+D2:EQUB 30+D2
      EQUB 30+D4:EQUB 30+D2:EQUB 27+D4:EQUB 27+D2:EQUB 25+D4
      EQUB 27+D1:EQUB 27+D1:EQUB 27+D1:EQUB 27+D1
      EQUB 27+D1:EQUB 27+D1:EQUB 27+D1:EQUB 27+D1
      EQUB 27+D1:EQUB 27+D1:EQUB 27+D1:EQUB 27+D1
      EQUB 27+D1:EQUB 27+D1:EQUB 27+D1:EQUB 27+D1
      EQUB 27+D4:EQUB 27+D4:EQUB 27+D2:EQUB 27+D2:EQUB 27+D4
      EQUB 0
 .DEMa2
      EQUB 8+D4:EQUB Rest+D4:EQUB 15+D4:EQUB Rest+D4
      EQUB 8+D4:EQUB 8+D4:EQUB 15+D4:EQUB Rest+D4
      EQUB 16+D4:EQUB Rest+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 16+D4:EQUB 16+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 11+D4:EQUB Rest+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 11+D4:EQUB 11+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 15+D4:EQUB Rest+D4:EQUB 27+D4:EQUB Rest+D4
      EQUB 15+D2:EQUB 27+D2:EQUB 15+D2:EQUB 13+D2:EQUB 11+D4:EQUB 10+D4
      EQUB Rest+D1
      EQUB 0
 .DEMa3
      EQUB 20+D4:EQUB Rest+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 27+D4:EQUB Rest+D4:EQUB 30+D4:EQUB Rest+D4
      EQUB 28+D4:EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4
      EQUB Rest+D4:EQUB Rest+D4
      EQUB 30+D2:EQUB 32+D2
      EQUB 30+D4:EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4
      EQUB 27+D4:EQUB 25+D4:EQUB 23+D4:EQUB 20+D4:EQUB 22+D4:EQUB Rest+D4
      EQUB Rest+D4:EQUB Rest+D4
      EQUB 19+D4:EQUB Rest+D4:EQUB 15+D4
      EQUB 16+D1:EQUB 17+D1:EQUB 18+D1:EQUB 19+D1:EQUB Rest+D1
      EQUB 0
 
 
 .DEMb3
      EQUB 0
 
 
 .DEMc1
      EQUB 0
 
 
 
 .DEMd1
      EQUB 44+D1:EQUB 40+D1:EQUB 37+D1:EQUB 32+D1
      EQUB 40+D1:EQUB 37+D1:EQUB 32+D1:EQUB 28+D1
      EQUB 37+D1:EQUB 32+D1:EQUB 28+D1:EQUB 25+D1
      EQUB 32+D1:EQUB 28+D1:EQUB 25+D1:EQUB 20+D1
      EQUB 28+D1:EQUB 25+D1:EQUB 20+D1:EQUB 16+D1
      EQUB 25+D1:EQUB 20+D1:EQUB 16+D1:EQUB 13+D1
      EQUB 20+D1:EQUB 16+D1:EQUB 13+D1:EQUB 8+D1
      EQUB 16+D1:EQUB 13+D1:EQUB 8+D1:EQUB 4+D1
      EQUB 6+D1:EQUB 11+D1:EQUB 15+D1:EQUB 18+D1
      EQUB 11+D1:EQUB 15+D1:EQUB 18+D1:EQUB 23+D1
      EQUB 15+D1:EQUB 18+D1:EQUB 23+D1:EQUB 27+D1
      EQUB 18+D1:EQUB 23+D1:EQUB 27+D1:EQUB 30+D1
      EQUB 23+D1:EQUB 27+D1:EQUB 30+D1:EQUB 35+D1
      EQUB 27+D1:EQUB 30+D1:EQUB 35+D1:EQUB 39+D1
      EQUB 30+D1:EQUB 35+D1:EQUB 39+D1:EQUB 42+D1
      EQUB 35+D1:EQUB 39+D1:EQUB 42+D1:EQUB 47+D1
      EQUB 45+D1:EQUB 40+D1:EQUB 37+D1:EQUB 33+D1
      EQUB 40+D1:EQUB 37+D1:EQUB 33+D1:EQUB 28+D1
      EQUB 37+D1:EQUB 33+D1:EQUB 28+D1:EQUB 25+D1
      EQUB 33+D1:EQUB 28+D1:EQUB 25+D1:EQUB 21+D1
      EQUB 28+D1:EQUB 25+D1:EQUB 21+D1:EQUB 16+D1
      EQUB 25+D1:EQUB 21+D1:EQUB 16+D1:EQUB 13+D1
      EQUB 21+D1:EQUB 16+D1:EQUB 13+D1:EQUB 9+D1
      EQUB 16+D1:EQUB 13+D1:EQUB 9+D1:EQUB 4+D1
      EQUB 40+D4:EQUB 42+D4:EQUB 40+D4:EQUB 39+D4
      EQUB 40+D4:EQUB 39+D4:EQUB 37+D4:EQUB 35+D4
      EQUB 0
 .DEMd3
      EQUB 25+D4:EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4
      EQUB Rest+D4:EQUB 27+D4:EQUB 28+D4:EQUB 30+D4
      EQUB Rest+D4:EQUB 28+D4:EQUB Rest+D4:EQUB 27+D4
      EQUB Rest+D4:EQUB 23+D4:EQUB Rest+D4:EQUB 25+D4
      EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4
      EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4:EQUB Rest+D4
      EQUB 28+D4:EQUB 30+D4:EQUB Rest+D4:EQUB 32+D4
      EQUB Rest+D4:EQUB 35+D4:EQUB Rest+D4:EQUB Rest+D4
      EQUB 0
 .DEMd2
      EQUB 13+D4:EQUB Rest+D4:EQUB 25+D4:EQUB Rest+D4
      EQUB 13+D4:EQUB 13+D4:EQUB 25+D4:EQUB Rest+D4
      EQUB 11+D4:EQUB Rest+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 11+D4:EQUB 11+D4:EQUB 23+D4:EQUB Rest+D4
      EQUB 9+D4:EQUB Rest+D4:EQUB 21+D4:EQUB Rest+D4
      EQUB 9+D4:EQUB 9+D4:EQUB 21+D4:EQUB Rest+D4
      EQUB 4+D4:EQUB 16+D4:EQUB 5+D4:EQUB 17+D4
      EQUB 6+D4:EQUB 18+D4:EQUB 7+D4:EQUB 19+D4
      EQUB Rest+D1
      EQUB 0
 .CodeEnd

\\ ]
\\ PRINT"Music 2    from &";~B%;" to &";~P%-1;" (";P%-B%;")"
\\ PAGE=&5800
\\ RETURN
