#!/bin/sh
if [ x$1 == x'' ]; then
  echo please specify an image.
  exit
fi
convert -size 128x128 -background black xc:none $$.pnm
convert -scale 128x128 $1 $$-2.ppm
composite $$-2.ppm -gravity center $$.pnm $$-3.ppm
#pnmdepth 31 $$-3.ppm >$$-4.pnm
cp $$-3.ppm $$-4.pnm
output=`echo $1 |sed 's/\.[a-zA-Z0-9][a-zA-Z0-9]*$//g'`
perl convert-1.2.pl $$-4.pnm >$output.raw
rm $$.pnm $$-2.ppm $$-3.ppm $$-4.pnm