started work on arrays

src/basic/engine_variables/array_create.s

@@ -0,0 +1,10 @@
+// #LAYOUT# STD *       #TAKE
+// #LAYOUT# *   BASIC_0 #TAKE
+// #LAYOUT# *   *       #IGNORE
+
+
+array_create:
+
+	// XXX
+
+	jsr do_NOT_IMPLEMENTED_error

src/basic/engine_variables/fetch_variable.s

@@ -15,6 +15,11 @@ fetch_variable:
 	bcc !+
 	rts
 !:
+	// If this is array, redirect to appropriate routine
+
+	bit DIMFLG
+	bmi_16 fetch_variable_arr
+
 	// Handle special variables - TI$, TI, ST
 
 	jsr is_var_TI_string

src/basic/engine_variables/fetch_variable_arr.s

@@ -0,0 +1,10 @@
+// #LAYOUT# STD *       #TAKE
+// #LAYOUT# *   BASIC_0 #TAKE
+// #LAYOUT# *   *       #IGNORE
+
+
+fetch_variable_arr:
+
+	// XXX implement this
+
+	jmp do_NOT_IMPLEMENTED_error

src/basic/engine_variables/fetch_variable_name.s

@@ -94,6 +94,9 @@ fetch_variable_type_string:
 fetch_variable_name_check_array:
 
 	// XXX add check for array
+	lda #$00
+	sta DIMFLG
+
 
 	clc
 	rts