#!/bin/tcsh -f
#(ie run the tshell on this but don't read the .cshrc or .tcshrc)

echo version = 1.00 of mk 2004 Jul 20
# 2004 Jul 20, 1.00: origin 

rm -f warnings
xyplo
if (-f warnings) then
   cat warnings
endif

mv xyout USdebt.ps

echo convert USdebt.ps USdebt.gif

# convert -crop USdebt.ps USdebt.gif

# from ps2jpg
   set edge = 10
set megabytes = 200
# density = 600 is necessary for good images, 300 is awful
   set defaultdensity = 600
set density = $defaultdensity
set dxd = "$density"x"$density"
set crop = "-crop 0x0+$edge+$edge"
@ geo = (600 / $density) * 24
echo geometry: $geo'%'

convert \
$crop \
-density $dxd -geometry $geo% \
-cache $megabytes \
USdebt.ps USdebt.gif

# <!--
# This works:
# USdebt.ps USdebt.gif
# These fail, convert has no way to make jpgs, png:
# USdebt.ps USdebt.jpeg
# USdebt.ps USdebt.jpg
# USdebt.ps USdebt.png
# -->

chmod a+r *
chmod a+rx .

echo DONE
date
beep

