mirror of
https://github.com/fadden/6502bench.git
synced 2024-09-10 13:54:52 +00:00
60 lines
1.2 KiB
ArmAsm
60 lines
1.2 KiB
ArmAsm
|
.setcpu "65816"
|
||
|
.org $1000
|
||
|
.a8
|
||
|
.i8
|
||
|
load11: lda #$11
|
||
|
L1002: ldx #$22
|
||
|
load33: ldy #$33
|
||
|
L1006: lda #$44
|
||
|
predat: bra L1042
|
||
|
|
||
|
.word $0123
|
||
|
dat1: .word $4567
|
||
|
.word $89ab
|
||
|
L1010: .word $cdef
|
||
|
L1012: .word $0011
|
||
|
L1014: .word $2233
|
||
|
.byte $80
|
||
|
.byte "The quick brown fox"
|
||
|
.byte $80
|
||
|
.word L1042
|
||
|
.word L1041
|
||
|
.word L1042+1
|
||
|
fill0: .res 16,$00
|
||
|
L1041: .byte $80
|
||
|
|
||
|
L1042: lda predat+2
|
||
|
lda L1041
|
||
|
asl dat1
|
||
|
rol dat1+2
|
||
|
ror L1010
|
||
|
and L1012
|
||
|
ora L1014
|
||
|
lda fill0
|
||
|
sta fill0+4
|
||
|
lda fill0+8
|
||
|
sta fill0+12
|
||
|
jsr L1002
|
||
|
lda L1006
|
||
|
L1069: pea L1069-1
|
||
|
per L1069-1
|
||
|
lda L1069+1
|
||
|
lda L1069+2
|
||
|
lda #$ea
|
||
|
L1077: sta L1077
|
||
|
L107A: sta L107A+1
|
||
|
sta $107f
|
||
|
brl L2002
|
||
|
|
||
|
.byte $80
|
||
|
dat81: .byte $81
|
||
|
.org $2000
|
||
|
L2000: .byte $82
|
||
|
.byte $83
|
||
|
|
||
|
L2002: bit L2002
|
||
|
lda dat81
|
||
|
lda L2000
|
||
|
rts
|
||
|
|