鱼C论坛

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

[技术交流] 实验14 输出年月日时分秒

[复制链接]
发表于 2014-6-2 12:41:17 | 显示全部楼层 |阅读模式

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

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

x
assume cs:code,DS:data,SS:stack

stack segment
  DW 8 dup(0)
stack ends 

data segment
  DB 9,8,7,4,2,0    ;代表 年  月 日  时 分 秒
data ends 

code segment
start:
  MOV AX,stack
  MOV SS,AX 
  MOV sp,16
  
  MOV AX,data 
  MOV DS,AX 
  
  MOV AX,0b800h
  MOV ES,AX

  MOV DI,12*160
  MOV CX,3
  MOV SI,0

  ;输出年月日
  s:
  PUSH CX 
  MOV AL,[si]
  OUT 70h,AL 
  IN AL ,71h 

  MOV AH,AL 

  MOV CL,4
  SHR AH,CL
  AND AL,00001111b 

  ADD AH,30h
  ADD AL,30h 

  MOV ES:[di],AH 
  ADD DI,2
  

  
  MOV ES:[di],AL 
  ADD DI,2

  MOV BYTE ptr ES:[di],'/' 
  ADD DI,2

  INC SI 
  POP CX 
  LOOP s

   MOV BYTE ptr ES:[di-2],' ' 

  MOV CX,3

  ;输出时分秒
   s2:
  PUSH CX 
  MOV AL,[si]
  OUT 70h,AL 
  IN AL ,71h 

  MOV AH,AL 

  MOV CL,4
  SHR AH,CL
  AND AL,00001111b 

  ADD AH,30h
  ADD AL,30h 

  MOV ES:[di],AH 
  ADD DI,2
  

  
  MOV ES:[di],AL 
  ADD DI,2

  MOV BYTE ptr ES:[di],':' 
  ADD DI,2

  INC SI 
  POP CX 
  LOOP s2

  MOV BYTE ptr ES:[di-2],' ' 

  mov ax,4c00h
  int 21h

code ends
end start

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

使用道具 举报

发表于 2014-6-3 19:02:41 | 显示全部楼层
果断支持~         
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2014-6-7 12:07:12 | 显示全部楼层
写的很好支持一下
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
回复 支持 反对

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-12-30 04:04

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

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