hackiy 发表于 2012-6-17 04:23:48

实验14解决方案之一,支持按Q键退出,时间会实时更新!

本帖最后由 hackiy 于 2012-6-17 05:47 编辑

;写完最后一个代码的时候,我又想到了第二种方式实验14解决方案之二
;编译后按Q键可退出,时间会实时更新!
;另外请高手指点可以优化之处,本人为新学者。
assume cs:code

data segment
      db '20yy/mm/dd hh:mm:ss','$';用于存放时间的ascii码
data ends

code segment
start:      mov ax,data
                mov ds,ax
                mov bx,2
               
;获取日期
                mov al,9
                mov cx,3
rdate:         call a2a
                add bx,3
                dec al                ;年:9,月:8,日:7
loop rdate

;获取时间
                mov al,4
                mov cx,3
rtime:      call a2a
                add bx,3
                sub al,2      ;时:4,分:2,秒:0
loop rtime

;显示时间
                mov ah,2      ;置光标
                mov bh,0      ;第0页
                mov dh,12      ;dh中存放行号
                mov dl,30      ;dl中存放列好
                int 10h

                mov dx,0      ;ds:dx指向字符串首地址data:0
                mov ah,9      ;在光标处显示字符串
                int 21h

;程序退出
      in al,60h      ;读取按键到al
                cmp al,10h      ;比较是否为Q键
                je over                ;是就结束
                jmp start      ;否则循环

over:   mov ax,4c00h
                int 21h
               
               
;说明:将MOS RAM里偏移地址为al的数据转换成ascii码存放到ds:bx里
;参数:al=COMS RAM的偏移地址
a2a:      push ax
                push cx
               
                out 70h,al
      in al,71h                        ;从CMOS RAM中读取指定地址的数据

      mov ah,al
      mov cl,4
      shr ah,cl
      and al,00001111b      ;ah为十位,al为个位

      add ah,30h
      add al,30h                        ;将数据转换为ascii码

                mov ,ah                ;将ascii码保存到ds:dx里
                mov ,al
               
      pop cx
      pop ax
      ret

code ends
end start
页: [1]
查看完整版本: 实验14解决方案之一,支持按Q键退出,时间会实时更新!