Category : Assembly Language Source Code
Archive   : CUG292.ZIP
Filename : T6805S.ASM

 
Output of file : T6805S.ASM contained in archive : CUG292.ZIP

.title AS6805 Sequential Test

.area DIRECT

.setdp 0,DIRECT

bit0 = 0
bit1 = 1
bit2 = 2
bit3 = 3
bit4 = 4
bit5 = 5
bit6 = 6
bit7 = 7

ext = 0x0123
ix2 = 0xABCD
ix1 = 0x00EF

begin: .byte 0
loca: .byte 0
locb: .byte 0
locc: .byte 0
locd: .byte 0
loce: .byte 0


.area AS6805A

1$: jsr 5$ ; CD __ __
jmp 5$ ; CC __ __
sub 5$ ; C0 __ __

jsr 6$ ; CD 00 00
jmp 7$ ; CC 00 03
sub 8$ ; C0 00 06


.page

. = 1$+256

2$: brset #bit0,*loca, . ; 00 01 FD
brclr #bit0,*loca,2$ ; 01 01 FA
brset #bit1,*loca,2$ ; 02 01 F7
brclr #bit1,*loca,2$ ; 03 01 F4
brset #bit2,*loca,2$ ; 04 01 F1
brclr #bit2,*loca,2$ ; 05 01 EE
brset #bit3,*loca,2$ ; 06 01 EB
brclr #bit3,*loca,2$ ; 07 01 E8
brset #bit4,*loca,2$ ; 08 01 E5
brclr #bit4,*loca,2$ ; 09 01 E2
brset #bit5,*loca,2$ ; 0A 01 DF
brclr #bit5,*loca,2$ ; 0B 01 DC
brset #bit6,*loca,2$ ; 0C 01 D9
brclr #bit6,*loca,2$ ; 0D 01 D6
brset #bit7,*loca,2$ ; 0E 01 D3
brclr #bit7,*loca,2$ ; 0F 01 D0

bset #bit0,*locb ; 10 02
bclr #bit0,*locb ; 11 02
bset #bit1,*locb ; 12 02
bclr #bit1,*locb ; 13 02
bset #bit2,*locb ; 14 02
bclr #bit2,*locb ; 15 02
bset #bit3,*locb ; 16 02
bclr #bit3,*locb ; 17 02
bset #bit4,*locb ; 18 02
bclr #bit4,*locb ; 19 02
bset #bit5,*locb ; 1A 02
bclr #bit5,*locb ; 1B 02
bset #bit6,*locb ; 1C 02
bclr #bit6,*locb ; 1D 02
bset #bit7,*locb ; 1E 02
bclr #bit7,*locb ; 1F 02

3$: bra 3$ ; 20 FE
brn 3$ ; 21 FC
bhi 3$ ; 22 FA
bls 3$ ; 23 F8
bcc 3$ ; 24 F6
bcs 3$ ; 25 F4
bne 3$ ; 26 F2
beq 3$ ; 27 F0
bhcc 3$ ; 28 EE
bhcs 3$ ; 29 EC
bpl 3$ ; 2A EA
bmi 3$ ; 2B E8
bmc 3$ ; 2C E6
bms 3$ ; 2D E4
bil 3$ ; 2E E2
bih 3$ ; 2F E0


.page

neg *locc ; 30 03
; 31
; 32
com *locc ; 33 03
lsr *locc ; 34 03
; 35
ror *locc ; 36 03
asr *locc ; 37 03
lsl *locc ; 38 03
rol *locc ; 39 03
dec *locc ; 3A 03
; 3B
inc *locc ; 3C 03
tst *locc ; 3D 03
; 3E
clr *locc ; 3F 03

nega ; 40
; 41
; 42
coma ; 43
lsra ; 44
; 45
rora ; 46
asra ; 47
lsla ; 48
rola ; 49
deca ; 4A
; 4B
inca ; 4C
tsta ; 4D
; 4E
clra ; 4F

negx ; 50
; 51
; 52
comx ; 53
lsrx ; 54
; 55
rorx ; 56
asrx ; 57
lslx ; 58
rolx ; 59
decx ; 5A
; 5B
incx ; 5C
tstx ; 5D
; 5E
clrx ; 5F


.page

neg locd,x ; 60 04
; 61
; 62
com locd,x ; 63 04
lsr locd,x ; 64 04
; 65
ror locd,x ; 66 04
asr locd,x ; 67 04
lsl locd,x ; 68 04
rol locd,x ; 69 04
dec locd,x ; 6A 04
; 6B
inc locd,x ; 6C 04
tst locd,x ; 6D 04
; 6E
clr locd,x ; 6F 04

