鱼C论坛

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

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

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

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

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

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

本版积分规则

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

GMT+8, 2024-5-1 05:30

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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