*** empty log message ***

[h316.git] / bin / asm

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

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

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

cat $1 | tab | paron > $name.par
rm  -f $name.lst
rm  -f $name.obj

echo "rest  $H316/sys/dap.sys" > $name.go
echo "d a 120420" >> $name.go
echo "at ptr $name.par" >> $name.go
echo "at ptp $name.obj" >> $name.go
echo "at tty3 $listfile" >> $name.go
echo "set tty3 uascii" >> $name.go
echo "set tty3 start" >> $name.go
echo "go" >> $name.go
echo "d ptr pos 0" >> $name.go
echo "go" >> $name.go
echo "quit" >> $name.go
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