reorganized extended BASIC tokens

src/basic/basic_commands_01/cmd_merge.s

@@ -0,0 +1,50 @@
+;; #LAYOUT# STD *       #TAKE
+;; #LAYOUT# *   BASIC_0 #TAKE
+;; #LAYOUT# *   *       #IGNORE
+
+
+!ifndef HAS_SMALL_BASIC {
+
+cmd_merge:
+
+	lda #$00                           ; mark operation as LOAD
+	jsr helper_load_init_params
+
+	; Fetch the file name
+
+	jsr helper_bload_fetch_filename
+
+	; Fetch device number
+
+	jsr helper_load_fetch_devnum
+
+	; FALLTROUGH
+
+cmd_merge_got_params:
+
+	; Make sure VARTAB is correctly set
+
+	jsr update_VARTAB_do_clr
+
+	; Perform loading - just for a different address
+
+	sec
+	lda VARTAB+0
+	sbc #$02
+	sta VARTAB+0
+	tax
+	bcs @1
+	dec VARTAB+1
+@1:
+	ldy VARTAB+1
+
+	lda VERCKB    ; LOAD or VERIFY
+	jsr JLOAD
+	+bcs do_kernal_error
+
+cmd_merge_no_error:
+
+	; Relink loaded program, clear variables, execute next statement
+
+	jmp update_LINKPRG_VARTAB_do_clr
+}