汇编语言 -- 计时器/倒计时

本文介绍了如何使用汇编语言设计计时器和倒计时功能。内容包括课程设计的附加题背景,计时器的实现思路,以及如何修改为倒计时。作者分享了在网上寻找资源的困难,并提供了成功实现的代码片段,同时讨论了.asm代码的发布格式问题。
摘要由CSDN通过智能技术生成

前言

  • 时间:12.1
  • 内容:汇编语言课程设计附加题
  • 备注:
    • 计时器是某位大佬的(或者书上),但是我真的找不到这位大佬(或者书),如有见到比较像的请帮我蟹蟹他!!
    • 正所谓病急乱投医,这看起来人畜无害的附加题完全没有她看起来这么平平无奇好不好!!网上现有的资源为什么都答非所问,或者只是本兜兜最近菜吃多了变得更菜了,只能嫖无数资源一个个试。试成功了下方这个计时器,倒计时仅更改了计算时间部分,不用整串操作太香了!!
    • 话说.asm格式应该用什么代码块发布呢?没有高亮的代码能逼死小白菜…

题目

  • 设计一款倒计时,倒计时时间由用户设定(如30分钟)。
    时间到有提示(如时间背景、前景色变化或文本提示等)。
  • 打脸来的太快,发现这次课设很多都没有读题按要求来,凑合吧就…

流程图

在这里插入图片描述

计时器

DATAS SEGMENT
    SINPUT DB 'Please enter hours, minutes, and seconds with spaces: $' 
    SOUTPUT DB 'Any key to again and ESC to return. Now time is : $' 
    BUF1 DB 20H
    	 DB  0
    	 DB 20H DUP(0)
    TIMEHOUR DW 23
    TIMEMINUTE DW 56
    TIMESECOND DW 45
    NUM DW ?
DATAS ENDS

STACKS SEGMENT PARA STACK
   DW 30H DUP(0)
STACKS ENDS

CODES SEGMENT

    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
    MOV AX,DATAS
    MOV DS,AX
	
	MOV AL,11111101B;关定时器中断
	OUT 21H,AL;中断屏蔽寄存器数据传回去
	
	PUSH DS;保存数据段地址
	MOV AX,SEG INT08H;SEG取得标号的段地址
	MOV DS,AX;获得08H号中断的段地址,放在中断向量中
	MOV DX, OFFSET INT08H;获得08H号中断的偏移地址,放在中断向量中
	MOV AL,08H;设置中断号
	MOV AH,25h;设置中断向量
	int 21h;调用系统dos中断
	POP DS;恢复数据段地址
	
	MOV AL,00110110B;设置通道0的方式3
	OUT 43H,AL;输出控制字,43H是8253定时器芯片的控制寄存器地址
	MOV AX,11932;定时器的时钟频率为1.1931817MHz,计数初值=1193182/10010ms中断一次
	OUT 40H,AL;40H为计数器地址
	MOV AL,AH;先输出低位,再输出高位
	OUT 40H,AL;40H为计数器地址
TIMING:
	;换行
	MOV DL,0DH;CR
 	MOV AH,2;显示一个字符
 	INT 21H;调用系统dos中断
 	MOV DL,0AH;LF
 	MOV AH,2;显示一个字符
 	INT 21H;调用系统dos中断
 	
    MOV AH,09H;显示字符串
    LEA DX,SINPUT;取段内偏移地址
    INT 21H;调用系统dos中断
   
    MOV AH,0AH;键盘输入到缓冲区
    LEA DX,BUF1;取段内偏移地址
    INT 21H;调用系统dos中断
    CALL INPUTTIME;调用子程序处理字符串
    
    MOV AH,09H;显示字符串
    LEA DX,SOUTPUT;取段内偏移地址
    INT 21H;调用系统dos中断
    
    MOV DX,100;初始化为0
    MOV AL,11111100B;开键盘和定时器中断
	OUT 21H,AL;中断屏蔽寄存器数据传回去

