; =============================================================================================
; Project Name:		GreenHillWhiteWorld
; Created:		17th August 2013
; ---------------------------------------------------------------------------------------------
; ASM'd using S1SMPS2ASM version 1.1 by Marc Gordon (AKA Cinossu)
; =============================================================================================

GreenHillWhiteWorld_Header:
;	Voice Pointer	location
	smpsHeaderVoice	GreenHillWhiteWorld_Voices
;	Channel Setup	FM	PSG
	smpsHeaderChan	$01,	$00
;	Tempo Setup	divider	modifier
	smpsHeaderTempo	$02,	$05

;	DAC Pointer	location
	smpsHeaderDAC	GreenHillWhiteWorld_DAC
;	FM1 Pointer	location	pitch		volume
	smpsHeaderFM	GreenHillWhiteWorld_FM1,	smpsPitch01lo,	$12

; FM1 Data
GreenHillWhiteWorld_FM1:
;	Panning	 	direction	amsfms
	smpsPan		panCentre,	$00
	dc.b		nRst,	$40
GreenHillWhiteWorld_Jump01:
;	Set FM Voice	#
	smpsFMvoice	$06
;	Set Modulation	wait	speed	change	step
	smpsModSet	$0D,	$01,	$07,	$04
;	Alter Pitch	value
	smpsAlterPitch	$F4
	dc.b		nRst,	$20
;	Call At	 	location
	smpsCall	GreenHillWhiteWorld_Call01
	dc.b		nC6,	$38
;	Call At		location
	smpsCall	GreenHillWhiteWorld_Call02
;	Jump To	 	location
	smpsJump	GreenHillWhiteWorld_Jump01

GreenHillWhiteWorld_Call01:
	dc.b		nC7,	$08,	nA6,	$10,	nC7,	$08,	nB6,	$10
	dc.b		nC7,	$08,	nB6,	$10,	nG6,	$30,	nA6,	$08
	dc.b		nE7,	nD7,	$10,	nC7,	$08,	nB6,	$10,	nC7
	dc.b		$08,	nB6,	$10,	nG6,	$38,	nC7,	$08,	nA6
	dc.b		$10,	nC7,	$08,	nB6,	$10,	nC7,	$08,	nB6
	dc.b		$10,	nG6,	$30,	nA6,	$08,	$08,	nF6,	$10
	dc.b		nA6,	$08,	nG6,	$10,	nA6,	$08,	nG6,	$10
	smpsReturn

GreenHillWhiteWorld_Call02:
	dc.b		nAb6,	$10,	nD6,	nF6,	nAb7
	smpsReturn
	
; DAC Data
GreenHillWhiteWorld_DAC:
	dc.b		dSnare,	$08,	dKick,	dKick,	dSnare,	dKick,	dKick,	dSnare
	dc.b		dSnare
GreenHillWhiteWorld_Loop03:
	dc.b		dKick,	$10,	dSnare,	$08,	dKick,	$10,	$08,	dSnare
	dc.b		$10
;	Loop To	 	index	loops	location
	smpsLoop	$00,	$07,	GreenHillWhiteWorld_Loop03
	dc.b		dKick,	$10,	dSnare,	$08,	dKick,	$10,	dSnare,	$08
	dc.b		$08,	$08
	dc.b		dSnare,	$08,	dKick,	dSnare,	dKick,	dSnare,	dKick,	dKick
	dc.b		dSnare,	dKick,	dSnare,	$04,	dSnare,	dSnare,	dSnare,	dSnare
	dc.b		nRst,	nRst,	dSnare,	nRst,	dSnare
;	Jump To	 	location
	smpsJump	GreenHillWhiteWorld_Loop03

GreenHillWhiteWorld_Voices:
	dc.b		$08,$0A,$70,$30,$00,$1F,$1F,$5F,$5F,$12,$0E,$0A,$0A,$00,$04,$04
	dc.b		$03,$2F,$2F,$2F,$2F,$24,$2D,$13,$80;			Voice 00
	dc.b		$20,$36,$35,$30,$31,$DF,$DF,$9F,$9F,$07,$06,$09,$06,$07,$06,$06
	dc.b		$08,$20,$10,$10,$F8,$19,$37,$13,$80;			Voice 01
	dc.b		$36,$0F,$01,$01,$01,$1F,$1F,$1F,$1F,$12,$11,$0E,$00,$00,$0A,$07
	dc.b		$09,$FF,$0F,$1F,$0F,$18,$80,$80,$80;			Voice 02
	dc.b		$3D,$01,$02,$02,$02,$14,$0E,$8C,$0E,$08,$05,$02,$05,$00,$0D,$0D
	dc.b		$0D,$1F,$1F,$1F,$1F,$1A,$80,$80,$80;			Voice 03
	dc.b		$2C,$72,$78,$34,$34,$1F,$12,$1F,$12,$00,$0A,$00,$0A,$00,$00,$00
	dc.b		$00,$0F,$1F,$0F,$1F,$16,$80,$17,$80;			Voice 04
	dc.b		$2C,$74,$74,$34,$34,$1F,$12,$1F,$1F,$00,$00,$00,$00,$00,$01,$00
	dc.b		$01,$0F,$3F,$0F,$3F,$16,$80,$17,$80;			Voice 05
	dc.b		$04,$72,$42,$32,$32,$12,$12,$12,$12,$00,$08,$00,$08,$00,$08,$00
	dc.b		$08,$0F,$1F,$0F,$1F,$23,$80,$23,$80;			Voice 06
	dc.b		$3D,$01,$02,$02,$02,$10,$50,$50,$50,$07,$08,$08,$08,$01,$00,$00
	dc.b		$00,$20,$17,$17,$17,$1C,$80,$80,$80;			Voice 07
	dc.b		$2C,$74,$74,$34,$34,$1F,$12,$1F,$1F,$00,$07,$00,$07,$00,$07,$00
	dc.b		$07,$00,$38,$00,$38,$16,$80,$17,$80;			Voice 08
	even