--- ptmsk-4.sh	Fri Jun 19 01:00:00 2015
+++ ptmsk-5.sh	Fri Jun 19 02:00:00 2015
@@ -1,11 +1,11 @@
 #!/bin/bash
 
 SONG=ptmsk
-VER=4
+VER=5
 VOL=all:5
 TEMPO=560000	# usec
 
-PARTS="gc dmsm bs hc dr"
+PARTS="gc dmsm bs hc dr lead_a lead_b lead_c"
 
 SEQS=(i0 i1 a0 a1 a2 b c d a1 a2 b c i2 a0 a1 a2 a3 a4 a3 a4 e)
 LENS=(2  4  4  4  4  4 5 2 4  4  4 5 4  4  4  4  4  4  4  4  2)
@@ -379,6 +379,118 @@
 cat $P.a0 > $P.i2
 cp $P.a1 $P.a3
 cp $P.a2 $P.a4
+
+#
+# Lead (a)
+#
+P=lead_a
+CH=4
+CH_VOL=30
+PROG=28		# electric guitar (clean)
+PAN=84
+
+$SED >> setting <<EOF
+delta=0 prog_num ch=$CH v=$PROG
+delta=0 ctl_chg ch_vol_msb ch=$CH v=$CH_VOL
+delta=0 ctl_chg pan_msb ch=$CH v=$PAN
+EOF
+
+# a0 a1 a2 a3 a4
+$MIDTXT -len > $P.1 <<EOF
+len=1/2(1/4) ch=$CH note=E5
+len=7/16(1/4) ch=$CH note=G5
+len=1/16 ch=$CH note=F5
+EOF
+
+# a1 a3
+$MIDTXT -len > $P.2 <<EOF
+len=3/16 ch=$CH note=E5
+len=5/16 ch=$CH note=D5
+len=3/16 ch=$CH note=E5
+len=5/16 ch=$CH note=F5
+EOF
+
+# a2 a4
+$MIDTXT -len > $P.3 <<EOF
+len=3/16 ch=$CH note=D5
+len=5/16 ch=$CH note=E5
+len=3/16 ch=$CH note=F5
+len=5/16 ch=$CH note=G5
+EOF
+
+cat $P.1 $P.1 $P.1 $P.1 > $P.a0
+cat $P.1 $P.1 $P.1 $P.2 > $P.a1
+cat $P.1 $P.1 $P.1 $P.3 > $P.a2
+cp $P.a1 $P.a3
+cp $P.a2 $P.a4
+
+#
+# Lead (b)
+#
+P=lead_b
+CH=5
+CH_VOL=30
+PROG=50		# strings ensamble 2
+PAN=44
+
+$SED >> setting <<EOF
+delta=0 prog_num ch=$CH v=$PROG
+delta=0 ctl_chg ch_vol_msb ch=$CH v=$CH_VOL
+delta=0 ctl_chg pan_msb ch=$CH v=$PAN
+EOF
+
+# b
+$MIDTXT -len > $P.4 <<EOF
+len=1/4 ch=$CH note=B5
+len=1/4 ch=$CH note=G5
+len=1/4 ch=$CH note=B5
+len=1/4 ch=$CH note=C6
+EOF
+
+cat $P.4 $P.4 $P.4 $P.4 > $P.b
+
+#
+# Lead (c)
+#
+P=lead_c
+CH=6
+CH_VOL=60
+PROG=51		# synthstrings 1
+PAN=84
+
+$SED >> setting <<EOF
+delta=0 prog_num ch=$CH v=$PROG
+delta=0 ctl_chg ch_vol_msb ch=$CH v=$CH_VOL
+delta=0 ctl_chg pan_msb ch=$CH v=$PAN
+EOF
+
+# c
+$MIDTXT -len > $P.9 <<EOF
+len=3/8  ch=$CH note=C5
+len=1/16 ch=$CH note=B4
+len=1/16 ch=$CH note=A4
+len=3/16 ch=$CH note=G4
+len=5/16 ch=$CH note=C4
+EOF
+
+$MIDTXT -len > $P.10 <<EOF
+len=3/8  ch=$CH note=F5
+len=1/16 ch=$CH note=E5
+len=1/16 ch=$CH note=D5
+len=3/16 ch=$CH note=C5
+len=3/16 ch=$CH note=A4
+len=1/8  ch=$CH note=C5
+EOF
+
+$MIDTXT -len > $P.12 <<EOF
+len=1    ch=$CH note=D5
+EOF
+
+$MIDTXT -len > $P.13 <<EOF
+len=1    ch=$CH note=E5
+EOF
+
+cat $P.9 $P.9 $P.10 $P.12 $P.13 > $P.c
 
 #
 # Gather and Trans