X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;ds=sidebyside;f=bin%2Fasm;h=0fabd8d65d64d55d9ac9db99635af1a233e3e29a;hb=7ced2dbeb1a104912fbdd041ce18b0e29a72d893;hp=cbf6847c4dca428d68350a5c927b0636c909e9cb;hpb=e5c436a28690c7ae2d45932e1d74cb55a4ab211f;p=h316.git

diff --git a/bin/asm b/bin/asm
index cbf6847..0fabd8d 100755
--- a/bin/asm
+++ b/bin/asm
@@ -2,10 +2,12 @@
 # Assembler wrapper for simh h316
 
 if [ ! $1 ] ; then
-    echo "Argument missing!"
+    echo -e "Assembler: Input file missing!"
     exit 2
 fi
 
+echo -en "Assembler: Translating \"$1\":"
+
 for n in $*; do
   if [ $n == "/v" ]; then
     VERBOSE=yes
@@ -22,6 +24,7 @@ rm  -f $name.obj
 
 cat > $name.go <<EOF
 rest  $H316/sys/dap.sys
+r
 d a 120420
 d p 1000 
 at ptr $name.par 
@@ -41,18 +44,18 @@ else
   h316 $name.go > /dev/null
 fi
 
-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
+		rm -f $name.par
+		rm -f $name.go
 	fi
-	echo "DAP-16 assembly successfull :-)"
+	echo " Success."
 	exit 0
 fi
 cat $name.lst
-echo -e "\nDAP-16 assembly FAILED!"
+echo -e " FAILED!"
 rm -f $name.obj
 exit 77