RE:    
    MOV AH,08H;无回显键盘输入到AL
    INT 21H;调用系统dos中断
    ;MOV AH,0;
    ;MOV NUM,AX;
    
    ;MOV AH,03H;获取光标位置信息
	;INT 10H;BIOS中断
	;ADD DL,10;
	;MOV BH,0;显示到第一页
	;MOV AH,02H;设置光标位置
	;INT 10H;BIOS中断
    ;CALL SHOWNUM
    CMP AL,27;按键是否ESC
    JE DO_ESC;是退出 
    CMP AL,252;按键是否是奇怪的那个字符
    JE RE;是奇怪的,循环
    
    ;MOV AH,0BH;检测键盘状态,有输入AL=00,无输入AL=FF
    ;INT 21H;调用系统dos中断
    ;CMP AL,0FFH;判断按键无输入
    ;JE RE;确实无输入,重复
 
    MOV AL,11111101B;关定时器中断
	OUT 21H,AL;中断屏蔽寄存器数据传回去
    JMP TIMING;不是就重新对时
DO_ESC:
	MOV AL,11111101B;关定时器中断
	OUT 21H,AL;中断屏蔽寄存器数据传回去
    ;退出代码
    MOV AH,4CH
    INT 21H
    
;这是一段子程序,用来输入数字
INPUTTIME PROC 
	;初始化
	MOV DX,0
	MOV BX,10
	MOV SI,
