16實驗

編寫包含多個功能子程序的中斷例程

安裝一個新的int 7ch中斷例程,爲顯示輸出提供如下功能子程序:

(1)清屏
(2)設置前景色
(3)設置背景色
(4)向上滾動一行

入口參數說明:

(1)用ah寄存器傳遞功能號:0表示清屏,1表示設置前景色,2表示設置背景色,3表示向上滾動一行；
(2)對於2、3號功能，用al傳送顏色值，(al)取值範圍爲[0,1,2,3,4,5,6,7]

 

分析：對於本實驗，第一點是：各個子程序的編寫，這並不難，參考書上很輕鬆就能搞定。第二點是：設置int 7ch的中斷向量表項是關鍵，剛開始我也發現是調用時子程序的地址不對，但是還是沒得解決。上論壇看過之後，採取了程序中這種比較簡單的方法。具體的在程序中有分析。第三點就是編寫測試程序。這點受到了sirius的思路指引。

具體源代碼如下：
assume cs:codesg,ds:datasg datasg segment fun_table dw funShowA, funClrSc, funChFgC, funChBgC, funRoOnL, funExitP, inpFunNu, inpColNu,errInpFu,errInpCo, space funShowA db '0 Show character A','$' funClrSc db '1 Clear Screen','$' funChFgC db '2 Change Foreground Color','$' funChBgC db '3 Change Background Color','$' funRoOnL db '4 Roll Up One Line','$' funExitP db '5 Exit Program','$' inpFunNu db 'Input Function Number:[0,1,2,3,4,5]:','$' inpColNu db 'Input Color Attribute:[0,1,2,3,4,5,6,7]:','$' errInpFu db 'Error!Input Function Number Range:[0,1,2,3,4]','$' errInpCo db 'Error!Input Color Attribute Range:[0,1,2,3,4,5,6,7]','$' space db ' ','$' row db 5,6,7,8,9,10,12,13,14,15 datasg ends stacksg segment db 128 dup (0) stacksg ends codesg segment ;;;;;;;;;;;以下是int 7ch中斷程序;;;;;;;;;;;;;;;;;;;;;; setscreen: jmp short set table dw showchar,clearscreen, setForeground, setBackground ,scrolloneline set: push bx cmp ah,4 ja setret ;判斷所輸入的功能號，大於4就是非法輸入 cmp ah,0 jb setret ;判斷所輸入的功能號，小於零也是非法輸入 mov bl,ah mov bh,0 add bx,bx;因爲table定義的是字型數據，所以要把bx的值乘以2，纔是其對應的子程序的入口地址 call word ptr table[bx];調用相應的子程序 setret: pop bx iret ;此子程序是顯示滿屏的字母'A' showchar: push ax push bx push cx push es mov ax,0b800h mov es,ax mov bx,0 mov cx,2000;在第0頁上顯示滿屏的'A'，循環2000次 lp_showchar: mov byte ptr es:[bx],41h;顯示'A' add bx,2 loop lp_showchar pop es pop cx pop bx pop ax ret ;清屏 clearscreen: push ax push bx push cx push es mov ax,0b800h mov es,ax mov bx,0 mov cx,2000 lp_clrscr: mov byte ptr es:[bx],20h;清屏的關鍵就是在偶地址位上填充空格 add bx,2 loop lp_clrscr pop es pop cx pop bx pop ax ret ;設置前景色， setForeground: push ax push bx push cx push es mov bx,0b800h mov es,bx mov bx,1;因爲奇數地址位存放的是顯示顏色屬性字節，所以偏移地址bx從1開始 mov cx,2000 lp_setFG: and byte ptr es:[bx],11111000b;這一步驟很關鍵，因爲與前景色有關的顏色屬性字節位 ;是0，1，2三位，所以我要保留之前顏色屬性的其他位不變，把這三位清零 or byte ptr es:[bx],al ;接着是用要設置的前景色的顏色屬性值與原來的顏色屬性值邏輯或後，就更改了前景顏色屬性值 add bx,2 loop lp_setFG pop es pop cx pop bx pop ax ret ;設置背景色 setBackground: push ax push bx push cx push es mov cx,0 mov cl,4 shl al,cl mov bx,0b800h mov es,bx mov bx,1 mov cx,2000 lp_setBG: and byte ptr es:[bx],10001111b;道理同設置前景色，與設置背景色有關的是顏色屬性值字節位是4，5，6三位， ;所以也要保留之前顏色屬性值的其它位不變，把此三位清零 or byte ptr es:[bx],al;接着是用要設置的前景顏色屬性值與原來的顏色屬性值邏輯或後，就更改了背景顏色屬性值 add bx,2 loop lp_setBG pop es pop cx pop bx pop ax ret ;向上滾動一行 scrolloneline: push ax push bx push cx push es push ds push si push di mov bx,0b800h mov es,bx mov ds,bx;因爲要做的事是：依次把第n+1行的內容複製到第n行；然後最後一行清空，而目的段地址都是0b800h mov si,160;因爲ds:[si]是數據源，所以設置初始值是你爲0，即n+1爲1。即初始是把第二行的複製到第一行， ;而一行的大小是160B。所以si初始值是160 mov di,0;es:[di]就是目的地址了。而目的是要把第n+1行的內容複製到第n行。所以di的值爲0 cld mov cx,24 lp_copyOL: push cx mov cx,160 rep movsb add bx,2 pop cx loop lp_copyOL mov cx,80 mov si,0 lp_setSpace: mov byte ptr [160*24+si],20h add si,2 loop lp_setSpace;把最後一行清空 pop di pop si pop ds pop es pop cx pop bx pop ax ret setend:nop ;;;;;;;;;;;到這裏中斷程序結束了;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;以下是主程序;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; start: mov ax,stacksg mov ss,ax mov sp,128 ;;;;;複製 int 7ch 的中斷程序;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; mov ax,cs mov ds,ax mov si,offset setscreen mov ax,0 mov es,ax mov di,200h mov cx,offset setend - offset setscreen cld rep movsb ;;;;;;;;複製 int 7ch 的中斷程序結束;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;設置int 7ch的中斷向量表項;;;;;;;;;;;;;;;;;;;;;;;;;; mov ax,0 mov es,ax mov word ptr es:[7ch*4],0h mov word ptr es:[7ch*4+2],20h;這裏的設置很關鍵，把中斷程序拷貝到了0000:0200h開始處。 ;原本設置cs=0000,而ip=0200h的。但是調用中斷例程後ip的值是0，所以爲了設置ip的值是0 ;就只有設置cs=0020h了，因爲0000:0200h和0020：0000h所表示的地址是一樣的，都是00200h。但是 ;通過這樣設置之後，可以使得ip的值是0，以便能找到中斷程序的子程序 ;;;;;;;設置int 7ch的中斷向量表結束束;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;以下的程序是測試程序，它提供了一個圖形化的界面，用戶輸入相應的功能測試上面的中端程序的相關功能;;;;;;;;;;;;;;;;;;;;;;;;;; mov ax,datasg mov ds,ax ;循環輸出菜單 menu: mov bx,offset fun_table;把在datasg段定義的菜單信息的首地址給bx mov si,offset row ;把在datasg段定義的行信息的首地址給si mov cx,7;循環7次的目的是輸出菜單的功能信息和提示信息。但是錯誤信息不要輸出 print_menu: call showstr ;調用此子程序輸出菜單信息 inc si; add bx,2; loop print_menu mov ah,0 int 16h ;因爲int 16h的功能是從鍵盤讀取一個字符。入口參數是把0送給ah。 ;出口參數是al中的內容是字符碼，ah中的內容是掃描碼。 ;所以調用int 16h的0號子程序讀取從鍵盤輸入入的字符 cmp al,'0' je show_char_A;0就是顯示滿屏的字母A cmp al,'1' je clear_screen;1是清屏 cmp al,'2' je change_color ;2改變前景色 cmp al,'3' je change_color ;3改變背景色 cmp al,'4' je roll_up_oneline ;4屏幕向上滾動一行 cmp al,'5' je exit_program ;退出程序 ;如果範圍不在0到5之間就說嘛輸入有錯誤，應該提示功能號輸入誤的信息 mov si,offset row+7 ;row+7也就是在13行顯示錯誤信息 mov bx,offset fun_table+10h ;fun_table+10h存放的是功能號輸入錯誤的信息 call showstr;調用輸出字符子程序輸出錯誤信息 call delay mov si,offset row+7 mov bx,offset fun_table+14h;等待用戶重新輸入之前要把錯誤信息清除，而fun_table+14h存放的就是清屏要用到的空格符 call showstr;清除錯誤信息 jmp menu;一直循環直到用戶輸入5退出程序 ;調用int 7ch的0號功能顯示滿屏的字母A show_char_A: mov ah,0 int 7ch call delay jmp menu ;調用int 7ch的1號功能清屏 clear_screen: mov ah,1; int 7ch call delay jmp menu ;調用int 7ch的4號功能屏幕向上滾動一行 roll_up_oneline: mov ah,4 int 7ch call delay jmp menu ;調用int 7ch的5號功能退出程序 exit_program: mov ax,4c00h int 21h ;這裏是判斷是設置前景色或者背景色 change_color: mov dl,al;al裏是用戶輸入的功能號，不是2就是3 loop_color_attri: mov si,offset row+8 mov bx,offset fun_table+14 ;在row+8也就是第14行顯示提示顏色屬性值的信息 ;（fun_table+14中存放提示顏色屬性值輸入的信息字符串的偏移地址） call showstr;輸出提示輸入顏色屬性值的信息 mov ah,0 int 16h;調用16h的0號功能獲得用戶的輸入 mov ah,'0' mov cx,8 ;判段顏色屬性值的正確性，它的範圍只能是0到7 test_color: cmp al,ah je setFG_or_setBG;如果輸入是合理的就跳轉到setFG_or_setBG處判斷是設置前景色還是設置背景色 add ah,1 loop test_color;這裏循環8次，檢查輸入的顏色屬性值是否合理 ;如果循環進行完之後沒有跳轉到setFG_or_setBG，就說明顏色屬性值輸入有錯，需提示錯誤信息 mov si,offset row+9 mov bx,offset fun_table+18 call showstr;同理顯示顏色屬性輸入錯誤的信息 call delay mov si,offset row+9 mov bx,offset fun_table+20 call showstr;把顏色提示信息清空 jmp loop_color_attri;一直循環到用戶輸入正確的顏色屬性值 setFG_or_setBG: mov si,offset row+8 mov bx,offset fun_table+20 call showstr;拿到合適的顏色屬性之後要把提示輸入顏色屬性值的信息清除 cmp dl,'3' je set_bg_color ;判斷如果是3號功能就是設置背景色 ;調用int 7ch的2號功能設置前景色 set_fg_color: mov ah,2 int 7ch jmp menu ;調用int 7ch的3號功能設置背景色景色 set_bg_color: mov ah,3 int 7ch jmp menu ;;;;;;;顯示字符串的子程序;;;;;;;;;;;;;;;;;;;;; showstr: push bx push dx push ax push si mov bh,0 ;顯示在第0頁 mov dh,ds:[si] ;行號 mov dl,20 ;列號 mov ah,2 ;要調用int 10h的2號子程序 int 10h;調用了int 10h的2號子程序對光標進行定位 mov dx,ds:[bx];設置ds:dx指向要顯示的字符串的首地址 mov ah,9 int 21h ;調用int 21h的第9號子程序顯示字符串 pop si pop ax pop dx pop bx ret ;;;;;;;顯示字符串的子程序的結束;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;這裏是延時程序的開始;;;;;;;;;;;;;;;;;;;;;; delay: push ax push dx mov dx,2000h mov ax,0 loop_delay: sub ax,1 sbb dx,0 cmp ax,0 jne loop_delay cmp dx,0 jne loop_delay pop dx pop ax ret ;;;;;;;;;這裏是延時程序的結束;;;;;;;;;;;;;;;;;;;;;; mov ax,4c00h int 21h codesg ends end start