Made Olivers devnum patch (r4588) work with the PET-II models. On these

machines, the program runs in a separate 64K bank, and zeropage variables need
to be copied from the system bank into the execution bank to read by a simple
load operation. The change is currently untested!


git-svn-id: svn://svn.cc65.org/cc65/trunk@4597 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/cbm610/crt0.s

@@ -63,6 +63,7 @@
 
 .proc   transfer_table
 
+        .byte   $9F, DEVNUM
         .byte   $CA, CURS_Y
         .byte   $CB, CURS_X
         .byte   $CC, graphmode

libsrc/cbm610/devnum.s

@@ -2,6 +2,6 @@
 ; Oliver Schmidt, 2010-02-14
 ;
 
-	.include	"cbm610.inc"
+	.include	"extzp.inc"
 
 	.exportzp	devnum := DEVNUM

libsrc/cbm610/extzp.inc

@@ -9,8 +9,8 @@
         .globalzp       sysp1, sysp3, crtc, sid, ipccia, cia, acia, tpi1, tpi2
         .globalzp       ktab1, ktab2, ktab3, ktab4
 
-        .globalzp       sysp0, time, segsave, ktmp, CURS_X, CURS_Y, RVS, config
-        .globalzp       CharPtr, keyidx, keybuf, keyscanbuf, keysave
+        .globalzp       sysp0, time, segsave, ktmp, CURS_X, CURS_Y, RVS, DEVNUM
+        .globalzp       config, CharPtr, keyidx, keybuf, keyscanbuf, keysave
         .globalzp       modkey, norkey, graphmode, lastidx, rptdelay, rptcount
 
 

libsrc/cbm610/extzp.s

@@ -37,6 +37,7 @@ ktmp:           .byte   0
 CURS_X:         .byte   0
 CURS_Y:         .byte   0
 RVS:            .byte   0
+DEVNUM:         .byte   0
 config:         .byte   0
 CharPtr:        .word   0
 ; Stuff for our own kbd polling routine