課程設(shè)計(jì)報(bào)告word版-wenkub
2023-04-26 22:31:33 本頁面
【正文】 popf pop dx pop cxpop bxpop ax retinput endp九、附錄（源程序） *******數(shù)據(jù)段**********data segment ；數(shù)據(jù)段開始mess1 db39。,0ah,0dh db 39。 XueHan ZuoPeng amp。,0ah,0dh db 39。,0ah,0dhdb 39。,0ah,0dhdb 39。,0ah,0dhdb 39。,0ah,0dh db 39。,0ah,0dhdb 39。,0ah,0dhdb 39。,0ah,0dh db 39。 tips db 39。mess2 db 39。BUFF db 40 ；定義緩沖區(qū) db ? db 40 dup (?)hor dbmin db ?sec db ?fg db 0 data ends ； 數(shù)據(jù)段結(jié)束 *********堆棧段***********stack segment ；堆棧段開始 db 100 dup(?)stack ends ；堆棧段結(jié)束 *******代碼段主程序*********code segment ；代碼段開始 assume cs:code,ss:stack,ds:data start: call clear ；調(diào)用清屏子程序 display: mov ax,data mov ds,ax mov bx,offset BUFF mov ah,2ch int 21h ；取出DOS保存的時(shí)間CMP CH,21JNE P1CMP CL,30JNE P1CMP DH,27JE P0JMP P1 ；設(shè)置響鈴條件P0: CALL BELL ；調(diào)用響鈴子程序P1: mov al,ch ；將小時(shí)存入al中 mov ah,0 call ASCII ；將小時(shí)轉(zhuǎn)化為ASCII值 inc bx mov al,39。 mov [bx],al inc bx mov al,dh mov ah,0 call ASCII ；將秒轉(zhuǎn)化為ASCII值 inc bx mov al,39。 je Cor cmp al,39。 JZ Quit cmp al,39。將輸入的分鐘存入mininc bxinc bxmov dh,[bx]sub dh,30h ；將秒的十位數(shù)字的ASCII值轉(zhuǎn)化成數(shù)字后存入dhinc bxmov dl,[bx]sub dl,30hmov cl,10mov al,dhmul cladd al,dlmov dh,almov sec,al 。 jz Quit ； 若是Q或q則轉(zhuǎn)移到Quit jmp display Quit: mov ah,4ch int 21h ；跳出DOS界面 ret Cor: call correctASCII PROC NEAR ；二進(jìn)制轉(zhuǎn)化為ASCII的子程序 PUSH CX MOV AH,0 MOV CX,10D DIV CL ADD AX,3030H MOV [BX],AL INC BX MOV [BX],AH POP CX RETASCII ENDPclear proc near ；清屏子程序 push ax push bx push cx push dx mov ax,0600h mov bx,003eh sub cx,cx mov dx,0000h int 10h pop dx pop cx
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號(hào)-1