*20
	CLR
	PDP
	PMODE
	JMP I I200
I200,	200
	*200
	CLA CLL
	TAD SONG
	DCA 16
NEXT,	CLA CLL
	TAD I 16
	TAD NEND
	SNA
	JMP 200
	TAD PEND
	TAD NR
	SNA
	JMS REST
	TAD PR
	TAD DELAY
	DCA GET
	TAD I GET
	DCA NOTE1
	TAD I 16
	JMS CHK
	TAD DELAY
	DCA GET
	TAD I GET
	DCA TIME
	CLEN
	CLAB
	CLLR
	TAD K100
	CLLR
	CLSA
	CLA
	TAD TIME
	CLAB
	CLA
	TAD K200
	CLEN
	TAD K100
	CLEN
	TAD K5100
	CLLR
PLAY,	TAD NOTE1
	DCA NOTE2
	TAD NOTE1
	DCA NOTE3
	TAD BLIP1
	ISZ NOTE2
	JMP .-1
	CLA CLL
	ISZ NOTE3
	JMP .-1
	CLSK
	JMP PLAY
	TAD BLIP2
	DCA BLIP1
	JMP NEXT
K100,	100
K200,	200
K5100,	5100
GET,	0
PEND,	END
NEND,	-END
NOTE1,	0
NOTE2,	0
NOTE3,	0
BLIP1,	4000
BLIP2,	4000
SONG,	TITLE-1
NR,	-R
PR,	R
DELAY,	DEL
TIME,	0
REST,	0
	DCA BLIP1
	JMP I REST
CHK,	0
	LINC
	LMODE
	SAE I
	O
	SKP
	JMP OUT
	SAE I
	H
	SKP
	JMP OUT
	SAE I
	DH
	SKP
	JMP OUT
	SAE I
	Q
	SKP
	JMP OUT
	SAE I
	DQ
	SKP
	JMP OUT
	SAE I
	K
	SKP
	JMP OUT
	SAE I
	DI
	SKP
	JMP OUT
	SAE I
	S
	SKP
	JMP OUT
	SAE I
	DS
	SKP 
	JMP OUT
	SAE I 
	T
	SKP
	JMP OUT
	SAE I
	DT
	SKP
	JMP OUT
	LDA I
	7777
	HLT
OUT,	PDP
	PMODE
	JMP I CHK
/
/
/NOMENCLATURE FOR NOTES
/
/
	LAB=0
	VLGS=LAB
	LA=1
	LBB=2
	LAS=LBB
	LB=3
	LCB=LB
	LC=4
	LBS=LC
	LDB=5
	LCS=LDB
	LD=6
	LEB=7
	LDS=LEB
	LE=10
	LFB=LE
	LF=11
	LES=LF
	LGB=12
	LFS=LGB
	LG=13
	AB=14
	LGS=AB
	A=15
	BB=16
	AS=BB
	B=17
	CB=B
	C=20
	BS=C
	DB=21
	CS=DB
	D=22
	EB=23
	DS=EB
	E=24
	FB=E
	F=25
	ES=F
	GB=26
	FS=GB
	G=27
	HAB=30
	GS=HAB
	HA=31
	HBB=32
	HAS=HBB
	HB=33
	HCB=HB
	HC=34
	HBS=HC
	HDB=35
	HCS=HDB
	HD=36
	HEB=37
	HDS=HEB
	HE=40
	HFB=HE
	HF=41
	HES=HF
	HGB=42
	HFS=HGB
	HG=43
	R=44
	O=45
	H=46
	DH=47
	Q=50
	DQ=51
	K=52
	DI=53
	S=54
	DS=55
	T=56
	DT=57
	END=60
DEL,	-700		/0
	-647		/1
	-617            /2
	-570		/3
	-544		/4
	-517		/5
	-475		/6
	-453		/7
	-432		/10
	-412		/11
	-373		/12
	-355		/13
	-340		/14
	-323		/15
	-310		/16
	-274		/17
	-262		/20
	-250		/21
	-236		/22
	-225		/23
	-215		/24
	-205		/25
	-176		/26
	-167		/27
	-160		/30
	-152		/31
	-144		/32
	-136		/33
	-131		/34
	-124		/35
	-117		/36
	-113		/37
	-107		/40
	-103		/41
	-77		/42
	-73		/43
	-600		/R 44
	-340		/O 45
	-160		/H 46
	-250		/DH
	-70		/Q
	-124		/DQ
	-34		/I
	-52		/DI
	-16		/S
	-25		/DS
	-7		/T
	-12		/DT
