vestale.vt.z, part 1/1

[Kai Voelcker]

An ansi animation collected from this newsgroup some times ago. Use
:decode or :unshar to extract. The resulting file is gzip'ed. Invoke
zcat to view.

#!/bin/sh
#
# This is a self-extracting shell archive of the binary file "vestale.vt.z".
# Created on Tue Oct 22 19:01:02 MET DST 1996 by post-bin, revision 2.1.
#
# To decode with /bin/sh, remove everything before the /bin/sh and feed
# each piece as input to /bin/sh. When all the pieces have been
# processed, the archive will automatically concatenate the pieces and
# uudecode them to produce vestale.vt.z. If successful, it will remove all
# uuencoded pieces. Alternatively, the archive(s) may be processed with
# no editing by the unshar program.
#
# If you do not have /bin/sh or unix, you may decode by removing
# everthing before/after the lines beginning with the word BEGIN/END,
# respectively, in each piece. Then concatenate the pieces in the proper
# order and uudecode.
#
part=1
pfile=vestale.vt
file=vestale.vt.z
psize=9917
sed -e '/^BEGIN/d' -e '/^END/d' << \End_of_Section > $pfile.$part
BEGIN------------ vestale.vt.z ------------ part 1/1 ---
begin 644 vestale.vt.z
<uuencoded_portion_removed>
46"P6B\5B>=2K@O\?0H>.:[7`"0``
`
end
END-------------- vestale.vt.z ------------ part 1/1 ---
End_of_Section
size=`wc -c $pfile.$part | awk '{ print $1 }'`
if [ $size != $psize ]; then
echo Length mismatch for uuencoded part $part \($size != $psize\).
exit 1
fi
echo $file, part $part extracted.

if [ `echo $pfile.[0-9]* | wc -w` = 1 ]; then
echo All uuencoded parts of $file extracted, uudecoding...
cat $pfile.* | uudecode
if [ $? -gt 0 ]; then
echo Error encountered when uudecoding pieces...
exit 1
fi

echo $file successfully uudecoded. Removing uuencoded pieces.
rm $pfile.[0-9]*
fi
exit 0
--
Kai Völcker Kappelner 18, D-24106 Kiel
"BELIEVE AND DECEIVE" ><> Fax +49 431 330545