added more stubs

c64/basic/basic_adray1.s

@@ -0,0 +1,5 @@
+
+// XXX provide documentation and implementation
+
+basic_adray1:
+    STUB_IMPLEMENTATION()

c64/basic/basic_adray2.s

@@ -0,0 +1,5 @@
+
+// XXX provide documentation and implementation
+
+basic_adray2:
+    STUB_IMPLEMENTATION()

c64/basic/basic_cold_start.s

@@ -6,11 +6,27 @@ basic_cold_start:
 	// Setup vectors at $300
 	ldy #$0B
 !:
-	lda basic_vector_defaults, y
+	lda basic_vector_defaults_1, y
 	sta IERROR, y
 	dey
 	bpl !-
 
+	// Setup misc vectors
+	ldy #$04
+!:
+	lda basic_vector_defaults_2, y
+	sta ADRAY1, y
+	dey
+	bpl !-
+
+	// Setup USRPOK
+	lda #$4C // JMP opcode
+	sta USRPOK
+	lda #<do_ILLEGAL_QUANTITY_error
+	sta USRADD+0
+	lda #>do_ILLEGAL_QUANTITY_error
+	sta USRADD+1
+
 	// Print startup banner
 	jsr printf // XXX don't use printf, keep it for debug purposes only
 	TARGET_HOOK_BANNER()

c64/basic/basic_vector_defaults.s

@@ -6,11 +6,16 @@
 // - [CM64] Compute's Mapping the Commodore 64 - page 318
 //
 
-basic_vector_defaults:
+basic_vector_defaults_1:
 
-	.word ERROR     // IERROR
-	.word MAIN      // IMAIN
-	.word CHRNCH    // ICHRNCH
-	.word QPLOP     // IQPLOP
-	.word GONE      // IGONE
-	.word EVAL      // IEVAL
+	.word ERROR            // IERROR
+	.word MAIN             // IMAIN
+	.word CHRNCH           // ICHRNCH
+	.word QPLOP            // IQPLOP
+	.word GONE             // IGONE
+	.word EVAL             // IEVAL
+
+basic_vector_defaults_2:
+
+	.word basic_adray1     // ADRAY1
+	.word basic_adray2     // ADRAY2