LDA #$FF ; UIFTAG_UUID
STA $242
LDA #$F8
STA $242

LDA $250 ; Write_UUID
STA $242
LDA $251
STA $242
LDA $252
STA $242
LDA $253
STA $242
LDA $254
STA $242
LDA $255
STA $242
LDA $256
STA $242
LDA $257
STA $242
LDA $258
STA $242
LDA $259
STA $242
LDA $25A
STA $242
LDA $25B
STA $242
LDA $25C
STA $242
LDA $25D
STA $242
LDA $25E
STA $242
LDA $25F
STA $242

LDA #00  ; UIFTAG_STRING_LEN_4
STA $242
LDA #04
STA $242
LDA #$62 ; b
STA $242
LDA #$65 ; e
STA $242
LDA #$65 ; e
STA $242
LDA #$70 ; p
STA $242

LDA #$FF ; UIFTAG_INTEGER
STA $242
LDA #$FB
STA $242

LDA #$03 ; one_thousand
STA $242
LDA #$E8
STA $242

LDA #$FF ; UIFTAG_END
STA $242
LDA #$FF
STA $242
.WORD 0
.WORD $F000
.Word 0
.end