RosettaCodeData/Task/N-queens-problem/6502-Assembly/n-queens-problem-2.6502
2024-03-06 22:25:12 -08:00

20 lines
170 B
Text

org $C00
PHP
SEI
JSR swap
JSR $0080
JSR swap
PLP
jmp end
swap
LDX #$00
loop
LDY $D00,X
LDA $00,X
STY $00,X
STA $D00,X
INX
BNE loop
RTS
end
; RTS