微機(jī)應(yīng)用課程設(shè)計(jì)字符圖形顯示-資料下載頁(yè)
2025-06-29 13:23本頁(yè)面
【正文】 5h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,1,0db 05h,122,2,0。!char_t dw ? pointer dw ? line_on db ? col_on db ? data ends stack segment db 2000 dup (0) stack ends code segment assume cs:code,ds:data main proc far push ds sub ax,ax push ax mov ax,data 。初始化DS mov ds,ax mov ah,0 。設(shè)置300*200彩色圖形方式 mov al,3 int 10h mov ah,0bh 。設(shè)置背景顏色 mov bh,0 mov bl,2 int 10h mov ah,0bh 。設(shè)置彩色調(diào)板 mov bh,01 mov bl,00 int 10h call clear_screen 。清屏 lea di,car1 。di指向字符圖形表 mov dh,5 。從第5行第5列位置開(kāi)始 mov dl,5 call move_shape call clear_screen 。清屏 lea di,car2 。di指向字符圖形表 mov dh,5 。從第5行第5列位置開(kāi)始 mov dl,5 call move_shape mov ah,01h 。從鍵盤(pán)輸入字符 int 21h cmp al,0dh je exit exit:mov ah,4ch int 21h ret main endp clear_screen proc near 。清屏子程序 push ax 。保護(hù)寄存器 push bx push cx push dx mov ah,6 。屏幕上卷功能 mov al,6 mov ch,0 。左上角行號(hào) mov cl,0 。 mov dh,250 。 mov dl,250 。mov bh,7 。卷入行屬性 int 10h 。調(diào)用顯示功能 pop dx ?；謴?fù)寄存器 pop cx pop bx pop ax ret 。返回主程序clear_screen endp move_shape proc near push ax push bx push cx push dx push di mov ah,0fh 。取當(dāng)前顯示方式 int 10h sub ch,ch 。清除寄存器CX的高字節(jié) mov cl,[di] 。CLinc di 。di指向字符表的第一個(gè)字符 mov char_t,cx 。保存循環(huán)次數(shù) mov pointer,di mov line_on,dh mov col_on,dl plot_next: add dh,[di+2] 。改變行列指針 add dl,[di+3] cmp dl,150 。出屏否？ jb mov_crsr call erase pop di pop dx pop cx pop bx pop ax retmov_crsr: 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_next call dly_qrtr 。調(diào)用延時(shí)子程序 call erase 。調(diào)用擦除子程序 jmp short plot_next move_shape endp erase proc near 。擦除子程序 mov cx,char_t mov di,pointermov dh,line_on mov dl,col_on erase_next: add dh,[di+2] add dl,[di+3] mov ah,2 int 10h mov al,[di] mov bl,0 push cx mov cx,1 mov ah,9 int 10h pop cx add di,4 loop erase_next mov cx,char_t mov di,pointer mov dh,line_oninc col_on mov dl,col_on ret erase endp dly_qrtr proc near 。延時(shí)子程序子程序 push cx push dx mov dx,8000 d11:mov cx,10000 d12:loop d12 dec dx jnz d11 pop dx pop cx ret dly_qrtr endp code ends end main 27
法律信息相關(guān)推薦
鄂ICP備17016276號(hào)-1