微机原理实验--子程序与宏指令.pdfVIP

N（N50）个偶数之和()的子程序和接收键入N及将结果显示在主程序。

子程序代码：

stacksegmentstackstack;定义堆栈段

dw32dup(?);堆栈段有32字空间

stackends

datasegment;定义数据段

inputdbpleaseinputN:,$

ndb5,0,5dup(?);定义变量数据区n

obfdb8dup(?)

dataends

codesegment;定义代码段

startprocfar;定义一个过程start

assumess:stack,cs:code,ds:data

pushds

subax,ax;未通过过程DOS返回做准备

pushax

movax,data

movds,ax

movdx,offsetinput

movah,9;9号功能调用，显示器显示“pleaseinputN：”

int21h

movdx,offsetn

movah,10;10号功能调用，键盘输入并显示数据n

int21h

movsi,offsetn+2

movcl,n+1

movch,0

calla;调用子程序a

callsum;调用子程序sum

shlax,1;乘2

movbx,segobf

moves,bx

movdi,offsetobf+1

callb;调用子程序b

callHH;调用子程序HH

movdx,offsetobf

movah,9

int21h

RET

startendp

sumproc;定义子程序sum，sum为自然数相加子程序

pushcx;保护现场

pushbx

movcx,ax

movbx,0

movax,bx

sm:adcbx,1;bx，1和CF相加

adcax,bx;把ax，bx和CF相加

loopsm

popbx;恢复现场

popcx

RET

sumendp

aproc;定义子程序a，a为键盘输入的十进制数转化成16进制子程序

movax,0

c0:pushcx

movcx,10

mulcx;乘法指令调用

andbyteptr[si],0fh;十进制的asc码转换成BCD码

addal,[si]

adcah,0

incsi;越过负号指向数字

popcx

loopc0

RET

aendp

bproc;定义过程c，b为16进制转换成asc码

pushax

pushbx

pushcx

pushdx

pushdi

orax,ax;判断数的负号

jnsplus;为正转到plus

movbyteptres:[di],-;为负送负号至输出数据区

incdi;求负数的绝对值

negax

plus:movcx,0;将ax中2进制转换成10进制

movbx,10

c1:movdx,0

divbx

pushdx;余数进栈

inccx;十进制位数加1

orax,ax;商不为0继续除以10

jnzc1

c2:popax;将十进制转换成asc码

addal,30h

stosb

loopc2

moval,$

stosb

popdi

popdx

popcx

popbx

popax

R