【文章內(nèi)容簡介】 SUME CS:CODE,DS:DATA START:MOV AX,DATA MOV DS,AX MOV BX,OFFSET Z SECOND:MOV AX,OFFSET M MOV DX,OFFSET N ADD AX,15 CMP AX,BX JC FIRST MOV CX,0016 ADD DX,15 MOV SI,AX MOV DI,DX BEGIN2:MOV BL,[SI] MOV [DI],BL DEC SI DEC DI LOOP BEGIN2 JMP COMPLETE FIRST:MOV CX,0016 SUB AX,15 MOV SI,AX MOV DI,BX BEGIN1:MOV DL,[SI] MOV [DI],DL INC SI INC DI LOOP BEGIN1 MOV BX,0000 JMP SECOND COMPLETE:MOV AH,4CH INT 21H CODE ENDS END START 無序數(shù)據(jù)塊的遞增排序 １）程序設(shè)計思想和要求 16 在首址為 3000H 的數(shù)據(jù)區(qū)中存放著一組無符號數(shù)， 數(shù)據(jù)的長度存于 3500H 單元內(nèi)，要求用冒泡法對該區(qū)中的數(shù)據(jù)按遞增次序排列。 冒泡法的基本思想是從最后一個數(shù)（或從第一個數(shù)）開始，依次把相鄰兩個數(shù)比較，即第Ｎ個數(shù)與第Ｎ－１個數(shù)比較?，若大則交換，否則不交換，直到Ｎ個數(shù)都比較完為止。此時 ，其中最小數(shù)排在最前列。然后將剩下的Ｎ 1 個數(shù)再按前述方法進(jìn)行，找到 N1 個數(shù)中最小的數(shù)。以后重復(fù)進(jìn)行，直到全部按序排列。 ２）實驗步驟 （１）編寫程序。 （２）在 DEBUG 下鍵入程序并檢查（程序可存放于 2020H－ 8000H 單元，只要不與數(shù)據(jù)區(qū)重疊即可）。 （３）確定數(shù)據(jù)個數(shù)并輸入 3500H 單元中，在首址為 3500H 的數(shù)據(jù)區(qū)中存入任意無符號數(shù)。 （４）運行程序并檢查運行結(jié)果。 （６）反復(fù)修改數(shù)據(jù)個數(shù)和數(shù)據(jù)區(qū)中的數(shù)，運行程序、觀察結(jié)果，驗證程序的正確性。 DATA SEGMENT M DB 4,7,0,2,12,55,98,35,1,78,6,22,55,98,11,32,43,54,26,100,125,142,77,44,33,22,10 CODE SEGMENT ASSUME CS:CODE,DS:DATA START:MOV AX,DATA MOV DS,AX LEA AX,M MOV SI,AX MOV AH,0 NEXT: MOV CX,0026 MOV BX,0026 AGAIN:MOV AL,[SI+BX] DEC BX MOV DL,[SI+BX] CMP AL,DL JNC CONTINUE XCHG DL,1[SI+BX] XCHG AL,[SI+BX] CONTINUE:LOOP AGAIN MOV BH,25 ADD AH,1 CMP AH,BH JC NEXT MOV AH,4CH INT 21H CODE ENDS END START 17 求數(shù)的平方根 １）程序設(shè)計思想和要求 減奇數(shù)法是一種求取近似平方根和平方根的整數(shù)部分的方法。有公式： n ?（ 2K1） =N2 ｋ =1 若要求數(shù) S 的平方根 ?S， 則可以從 S 中減去奇數(shù) 5?直到減為零或不夠減下一個奇數(shù)為止，然后統(tǒng)計減去的奇數(shù)個數(shù)，它就是 S 的近似平方根。 被開方數(shù)為一個足夠大的二進(jìn)制數(shù)， 存于首址為 4000H 的單元內(nèi)，它的方根存放在以 4500H為首的單元內(nèi)。 ２）實驗步驟 （１）編寫程序。 （２）在 DEBUG 下輸入程序并檢查（程序可存放于 2020H－ 8000H 單元，和數(shù)據(jù)存放單元不 要重疊）。 （３）在 4000H 為首的單元中存入一個任意大的數(shù)。 （４）運行程序并檢查運行結(jié)果。 （６）反復(fù)修改被開方數(shù)，運行程序、觀察結(jié)果，驗證程序的正確性。 DATA SEGMENT M DW 2453 N DW ? CODE SEGMENT ASSUME CS:CODE,DS:DATA START:MOV AX,DATA MOV DS,AX LEA AX,M LEA BX,N MOV SI,AX MOV DI,BX MOV BX,0001 MOV DX,0000 MOV AX,[SI] CONTINUE:SUB AX,BX JB COMPLETE 18 INC DX ADD BX,0002 JMP CONTINUE COMPLETE:MOV [DI],DX MOV AH,4CH INT 21H CODE ENDS END START 思考題 ① 如果二進(jìn)制加數(shù)和被加數(shù)不限于四字節(jié)而為任意字節(jié)時，程序應(yīng)作如何改動？ ② 修改原有的無符號數(shù)的排序程序為帶符號數(shù)的排序程序。 ③ 被開方數(shù)是一壓縮型的 BCD 碼 十進(jìn)制數(shù)時，程序應(yīng)作如何修改？ （ 二） MASM 匯編程序和 LINK 連接程序的使用操作 在 DEBUG 中，使用 A 命令建立程序，一般不能使用標(biāo)號和偽指令，并不能保存匯編語言源程序，適用于簡單程序。 MASM 宏匯編程序可以將編輯程序建立的源程序文件進(jìn)行匯編，匯編后在盤上建立目標(biāo)文件、列表文件和交叉參考文件。而目標(biāo)文件經(jīng) LINK 程序連接以后成為可執(zhí)行的文件，它可以在 DOS 下執(zhí)行也可在 DEBUG 下調(diào)試。 計算機(jī)鋼琴程序 1）實驗內(nèi)容 根據(jù)樂曲中不同的音符是由輸出不同頻率的聲波而產(chǎn)生的原理，通過設(shè)置 PC 機(jī)中 8253 定時器不同的計數(shù)值，可由揚聲器發(fā)出不同的曲調(diào)。 以下是實現(xiàn) PC 機(jī)作為一架可彈奏的鋼琴演奏預(yù)定的曲調(diào)。程序中采用了 INT 21H 軟中斷調(diào)用了 DOS 的常用子程序。 源程序為： DATA SEGMENT MESS DB ‘Push any key to stop!’， 0dH， 0aH， ’$’ TABLE DW 524,588,660,698,784,880,988,1048,1176,1320,0 TABLEL DB 31H,31H,32H,31H,34H,33H,3BH DB 31H,31H,32H,31H,35H,34H,3BH DB 31H,31H,38H,36H,34H,33H,32H,3BH DB 36H,36H,36H,34H,35H,34H,3BH,0AAH DATA ENDS STACK SEGMENT PARA STACK ‘STACK’ STA DB 256 DUP(?) STACK ENDS CODE SEGMENT ASSUME CS: CODE, DS: DATA, SS: STACK, ES: DATA 19 START PROC FAR DIV WORD PTR [TABLE+BX] PUSH DS MOV BX, AX XOR AX, AX MOV AL, 10110110B PUSH AX OUT 43H, AL MOV AX, DATA MOV AX, BX MOV DS, AX OUT 42H, AL MOV ES, AX MOV AL, AH MOV AH, 09H OUT 42H, AL LEA DX, MESS IN AL, 61H INT 21H OR AL, 03H KK: LEA SI, TABLEL OUT 61H, AL CALL DELAY IN AL, 61H AND AL, 0FCH OUT 61H, AL : INC SI SING: MOV AH, 06H JMP SING MOV DL, 0FFH FINISH: RET INT 21H START ENDP JNE FINISH MOV AL, [SI] DELAY PROC NEAR ； 延時子程序 CMP AL, 3BH PUSH CX JNE DDD PUSH AX CALL DELAY MOV AX, 500H ； 大循環(huán)次數(shù) JMP X1: MOV CX, 0FFFFH ； 小循環(huán)次 數(shù) DDD: CMP AL, 0AAH X2: DEC CX JE KK JNZ X2 SUB AL, 31H DEC AX SHL AL, 01H JNZ X1 MOV BL, AL POP AX MOV AX, 0000H POP CX MOV DX, 12H RET MOV BH, 00H DELAY ENDP CODE ENDS END START 2）實驗步驟 （ 1）利用 EDIT 全屏幕編輯程序或 TURBO PASCAL 中的編輯功能輸入以上程序，以文件名為 存盤。 （ 2）在 DOS 系統(tǒng)下執(zhí)行子目錄 MASM 中的執(zhí)行文件 ，用宏匯編程序?qū)?.匯編成目標(biāo)文件 。操作過程如下： 顯示 鍵入 20 C:\MASM MASM ? MICROSOFT(R) ???? COPYRIGHT(C)????? SOURCE FILENAME [.ASM] PLAYPIA ? OBJECT FILENAME [] SOURCE LISTING[] PLAYPIA ? CROSS