+ t rt
j	ZX0: pack
	for f in %s; do
		[ -f "$f" ] || continue
		case "$f" in
		*.[zZ]_? | *.[zZ][xX]0) printf '%%s: packed already (ZX0), skipped\n' "$f"; e=1; continue ;;
		*.?) out="${f%%.?}.z_${f##*.}" ;;
		*) out="$f.zx0" ;;
		esac
		"@BIN@/zx0" -f "$f" "$out" || e=1
	done
	[ -z "$e" ] || { echo "Press Enter"; read x; }

+ t rt
J	ZX0: unpack
	for f in %s; do
		[ -f "$f" ] || continue
		case "$f" in
		*.[zZ]_?) out="${f%%.[zZ]_?}.${f##*.[zZ]_}" ;;
		.[zZ][xX]0) printf '%%s: no name before .zx0, skipped\n' "$f"; e=1; continue ;;
		*.[zZ][xX]0) out="${f%%.*}" ;;
		*) continue ;;
		esac
		"@BIN@/zx0" -d "$f" "$out" || e=1
	done
	[ -z "$e" ] || { echo "Press Enter"; read x; }
