lda #<datasta $10lda #>datasta $11lda #$00sta $30lda #$02sta $31loop:ldx #$00lda ($10,x)sta ($30,x)inc $10lda $10cmp #$00bne nextinc $11next:inc $30lda $30cmp #$00bne next2inc $31next2:lda $31cmp #$06bmi loopjmp enddata:dcb 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,dcb 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,dcb 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,0,0,0,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,0,0,0,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,0,0,0,0,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,0,0,1,1,0,1,1,1,0,1,1,1,dcb 1,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,0,1,1,1,1,0,1,1,1,0,1,1,1,dcb 0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,0,1,1,1,0,1,1,1,dcb 0,0,0,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,0,1,1,0,0,0,1,dcb 0,1,1,1,0,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,0,1,1,0,1,0,1,dcb 0,0,1,0,0,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,0,1,1,0,1,0,1,dcb 1,0,0,0,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,0,0,0,0,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,0,0,1,1,0,1,1,0,dcb 0,1,1,1,1,1,1,1,1,1,0,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,0,1,1,0,0,1,1,0,dcb 0,1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,0,1,0,1,1,1,0,dcb 0,1,1,1,1,1,1,1,0,0,1,1,1,1,1,1,dcb 1,1,1,1,1,1,0,0,1,0,0,0,0,0,1,0,dcb 0,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,dcb 1,1,1,1,1,0,0,0,1,0,0,1,1,0,0,0,dcb 0,1,1,0,1,1,1,0,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,0,0,0,1,1,0,0,1,1,0,0,dcb 0,1,1,0,1,1,1,0,1,1,1,1,1,1,1,0,dcb 1,1,1,1,1,0,0,1,1,1,0,0,1,1,0,0,dcb 0,1,1,0,1,1,0,1,1,1,1,0,0,0,1,0,dcb 0,0,0,1,1,0,1,1,0,1,1,0,1,0,0,0,dcb 0,1,1,1,0,0,1,1,1,1,1,1,1,0,1,0,dcb 0,1,0,0,1,1,0,0,0,1,1,0,0,0,1,0,dcb 0,1,1,1,0,0,0,0,1,1,1,0,0,0,0,0,dcb 0,1,1,1,1,1,1,1,1,1,1,0,1,1,1,0,dcb 0,1,1,1,0,1,1,1,0,0,1,0,1,1,0,1,dcb 0,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,0,1,1,1,1,0,0,0,1,0,0,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,0,1,1,1,1,0,0,0,0,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 0,1,1,1,1,0,1,1,1,1,1,1,1,1,1,1,dcb 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,dcb 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,dcb 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1end:
Per chi volesse cimentarsi in qualche esperimento, basta tenere a mente la semplicissima memory map del simulatore:0x00 - 0x0FF: pagina zero, con funzioni speciali per i processori 6502 (funziona come un grande register file) e con due locazioni speciali (0xFE è un random generator, menter 0xFF contiene il keycode dell'ultimo tasto premuto dall'utente)
Piccola nota: il codice che ho postato non è ottimale. Ricordo che avevo scritto una versione più ottimizzata con il supporto tecnico e morale di cdimauro ( :geek: + :geek: = :ugeek: ) ma non so dove sia finita...