鱼C论坛

 找回密码
 立即注册
查看: 2448|回复: 1

[技术交流] 单循环完成实验9

[复制链接]
发表于 2012-1-6 16:03:45 | 显示全部楼层 |阅读模式

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

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

x
assume  cs:dm,ds:sj
sj  segment
    db 'welcome to masm!'
sj  ends
dm  segment
ks: mov ax,sj
    mov ds,ax               ;定义数据段
    mov ax,0b800h
    mov es,ax
        
    mov di,64               ;第32列起始偏移
    mov si,0                ;DS段起始偏移
    mov cx,16               ;循环次数
s:  mov bx,780h             ;第12行起始偏移
    mov al,[si]             ;读入字符
    mov ah,02h              ;写入字符属性 02h=黑底绿字
    mov es:[bx+di],ax       ;写入字符
    add bx,160              ;换到第13行
    mov ah,24h              ;写入字符属性 24h=绿底红字
    mov es:[bx+di],ax       ;写入字符
    add bx,160              ;换到第14行
    mov ah,71H              ;写入字符属性 71h=白底蓝字
    mov es:[bx+di],ax       ;写入字符
    add si,1                ;读入下一个数据
    add di,2                ;写入下一个数据
    loop s
    
    mov ax,4c00h            
    int 21h                 ;中断返回
dm  ends
end ks 
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2012-1-7 23:14:27 | 显示全部楼层
值得学习了,谢谢楼主分享
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-11-19 16:48

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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