X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=bin%2Fasm;h=cbf6847c4dca428d68350a5c927b0636c909e9cb;hb=108066a55bac2fb4514b6e3e72bc216b36d405f2;hp=b7321f5f095e60667ad8af0de9f906d51f3dedc8;hpb=b0031f2a6627a315bfefbd4de7c237719a17c54b;p=h316.git

diff --git a/bin/asm b/bin/asm
index b7321f5..cbf6847 100755
--- a/bin/asm
+++ b/bin/asm
@@ -2,10 +2,16 @@
 # Assembler wrapper for simh h316
 
 if [ ! $1 ] ; then
-    echo "Argument mising!"
+    echo "Argument missing!"
     exit 2
 fi
 
+for n in $*; do
+  if [ $n == "/v" ]; then
+    VERBOSE=yes
+  fi
+done
+
 name=`basename $1 .asm`
 listfile=$name.lst
 
@@ -16,7 +22,8 @@ rm  -f $name.obj
 
 cat > $name.go <<EOF
 rest  $H316/sys/dap.sys
-d a 120420 
+d a 120420
+d p 1000 
 at ptr $name.par 
 at ptp $name.obj 
 at tty3 $listfile 
@@ -28,7 +35,11 @@ go
 quit 
 EOF
 
-h316 $name.go > /dev/null
+if [ "$VERBOSE" == "yes" ]; then
+  h316 $name.go 
+else
+  h316 $name.go > /dev/null
+fi
 
 rm -f $name.par
 rm -f $name.go