initial commit

oscar64/samples/memmap/magicdesk.c

@@ -0,0 +1,95 @@
+#include <c64/memmap.h>
+#include <c64/charwin.h>
+#include <c64/cia.h>
+#include <c64/vic.h>
+
+// Set rom region end at 0x9f80 to leave some space for copy code
+#pragma region(rom, 0x8080, 0x9f80, , 0, { code, data } )
+
+// We do not want to pollute main RAM region with our data
+#pragma region(main, 0xc000, 0xd000, , , { bss, stack, heap })
+#pragma stacksize( 256 )
+
+// Region and code for a cross bank copy routine
+#pragma section( ccode, 0 )
+#pragma region( crom, 0x9f80, 0xa000, , 0, { ccode }, 0x0380 )
+
+CharWin	cw;
+
+// Copy code from any bank to RAM, returns to bank 0, this code is 
+// copied from bank 0 to RAM at 0x0380 at program start
+
+#pragma code ( ccode )
+
+__export void ccopy(char bank, char * dst, const char * src, unsigned n)
+{
+	*((volatile char *)0xde00) = bank;
+	while (n)
+	{
+		*dst++ = *src++;
+		n--;
+	}
+	*((volatile char *)0xde00) = 0;
+}
+
+// Region of code to be executed from RAM after copied from 2nd ROM
+// bank
+
+#pragma section( bcode1, 0 )
+#pragma section( bdata1, 0 )
+#pragma region(bank1, 0x8000, 0xa000, , 1, { bcode1, bdata1 }, 0x2000 )
+
+#pragma code ( bcode1 )
+#pragma data ( bdata1 )
+
+// Print into shared charwin
+
+void print1(void)
+{
+	cwin_put_string(&cw, p"This is first bank", 1);
+	cwin_cursor_newline(&cw);
+}
+
+// Back to main sections in bank 0
+
+#pragma code ( code )
+#pragma data ( data )
+
+
+int main(void)
+{
+	// Enable ROM
+	mmap_set(MMAP_ROM);
+
+	// Init CIAs (no kernal rom was executed so far)
+	cia_init();
+
+	// Copy ccopy code to RAM
+	for(char i=0; i<128; i++)
+		((char *)0x0380)[i] = ((char *)0x9f80)[i];
+
+	// Init VIC
+	vic_setmode(VICM_TEXT, (char *)0x0400, (char *)0x1800);
+
+	// Prepare output window
+	cwin_init(&cw, (char *)0x0400, 0, 0, 40, 25);
+	cwin_clear(&cw);
+
+	// Write first line
+	cwin_put_string(&cw, p"Hello World", 7);
+	cwin_cursor_newline(&cw);
+
+	// Copy bank 1 to RAM
+	ccopy(1, (char *)0x2000, (char *)0x8000, 0x2000);
+
+	// Call function in copy
+	print1();
+
+	// Third line
+	cwin_put_string(&cw, p"Final words", 14);
+	cwin_cursor_newline(&cw);
+
+	while (true) ;
+
+	return 0;
+}