/ [ Level.H ]
/ Velocity
#define	sff	!(vel:127,cc:7/117)
#define	sf	!(vel:127)
#define	ffz	!(vel:126,cc:7/100)
#define	fz	!(vel:110)
#define	sfL		V127	/* sfz    127 */
#define	fzL		V110	/* fz     125 */
#define	vfff	V127	/* fff    127 */
#define	piu_ff	V119	/* piu ff 119 */
#define	vff		V111	/* ff     111 */
#define	piu_f	V103	/* piu f  103 */
#define	vf		V95		/* f       95 */
#define	poco_f	V87		/* poco f  87 */
#define	mf		V79		/* mf      79 */
#define	V8		V71		/*         71 */
#define	mp		V63		/* mp      63 */
#define	poco_p	V55		/* poco p  55 */
#define	p		V47		/* p       47 */
#define	piu_p	V39		/* piu p   39 */
#define	pp		V31		/* pp      31 */
#define	piu_pp	V23		/* piu pp  23 */
#define	ppp		V15		/* ppp     15 */
#define	pppp	V7		/* pppp     7 */
#define	ppppp	V1		/* ppppp    1 */
#$V15	V127
/ Accent
#define	Acc48	$Wsld(192,4,x,110,90)
#define	Acc32	$Wsld(128,4,x,110,90)
#define	Acc32_	$Wsld(128,6,x,110,90)
#define	Acc24	$Wsld(96,4,x,110,90)
#define	Acc16	$Wsld(64,4,x,110,90)
#define	Acc16_	$Wsld(64,6,x,110,90)
#define	Acc12	$Wsld(96,6,x,110,90)
#define	Acc8	$Wsld(64,8,x,110,90)
#define	Acc8_	$Wsld(64,12,x,110,90)
#define	Acc6	$Wsld(96,12,x,110,90)
#define	Acc4	$Wsld(64,16,x,110,90)
#define	Acc4_	$Wsld(64,24,x^2,110,90)
#define	Acc3	$Wsld(96,24,x^2,110,90)
#define	Acc2	$Wsld(64,24,x^2,110,90)r8
#define	Acc2_	$Wsld(64,24,x^2,110,90)r4.
#define	Acc1	$Wsld(64,24,x^2,117,90)r2..
#define	Acc		!(vel:'*8..12)
/	lev+vel+exp=vol	
/	100+127+127=354	fff
/	100+125+127=352	fz
/	100+119+127=346	
/	100+111+127=338	ff
/	100+103+127=330	piu f
/	100+ 95+127=322	f
/	100+ 87+127=314	poco f
/	100+ 79+127=306	mf
/	100+ 71+127=298	
/	100+ 63+127=290	mp
/	100+ 55+127=282	poco p
/	100+ 47+127=274	p
/	100+ 39+127=266	piu p
/	100+ 31+127=258	pp
/	100+ 23+127=250	
/	100+ 15+127=242	ppp
/	100+  7+127=234	
/ [ Level.H ] �I��