;----------------------

		;Melody for Archy's AT89C2051 melody playing routine.
		;Typed in: Archy Nov-2000

		;Deck The Halls, trad.

DeckTheHalls:	.dw	DeckTH_INIT,DeckTH1,DeckTH1,DeckTH2,DeckTH_END,EOM

DeckTH_INIT:	.db	EFF_INSTR1,SPD|5,EOP

DeckTH1:	.db	OCT|2,CC|L4d,BBb|L8,AA|L4,OCT|1,G|L4
		.db	F|L4,G|L4,OCT|2,AA|L4,OCT|1,F|L4
		.db	G|L8,OCT|2,AA|L8,BBb|L8,OCT|1,G|L8
		.db	OCT|2,AA|L4d,OCT|1,G|L8

		.db	OCT|1,F|L4,E|L4,F|L2,EOP

DeckTH2:	.db	OCT|1,G|L4d,OCT|2,AA|L8,BBb|L4,OCT|1,G|L4

		.db	OCT|2,AA|L4d,BBb|L8,CC|L4,OCT|1,G|L4
		.db	OCT|2,AA|L8,BBb|L8,CC|L4,D|L8,E|L8,F|L4
		.db	E|L4,D|L4,CC|L2

		.db	CC|L4d,BBb|L8,AA|L4,OCT|1,G|L4
		.db	F|L4,G|L4,OCT|2,AA|L4,OCT|1,F|L4
		.db	OCT|2,D|L8,D|L8,D|L8,D|L8,CC|L4d,BBb|L8
		.db	AA|L4,OCT|1,G|L4,F|L2,EOP

DeckTH_END:	.db	REST|L1,EOP