;title=Switch BGM
;ported by gocha
;@12 => h-5

"VCMD_PAN_FADE=$dc"
"VCMD_TEMPO_FADE=$e3"

"L3900=0"
"L3943=1"
"L3924_=2"

#0	t32

	; $1554 / $3900
	; $1554 / $3900
	(L3900)[
	@3 y0
	VCMD_PAN_FADE $60 $14
	q6f
	r8 o4 l24 c^<gr>g<g>c^<g VCMD_PAN_FADE $60 $00
	r8 > c+^<g+r>g+<g+>c+^<g+
	]2

	; $1558 / $38F8
	VCMD_TEMPO_FADE $ff $30

	; $155A / $3900
	(L3900)1

	; $155C / $38FC
	VCMD_TEMPO_FADE $ff $40

	; $155E / $3900
	/ (L3900)1

#1	; $1554 / $3943
	; $155A / $3943
	; $1558 / $0000
	; $155A / $3943
	; $155C / $0000
	(L3943)[
	@3 y20
	VCMD_PAN_FADE $0a $00
	q6f o2 c12 g24 l8 ^>c<g
	VCMD_PAN_FADE $60 $14
	c+12 g+24 l8 ^>c+<g+
	]3

	; $155E / $3943
	/ (L3943)1

#2	; $1554 / $3924
	; $1556 / $3924
	; $1558 / $0000
	(L3924_)[
	@12 y10 q6b
	o4 l24 gg>ee
	]18 ; 6*3

	; $155E / $3924
	/ (L3924_)6 ; 6*1
