计数应用实验

编写程序，将 8254 的计数器 0 设置为方式 3，计数值为十进制数 4，用单次

脉冲 KK1＋作为 CLK0 时钟，OUT0 连接 INTR，每当 KK1＋按动 5 次后产生中

断请求，在屏幕上显示字符“5”。实验步骤如下：

 

（1） 实验接线图如图 3-3-3 所示，按图连接实验线路图。

（2） 根据实验内容，编写实验程序，编译、链接。

（3） 运行程序，按动 KK1＋产生单次脉冲，观察实验现象。

（4） 改变计数值，验证 8254 的计数功能

INTR_IVADD     EQU   003CH        ;INTR对应的中断矢量地址

 

IOY0           EQU   0A000H        ;片选IOY0对应的端口始地址

MY8254_COUNT0  EQU   IOY0+00H*2   ;8254计数器0端口地址

MY8254_COUNT1  EQU   IOY0+01H*2   ;8254计数器1端口地址

MY8254_COUNT2  EQU   IOY0+02H*2   ;8254计数器2端口地址

MY8254_MODE    EQU   IOY0+03H*2   ;8254控制寄存器端口地址

                              

STACK1 SEGMENT STACK

        DW 256 DUP(?)

STACK1 ENDS

 

DATA SEGMENT

CS_BAK   DW  ?                    ;保存INTR原中断处理程序入口段地址的变量

IP_BAK   DW  ?                    ;保存INTR原中断处理程序入口偏移地址的变量

IM_BAK   DB  ?                    ;保存INTR原中断屏蔽字的变量

STR1     DB  'COUNT: $'           ;显示的字符串

DATA ENDS

 

CODE SEGMENT

        ASSUME CS:CODE,DS:DATA

 

START: MOV AX,DATA

       MOV DS,AX

       CLI

 

       MOV AX,0000H               ;替换INTR的中断矢量

       MOV ES,AX

       MOV DI,INTR_IVADD          

       MOV AX,ES:[DI]

       MOV IP_BAK,AX              ;保存INTR原中断处理程序入口偏移地址

       MOV AX,OFFSET MYISR

       MOV ES:[DI],AX             ;设置当前中断处理程序入口偏移地址

 

       ADD DI,2

       MOV AX,ES:[DI]

       MOV CS_BAK,AX              ;保存INTR原中断处理程序入口段地址

       MOV AX,SEG MYISR

       MOV ES:[DI],AX             ;设置当前中断处理程序入口段地址

 

       IN  AL,21H

       MOV IM_BAK,AL              ;保存INTR原中断屏蔽字

       AND AL,7FH

       OUT 21H,AL

 

       STI

       MOV DX,OFFSET STR1         ;显示字符串

       MOV AH,9

       INT 21H

 

       MOV DX,MY8254_MODE         ;初始化8254工作方式

       MOV AL,10H                 ;计数器0，方式0  

       OUT DX,AL             

 

       MOV DX,MY8254_COUNT0       ;装入计数初值

       MOV AL,4

       OUT DX,AL

 

WAIT1: MOV AH,1                   ;判断是否有按键按下

       INT 16H

       JZ  WAIT1                  ;无按键则跳回继续等待，有则退出

 

QUIT:  CLI

 

       MOV AX,0000H               ;恢复INTR原中断矢量

       MOV ES,AX

       MOV DI,INTR_IVADD  

       MOV AX,IP_BAK              ;恢复INTR原中断处理程序入口偏移地址

       MOV ES:[DI],AX

       ADD DI,2

       MOV AX,CS_BAK              ;恢复INTR原中断处理程序入口段地址

       MOV ES:[DI],AX

 

       MOV AL,IM_BAK              ;恢复INTR原中断屏蔽寄存器的屏蔽字

       OUT 21H,AL

       STI

 

       MOV AX,4C00H               ;返回到DOS

       INT 21H

 

MYISR PROC NEAR                   ;中断处理程序MYISR

       PUSH AX

       MOV AL,35H

       MOV AH,0EH

       INT 10H

       MOV AL,20H

       INT 10H

 

       MOV DX,MY8254_COUNT0       ;重装计数初值

       MOV AL,4

       OUT DX,AL

 

OVER:  MOV AL,20H                 ;向PC机内部8259发送中断结束命令

       OUT 20H,AL

       POP AX

       IRET

       

MYISR ENDP

       

CODE ENDS

     END START