#!/bin/sh

# Build a version of GA4 on 6 drum disks. Use buffer.

first=50

flx2a <"T1, L1 (26) 20.07.70.flx" | tac | sed '0,/_s/{//d;}' | tac | sed -e '/_i redefine/{ N; s/_s/e14='$first',e27=1/g }' >BUILDga4drumdisk1019.asc
#echo "_h" >>BUILDga4drumdisk1019.asc
#echo "print,_b$((74176+first)),_p<" >>BUILDga4drumdisk1019.asc
#echo "t<" >>BUILDga4drumdisk1019.asc
flx2a <"T2 (22) 13.01.69.flx" | tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
flx2a <"T3 (18) 3.10.68.flx" | tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
flx2a <"T4 (24) 14.04.70.flx" | tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
flx2a <"T5 (25) 14.04.70.flx" | \
	tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
flx2a <"T6, L2 (20) 26.07.68.flx" | tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
flx2a <"T7, L3 (23) 20.01.69.flx" | tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
flx2a <"T8, L4 (19) 17.07.68.flx" >>BUILDga4drumdisk1019.asc
echo "print,_c<" >>BUILDga4drumdisk1019.asc
echo "print,_i_x15..20<" >>BUILDga4drumdisk1019.asc
echo "slip<" >>BUILDga4drumdisk1019.asc
echo "i=15" >>BUILDga4drumdisk1019.asc
# 50
offset=960
#echo "qq8690.39" >>BUILDga4drumdisk1019.asc
#echo "qq56690.39" >>BUILDga4drumdisk1019.asc
echo "qq$((50+offset)).39" >>BUILDga4drumdisk1019.asc
# 197
#echo "qq8837.39" >>BUILDga4drumdisk1019.asc
#echo "qq56837.39" >>BUILDga4drumdisk1019.asc
echo "qq$((197+offset)).39" >>BUILDga4drumdisk1019.asc
# 224
#echo "qq8864.39" >>BUILDga4drumdisk1019.asc
#echo "qq56864.39" >>BUILDga4drumdisk1019.asc
echo "qq$((224+offset)).39" >>BUILDga4drumdisk1019.asc
echo "_h" >>BUILDga4drumdisk1019.asc
echo "print,_i_x15..20<" >>BUILDga4drumdisk1019.asc

flx2a <"T9, L5, M1 () 12.08.67.flx" | tac | sed '0,/_s/{//d;}' | tac >>BUILDga4drumdisk1019.asc
#	| sed -e '/_itype: disc/{ N; s/_s/8, 9/g }' \
flx2a <"P1 (1) 16.08.67.flx" | sed -e '/_itype: actual/{ N; s/_s/1010/g }' \
	| sed -e '/_itype: d35/{ N; s/_s/d35=0/g }' \
	| sed -e '/_iif reserved/{ N; s/_s/d36=1/g }' \
	| sed -e '/_itype: _tname/{ N; s/_s/_tga4;/g }' >>BUILDga4drumdisk1019.asc

sed 's/#061#...//g' BUILDga4drumdisk1019.asc |sed 's/#061.//g'|a2flx > BUILDga4drumdisk1019.flx
#rm -f BUILDga4drumdisk1019.asc