/
/
/BEGINNING OF SONG
/
/
TITLE,	R		/GREENSLEEVES
	DH
	R
	K
	LE
	K
	LG
	Q
	A
	K
	B
	DI
	C
	S
	B
	K
	A
	Q
	LFS
	K
	LD
	DI
	LE
	S
	LFS
	K
	LG
	Q
	LE
	K
	LE
	DI
	LDS
	S
	LE
	K
	LFS
	Q
	LDS
	K
	LB
	Q
	LE
	K
	LG
	Q
	A
	K
	B
	DI
	C
	S
	B
	K
	A
	Q
	LFS
	K
	LD
	DI
	LE
	S
	LFS
	K
	LG
	DI
	LFS
	S
	LE
	K
	LDS
	DI
	LCS
	S
	LDS
	K
	LE
	DQ
	LE
	DQ
	D
	DQ
	D
	DI
	CS
	S
	B
	K
	A
	Q
	LFS
	K
	LD
	DI
	LE
	S
	LFS
	K
	LG
	Q
	LE
	K
	LE
	DI
	LDS
	S
	LE
	K
	LFS
	Q
	LDS
	K
	LB
	DQ
	D
	DQ
	D
	DI
	CS
	S
	B
	K
	A
	Q
	LFS
	K
	LD
	DI
	LE
	S
	LFS
	K
	LG
	DI
	LFS
	S
	LE
	K
	LDS
	DI
	LCS
	S
	LDS
	K
	LE
	DQ
	LE
	DQ
	R
	O
	R
	O
	R
	O
	D		/MINUET IN G
	Q
	LG
	K
	A
	K
	B
	K
	C
	K
	D
	Q
	LG
	DI
	R
	S
	LG
	DI
	R
	S
	E
	Q
	C
	K
	D
	K
	E
	K
	FS
	K
	G
	Q
	LG
	DI
	R
	S
	LG
	DI
	R
	S
	C
	Q
	D
	K
	C
	K
	B
	K
	A
	K
	B
	Q
	C
	K
	B
	K
	A
	K
	LG
	K
	LGB
	Q
	LG
	K
	A
	K
	B
	K
	LG
	K
	B
	K
	A
	DH
	D
	Q
	LG
	K
	A
	K
	B
	K
	C
	K
	D
	Q
	LG
	DI
	R
	S
	LG
	DI
	R
	S
	E
	Q
	C
	K
	D
	K
	E
	K
	FS
	K
	G
	Q
	LG
	DI
	R
	S
	LG
	DI
	R
	S
	C
	Q
	D
	K
	C
	K
	B
	K
	A
	K
	B
	Q
	C
	K
	B
	K
	A
	K
	LG
	K
	A
	Q
	B
	K
	A
	K
	LG
	K
	LFS
	K
	LG
	O
	R
	O
	R
	O
	R
	O
	R
	O
	R
	O
	LAB		/SCALE
	Q
	LA
	Q
	LBB
	Q
	LB
	Q
	LC
	Q
	LDB
	Q
	LD
	Q
	LEB
	Q
	LE
	Q
	LF
	Q
	LGB
	Q
	LG
	Q
	AB
	Q
	A
	Q
	BB
	Q
	B
	Q
	C
	Q
	DB
	Q
	D
	Q
	EB
	Q
	E
	Q
	F
	Q
	GB
	Q
	G
	Q
	HAB
	Q
	HA
	Q
	HAS
	Q
	HB
	Q
	HC
	Q
	HDB
	Q
	HD
	Q
	HEB
	Q
	HE
	Q
	HF
	Q
	HGB
	Q
	HG
	Q
	44
	Q
	43
	Q
	42
	Q
	41
	Q
	40
	Q
	37
	Q
	36
	Q
	35
	Q
	34
	Q
	33
	Q
	32
	Q
	31
	Q
	30
	Q
	27
	Q
	26
	Q
	25
	Q
	24
	Q
	23
	Q
	22
	Q
	21
	Q
	20
	Q
	17
	Q
	16
	Q
	15
	Q
	14
	Q
	13
	Q
	12
	Q
	11
	Q
	10
	Q
	7
	Q
	6
	Q
	5
	Q
	4
	Q
	3
	Q
	2
	Q
	1
	Q
	0
	O
	0
	O
	R
	O
	R
	O
	END