;name: ELECTRONIC CLOCK data segment mess1 db 'Press C or c to correct the time',0ah,0dh db 'Press R or r to SET the RING time',0ah,0dh db 'Press ESC button to exit',0ah,0dh,'$' tn db 'Please input the new time (hh:mm:ss):',0dh,0ah,'$' tM db 'Please input the RING time (hh:mm:SS):',0dh,0ah,'$' mess2 db 'Time is:',0ah,0dh,'$' t_buff db 40 ;在数据段开一段时间显示缓冲区 db ? db 40 dup (?) HOR1 DB 'S' MIN1 DB 'S' SEC1 DB 'S' hor db ? min db ? sec db ? fg db 0 data ends stack segment db 100 dup(?) stack ends code segment assume cs:code,ss:stack,ds:data ;确定各个逻辑段的类型 start: call clear ;调用清屏子程序 display: ;时间显示部分 mov ax,data mov ds,ax mov bx,offset t_buff ;送t_buff的偏移地址到BX mov ah,2ch ;调用DOS时间调用功能,功能号:2cH,小时,分钟,秒数分别保存在CH,CL,DH中 int 21h mov al,ch ;小时数设定 mov ah,0 call bctd ;调用进制转换子程序 CALL ASC ;---------------------------------------------------------- mov al,':' ;显示分隔符号 mov [bx],al inc bx ;------------------------------------------------------- mov ah,2ch int 21h mov al,cl ;分钟数设定 mov ah,0 call bctd CALL ASC ;------------------------------------------------------------------------- mov al,':' ;显示分隔符号 mov [bx],al inc bx ;------------------------------------------------------------------------- mov ah,2ch ;秒设定 int 21h mov al,dh mov ah,0 call bctd CALL ASC ;---------------------------------------------------------------------- mov al,'$' ;将字符串的结束位送至显示缓冲区的最后一位 mov [bx],al ;------------------------------------------------------------------------------ push bx ;置光标位置 ,AH=2,BH=0,DH跟DL分别为行号与列号,并入栈保护BX mov ah,2 mov bh,0 mov dh,3 mov dl,8 int 10h pop bx lea dx,t_buff ;送t_buff偏移地址到DX,并调用DOS显示功能,功能号为9 mov ah,9 int 21h push bx ;置光标位置 mov ah,2 mov bh,0 mov dh,0 mov dl,0 int 10h pop bx lea dx,mess1 mov ah,9 int 21h push bx ;置光标位置 mov ah,2 mov bh,0 mov dh,3 mov dl,0 int 10h pop bx lea dx,mess2 mov ah,9 int 21h ;------------------------------------------------- mov ah,2ch ;调用DOS时间调用功能,功能号:2cH,小时,分钟,秒数分别保存在CH,CL,DH中 int 21h CMP CH,HOR1 JNZ nxt ;判断闹钟是否到时,如果到时调用07H输出响声 CMP CL,MIN1 JNZ nxt CMP DH,SEC1 JNZ nxt MOV DL,07H MOV AH,02H INT 21H ;----------------------------- nxt: call delay1 mov ah,1 ;调用键盘I/O中断功能号1,获取键值到AL int 16h cmp al,'c' ;是c键,转到时间修改程序 je Cor cmp al,'C' ;是C键,转到时间修改程序 je Cor CMP AL,'R' JE RING CMP AL,'r' JE RING cmp al,1bh jz quit ;是ESC键,退出程序 JMP DISPLAY quit:mov ah,4ch ;程序终止功能号 int 21h ret RING: call INPUT2 JMP START Cor: call correct ;调用时间修改子程序 ;------------------------------- bctd proc near ;二进制转BCD码子程序 ;AX输入参数 ;AX输出参数,存放调整过的BCD码 mov dx,ax mov ax,0 mov cx,16 ;设循环次数 bctd1: clc ;清进位标志C rcl dx,1 ;通过进位的循环右移 adc al,al ;带进位加法 daa ;加法的十进制调整 xchg al,ah ;交换高、低八位 adc al,al daa xchg al,ah loop bctd1 ;循环次数保存在CX里 ret bctd endp ;------------------------------------------- clear proc near push ax ;入栈保护现场 push bx push cx push dx mov ax,0600h ;ah=06(滚动)al=00(全屏空白) mov bh,0fh ;设置背景颜色(2)和前景颜色(e) sub cx,cx mov dx,5f5fh int 10h pop dx ;出栈恢复现场 pop cx pop bx pop ax ret clear endp ;----------------------------------------- delay1 PROC ;精确延迟时间子程序 MOV DX,04ffh ;循环次数 up: XOR CX,CX a: NOP LOOP a DEC DX JNZ up RET delay1 ENDP ;---------------------------- correct proc ;时间修改子程序 call input ;调用键盘输入子程序输入数据 mov ch,hor mov cl,min mov dh,sec and dl,0h mov ah,2dh int 21h jmp start ret correct endp ;---------------------------------- input2 proc ;闹钟设置子程序 push ax ;入栈保护数据 push bx push cx push dx pushf mov dx,offset tm ;显示设置闹钟的格式提示 mov ah,09h int 21h mov dx,offset t_buff ;数据缓冲区的数据输入 mov ah,0ah int 21h and dx,0h lea bx,t_buff inc bx inc bx mov dh,[bx] sub dh,30h inc bx mov dl,[bx] sub dl,30h mov cl,10 mov al,dh mul cl add al,dl mov ch,al mov hor1,al inc bx inc bx mov dh,[bx] sub dh,30h inc bx mov dl,[bx] sub dl,30h mov cl,10 mov al,dh mul cl add al,dl mov cl,al mov min1,al inc bx inc bx mov dh,[bx] sub dh,30h inc bx mov dl,[bx] sub dl,30h mov cl,10 mov al,dh mul cl add al,dl mov dh,al mov sec1,al popf ;出栈恢复数据 pop dx pop cx pop bx pop ax ret input2 endp ;---------------------------------- input proc ;键盘输入子程序 push ax ;入栈保护数据 push bx push cx push dx pushf mov dx,offset tn ;显示修改时间的格式提示 mov ah,09h int 21h mov dx,offset t_buff ;数据缓冲区的数据输入 mov ah,0ah int 21h and dx,0h lea bx,t_buff inc bx inc bx mov dh,[bx] sub dh,30h inc bx mov dl,[bx] sub dl,30h mov cl,10 mov al,dh mul cl add al,dl mov ch,al mov hor,al inc bx inc bx mov dh,[bx] sub dh,30h inc bx mov dl,[bx] sub dl,30h mov cl,10 mov al,dh mul cl add al,dl mov cl,al mov min,al inc bx inc bx mov dh,[bx] sub dh,30h inc bx mov dl,[bx] sub dl,30h mov cl,10 mov al,dh mul cl add al,dl mov dh,al mov sec,al popf ;出栈恢复数据 pop dx pop cx pop bx pop ax ret input endp ;---------------------------- ASC PROC PUSH AX AND AL,0F0H ;选取AL高四位 MOV CL,4 ;设置右循环的次数 ROL AL,CL ;右循环 OR AL,30H ;加30H得到ACSII码 MOV [BX],AL ;将得到的结果送到T_BUFF缓冲区 INC BX ;BX自加1,指针指向下一个缓冲区的下一个地址 POP AX AND AL,0FH ;选取低四位 OR AL,30H MOV [BX],AL ;将转换后的低四位值送入缓冲区的第二个地址 INC BX RET ASC ENDP ;---------------------------------- code ends end start
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值