# HG changeset patch
# User Robert Gault <robert.gault@att.net>
# Date 1390688550 -3600
# Node ID 4446149f7ea91f0904e55d3fc4a29da14915eb0c
# Parent  824019cd874451b359d0ab60d9011311cda7006c
rb1773: Support 6309 on level 1 as well

diff -r 824019cd8744 -r 4446149f7ea9 level1/modules/rb1773.asm
--- a/level1/modules/rb1773.asm	Sat Jan 25 23:20:06 2014 +0100
+++ b/level1/modules/rb1773.asm	Sat Jan 25 23:22:30 2014 +0100
@@ -654,13 +654,17 @@
 hardloop tfr   x,d           we want X in A,B
 l1@      equ   *
          IFEQ  Level-1
-         ldx   #1482/2		[3]  [3]
+          IFNE  H6309
+           ldx   #1854/2
+          ELSE
+           ldx   #1482/2		[3]  [3]
+          ENDC
          ELSE
-         IFNE  H6309
-         ldx   #1854		[3]  [3]
-         ELSE
-         ldx   #1482		[3]  [3]
-         ENDC
+          IFNE  H6309
+           ldx   #1854		[3]  [3]
+          ELSE
+           ldx   #1482		[3]  [3]
+          ENDC
          ENDC
 l2@      nop			[2]  [1]
          nop			[2]  [1]