Category : Assembly Language Source Code
Archive   : TASM30.ZIP
Filename : TEST85.ASM

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; $Id: test85.asm 1.1 1993/08/02 01:24:21 toma Exp $
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; TASM test file
; Test all instructions and addressing modes.
; Processor: 8080/8085
;



idata16 .equ 1234h
idata8 .equ 12h
port .equ 34h
addr16 .equ 5678h

.org 1000h

start:
nop
lxi b,idata16
stax b
inx b
inr b
dcr b
mvi b,idata8
rlc

dad b
ldax b
dcx b
inr c
dcr c
mvi c,idata8
rrc

; --- ; 10
lxi d,idata16
stax d
inx d
inr d
dcr d
mvi d,idata8
ral
; ---
dad d
ldax d
dcx d
inr e
dcr e
mvi e,idata8
rar

rim ; 20
lxi h,idata16
shld addr16
inx h
inr h
dcr h
mvi h,idata8
daa
; ---
dad h
lhld addr16
dcx h
inr l
dcr l
mvi l,idata8
cma

sim ; 30
lxi sp,idata16
sta addr16
inx sp
inr m
dcr m
mvi m,idata8
stc
; ---
dad sp
lda addr16
dcx sp
inr a
dcr a
mvi a,idata8
cmc

mov b,b ; 40
mov b,c
mov b,d
mov b,e
mov b,h
mov b,l
mov b,m
mov b,a
mov c,b
mov c,c
mov c,d
mov c,e
mov c,h
mov c,l
mov c,m
mov c,a

mov d,b ; 50
mov d,c
mov d,d
mov d,e
mov d,h
mov d,l
mov d,m
mov d,a
mov e,b
mov e,c
mov e,d
mov e,e
mov e,h
mov e,l
mov e,m
mov e,a

mov h,b ; 60
mov h,c
mov h,d
mov h,e
mov h,h
mov h,l
mov h,m
mov h,a
mov l,b
mov l,c
mov l,d
mov l,e
mov l,h
mov l,l
mov l,m
mov l,a

mov m,b ; 70
mov m,c
mov m,d
mov m,e
mov m,h
mov m,l
hlt
mov m,a
mov a,b
mov a,c
mov a,d
mov a,e
mov a,h
mov a,l
mov a,m
mov a,a

add b ; 80
add c
add d
add e
add h
add l
add m
add a
adc b ; 88
adc c
adc d
adc e
adc h
adc l
adc m
adc a

sub b ; 90
sub c
sub d
sub e
sub h
sub l
sub m
sub a
sbb b ; 98
sbb c
sbb d
sbb e
sbb h
sbb l
sbb m
sbb a

ana b ; a0
ana c
ana d
ana e
ana h
ana l
ana m
ana a
xra b ; a8
xra c
xra d
xra e
xra h
xra l
xra m
xra a

ora b ; b0
ora c
ora d
ora e
ora h
ora l
ora m
ora a
cmp b ; b8
cmp c
cmp d
cmp e
cmp h
cmp l
cmp m
cmp a

rnz ; c0
pop b
jnz start
jmp start
cnz start
push b
adi idata8
rst 0
rz
ret
jz start
; ---
cz start
call start
aci idata8
rst 1

rnc ; d0
pop d
jnc start
out port
cnc start
push d
sui idata8
rst 2
rc
; ---
jc start
in port
cc start
; ---
sbi idata8
rst 3

rpo ; e0
pop h
jpo start
xthl
cpo start
push h
ani idata8
rst 4
rpe
pchl
jpe start
xchg
cpe start
; ---
xri idata8
rst 5

rp ; f0
pop psw
jp start
di
cp start
push psw
ori idata8
rst 6
rm
sphl
jm start
ei
cm start
; ---
cpi idata8
rst 7

.END