#!/bin/sh

conv() (
	bn=$1; sc=$2
	obn=$bn.pbm
	[ $sc -eq 1 ] || obn=$obn.x$sc
	mkdir -p "$obn"
	cd "$bn.x" || exit
	for f in *.blk; do
		{
			echo P1
			echo $(( w * sc )) $(( h * sc ))
			sed -ne 'y/█ /01/' \
			     -e "s/0/$(for _ in $(seq $sc); do printf "0"; done)/g" \
			     -e "s/1/$(for _ in $(seq $sc); do printf "1"; done)/g" \
			     -e "$(for _ in $(seq $sc); do printf "p;"; done)"
		} < "$f" > "../$obn/${f%.blk}.pbm"
	done
)

read -r strikes < 02imagise.strikes
allstrikes() {
	for s in $strikes; do
		"$@" $s
	done
}

for f in *.x; do
	read -r h w _ < $f-metrics
	allstrikes conv ${f%.x} &
done
wait