/ [ V3CMD.H ]
#$GP_SET	!8(gp:100)?8(gp:100)!6(gp:75)?6(gp:75)!4(gp:50)?4(gp:50)!2(gp:25)?2(gp:25)
#$sl1	!(gp:100)
#$gp	!(gp:$1)
#$gpN	!(gp:$NQ)
#$gpS	!(gp:$STC)
#$gpT	!(gp:99)
#$NQ	95
#$STC	50
/----------------------------------------------------------------------------
#define	reset	U0W90X127
#define	INST	@INSTNAME($1)
#define	LV_FIL	@FILTER(vel,rnd:-2/2)@FILTER(cc:7,off:$1)

#define	ORGN_LV	@PROGASN(vel,abs,17:100)@FILTER(cc:7,off:$1)
#define	CEMB_LV	@PROGASN(vel,abs,7:63)	@FILTER(cc:7,off:$1)
/@NOTEASN(vel,<mode>,<par>)
/----------------------------------------------------------------------------
/ slide macro
#define	sld		l $1 $slide(r,$2,$3,,$4,$5,$6)
#define	Xsld	l $1 $slide(r,x,$2,,$3,$4,$5)
#define	Wsld	l $1 $slide(r,w,$2,,$3,$4,$5)
/ wave macro
/*m30-40 80-120
#define	$Wv_1	l128$wave(r,U,64,,!sin,140,180,30)
#define	$Wv_2	l128$wave(r,U,64,,!sin,-140,180,30)
#define	$SW_STN	@TEXT(lll)/*$swave(r,U,64,32,10,,e^x,0,0,!sin,-180,30)
/ spiccato,saltando
#define	spic32	r128 $slide(r128,x, 2,,x^2,127,83)r128 x127	128*4
#define	spic32_	r128.$slide(r128,x, 3,,x^2,127,83)r128.x127	128*6
#define	spic16	r64  $slide(r128,x, 4,,x^2,127,83)r64  x127	128*8
#define	spic16_	r64. $slide(r128,x, 6,,x^2,127,83)r64. x127	128*12
#define	spic8	r32  $slide(r128,x, 8,,x^2,127,83)r32  x127	128*16
#define	spic8_	r32. $slide(r128,x,12,,x^2,127,83)r32. x127	128*24
#define	spic4	r16  $slide(r128,x,16,,x^2,127,83)r16  x127	128*32
#define	spic4_	r16. $slide(r128,x,24,,x^2,127,83)r16. x127	128*48
/64*32=2
/ [ V3CMD.H ] �I��