mirror of
https://github.com/fadden/6502bench.git
synced 2024-12-12 05:31:04 +00:00
176 lines
2.5 KiB
ArmAsm
176 lines
2.5 KiB
ArmAsm
|
!cpu 6510
|
||
|
* = $1000
|
||
|
clv
|
||
|
cld
|
||
|
cli
|
||
|
clc
|
||
|
lda #$80
|
||
|
lda #$01
|
||
|
sed
|
||
|
sei
|
||
|
sec
|
||
|
lda #$ff
|
||
|
adc #$00
|
||
|
lda #$00
|
||
|
pha
|
||
|
plp
|
||
|
clv
|
||
|
bvc L101A
|
||
|
|
||
|
!byte $70
|
||
|
!byte $02
|
||
|
!byte $00
|
||
|
!byte $00
|
||
|
|
||
|
L101A clc
|
||
|
bcc @L101F
|
||
|
|
||
|
!byte $00
|
||
|
!byte $00
|
||
|
|
||
|
@L101F sec
|
||
|
bcs @L1024
|
||
|
|
||
|
!byte $00
|
||
|
!byte $00
|
||
|
|
||
|
@L1024 lda #$01
|
||
|
bne @L102A
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L102A lda #$00
|
||
|
beq @L1030
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1030 bpl @L1034
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1034 lda #$80
|
||
|
bmi @L103A
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L103A lda #$ff
|
||
|
and #$00
|
||
|
beq @L1042
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1042 lda #$00
|
||
|
ldx #$80
|
||
|
and #$ff
|
||
|
beq @L104C
|
||
|
bne @L104C
|
||
|
|
||
|
@L104C lda #$ff
|
||
|
ldx #$00
|
||
|
and #$7f
|
||
|
beq @L1056
|
||
|
bne @L1056
|
||
|
|
||
|
@L1056 bpl @L105A
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L105A lda #$ff
|
||
|
and #$80
|
||
|
bpl @L1064
|
||
|
bmi @L1064
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1064 lda #$00
|
||
|
ldx #$80
|
||
|
bne @L106C
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L106C ora #$00
|
||
|
beq @L1072
|
||
|
bne @L1072
|
||
|
|
||
|
@L1072 ora #$01
|
||
|
bne @L1078
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1078 lda #$00
|
||
|
ldx #$80
|
||
|
bmi @L1080
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1080 ora #$7f
|
||
|
bpl @L1088
|
||
|
bmi @L1088
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L1088 ora #$80
|
||
|
bmi @L108E
|
||
|
|
||
|
!byte $00
|
||
|
!byte $db
|
||
|
|
||
|
@L108E lda @L108E
|
||
|
sec
|
||
|
ror
|
||
|
bmi @L1097
|
||
|
|
||
|
!byte $00
|
||
|
!byte $dc
|
||
|
|
||
|
@L1097 clc
|
||
|
ror
|
||
|
bpl @L109D
|
||
|
|
||
|
!byte $00
|
||
|
!byte $dc
|
||
|
|
||
|
@L109D lda #$00
|
||
|
sec
|
||
|
rol
|
||
|
bne @L10A5
|
||
|
|
||
|
!byte $00
|
||
|
!byte $dc
|
||
|
|
||
|
@L10A5 lda #$ff
|
||
|
lsr
|
||
|
bpl @L10AC
|
||
|
|
||
|
!byte $00
|
||
|
!byte $dd
|
||
|
|
||
|
@L10AC clc
|
||
|
php
|
||
|
sec
|
||
|
plp
|
||
|
bcc @L10B3
|
||
|
nop
|
||
|
@L10B3 sec
|
||
|
bcs @L10B7
|
||
|
|
||
|
@L10B6 clc
|
||
|
@L10B7 lda $33
|
||
|
beq @L10B6
|
||
|
bcs @L10BF
|
||
|
lda $44
|
||
|
@L10BF nop
|
||
|
rts
|
||
|
|