include "sndlib.h"
	include "tios.h"
	include "util.h"
	xdef _main
	xdef _comment
	xdef _ti89


;************** Start of Fargo program ***************

_main:
	lea		song(PC),a0		; Load song
	jsr		sndlib::PlaySong	; Call the player
	rts					; Exit

;*****************************************************


song		dc.l	$990000		; Tempo
		dc.b 	33,2,33,2,33,1,33,2,33,2,33,1,33,2,36,2,29,2,31,2,33,1,33,2,99,2
		dc.b 	34,2,34,2,34,2,36,2,34,2,33,2,33,2,33,4,33,4,33,2,31,2,31,2,33,2
		dc.b 	31,1,36,1,33,2,33,2,33,1,33,2,33,2,33,1,33,2,36,2,29,2,31,2,33,1
		dc.b 	33,2,99,2,34,2,34,2,34,2,36,2,34,2,33,2,33,2,33,4,33,4,36,2,36,2
		dc.b 	34,2,31,2,29,1,29,2,99,2,24,2,33,2,31,2,29,2,24,1,24,2,24,4,24,4
		dc.b 	24,2,33,2,31,2,29,2,26,1,26,2,99,2,26,2,34,2,33,2,31,2,28,1,28,2
		dc.b 	99,2,36,2,36,2,34,2,31,2,33,1,33,2,99,2,24,2,33,2,31,2,29,2,24,1
		dc.b 	24,2,99,2,24,2,33,2,31,2,29,2,26,1,26,2,26,2,26,2,34,2,33,2,31,2
		dc.b 	36,2,36,2,36,2,36,2,38,2,36,2,34,2,31,2,28,1,28,2,36,4,99,2
		dc.b 	33,2,33,2,33,1,33,2,33,2,33,1,33,2,36,2,29,2,31,2,33,1,33,2,99,2
		dc.b 	34,2,34,2,34,2,36,2,34,2,33,2,33,2,33,4,33,4,33,2,31,2,31,2,33,2
		dc.b 	31,1,36,1,33,2,33,2,33,1,33,2,33,2,33,1,33,2,36,2,29,2,31,2,33,1
		dc.b 	33,2,99,2,34,2,34,2,34,2,36,2,34,2,33,2,33,2,33,4,33,4,36,2,36,2
		dc.b 	34,2,31,2,29,1,29,2,99,2,255


_comment	dc.b	"Jingle Bells",0

;*************** End of Fargo program ****************

	
	end