left BDOS handler as a stub for now

Author: Cheveron

ChloeVM.app/Contents/Resources/se.rom

@@ -14,11 +14,6 @@
 ;	// You should have received a copy of the GNU General Public License
 ;	// along with SE Basic IV. If not, see <http://www.gnu.org/licenses/>.
 
-	org $0000;
-;;
-;	// --- RESTART ROUTINES ----------------------------------------------------
-;;
-
 ;;
 ; Short description of module.
 ; @author Name of contributing author.
@@ -30,16 +25,34 @@
 ; @throws Error number and description handled by RST 8 routine.
 ; @version Version in which the module was last udpated. 
 ;;
+
+;;
+;	// --- RESTART ROUTINES ----------------------------------------------------
+;;
+
+	org $0000;
+;;
+; cold start
+;;
 rst_00:
 	di;									// interrupts off
+
+;	// PC = $0001 is trapped by the divMMC hardware and the OS ROM paged in.
+;	// Regardless of whether the BOOT or BASIC ROM is paged in, control is
+;	// returned here. As a result, BC is set to HOME bank paging ($7ffd).
+
 	xor a;								// LD A, 0
-;	ld bc, paging;						// HOME bank paging
 	out (c), a;							// ROM 0, RAM 0, VIDEO 0, paging enabled
-	nop;								// enter ROM 0 beofer hitting RST 8 trap
+	nop;								// enter BOOT ROM before hitting RST 8 trap
 
-	org $0005;							// BDOS
-cpm:
-	jp bdos;							// immediate jump
+	org $0005;
+;;
+; BDOS entry point for CP/M compatibility
+;;
+bdos:
+	nop;								// FIXME - should jump somewhere
+	nop;								// 
+	nop;								// 
 
 	org $0008;
 ;;
@@ -50,7 +63,6 @@ rst_08:
 	ld (x_ptr), hl;						// to error pointer
 	jr error_2;							// then jump
 
-
 	org $0010;
 ;;
 ; print a character
@@ -66,7 +78,6 @@ from_rom0:
 	xor a;								// LD A, 0
 	jp start_new;						// deal with a cold start
 
-
 	org $0018;
 ;;
 ; collect character

basic/modules/01_restarts.asm

@@ -57,11 +57,6 @@
 	buffer_1	equ buffer + 2;			// (iy + $6a)
 
 
-;	// CP/M emulation
-bdos:
-	ret;
-
-
 ;	// file channels
 
 get_handle: