;--------------------------- Ring Clear --------------------

#evenw
_RingEnv
#word	8,32000,640,0,0,0

_Ring_Sub
  	Amode
	initpitch
;  		     pause,mono,pri,trs, pan,pow,fxmix,line
	multiparamset, $00 ,$00, 12 , 0 , 64,127, 64 ,  0
	panmode,0
 	svolume,100

	bprg,BANK_SYS,2
	envelope,_RingEnv
	release,16
	sreverb,120

	vibdepthmv,0,16,8
	vibpitch,100
	vibdelay,2
_Ring_Transpose
	strans,0
	opennote,0,@_Note0
	opennote,1,@_Note1
	opennote,2,@_Note2
	waitw,260
	fin
@_Note0
	velo,100
	tgate,15
	tieon
	gn5,008
	an4,008
	bn4,006
	dn5,006
	an4,006
	bn4,004
	dn5,004
	bn4,004
	dn5,004
	gn5,032
	tieoff
	fin

@_Note1
	nprg,4
	nenv,_RingEnv,16
	velo,96
	tgate,12
	xxx,016
	gn5,008
	an4,008
	bn4,006
	dn5,006
	an4,006
	bn4,004
	dn5,004
	bn4,004
	dn5,004
	gn5,032
	fin

@_Note2
	nprg,11
	nenv,_RingEnv,32
	velo,96
	tgate,15
	tieon
	gn3,008
	an3,008
	bn3,006
	dn4,006
	an3,006
	bn3,004
	dn4,004
	bn3,004
	dn4,004
	gn4,008
	tieoff
	fin