设计数码管电子表

实验一设计数码管电子表一．实验要求：使用8253的两个计数器串连，作为微机系统的外扩定时源，以数码管电路作为外扩输出设备，采用中断方式编程，实现数码管电子表“具体要求如下：1．六位数码管分别显示时，分，秒。

2．初始时间由主机键盘输入。

3．主机按任意键停止计时返回DOS。

二：实验电路+5VQ2A0IORIOW8253CS 200H －207H(*注意：A1，A0用来选择8253内部三个计数器中的一个，它们分别与计算机地址线的低两位相连。

RD ，WR 用来控制8253的读写，它们分别与计算机的IOR ，IOW相连) 电路分析：从Q2出来的时钟频率为1MHZ ，为实现一秒钟调用一次中断，必须要每1000000次时钟调用一次中断。

我们同时将计数器0和计数器1的初值都设为1000，并将计数器0的输出OUT0作为计数器1的时钟，并将计数器1的输出OUT1连到B4端子上，这样就实现了每1000×1000＝1000000次时钟调用一次中断。

三．8253控制字格式D7 D6 D5 D4 D3 D2 D1 D0四．程序清单：TITLE DISPTIMEDSEG SEGMENTINPUT_TIM DB 'Please input the current t ime.',13,10,'$' SHOW_TIM DB 'Time is as the follow.Press Ctr-C to exit.',13,10,'$'BAD_DATA DB 'Digits mush be between 0 and 9',13,10,'$' BAD_HRS DB 'Hour must be between 0 and 23',13,10,'$' BAD_MINS DB 'Minutes mush be between 0 and 59',13,10,'$' BAD_SECS DB 'Seconds mush be between 0 and 59',13,10,'$' CRLF DB 13,10,'$'ASK_HRS DB 'Hour(0-23):$' ASK_MINS DB 'Minute(0-59):$'ASK_SECS DB 'Second(0-59):$'USER DB 3,3 DUP(?)TIME DB 3 DUP(?)COUNT DW 1OLD0A DD ?TABLE DB 3FH,06H,5BH,4FH,66H,6DH,7DH, 07H,7FH,6FH,77H,7CH,39H,5EH, 79H,71HDSEG ENDSSSEG SEGMENT STACK 'STACK' DB 256 DUP(?)SSEG ENDSCSEG SEGMENTASSUMECS:CSEG,SS:SSEG,DS:DSEG,ES:D SEGSTART PROC FARMOV AX,DSEGMOV DS,AXCALL GET_TIMECLICALL I8253 （初始化8253）CALL I8259 （初始化8259）CALL RD0A(读入原0A中断向量)CALL WR0A（写入新中断向量）ROTATE: CALL DISPLAY（只要不按键，就不断调用DISPLAY显示TIME变量中的时间）MOV AH,1INT 16H JZ ROTATE（按键输入后退出。

）CALL RESETMOV AH,4CHINT 21HRETSTART ENDP;*************************** *********（SERVICE为新的中断程序）SERVICE PROC NEARPUSH AXPUSH DSMOV AX,DSEGMOV DS,AXCALL CHANGE_TIME（函数CHANGE_TIME用以将时间增加一秒）MOV AL,20HOUT 20H,AL（送应答信号）POP DSIRETSERVICE ENDP；**************************** ********(此函数将保存在TIME变量中的时间显示在数码管上。

) DISPLAY PROC NEARPUSH AXPUSH BXPUSH CXPUSH DXPUSH SIMOV SI,OFFSET TIME MOV BX,OFFSET TABLE MOV CL,4MOV AL,[SI]MOV AH,ALSAR AL,CLAND AH,00001111BXLAT OUT DX,ALMOV DX,200HMOV AL,01HOUT DX,ALMOV AL,0OUT DX,ALMOV AL,AHXLATMOV DX,201HOUT DX,ALMOV DX,200HMOV AL,02HOUT DX,ALMOV AL,0OUT DX,ALMOV AL,[SI+1]MOV AH,ALSAR AL,CLAND AH,00001111B XLATOUT DX,ALMOV DX,200HMOV AL,04HOUT DX,ALMOV AL,0OUT DX,ALMOV AL,AHXLATMOV DX,201HOUT DX,ALMOV DX,200HMOV AL,08HOUT DX,ALMOV AL,0OUT DX,ALMOV AL,[SI+2]MOV AH,ALSAR AL,CLAND AH,00001111B XLAT OUT DX,AL MOV DX,200H MOV AL,10H OUT DX,AL MOV AL,0OUT DX,AL MOV AL,AH XLATMOV DX,201H OUT DX,AL MOV DX,200H MOV AL,20H OUT DX,AL MOV AL,0OUT DX,ALPOP SIPOP DXPOP CXPOP BXPOP AXRETDISPLAY ENDP;*************************** *********I8253 PROC NEARMOV AL,00110100B MOV DX,20BHOUT DX,AL（设定8253的计算器0，写入时先低字节后高字节，方式2，二进制计数）MOV AX,1000MOV DX,208HOUT DX,ALMOV AL,AHOUT DX,AL（计数器0的初值设为1000。

