【正文】 int 16h JMP DISP1 。若輸入其它鍵則持續(xù)飛翔等待 RETFLY ENDP。小鳥鳴叫子程序BLEAT PROC FAR FREG: LEA SI,MUS_FREG LEA BP,DS:MUS_TIMEPUSH BX MOV DI,[SI] MOV DX,DS:[BP] MOV BX,1400 CALL GENSOUND 。調(diào)用發(fā)聲子程序POP BXLEA DI,BIRD1 。顯示小鳥CALL DISPLAY0 LEA DI,BIRD2CALL DISPLAY0LEA DI,BIRD3CALL DISPLAY0 mov ah,1 。從鍵盤讀取字符到AL寄存器 int 16h JZ FREG 。若無輸入則持續(xù)鳴叫等待 CMP AL,39。Q39。 JNZ A2 CALL FAR PTR QUIT 。若輸入Q則結(jié)束,退出程序 A2:CMP AL,39。P39。 JNZ B2 MOV COUNT2,0 CALL PAUSE 。若輸入P則暫停 B2:CMP AL,39。S39。 JNZ C2 mov ah,0 。清空鍵盤緩存 int 16h CALL FLY_BLEAT 。若輸入S則同時(shí)飛翔 C2:mov ah,0 。清空鍵盤緩存 int 16h JMP FREG 。若輸入其它則持續(xù)鳴叫等待 RETBLEAT ENDP。通用發(fā)聲子程序 GENSOUND PROC NEAR PUSH AX PUSH BX PUSH CX PUSH DX PUSH DI MOV AL,0B6H OUT 43H,AL MOV DX,12H MOV AX,533H*896 DIV DI OUT 42H,AL MOV AL,AH OUT 42H,AL IN AL,61H MOV AH,AL OR AL,3 OUT 61H,ALWAIT1:MOV CX,8FF0HDELAY1:LOOP DELAY1 DEC BX JNZ WAIT1 MOV AL,AH OUT 61H,AL POP DI POP DX POP CX POP BX POP AX RETGENSOUND ENDP 。小鳥同時(shí)飛翔和鳴叫子程序 FLY_BLEAT PROC DISP2: LEA DI,BIRD1 。顯示小鳥 CALL DISPLAY1 CALL BLEAT_DLY LEA DI,BIRD2 CALL DISPLAY0 LEA DI,BIRD3 CALL DISPLAY0 PUSH AX MOV AX,DXF INC AL 。小鳥向前移動(dòng)1格 MOV DXF,AX POP AX mov ah,1 。從鍵盤讀取字符到AL寄存器 int 16h JZ DISP2 。若無輸入則持續(xù)飛翔等待 CMP AL,39。Q39。 JNZ A3 CALL FAR PTR QUIT 。若輸入Q則結(jié)束,退出程序 A3:CMP AL,39。P39。 JNZ B3 MOV COUNT3,0 CALL PAUSE 。若輸入P則暫停 B3:CMP AL,39。B39。 JNZ C3 CALL BLEAT 。若輸入B則小鳥只是鳴叫 C3:CMP AL,39。S39。 JNZ D3 CALL FLY 。若輸入S則小鳥只是飛翔 D3:mov ah,0 。清空鍵盤緩存 int 16h JMP DISP2 。若輸入其它則持續(xù)飛翔鳴叫等待 RETFLY_BLEAT ENDP。小鳥顯示子程序1(不帶延時(shí)) DISPLAY1 PROC CALL CLEAR1 sub ch,ch 。清除寄存器CX的高字節(jié) mov cl,[di] 。CL放循環(huán)次數(shù) inc di 。di指向字符表的第一個(gè)字符 plot_next: MOV DX,DXF 。跟蹤飛翔位置 add dh,[di+2] 。改變行列指針 add dl,[di+3] mov ah,2 。移動(dòng)光標(biāo)位置 int 10h mov al,[di] mov bl,[di+1] 。取字符值及屬性 push cx mov cx,1 mov ah,09 。顯示字符 int 10h pop cx add di,4 。di指向下一個(gè)字符 loop plot_nextRETDISPLAY1 ENDP。小鳥顯示子程序（帶延時(shí)） DISPLAY0 PROC CALL DISPLAY1 CALL DLYRETDISPLAY0 ENDP。暫停子程序 PAUSE PROC mov ah,0 。清空鍵盤緩存 int 16h CMP AL,39。Q39。 JNZ E0 CALL FAR PTR QUIT 。若輸入Q則結(jié)束,退出程序 E0: CMP AL,39。C39。 JZ F0 。若輸入C則程序繼續(xù) JMP PAUSE 。若輸入其它字符則保持暫停狀態(tài) F0: CMP COUNT0,0 JZ G0 。若count0為0，則返回主程序 CMP COUNT1,0 JZ G1 。若count1為0，則返回飛翔子程序 CMP COUNT2,0 JZ G2 。若count2為0，則返回鳴叫子程序 CMP COUNT3,0 JZ G3 。若count3為0，則返回飛翔并鳴叫子程序 G0: MOV COUNT0,1 JMP FAR PTR DISP0G1: MOV COUNT1,1 JMP FAR PTR DISP1G2: MOV COUNT2,1 JMP FAR PTR FREGG3: MOV COUNT3,1 JMP FAR PTR DISP2 RETPAUSE ENDP 。延時(shí)子程序DLY PROC NEAR PUSH CX PUSH DX MOV DX,30000DL1: MOV CX,6801DL2: LOOP DL2 DEC DX JNZ DL1 POP DX POP CX RETDLY ENDP。 小鳥飛翔鳴叫時(shí)延時(shí)子程序 BLEAT_DLY PROC PUSH DX PUSH CX PUSH SI PUSH DI PUSH BX SUB AX,AX LEA SI,MUS_FREG LEA BP,DS:MUS_TIME MOV DI,[SI] MOV DX,DS:[BP] MOV BX,1400 CALL GENSOUND MOV DX,20500DL3: MOV CX,6801DL4: LOOP DL4 DEC DX JNZ DL3 POP BX POP DI POP SI POP CX POP DX RETBLEAT_DLY ENDP。結(jié)束程序子程序 QUIT PROC FAR MOV AH,4CH 。終止當(dāng)前程序并返回調(diào)用程序 INT 21H RETQUIT ENDPCODE ENDS END START附錄2： 本科生課程設(shè)計(jì)成績評定表姓 名梅浪奇性 別男專業(yè)、班級(jí)自動(dòng)化1002班課程設(shè)計(jì)題目：小鳥動(dòng)畫程序課程設(shè)計(jì)答辯或質(zhì)疑記錄：成績評定依據(jù)：評 定 項(xiàng) 目評分成績1．考勤、態(tài)度（10分）2. 查閱資料能力（10分）3. 系統(tǒng)設(shè)計(jì)(20分)包括系統(tǒng)實(shí)現(xiàn)原理、框圖、方案的說明4．編程序,調(diào)試結(jié)果（25分）5．設(shè)計(jì)說明書質(zhì)量及規(guī)范化、參考文獻(xiàn)充分（不少于5篇）（15分）6．答辯（20分）總分： 總評： 指導(dǎo)老師簽字： 最終評定成績（以優(yōu)、良、中、及格、不及格評定）指導(dǎo)教師簽字： 年 月 日