scusa, ho provato a fare due cicli distinti, come sottoriportato , ma non funziona , quando do l invio esce dall'assembler e torna al basic con la schernata blu
in basic questa procedura funziona, anche altre maniere , ma quando li trsscrivo in assembler non funzionano, sicuramente c'e un passaggio che mi sfugge
lda #$07
ldx #$00
loop sta $0400,x
inx
cpx #$0a
bcc loop
lda #$05
ldx #$00
loop2 sta $d800,x
inx
cpx #$0a
bcc loop2
rts
compattata
1 print"S"
10 a=07
20 x=0
30 poke 55296+x,5
40 poke1024+x,7
45 x=x+1
50 if x<>10 then goto30
ready.
Doppio ciclo
10 a=07
20 x=0
40 poke1024+x,7
45 x=x+1
50 if x<>10 then goto40
70 a=7:x=0
80 poke 55296+x,5
90 x=x+1
95 if x<>10 then goto80
ready.
