more documentation of similarities and avoiding them where practicable.

c64/kernal/chrout.s

@@ -88,12 +88,13 @@ no_need_to_extend:
 	dey
 	cpy current_screen_x
 	bne -
-	;; Put space in the inserted gap
-	lda #$20
-	sta (current_screen_line_ptr),y
 
 	;; Increase insert mode count (which causes quote-mode like behaviour)
 	inc insert_mode
+	
+	;; Put space in the inserted gap
+	lda #$20
+	sta (current_screen_line_ptr),y
 
 	jmp chrout_done
 not_94:	
@@ -566,10 +567,10 @@ scroll_copy_loop2:
 	;; Fill in scrolled up area
 	ldx load_or_scroll_temp_pointer+0
 scroll_copy_loop3:
-	lda #$20
-	sta (current_screen_line_ptr),y
 	lda text_colour
 	sta (current_screen_line_colour_ptr),y
+	lda #$20
+	sta (current_screen_line_ptr),y
 	iny
 	dex
 	bne scroll_copy_loop3

c64/kernal/cint.s

@@ -26,18 +26,18 @@ cint:
 	;; Making some numbers up here: Repeat every ~1/10th sec
 	;; But require key to be held for ~1/3sec before
         ;; repeating (Compute's Mapping the 64 p58)
-	lda #22-2 		; Fudge factor to match speed
-	sta key_first_repeat_delay
+	ldx #22-2 		; Fudge factor to match speed
+	stx key_first_repeat_delay
 
 	;; Set current colour for text (Compute's Mapping the 64 p215)
-	lda #$0e  		; light blue by default
-	sta $0286
+	ldx #$0e  		; light blue by default
+	stx $0286
 
 	;; Set maximum keyboard buffer size (Compute's Mapping the 64 p215)
-	lda #10
-	sta key_buffer_size
+	ldx #10
+	stx key_buffer_size
 	;; Put non-zero value in enable_case_switch
-	sta enable_case_switch
+	stx enable_case_switch
 	
 	;; Fallthrough/jump to screen clear routine (Compute's Mapping the 64 p215)
 	jmp clear_screen