Self editing code

;==========================
;TITLE : Self editing code
;DEV : Dan 2019
;==========================
*=$0c00
LDX #$02
LDA $FE ; load random value from $FE
STA $1001 ; changes STA address to value ( 200-5FF )
STX $1002
INX
CPX #$06
BEQ RESET
JMP $1000
RESET: ; sets X register to 02 so as to not overflow into code
LDX #$02
JMP $1000
*=$1000 ; DRAW routine
STA $0200 ; draw to screen ( 200-5FF )
STA $0D00 ; start of DELAY routine
STX $0D02
LDA #$00
LDX #$00
LOOP:
STA $0F00,X
INX
CPX #$04
BNE LOOP
LDA $0D00
LDX $0D02
JMP $0602 ; jumps back to self-editing loop