九九乘法表程序Word下载.docx

九九乘法表程序Word下载.docx

《九九乘法表程序Word下载.docx》由会员分享，可在线阅读，更多相关《九九乘法表程序Word下载.docx（12页珍藏版）》请在冰豆网上搜索。

cmpbl,32h;

‘2’赋给BL

jzm

leadx,table3;

显示table3定义内容

movah,9;

功能号为9,显示

int21h

callback

jmpt;

跳转到t

n:

callmutli

jmpt

m:

callcolor

q:

MOVDX,OFFSETNUM

MOVAH,9;

显示功能

INT21H

MOVAH,1;

键盘输入并回显

movah,4ch;

中断调用

popax;

恢复现场

popds

ret

mainendp

mutliprocnear;

九九乘法输出函数

pushbx;

保护现场

pushcx

pushdx

SUBAX,BX

PUSHAX

MOVAX,DATAs

MOVDS,AX

MOVBL,0

MOVX,BL;

X=0

MOVBH,1

MOVY,BH;

Y=1

MOVCL,BL

LOOP1:

ADDBL,1;

PRINTX

MOVDL,BL

ADDDL,30H

MOVAH,2

MOVDL,'

*'

;

PRINT*

MOVDL,BH;

PRINTY

='

PRINT=

MOVAL,BH;

PRINTZ=X*Y

IMULBL

MOVAH,00H

MOVCH,0AH

IDIVCH

MOVDH,AH

CMPAL,0

JZLOOP3;

比较后跳转

ADDAL,30H

LOOP2:

MOVDL,AL

MOVAH,2H

ADDDH,30H

MOVDL,DH

MOVAH,2;

显示输出

MOVDL,20H

CMPBL,BH

JLLOOP1

MOVDL,0AH;

键盘输入到缓冲区

MOVDL,0DH

MOVBL,CL

ADDBH,1

CMPBH,10

JMPEXIT

LOOP3:

MOVAL,20H

JMPLOOP2

EXIT:

MOVAH,07H;

键盘输入无回显

popax

popdx

popcx

popbx;

mutliendp

colorprocnear;

颜色输出函数

pushax

pushbx

;

========MAIN（）===========

MOVBH,01H

LOP1:

MOVBL,01H

LOP2:

MOVAL,BH

MULBL

CALLDISPLAY;

调用显示子程序

INCBL

JBELOP2

CALLCRLF

INCBH

CMPBH,9

JBELOP1

MOVDX,OFFSETNUM

MOVAH,9

MOVAH,1

===========================

popdx;

popbx

popAX

colorendp

------------------------

CRLFPROCNEAR

PUSHDX

键盘输入到缓冲区

MOVDL,0DH;

键盘复位

POPDX

POPAX

RET

CRLFENDP

OUTXPROCNEAR

OUTXENDP

----------------------------

DISPLAYPROCNEAR

CMPAL,10

JAEDISP1

'

打印空格

CALLOUTX

JMPDISP2

DISP1:

MOVDL,10

MOVAH,0

DIVDL

ADDDL,'

0'

--------------------------------------

cmpbl,bh

jneshow5

callwritecc

jmpshow1

show5:

cmpbl,1;

小于或等于比较后跳转;

结果为正就转移

jneshow6

show6:

cmpbh,9

jneshow

-----------------------------------------------

show:

CALLOUTX

show1:

MOVAL,AH

DISP2:

MOVDL,AL

------------------------------------------------

jneshow4

jmpshow3

show4:

cmpbl,1

jneshow7

show7:

jneshow2

--------------------------------------------------

show2:

show3:

MOVDL,'

DISPLAYENDP

WriteCCPROCnear

pushAX

pushsi

xorAH,AH;

清零操作

MOVdh,9

MOVAL,dh

MOVsi,AX

显示字符串

MOVAL,DL

MOVbh,0

MOVbl,col[si]

MOVcx,1

INT10h

MOVAH,3

incDL;

自加

popsi

WriteCCENDP

backprocnear

movdl,0Ah

movah,2

movdl,0Dh

backendp

MOVAH,4CH

CODESENDS

END