实验三、汇编语言程序设计.docxVIP

实验三、汇编语言程序设计

1、源程序要求：

（1）把flash中地址为$013开始的20个字单元内的数据代码作为20个16位二进制符号数，将它们分别取绝对值后存储到sram中起始地址为$0100的区域，要求低字节在前，高字节在后。

.includem8def.inc

.org$0000

.seta=$0013

.setb=$0100

rjmpmain

.org$0013

main:

ldir16,low(ramend)

outspl,r16

ldir16,high(ramend)

outsph,r16

ldixl,low(b)

ldixh,high(b)

ldir18,20

aa:

ldizl,low(2*a)

ldizh,high(2*a)

lpmr16,z+

lpmr17,z+

tstr17

brplbb

subir16,1

sbcir17,0

comr16

comr17

bb:

stx+,r16

stx+,r17

decr18

brneaa

here:rjmphere

.exit

（2）设sram中有个数据块（起始地址为$0061，块长放在$0060单元），数据块内每个字节单元含有两个十六进制数（高4位和低4位），试分别求出这些十六进制数的ascii码，并放在sram中以$0163为起始地址的区域，要求低4位数的ascii码在前，高4位数的ascii码在后。

.includem8def.inc

.setlen=$0060

.seta=$0061

.setb=$0163

.org$0000

rjmpmain

.org$0013

astab:.db$30,$31,$32,$33,$34,$35,$36,$37,$38,$39

.db$41,$42,$43,$44,$45,$46

main:

ldir16,low(ramend)

outspl,r16

ldir17,high(ramend)

outsph,r17

ldsr20,len

ldixl,low(a)

ldixh,high(a)

ldiyl,low(b)

ldiyh,high(b)

loop:

ldizl,low(astab*2)

ldizh,high(astab*2)

clrr17

ldr16,x+

andir16,$0f

addzl,r16

adczh,r17

lpmr16,z+

sty+,r16

ldr16,x+

andir16,$f0

swapr16

ldizl,low(astab*2)

ldizh,high(astab*2)

addzl,r16

adczh,r17

lpmr16,z+

sty+,r16

decr20

brneloop

here:rjmphere

.exit

（4）设sram中$0060和$0061单元存储的是一个16位二进制无符号数(高字节在前)，试调用代码转换子程序和延时子程序，把这个数转换成十进制数(即bcd码)，并把其万、千、百、十、个位用一个数码管轮流显示出来，每位显示时间约1秒钟(画电路图、编程、调试、proteus仿真、下载到实验板进行验证)

.include8535def.inc

.org$0000

rjmpreset

tab:.db$3f,$06,$5b,$4f,$66,$6d,$7d,$07,$7f,$6f

reset:ldir16,low(ramend);栈指针置初值

outspl,r16

ldir16,high(ramend)

outsph,r16

ldir16,$ff;定义pbpd为输出口

outddrb,r16

outddrd,r16

ldsr16,$0060

ldsr17,$0061

rcallb16td5;调二转十子程

movr22,r20;将bcd码送r18r22

movr21,r19

movr20,r18

movr19,r17

movr18,r16

aa:rcallsmiao;调动态扫描子程

rjmpaa

smiao:ldir16,$fe;送个位位线

outportd,r16

movr23,r18;将个位的bcd码送r23

rcallcqb;查七段码送b口输出

rcallt1s;延时1s

ldir16,$fd;送十位位线

outportd,r16

movr23,r19;将十位的bcd码送r23

rcallcqb;查七段码送b口输出

rcallt1s;延时