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

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

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

	bprg,BANK_SYS,2
	envelope,_RingEnv
	release,16

	vibdepthmv,0,16,8
	vibpitch,100
	vibdelay,2
_Ring_Transpose
	strans,0
	opennote,0,@_Note0
	opennote,1,@_Note1
	waitw,260
	fin
@_Note0
	velo,100
	tgate,14
	gn4,008
	an4,008
	bn4,008
	dn5,008
	an4,008
	bn4,008
	dn5,008
	bn4,008
	dn5,008
	gn5,032
	fin

@_Note1
	velo,60
	tgate,12
	xxx,016
	gn4,008
	an4,008
	bn4,008
	dn5,008
	an4,008
	bn4,008
	dn5,008
	bn4,008
	dn5,008
	gn5,032
	fin