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