#!/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.pnm
composite $$-2.pnm -gravity center $$.pnm $$-3.pnm
pnmdepth 31 $$-3.pnm >$$-4.pnm
output=`echo $1 |sed 's/\.[a-zA-Z0-9][a-zA-Z0-9]*$//g'`
perl convert.pl $$-4.pnm >$output.raw
rm $$.pnm $$-2.pnm $$-3.pnm $$-4.pnm