mirror of
https://github.com/fadden/6502bench.git
synced 2024-11-18 15:06:07 +00:00
160 lines
3.4 KiB
ArmAsm
160 lines
3.4 KiB
ArmAsm
.setcpu "65816"
|
|
; .segment "SEG000"
|
|
.org $030000
|
|
.a16
|
|
.i16
|
|
L30000: clc
|
|
xce
|
|
.a8
|
|
.i8
|
|
sep #$30
|
|
lda L30000
|
|
nop
|
|
jsl @L23456
|
|
jsl @L80000
|
|
lda f:@L23456
|
|
lda @L23456 & $ffff
|
|
lda #<@L23456
|
|
lda #>@L23456
|
|
lda #^@L23456
|
|
lda f:@L80019
|
|
lda a:@L80019 & $ffff
|
|
lda #<@L80019
|
|
lda #>@L80019
|
|
lda #^@L80019
|
|
nop
|
|
rep #$30
|
|
.a16
|
|
.i16
|
|
lda #@L80019 & $ffff
|
|
lda #@L80019 >> 8
|
|
lda #@L80019 >> 16
|
|
nop
|
|
lda #$000f
|
|
ldx #@L80026 & $ffff
|
|
ldy #@L23467 & $ffff
|
|
mvn #^@L23467+6,#^@L23467
|
|
nop
|
|
lda $0000,y
|
|
sta $0002,y
|
|
@L3004B: pea $0000
|
|
pea $f000
|
|
pea @L80019 & $ffff
|
|
pea @L80019 >> 16
|
|
pea @L3004B & $ffff
|
|
pea @L3004B >> 8
|
|
@L3005D: pea @L3004B >> 16
|
|
pea @L3005D & $ffff
|
|
pea $104b
|
|
nop
|
|
jmp @L30073 & $ffff
|
|
|
|
.word @L4FFE0 & $ffff
|
|
.faraddr @L4FFE0
|
|
.faraddr @L4FFE0
|
|
.byte $00
|
|
|
|
@L30073: phk
|
|
plb
|
|
lda #$0000
|
|
asl A
|
|
asl A
|
|
tax
|
|
lda a:@L30088 & $ffff,x
|
|
pha
|
|
lda a:@L30086 & $ffff,x
|
|
pha
|
|
beq @L3008E
|
|
rts
|
|
|
|
@L30086: .byte $4b
|
|
.byte $00
|
|
@L30088: .byte $03
|
|
.byte $00
|
|
.faraddr @L30073
|
|
.byte $00
|
|
|
|
@L3008E: rts
|
|
|
|
; .segment "SEG001"
|
|
.org $04ffe0
|
|
@L4FFE0: .faraddr @L4FFE0
|
|
.byte $00
|
|
.byte $00
|
|
.byte $01
|
|
.byte $02
|
|
.byte $03
|
|
.byte $04
|
|
.byte $05
|
|
.byte $06
|
|
.byte $07
|
|
.byte $08
|
|
.byte $09
|
|
.byte $0a
|
|
.byte $0b
|
|
.byte $0c
|
|
.byte $0d
|
|
.byte $0e
|
|
.byte $0f
|
|
.byte $10
|
|
.byte $11
|
|
.byte $12
|
|
.byte $13
|
|
.byte $14
|
|
.byte $15
|
|
.byte $16
|
|
.byte $17
|
|
.byte $18
|
|
.byte $19
|
|
.byte $1a
|
|
.byte $1b
|
|
; .segment "SEG002"
|
|
.org $050000
|
|
.byte $1c
|
|
.byte $1d
|
|
.byte $1e
|
|
.byte $1f
|
|
.byte " !",$22,"#$%&'()*+,-./"
|
|
|
|
; .segment "SEG003"
|
|
.org $023456
|
|
.a8
|
|
.i8
|
|
@L23456: lda @L23456
|
|
jsr @L23477 & $ffff
|
|
ldy #<@L23467
|
|
ora $3456
|
|
ora @L23456
|
|
rtl
|
|
|
|
@L23467: .res 16,$00
|
|
|
|
@L23477: nop
|
|
rts
|
|
|
|
; .segment "SEG004"
|
|
.org $080000
|
|
@L80000: lda @L80000
|
|
lda a:@L80019 & $ffff
|
|
nop
|
|
lda $010000
|
|
lda $020000
|
|
lda L30000
|
|
lda @L80000
|
|
rtl
|
|
|
|
@L80019: .faraddr @L80019
|
|
.byte $00
|
|
.faraddr @L23456
|
|
.byte $00
|
|
.byte $80
|
|
.byte $00
|
|
.byte $10
|
|
.byte $08
|
|
.byte $00
|
|
@L80026: .byte "This is a test."
|
|
.byte $00
|
|
; .segment "SEG005"
|
|
.org $060000
|
|
.byte "hello, world!"
|