鱼C论坛

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

[技术交流] 完成了实验14,给大家看看

[复制链接]
发表于 2015-2-14 20:44:00 | 显示全部楼层 |阅读模式

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

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

x
未命名.JPG 效果图
其实很简单,只要把之前显示月份的问题多复制即便,就做出来了,肯定还有更简单的方法

游客,如果您要查看本帖隐藏内容请回复


  1. assume cs:code
  2. code segment
  3. start:       
  4.         mov bx,0b800h
  5.         mov es,bx
  6.         mov si,0     ;SI用于递增
  7.         call nian       ;年
  8.         call xiegang        ;/
  9.         call yue        ;月
  10.         call xiegang        ;/
  11.         call ri            ;日
  12.         add si,2     ;空格
  13.         call shi       ;时
  14.         call fenhao
  15.         call fen
  16.         call fenhao
  17.         call miao
  18.         mov ax,4c00h
  19.         int 21h
  20.        

  21. nian:        mov al,9
  22.         out 70h,al
  23.        
  24.         in al,71h
  25.         mov ah,al
  26.         mov cl,4
  27.         shr ah,cl
  28.         and al,00001111b
  29.        
  30.         add ah,30h
  31.         add al,30h
  32.        
  33.         mov byte ptr es:[160*12+40*2][si],ah
  34.         add si,2
  35.         mov byte ptr es:[160*12+40*2][si],al
  36.         add si,2       
  37.         ret
  38.        
  39. yue:        mov al,8
  40.         out 70h,al
  41.        
  42.         in al,71h
  43.         mov ah,al
  44.         mov cl,4
  45.         shr ah,cl
  46.         and al,00001111b
  47.        
  48.         add ah,30h
  49.         add al,30h
  50.        
  51.         mov byte ptr es:[160*12+40*2][si],ah
  52.         add si,2
  53.         mov byte ptr es:[160*12+40*2][si],al
  54.         add si,2
  55.         ret

  56. xiegang:mov al,2fh        ; /ASCII为2f
  57.         mov byte ptr es:[160*12+40*2][si],al
  58.         add si,2
  59.         ret
  60.        
  61. ri:        mov al,7
  62.         out 70h,al
  63.        
  64.         in al,71h
  65.         mov ah,al
  66.         mov cl,4
  67.         shr ah,cl
  68.         and al,00001111b
  69.        
  70.         add ah,30h
  71.         add al,30h
  72.        
  73.         mov byte ptr es:[160*12+40*2][si],ah
  74.         add si,2
  75.         mov byte ptr es:[160*12+40*2][si],al
  76.         add si,2
  77.         ret
  78.        
  79. shi:        mov al,4
  80.         out 70h,al
  81.        
  82.         in al,71h
  83.         mov ah,al
  84.         mov cl,4
  85.         shr ah,cl
  86.         and al,00001111b
  87.        
  88.         add ah,30h
  89.         add al,30h
  90.        
  91.         mov byte ptr es:[160*12+40*2][si],ah
  92.         add si,2
  93.         mov byte ptr es:[160*12+40*2][si],al
  94.         add si,2
  95.         ret
  96.        
  97. fenhao:        mov al,3Ah        ; :ASCII为3A
  98.         mov byte ptr es:[160*12+40*2][si],al
  99.         add si,2
  100.         ret

  101. fen:        mov al,2
  102.         out 70h,al
  103.        
  104.         in al,71h
  105.         mov ah,al
  106.         mov cl,4
  107.         shr ah,cl
  108.         and al,00001111b
  109.        
  110.         add ah,30h
  111.         add al,30h
  112.        

  113.         mov byte ptr es:[160*12+40*2][si],ah
  114.         add si,2
  115.         mov byte ptr es:[160*12+40*2][si],al
  116.         add si,2
  117.         ret       
  118.        
  119. miao:        mov al,0
  120.         out 70h,al
  121.        
  122.         in al,71h
  123.         mov ah,al
  124.         mov cl,4
  125.         shr ah,cl
  126.         and al,00001111b
  127.        
  128.         add ah,30h
  129.         add al,30h
  130.        
  131.         mov byte ptr es:[160*12+40*2][si],ah
  132.         add si,2
  133.         mov byte ptr es:[160*12+40*2][si],al
  134.         add si,2
  135.         ret
  136. code ends
  137. end start
复制代码



小甲鱼最新课程 -> https://ilovefishc.com
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2025-7-1 13:59

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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