# HG changeset patch
# User robert
# Date 1130009987 0
# Node ID a783d16e58d5fe6050296d1e5d482c2e14adc5a7
# Parent  6d5bd8549d28afb29e010f4cdbaa328332a47d34
Calc of baud table location changed. Handles both Level1&2

diff -r 6d5bd8549d28 -r a783d16e58d5 level1/cmds/tuneport.asm
--- a/level1/cmds/tuneport.asm	Mon Oct 17 12:37:49 2005 +0000
+++ b/level1/cmds/tuneport.asm	Sat Oct 22 19:39:47 2005 +0000
@@ -8,6 +8,10 @@
 * ------------------------------------------------------------------
 *   3      ????/??/??
 * From Tandy OS-9 Level One VR 02.00.00.
+*
+*   3      2005/10/22    Robert Gault
+* Patched the calculation for the beginning of the baud table to
+* accommodate both Level1 and Level2
 
          nam   TunePort
          ttl   Tune Printer Port
@@ -200,7 +204,12 @@
          os9   I$Write  
          lbcs  L03D7
 L0345    ldd   <u000D
-         subd  #$000E
+* Patched calc   RG
+         IFGT  Level-1
+         subd  #$0010     Level2 has 8 constants RG
+         ELSE
+         subd  #$000E     Level2 has 7 constants RG
+         ENDIF
          tfr   d,x
          lda   <u0000
          lsla