mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-11-22 03:30:46 +00:00
f87ddbb5e6
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@282 4df02467-bbd4-4a76-a152-e7ce94205b78
156 lines
2.6 KiB
Plaintext
156 lines
2.6 KiB
Plaintext
;ACME 0.97
|
|
; all the standard 6502 instructions:
|
|
brk ; 00
|
|
ora ($01, x) ; 01
|
|
ora $05 ; 05
|
|
asl $05 ; 06
|
|
php ; 08
|
|
ora #$09 ; 09
|
|
asl ; 0a
|
|
ora $0d0e ; 0d
|
|
asl $0d0e ; 0e
|
|
bpl * + 2 ; 10
|
|
ora ($11), y ; 11
|
|
ora $15, x ; 15
|
|
asl $15, x ; 16
|
|
clc ; 18
|
|
ora $1919, y ; 19
|
|
ora $1d1e, x ; 1d
|
|
asl $1d1e, x ; 1e
|
|
jsr $0d0e ; 20
|
|
and ($01, x) ; 21
|
|
bit $05 ; 24
|
|
and $05 ; 25
|
|
rol $05 ; 26
|
|
plp ; 28
|
|
and #$09 ; 29
|
|
rol ; 2a
|
|
bit $0d0e ; 2c
|
|
and $0d0e ; 2d
|
|
rol $0d0e ; 2e
|
|
bmi * + 2 ; 30
|
|
and ($11), y ; 31
|
|
and $15, x ; 35
|
|
rol $15, x ; 36
|
|
sec ; 38
|
|
and $1919, y ; 39
|
|
and $1d1e, x ; 3d
|
|
rol $1d1e, x ; 3e
|
|
rti ; 40
|
|
eor ($01, x) ; 41
|
|
eor $05 ; 45
|
|
lsr $05 ; 46
|
|
pha ; 48
|
|
eor #$09 ; 49
|
|
lsr ; 4a
|
|
jmp $0d0e ; 4c
|
|
eor $0d0e ; 4d
|
|
lsr $0d0e ; 4e
|
|
bvc * + 2 ; 50
|
|
eor ($11), y ; 51
|
|
eor $15, x ; 55
|
|
lsr $15, x ; 56
|
|
cli ; 58
|
|
eor $1919, y ; 59
|
|
eor $1d1e, x ; 5d
|
|
lsr $1d1e, x ; 5e
|
|
rts ; 60
|
|
adc ($01, x) ; 61
|
|
adc $05 ; 65
|
|
ror $05 ; 66
|
|
pla ; 68
|
|
adc #$09 ; 69
|
|
ror ; 6a
|
|
jmp ($6c6c) ; 6c
|
|
adc $0d0e ; 6d
|
|
ror $0d0e ; 6e
|
|
bvs * + 2 ; 70
|
|
adc ($11), y ; 71
|
|
adc $15, x ; 75
|
|
ror $15, x ; 76
|
|
sei ; 78
|
|
adc $1919, y ; 79
|
|
adc $1d1e, x ; 7d
|
|
ror $1d1e, x ; 7e
|
|
sta ($01, x) ; 81
|
|
sty $05 ; 84
|
|
sta $05 ; 85
|
|
stx $05 ; 86
|
|
dey ; 88
|
|
txa ; 8a
|
|
sty $0d0e ; 8c
|
|
sta $0d0e ; 8d
|
|
stx $0d0e ; 8e
|
|
bcc * + 2 ; 90
|
|
sta ($11), y ; 91
|
|
sty $15, x ; 94
|
|
sta $15, x ; 95
|
|
stx $96, y ; 96
|
|
tya ; 98
|
|
sta $1919, y ; 99
|
|
txs ; 9a
|
|
sta $1d1e, x ; 9d
|
|
ldy #$09 ; a0
|
|
lda ($01, x) ; a1
|
|
ldx #$09 ; a2
|
|
ldy $05 ; a4
|
|
lda $05 ; a5
|
|
ldx $05 ; a6
|
|
tay ; a8
|
|
lda #$09 ; a9
|
|
tax ; aa
|
|
ldy $0d0e ; ac
|
|
lda $0d0e ; ad
|
|
ldx $0d0e ; ae
|
|
bcs * + 2 ; b0
|
|
lda ($11), y ; b1
|
|
ldy $15, x ; b4
|
|
lda $15, x ; b5
|
|
ldx $96, y ; b6
|
|
clv ; b8
|
|
lda $1919, y ; b9
|
|
tsx ; ba
|
|
ldy $1d1e, x ; bc
|
|
lda $1d1e, x ; bd
|
|
ldx $1919, y ; be
|
|
cpy #$09 ; c0
|
|
cmp ($01, x) ; c1
|
|
cpy $05 ; c4
|
|
cmp $05 ; c5
|
|
dec $05 ; c6
|
|
iny ; c8
|
|
cmp #$09 ; c9
|
|
dex ; ca
|
|
cpy $0d0e ; cc
|
|
cmp $0d0e ; cd
|
|
dec $0d0e ; ce
|
|
bne * + 2 ; d0
|
|
cmp ($11), y ; d1
|
|
cmp $15, x ; d5
|
|
dec $15, x ; d6
|
|
cld ; d8
|
|
cmp $1919, y ; d9
|
|
cmp $1d1e, x ; dd
|
|
dec $1d1e, x ; de
|
|
cpx #$09 ; e0
|
|
sbc ($01, x) ; e1
|
|
cpx $05 ; e4
|
|
sbc $05 ; e5
|
|
inc $05 ; e6
|
|
inx ; e8
|
|
sbc #$09 ; e9
|
|
!ifndef M65 {
|
|
nop ; ea (m65 re-uses this opcode as a prefix)
|
|
}
|
|
cpx $0d0e ; ec
|
|
sbc $0d0e ; ed
|
|
inc $0d0e ; ee
|
|
beq * + 2 ; f0
|
|
sbc ($11), y ; f1
|
|
sbc $15, x ; f5
|
|
inc $15, x ; f6
|
|
sed ; f8
|
|
sbc $1919, y ; f9
|
|
sbc $1d1e, x ; fd
|
|
inc $1d1e, x ; fe
|