41
Programmazione, Grafica e Musica / Re:Scelta di una stringa
« Ultimo post da theway il 09 Gennaio 2025, 17:14:00 »Grazie mille! Mi e' piu' o meno tutto chiaro tranne lo stringindex finale.. 

.org $0801
.byte $0b, $08, $00, $00, $9e, $32, $30, $36, $31, $00, $00, $00
Start:
lda #$00
sta StringIndex
NextString:
lda StringArray, x
beq EndOfArray
jsr PrintString
inx
jmp NextString
EndOfArray:
rts
PrintString:
ldy #$00
PrintChar:
lda (StringArray), y
beq EndOfString
jsr $ffd2 ; CHROUT routine to print character
iny
jmp PrintChar
EndOfString:
rts
StringArray:
.byte "Stringa1", 0
.byte "Stringa2", 0
.byte "Stringa3", 0
.byte 0 ; Terminatore dell'array
StringIndex:
.byte 0