鱼C论坛

 找回密码
 立即注册
查看: 3060|回复: 0

实验14 大家来帮忙看看吧!

[复制链接]
发表于 2011-6-13 23:37:11 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
不知为什么编译不通过!
mov ax, data    这句符号类型冲突   不知道什么意思
观查不到效果!
assume cs:code,ds:data

data segment 
set        db 0,2,4,7,8,9        ;秒 分 时  日 月  年 
data ends

code  segment
start: 
        mov ax,data
        mov ds,ax
        
        mov bx,0b800h   ;屏幕输出
        mov es,bx                                    
        
        mov cx,6
        mov bx,160*12+40*2
        mov si,offset set
s:      mov al,[si]
        call time
        mov es:[bx],al
        mov byte ptr es:[bx+1],2 ;置颜色属性
        mov es:[bx+2],ah
        mov byte ptr es:[bx+3],2
        add bx,4
        inc si 
        loop s
        
        mov ax,4c00h
        int 21h
        
time:        ;参数 al
        ;返回 al ah
        push cx
        out 70h,al
        in al,71h
        mov ah,al
        mov cl,4
        shr ah,cl   ;把 高4位转到低4位
        and al,00001111b;把高4位转成0保留低4位
                                              
        add ah,30h   ;转为字符
        add al,30h
        
        pop cx
        ret

code ends 

end start
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-11-18 22:55

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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