neg ,x ; 70
; 71
; 72
com ,x ; 73
lsr ,x ; 74
; 75
ror ,x ; 76
asr ,x ; 77
lsl ,x ; 78
rol ,x ; 79
dec ,x ; 7A
; 7B
inc ,x ; 7C
tst ,x ; 7D
; 7E
clr ,x ; 7F


.page

rti ; 80
rts ; 81
; 82
swi ; 83
; 84
; 85
; 86
; 87
; 88
; 89
; 8A
; 8B
; 8C
; 8D
stop ; 8E
wait ; 8F

; 90
; 91
; 92
; 93
; 94
; 95
; 96
tax ; 97
clc ; 98
sec ; 99
cli ; 9A
sei ; 9B
rsp ; 9C
nop ; 9D
; 9E
txa ; 9F


.page

sub #0x21 ; A0 21
cmp #0x21 ; A1 21
sbc #0x21 ; A2 21
cpx #0x21 ; A3 21
and #0x21 ; A4 21
bit #0x21 ; A5 21
lda #0x21 ; A6 21
; A7
eor #0x21 ; A8 21
adc #0x21 ; A9 21
ora #0x21 ; AA 21
add #0x21 ; AB 21
; AC
4$: bsr 4$ ; AD FE
ldx #0x21 ; AE 21
; AF

sub *loce ; B0 05
cmp *loce ; B1 05
sbc *loce ; B2 05
cpx *loce ; B3 05
and *loce ; B4 05
bit *loce ; B5 05
lda *loce ; B6 05
sta *loce ; B7 05
eor *loce ; B8 05
adc *loce ; B9 05
ora *loce ; BA 05
add *loce ; BB 05
jmp *loce ; BC 05
jsr *loce ; BD 05
ldx *loce ; BE 05
stx *loce ; BF 05

sub ext ; C0 01 23
cmp ext ; C1 01 23
sbc ext ; C2 01 23
cpx ext ; C3 01 23
and ext ; C4 01 23
bit ext ; C5 01 23
lda ext ; C6 01 23
sta ext ; C7 01 23
eor ext ; C8 01 23
adc ext ; C9 01 23
ora ext ; CA 01 23
add ext ; CB 01 23
jmp ext ; CC 01 23
jsr ext ; CD 01 23
ldx ext ; CE 01 23
stx ext ; CF 01 23


.page

sub ix2,x ; D0 AB CD
cmp ix2,x ; D1 AB CD
sbc ix2,x ; D2 AB CD
cpx ix2,x ; D3 AB CD
and ix2,x ; D4 AB CD
bit ix2,x ; D5 AB CD
lda ix2,x ; D6 AB CD
sta ix2,x ; D7 AB CD
eor ix2,x ; D8 AB CD
adc ix2,x ; D9 AB CD
ora ix2,x ; DA AB CD
add ix2,x ; DB AB CD
jmp ix2,x ; DC AB CD
jsr ix2,x ; DD AB CD
ldx ix2,x ; DE AB CD
stx ix2,x ; DF AB CD

sub ix1,x ; E0 EF
cmp ix1,x ; E1 EF
sbc ix1,x ; E2 EF
cpx ix1,x ; E3 EF
and ix1,x ; E4 EF
bit ix1,x ; E5 EF
lda ix1,x ; E6 EF
sta ix1,x ; E7 EF
eor ix1,x ; E8 EF
adc ix1,x ; E9 EF
ora ix1,x ; EA EF
add ix1,x ; EB EF
jmp ix1,x ; EC EF
jsr ix1,x ; ED EF
ldx ix1,x ; EE EF
stx ix1,x ; EF EF

sub ,x ; F0
cmp ,x ; F1
sbc ,x ; F2
cpx ,x ; F3
and ,x ; F4
bit ,x ; F5
lda ,x ; F6
sta ,x ; F7
eor ,x ; F8
adc ,x ; F9
ora ,x ; FA
add ,x ; FB
jmp ,x ; FC
jsr ,x ; FD
ldx ,x ; FE
stx ,x ; FF


.page

5$: jsr *begin ; BD __
jmp *begin ; BC __
sub *begin ; B0 __

.area AS6805B

6$: jsr 1$ ; CD __ __
7$: jmp 1$ ; CC __ __
8$: sub 1$ ; C0 __ __