） MOV AL,01110100BMOV DX,20BHOUT DX,AL（设定8253的计算器1，入时先低字节后高字节，方式2，二进制计数）MOV AX,1000MOV DX,209HOUT DX,ALMOV AL,AHOUT DX,AL（计数器1初值设为1000。

）RETI8253 ENDP;*************************** *******I8259 PROC NEARIN AL,21HAND AL,11111011B OUT 21H,ALIN AL,0A1HAND AL,11111101B OUT 0A1H,ALRETI8259 ENDP;********************************RD0A PROC NEARMOV AX,350AHINT 21HMOV WORD PTR OLD0A,BXMOV WORD PTR OLD0A+2,ESRETRD0A ENDPWR0A PROC NEARPUSH DSMOV AX,CSEGMOV DS,AXMOV DX,OFFSET SERVICEMOV AX,250AHINT 21HPOP DSRETWR0A ENDP ；**************************** ****RESET PROC NEARMOV DX,WORD PTR OLD0AMOV DS,WORD PTR OLD0A+2MOV AX,250AHINT 21H （恢复原来的中断向量）IN AL,0A1HOR AL,00000010BOUT 0A1H,AL （屏蔽用户中断）RETRESET ENDP；**************************** *******（函数GET_TIME的作用是接受用户输入的时间，并把它保存在6字节变量TIME中。

为了保证程序的严谨，如果输入的时间非法，则显示出错信息并要求重输。

）GET_TIME PROC NEARLEA DX,INPUT_TIM MOV AH,9INT 21H （提示输入时间）HOUR: LEA DX,ASK_HRSMOV AH,9INT 21H （提示输入小时）CALL INPUT_TIME （函数INPUT_TIME的功能是把用户输入的字符转化为时间值并存放在BL中如果输入的不是数字，那么让标志寄存器CF＝1） JC HOUR （输入不是数字，重输）CMP BL,23HJNA HRS2 （如果输入的数字比24小，那么跳到HRS2去执行下面的内容；如果输入的数字大于等于24，那么要求重输。

对于分，秒的输入也按照此法处理。

）LEA DX,BAD_HRSMOV AH,9INT 21HJMP HOURHRS2: PUSH BXMIN: LEA DX,ASK_MINSMOV AH,9INT 21HCALL INPUT_TIMEJC MINCMP BL,59HJNA MIN2LEA DX,BAD_MINSMOV AH,9INT 21HJMP MINMIN2: PUSH BXSEC: LEA DX,ASK_SECSMOV AH,9INT 21HCALL INPUT_TIMEJC SECCMP BL,59HJNA SEC2LEA DX,BAD_SECSMOV AH,9INT 21HJMP SEC（以下程序段将输入的的时间保存在TIME变量中）SEC2: MOV SI,OFFSET TIME MOV [SI+2],BLPOP BXMOV [SI+1],BLPOP BXMOV [SI],BLRETGET_TIME ENDP;************************************（函数INPUT_TIME的功能是把用户输入的字符转化为时间值并存放在BL中；如果输入的不是数字，那么让标志寄存器CF＝1）INPUT_TIME PROC NEARLEA DX,USERMOV AH,0AHINT 21HLEA DX,CRLFMOV AH,9INT 21HCMP USER+1,1JAE CONVERTMOV BL,0RETCONVERT: MOV CL,4MOV AL,USER+2CALL CHECKJC LEAVEAND AL,0FHMOV BL,ALCMP USER+1,2JB CLR_CFSHL BL,CLMOV AL,USER+3CALL CHECKJC LEAVEAND AL,0FHOR BL,ALCLR_CF: CLCLEAVE: RETINPUT_TIME ENDP;*************************** ********CHECK PROC NEARCMP AL,'0'JB ERRORCMP AL,'9'JA ERRORCLCRETERROR: LEA DX,BAD_DATAMOV AH,9 INT 21HSTCRETCHECK ENDP;*************************** ********(此函数将保存在TIME变量中的时间增加一秒)CHANGE_TIME PROC NEARPUSH AXPUSH CXPUSH DXPUSH SIMOV SI,OFFSET TIME MOV AL,[SI]MOV CH,ALMOV AL,[SI+1]MOV CL,ALMOV AL,[SI+2]MOV DH,AL（CH：CL：DH＝时：分：秒） MOV AL,DHADD AL,1DAAMOV DH,ALCMP DH,60H JNE EXITCHG MOV DH,0MOV AL,CLADD AL,1DAAMOV CL,ALCMP CL,60H JNE EXITCHG MOV CL,0MOV AL,CHADD AL,1DAA MOV CH,ALCMP CH,24HJNE EXITCHGMOV CH,0 EXITCHG: MOV SI,OFFSET TIME MOV [SI],CHMOV [SI+1],CLMOV [SI+2],DHPOP SIPOP DXPOP CXPOP AXRETCHANGE_TIME ENDPCSEG ENDSEND START五.实验总结:1.由于与本实验相关的程序上学期编过（在屏幕上显示时间），所以这次实验我的程序中的主要部分是用的以前的，添加了将时间显示在数码管上的程序。