南邮微机原理试验一二.docxVIP

1.1程序修改

.486

DATASEGMENTUSE16

SUMDB?,?

MESGDB25+9=

DB0,0,$

N1DB9,0F0H

N2DB25

DATAENDS

CODESEGMENTUSE16

ASSUMECS:CODE,DS:DATA

BEG:MOVAX,DATA

MOVDS,AX

MOVBX,OFFSETSUM

MOVAH,N1

MOVAL,N2

ADDAH,AL

MOV[BX],AH

CALLCHANG

MOVAH,9

MOVDX,OFFSETMESG

INT21H

MOVAH,4CH

INT21H

CHANGPROC

LAST:???CMP??????BYTE?PTR?[BX],10?

?????????JC????????NEXT?

?????????SUB??????BYTE?PTR[BX],10?

?????????INC??????BYTE?PTR?[BX+7]?

?????????MOV?????AH,?BYTE?PTR[BX]?

?????????JMP??????LAST

NEXT:MOVDX,WORDPTRSUM

ADD[BX+8],DX

ADDBYTEPTR[BX+7],30H

ADDBYTEPTR[BX+8],30H

RET

CHANGENDP

CODEENDS

ENDBEG

从数据段NUM单元开始存有9个有符号数，并编写一个程序实现：找出最小值存放到数据段MIN单元，并将负数的个数以十进制的形式显示在屏幕上。

?

.486?

DATA?SEGMENT?USE16?

NUM?DB?-8,-44,-88,-37,2,-1,8,-26,-18

MIN?DB???

AB?DB?0?

DATA?ENDS?

CODE?SEGMENT?USE16?

ASSUME?CS:CODE?,?DS:DATA?

BEG:?MOV?AX,DATA

MOV?DS,AX?

MOV?BX,OFFSET?NUM?

MOV?CH,0?

MOV?CL,9?

AGAIN:?CMP?BYTE?PTR?[BX]?,0?

JG?NEXT1?

INC?AB?

CMP?BYTE?PTR?[BX],?CH?

JG?NEXT1??

MOV?CH,BYTE?PTR?[BX]?

NEXT1:?INCBYTE?PTR?BX??

DEC?CL?

?JNE?AGAIN??

MOV?MIN,CH?

MOV?AH,2?

MOV?DL,AB?

INT?21H?

MOV?AH,4CH?

INT?21H?

CODE?ENDS?

END?BEG

.486

DATASEGMENTUSE16

BUF1DB123456

BUF2DB000000

BUF3DBPleaseinputcommunicationwords:,0DH,0AH,$

BUF4DB3

OUT1DBERRORS,0DH,0AH,$

OUT2DBRIGHT,0DH,0AH,$

OUT3DB*,$

OUT4DB0DH,0AH,$

DATAENDS

CODESEGMENTUSE16

ASSUMECS:CODE,DS:DATA,ES:DATA

BEG:MOVAX,DATA

MOVDS,AX

MOVES,AX

MOVAH,00H

MOVAL,3

INT10H

LAST1:LEASI,BUF1

LEADI,BUF2

MOVBX,OFFSETBUF2

MOVCX,6

MOVAH,09H

LEADX,BUF3

INT21H

LAST:MOVAH,07H

INT21H

MOVBYTEPTR[BX],AL

INCBX

MOVAH,09H

MOVDX,OFFSETOUT3

INT21H

LOOPLAST

MOVAH,09H

LEADX,OUT4

INT21H

MOVCX,6

CLD

REPECMPSB

JZEXIT

MOVAH,09H

LEADX,OUT1

INT21H