Mercurial > hg > Members > kono > nitros9-code

changeset 3047:a951ab0b3003

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
level1 6309: Switch to native mode early in rel.asm Otherwise it will crash in the first F$Link call.
author Robert Gault <robert.gault@att.net>
date Sat, 24 Jan 2015 23:15:55 +0100
parents e3e858889ab6
children 9565d767bd79
files level1/modules/rel.asm
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/level1/modules/rel.asm	Sat Jan 24 23:15:48 2015 +0100
+++ b/level1/modules/rel.asm	Sat Jan 24 23:15:55 2015 +0100
@@ -102,6 +102,7 @@
          clra             make A=0 for later
          IFNE  H6309
          tfr   0,dp       set direct page to $0000
+         ldmd  #3         native mode
          ELSE
          tfr   a,dp
          ENDC
@@ -283,6 +284,9 @@
          IFNE  (tano+d64+dalpha)
          clr   PIA0Base+1		added for Dragon, works on CoCo
          ENDC
+         IFNE  H6309
+         ldmd  #3                      native mode
+         ENDC
 
          sta   $FFDF                   turn off ROM
 * locate Boot Text Screen at $8000