鱼C论坛

 找回密码
 立即注册
查看: 1888|回复: 2

编译 按Esc键变颜色出现26个字母 出现(4) out of memory

[复制链接]
发表于 2013-8-2 20:25:27 | 显示全部楼层 |阅读模式
1鱼币
assume cs:code            ;编程:在屏幕中间依次显示"a"~"z",并可以让人看清,在显示的过程中,按下'Esc'键后,改变显示的颜色。
                          ;完整的功能代码:
stack segment
        db 128 dup(0)
stack ends

data segment
        dw 0,0
data ends

code segment
start:
        mov ax,stack
                mov ss,ax
                mov sp,128
                mov ax,data
                mov ds,ax
                mov ax,0
                mov es,ax
               
                push es:[9*4]
                pop ds:[0]
                push es:[9*4+2]
                pop ds:[2]               ;将原来的int 9中断例程的入口地址保存在ds:0、ds:2但与昂中
               
                mov word ptr es:[9*4],offset int9
                mov es:[9*4+2],cs        ;在中断向量表中设置新的int 9中断例程的入口地址
               
                mov ax,0b800h
                mov es,ax
                mov ah,'a'
s:
        mov es:[160*12+40*2],ah
                call delay
                inc ah
                cmp ah,'z'
                jna s
                mov ax,0
                mov es,ax
               
                push ds:[0]
                pop es:[9*4]
                push ds:[2]
                pop es:[9*4+2]            ;将中断向量表中intn 9中断例程的入口恢复为原来的地址
               
                mov ax,4c00h
                int 21h
               
delay:
        push ax
                push dx
                mov dx,2000h
                mov ax,0
s1:
        sub ax,1
                sbb dx,0
                cmp ax,0
                jne s1
                cmp dx,0
                jne s1
                pop dx
                pop ax
                ret
               
;   以下为新的int 9中断例程

int9:
        push ax
                push bx
                push es
               
                in al,60h
               
                pushf
                pushf
                pop bx
                and bh,11111100b
                push bx
                popf
                call dword ptr ds:[0]    ;对int指令进行模拟,调用原来的int 9中断例程
               
                cmp al,1
                jne int9ret
               
                mov ax,0b800h
                mov es,ax
                inc byte ptr es:[160*12+40*2+1] ;属性增加1,改变颜色
               
int9ret:
        pop es
                pop bx
                pop ax
                iret
               
code ends

end start

               

想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2013-8-3 01:33:45 | 显示全部楼层
按书上的提示,这个代码按ESC的效果需要在纯dos下整。
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

发表于 2013-9-8 16:51:02 | 显示全部楼层
或者按照这个模拟也可以实现:http://bbs.fishc.com/thread-3581-1-1.html
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-11-17 07:50

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表