PlayLevelBGM:
			lea			(MusicList).l,a1 ; load			music playlist
			move.b			(a1,d0.w),d0			; add d0 to a1
			cmpi.w  #$000,($FFFFFE10).w ; is this GHZ1?
			bne.s plb1
			move.b #$81,d0
plb1:
			cmpi.w  #$001,($FFFFFE10).w ; is this GHZ2?
			bne.s IsntGHZ2
			move.b #$94,d0
IsntGHZ2:
			cmpi.w  #$002,($FFFFFE10).w ; is this GHZ3?
			bne.s IsntGHZ3
			move.b #$95,d0
IsntGHZ3:
			cmpi.w  #$100,($FFFFFE10).w ; is this LZ1?
			bne.s plb2
			move.b #$82,d0
plb2:

			cmpi.w			#$101,($FFFFFE10).w ; is this LZ2?
			bne.s IsntLZ2
			move.b #$96,d0
IsntLZ2:
			cmpi.w			#$102,($FFFFFE10).w ; is this LZ3?
			bne.s IsntLZ3
			move.b #$97,d0
IsntLZ3:
			cmpi.w  #$200,($FFFFFE10).w ; is this MZ1?
			bne.s plb3
			move.b #$83,d0
plb3:

			cmpi.w			#$201,($FFFFFE10).w ; is this MZ2?
			bne.s IsntMZ2
			move.b #$98,d0
IsntMZ2:
			cmpi.w			#$202,($FFFFFE10).w ; is this MZ3?
			bne.s IsntMZ3
			move.b #$99,d0
IsntMZ3:
			cmpi.w  #$300,($FFFFFE10).w ; is this SLZ1?
			bne.s plb4
			move.b #$84,d0
plb4:
			cmpi.w			#$301,($FFFFFE10).w ; is this SLZ2?
			bne.s IsntSLZ2
			move.b #$9A,d0
IsntSLZ2:
			cmpi.w			#$302,($FFFFFE10).w ; is this SLZ3?
			bne.s IsntSLZ3
			move.b #$9B,d0
IsntSLZ3:
			cmpi.w  #$400,($FFFFFE10).w ; is this SYZ1?
			bne.s plb5
			move.b #$85,d0
plb5:

			cmpi.w			#$401,($FFFFFE10).w ; is this SYZ2?
			bne.s IsntSYZ2
			move.b #$9C,d0
IsntSYZ2:
			cmpi.w			#$402,($FFFFFE10).w ; is this SYZ3?
			bne.s IsntSYZ3
			move.b #$9D,d0
IsntSYZ3:
			cmpi.w  #$500,($FFFFFE10).w ; is this GHZ1?
			bne.s plb6
			move.b #$86,d0
plb6:

			cmpi.w			#$501,($FFFFFE10).w ; is this SBZ2?
			bne.s IsntSBZ2
			move.b #$9E,d0
IsntSBZ2:
			cmpi.w			#$103,($FFFFFE10).w ; is this SBZ3?
			bne.s IsntSBZ3
			move.b #$9F,d0
IsntSBZ3:
			cmpi.w  #$502,($FFFFFE10).w ; is this FZ?
			bne.s plb7
			move.b #$8D,d0
plb7:

			jmp			PlaySound_Special			; play music