Ausam/sys/sysd/dumps/get

Find at most related files.
including files from this version of Unix.

if $1x = x goto bad
if $2x = x goto bad
goto ok
: bad
echo "get core_file_suffix number_of_files_to_skip(one less than file required)"
exit
: ok
if ! { ask "Is the archive tape mounted" } goto ok
.skip $2
dd if=/dev/rht0 of=../cores/core.$1 bs=21b count=61
date >> log
echo core.$1 restored from file $2+1 >> log
echo done!