*** empty log message ***
[h316.git] / bin / asm
CommitLineData
b0031f2a 1#!/bin/sh
c08e22bb 2# Assembler wrapper for simh h316
3
4if [ ! $1 ] ; then
b0031f2a 5 echo "Argument mising!"
c08e22bb 6 exit 2
7fi
8
9name=`basename $1 .asm`
10listfile=$name.lst
11
12cat $1 | tab | paron > $name.par
b0031f2a 13
c08e22bb 14rm -f $name.lst
15rm -f $name.obj
16
b0031f2a 17cat > $name.go <<EOF
18rest $H316/sys/dap.sys
19d a 120420
20at ptr $name.par
21at ptp $name.obj
22at tty3 $listfile
23set tty3 uascii
24set tty3 start
25go
26d ptr pos 0
27go
28quit
29EOF
30
c08e22bb 31h316 $name.go > /dev/null
32
33rm -f $name.par
34rm -f $name.go
35
36if cat $name.lst | grep "NO ERRORS IN ABOVE ASSEMBLY">/dev/null 2>&1; then
37 if [ ! $2 ]; then
38 rm $name.lst
39 fi
40 echo "DAP-16 assembly successfull :-)"
41 exit 0
42fi
43cat $name.lst
44echo -e "\nDAP-16 assembly FAILED!"
45rm -f $name.obj
46exit 77
47