#!/bin/sh
# Assembler wrapper for simh h316

if [ ! $1 ] ; then
    echo "Argument mising!"
    exit 2
fi

name=`basename $1 .asm`
listfile=$name.lst

cat $1 | tab | paron > $name.par

rm  -f $name.lst
rm  -f $name.obj

cat > $name.go <<EOF
rest  $H316/sys/dap.sys
d a 120420 
at ptr $name.par 
at ptp $name.obj 
at tty3 $listfile 
set tty3 uascii 
set tty3 start 
go 
d ptr pos 0 
go 
quit 
EOF

h316 $name.go > /dev/null

rm -f $name.par
rm -f $name.go

if cat $name.lst | grep "NO ERRORS IN ABOVE ASSEMBLY">/dev/null 2>&1; then
	if [ !  $2  ]; then
		rm $name.lst
	fi
	echo "DAP-16 assembly successfull :-)"
	exit 0
fi
cat $name.lst
echo -e "\nDAP-16 assembly FAILED!"
rm -f $name.obj
exit 77