home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power Programming
/
powerprogramming1994.iso
/
progtool
/
crossasm
/
uasm.arc
/
6805VAL.MAC
< prev
next >
Wrap
Text File
|
1986-03-19
|
7KB
|
309 lines
*
* 6805 Validation Suite
* 10 September 1985
*
dseg
PA ds 1 Port A
PB ds 1 Port B
PC ds 1 Port C
PD ds 1 Port D
ds 4 Data Direction Registers
TMR ds 1 Timer Data Register
TCON ds 1 Timer Control
*
org 40x
get ds 4
atemp ds 1
xtemp ds 1
char ds 1
count ds 1
*
cseg
org 80x
ascii "6805 Validation"
db 15q,12q
*
begin: brset 0,PA,begin
brclr 0,PA,begin
brset 1,PA,begin
brclr 1,PA,begin
brset 2,PA,begin
brclr 2,PA,begin
brset 3,PA,begin
brclr 3,PA,begin
brset 4,PA,begin
brclr 4,PA,begin
brset 5,PA,begin
brclr 5,PA,begin
brset 6,PA,begin
brclr 6,PA,begin
brset 7,PA,begin
brclr 7,PA,begin
*
bset 0,PB
bclr 0,PB
bset 1,PB
bclr 1,PB
bset 2,PB
bclr 2,PB
bset 3,PB
bclr 3,PB
bset 4,PB
bclr 4,PB
bset 5,PB
bclr 5,PB
bset 6,PB
bclr 6,PB
bset 7,PB
bclr 7,PB
*
relative
bra relative
brn relative
bhi relative
bls relative
;
bcc relative bcc & bhs have the same opcode
bhs relative
;
bcs relative bcs & blo have the same opcode
blo relative
;
bne relative
beq relative
bhcc relative
bhcs relative
bpl relative
bmi relative
bmc relative
bms relative
bil relative
bih relative
*
neg count
db 31x gap
db 32x gap
com count
lsr count
db 35x gap
ror count
asr count
;
asl count asl & lsl have same opcode
lsl count
;
rol count
dec count
db 3bx gap
inc count
tst count
db 3ex gap
clr count
*
neg a
db 41x gap
db 42x gap
com a
lsr a
db 45x gap
ror a
asr a
;
asl a asl & lsl have same opcode
lsl a
;
rol a
dec a
db 4bx gap
inc a
tst a
db 4ex gap
clr a
*
neg x
db 51x gap
db 52x gap
com x
lsr x
db 55x gap
ror x
asr x
;
asl x asl & lsl have same opcode
lsl x
;
rol x
dec x
db 5bx gap
inc x
tst x
db 5ex gap
clr x
*
neg count,x
db 61x gap
db 62x gap
com count,x
lsr count,x
db 65x gap
ror count,x
asr count,x
;
asl count,x asl & lsl have same opcode
lsl count,x
;
rol count,x
dec count,x
db 6bx gap
inc count,x
tst count,x
db 6ex gap
clr count,x
*
neg ,x
db 71x gap
db 72x gap
com ,x
lsr ,x
db 75x gap
ror ,x
asr ,x
;
asl ,x asl & lsl have same opcode
lsl ,x
;
rol ,x
dec ,x
db 7bx gap
inc ,x
tst ,x
db 7ex gap
clr ,x
*
rti
rts
db 82x gap
swi
db 84x,85x,86x,87x gap
db 88x,89x,8ax,8bx gap
db 8cx,8dx gap
stop
wait
*
db 90x,91x,92x,93x gap
db 94x,95x,96x,97x gap
*
tax
clc
sec
sei
rsp
nop
db 9ex gap
txa
*
subr1: sub #0ffx
cmp #0ffx
sbc #0ffx
cpx #0ffx
and #0ffx
bit #0ffx
lda #0ffx
db 0a7x gap
eor #0ffx
adc #0ffx
ora #0ffx
add #0ffx
db 0acx gap
bsr subr1 backward reference
bsr subr2 forward reference
ldx #0ffx
db 0afx gap
*
sub char
cmp char
sbc char
cpx char
and char
bit char
lda char
sta char
eor char
adc char
ora char
add char
jmp char
jsr char
ldx char
stx char
*
subr2: sub begin+512
cmp begin+512
sbc begin+512
cpx begin+512
and begin+512
bit begin+512
lda begin+512
sta begin+512
eor begin+512
adc begin+512
ora begin+512
add begin+512
jmp begin+512
jsr begin+512
ldx begin+512
stx begin+512
*
sub begin+512,x
cmp begin+512,x
sbc begin+512,x
cpx begin+512,x
and begin+512,x
bit begin+512,x
lda begin+512,x
sta begin+512,x
eor begin+512,x
adc begin+512,x
ora begin+512,x
add begin+512,x
jmp begin+512,x
jsr begin+512,x
ldx begin+512,x
stx begin+512,x
*
sub begin,x
cmp begin,x
sbc begin,x
cpx begin,x
and begin,x
bit begin,x
lda begin,x
sta begin,x
eor begin,x
adc begin,x
ora begin,x
add begin,x
jmp begin,x
jsr begin,x
ldx begin,x
stx begin,x
*
sub ,x
cmp ,x
sbc ,x
cpx ,x
and ,x
bit ,x
lda ,x
sta ,x
eor ,x
adc ,x
ora ,x
add ,x
jmp ,x
jsr ,x
ldx ,x
stx ,x
*