⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 计时时钟.asm

📁 计时时钟的汇编源码基于32位系统的实验机设备
💻 ASM
字号:
;T8254-2.asm
;8254定时应用实验

;***************根据CHECK配置信息修改下列符号值*******************
INTR_IVADD     EQU   01CCH        ;INTR对应的中断矢量地址
INTR_OCW1      EQU   0A1H         ;INTR对应PC机内部8259的OCW1地址
INTR_OCW2      EQU   0A0H         ;INTR对应PC机内部8259的OCW2地址
INTR_IM        EQU   0F7H         ;INTR对应的中断屏蔽字
PCI_INTCSR     EQU   9438H        ;PCI卡中断控制寄存器地址
IOY0           EQU   9C00H
IOY1           EQU   0c000H           ;片选IOY1对应的端口始地址
;*****************************************************************
MY8254_COUNT0  EQU   IOY0+00H*4   ;8254计数器0端口地址
MY8254_COUNT1  EQU   IOY0+01H*4   ;8254计数器1端口地址
MY8254_COUNT2  EQU   IOY0+02H*4   ;8254计数器2端口地址
MY8254_MODE    EQU   IOY0+03H*4   ;8254控制寄存器端口地址



;*****************************************************************
MY8255_A       EQU   IOY1+00H*4      ;8255的A口地址
MY8255_B       EQU   IOY1+01H*4      ;8255的B口地址
MY8255_C       EQU   IOY1+02H*4      ;8255的C口地址
MY8255_MODE    EQU   IOY1+03H*4      ;8255的控制寄存器地址
                              
STACK1 SEGMENT STACK
        DW 256 DUP(?)
STACK1 ENDS

DATA SEGMENT 
CS_BAK   DW  ?                    ;保存INTR原中断处理程序入口段地址的变量
IP_BAK   DW  ?                    ;保存INTR原中断处理程序入口偏移地址的变量
IM_BAK   DB  ?                    ;保存INTR原中断屏蔽字的变量
SEC      DW  0                    ;秒计时变量
MIN      DW  0                    ;分计时变量
SECG     DW  ?                    ;保存的秒个位数
SECS     DW  ?                    ;保存的秒十位数
MING     DW  ?                    ;保存的分个位数
MINS     DW  ?                    ;保存的分十位数
TIME1    DB  3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,67H  ;没有点的十个数的七段显示
TIME2    DB  BFH,86H,DBH,CFH,E6H,EDH,FDH,87H,FFH,E7H  ;有点的十个数的七段显示
COUNT    DB  0
DATA ENDS

CODE SEGMENT
        ASSUME CS:CODE,DS:DATA

START: MOV AX,DATA
       MOV DS,AX
       CLI

       MOV DX,PCI_INTCSR
       SUB DX,19H
       IN  AL,DX 
       MOV DX,PCI_INTCSR          ;初始化PCI卡中断控制寄存器
       MOV AX,1F00H               ;向PCI_INTCSR中写入003F1F00H
       OUT DX,AX
       ADD DX,2
       MOV AX,003FH
       OUT DX,AX

       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             ;设置当前中断处理程序入口段地址

       MOV DX,INTR_OCW1           ;设置中断屏蔽寄存器,打开INTR的屏蔽位
       IN  AL,DX
       MOV IM_BAK,AL              ;保存INTR原中断屏蔽字
       AND AL,INTR_IM
       OUT DX,AL

       STI

       MOV SEC,0
       MOV AX,SEC
       CALL DECSHOW
       MOV AX,0E0DH               ;回车,置光标到行首
       INT 10H     

       MOV DX,MY8254_MODE         ;初始化8254工作方式
       MOV AL,34H                 ;计数器0,方式2
       OUT DX,AL
                
       MOV DX,MY8254_COUNT0       ;装入计数初值
       MOV AL,0A2H
       OUT DX,AL
       MOV AL,87H
       OUT DX,AL

WAIT1: MOV AH,1                   ;判断是否有按键按下
       INT 16H
       JZ  WAIT1                  ;无按键则跳回继续等待,有则退出

QUIT:  CLI
       MOV DX,PCI_INTCSR          ;恢复PCI卡中断控制寄存器
       MOV AX,0000H
       OUT DX,AX

       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 DX,INTR_OCW1           ;恢复INTR原中断屏蔽寄存器的屏蔽字
       MOV AL,IM_BAK
       OUT DX,AL
       STI

       MOV AX,4C00H               ;返回到DOS
       INT 21H

MYISR PROC NEAR                   ;中断处理程序MYISR
       MOV AX,DATA
       MOV DS,AX

       INC COUNT
       CMP COUNT,30
       JNZ OVER

       MOV COUNT,0
       INC SEC
       CMP SEC,60                 ;计时值自增,到60即归0 
       JNE DIS
       MOV SEC,0
       INC MIN
       .IF(MIN==60)                
       MOV MIN,O

DIS:   MOV AX,SEC                 ;完成秒计时值的显示
       CALL DECSHOW
       ;MOV AX,0E0DH               回车,置光标到行首
       ;INT 10H

OVER:  MOV DX,PCI_INTCSR
       SUB DX,19H
       IN  AL,DX 
       MOV DX,PCI_INTCSR          ;清PCI卡中断控制寄存器标志位
       ADD DX,2
       MOV AX,003FH
       OUT DX,AX

       MOV DX,INTR_OCW2           ;向PC机内部8259发送中断结束命令
       MOV AL,20H
       OUT DX,AL
       MOV AL,20H
       OUT 20H,AL
       IRET
MYISR ENDP
       
DECSHOW PROC NEAR
       MOV DX,0                   ;完成秒计时值的显示
       MOV BX,10
       DIV BX
       MOV SEGG,DX
       MOV SEGS,AX
       MOV AX,MIN
       MOV DX,O
       DIV BX
       MOV  MING,DX
       MOV  MINS,AX
       MOV  AL,80H
       MOV  DX,MY8255_MODE
       OUT  DX,AL
       
        MOV  SI,OFFSET TIME1
        MOV AL,[SI+MINS]     
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,07H
        OUT DX,AL
        CALL DALLY
        INC SI

        MOV  SI,OFFSET TIME2
        MOV AL,[SI+MING]
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,0BH
        OUT DX,AL
        CALL DALLY
        INC SI

        MOV  SI,OFFSET TIME1
        MOV AL,[SI+SECS]
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,0CH
        OUT DX,AL
        CALL DALLY
        INC SI

        MOV  SI,OFFSET TIME1
        MOV AL,[SI+SECG]
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,0DH
        OUT DX,AL
        CALL DALLY
        MOV  SI,
        RET
        DECSHOW ENDP

DALLY 	PROC NEAR                    ;软件延时子程序
        PUSH CX
        MOV CX,00FFH
D1:     MOV AX,00FFH
D2:     DEC AX
		JNZ D2
		LOOP D1
		POP CX
		RET
DALLY 	ENDP
        CODE ENDS
        END START
;T8254-2.asm
;8254定时应用实验

;***************根据CHECK配置信息修改下列符号值*******************
INTR_IVADD     EQU   01CCH        ;INTR对应的中断矢量地址
INTR_OCW1      EQU   0A1H         ;INTR对应PC机内部8259的OCW1地址
INTR_OCW2      EQU   0A0H         ;INTR对应PC机内部8259的OCW2地址
INTR_IM        EQU   0F7H         ;INTR对应的中断屏蔽字
PCI_INTCSR     EQU   9438H        ;PCI卡中断控制寄存器地址
IOY0           EQU   9C00H
IOY1           EQU   0c000H           ;片选IOY1对应的端口始地址
;*****************************************************************
MY8254_COUNT0  EQU   IOY0+00H*4   ;8254计数器0端口地址
MY8254_COUNT1  EQU   IOY0+01H*4   ;8254计数器1端口地址
MY8254_COUNT2  EQU   IOY0+02H*4   ;8254计数器2端口地址
MY8254_MODE    EQU   IOY0+03H*4   ;8254控制寄存器端口地址



;*****************************************************************
MY8255_A       EQU   IOY1+00H*4      ;8255的A口地址
MY8255_B       EQU   IOY1+01H*4      ;8255的B口地址
MY8255_C       EQU   IOY1+02H*4      ;8255的C口地址
MY8255_MODE    EQU   IOY1+03H*4      ;8255的控制寄存器地址
                              
STACK1 SEGMENT STACK
        DW 256 DUP(?)
STACK1 ENDS

DATA SEGMENT 
CS_BAK   DW  ?                    ;保存INTR原中断处理程序入口段地址的变量
IP_BAK   DW  ?                    ;保存INTR原中断处理程序入口偏移地址的变量
IM_BAK   DB  ?                    ;保存INTR原中断屏蔽字的变量
SEC      DW  0                    ;秒计时变量
MIN      DW  0                    ;分计时变量
SECG     DW  ?                    ;保存的秒个位数
SECS     DW  ?                    ;保存的秒十位数
MING     DW  ?                    ;保存的分个位数
MINS     DW  ?                    ;保存的分十位数
TIME1    DB  3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,67H  ;没有点的十个数的七段显示
TIME2    DB  BFH,86H,DBH,CFH,E6H,EDH,FDH,87H,FFH,E7H  ;有点的十个数的七段显示
COUNT    DB  0
DATA ENDS

CODE SEGMENT
        ASSUME CS:CODE,DS:DATA

START: MOV AX,DATA
       MOV DS,AX
       CLI

       MOV DX,PCI_INTCSR
       SUB DX,19H
       IN  AL,DX 
       MOV DX,PCI_INTCSR          ;初始化PCI卡中断控制寄存器
       MOV AX,1F00H               ;向PCI_INTCSR中写入003F1F00H
       OUT DX,AX
       ADD DX,2
       MOV AX,003FH
       OUT DX,AX

       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             ;设置当前中断处理程序入口段地址

       MOV DX,INTR_OCW1           ;设置中断屏蔽寄存器,打开INTR的屏蔽位
       IN  AL,DX
       MOV IM_BAK,AL              ;保存INTR原中断屏蔽字
       AND AL,INTR_IM
       OUT DX,AL

       STI

       MOV SEC,0
       MOV AX,SEC
       CALL DECSHOW
       MOV AX,0E0DH               ;回车,置光标到行首
       INT 10H     

       MOV DX,MY8254_MODE         ;初始化8254工作方式
       MOV AL,34H                 ;计数器0,方式2
       OUT DX,AL
                
       MOV DX,MY8254_COUNT0       ;装入计数初值
       MOV AL,0A2H
       OUT DX,AL
       MOV AL,87H
       OUT DX,AL

WAIT1: MOV AH,1                   ;判断是否有按键按下
       INT 16H
       JZ  WAIT1                  ;无按键则跳回继续等待,有则退出

QUIT:  CLI
       MOV DX,PCI_INTCSR          ;恢复PCI卡中断控制寄存器
       MOV AX,0000H
       OUT DX,AX

       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 DX,INTR_OCW1           ;恢复INTR原中断屏蔽寄存器的屏蔽字
       MOV AL,IM_BAK
       OUT DX,AL
       STI

       MOV AX,4C00H               ;返回到DOS
       INT 21H

MYISR PROC NEAR                   ;中断处理程序MYISR
       MOV AX,DATA
       MOV DS,AX

       INC COUNT
       CMP COUNT,30
       JNZ OVER

       MOV COUNT,0
       INC SEC
       CMP SEC,60                 ;计时值自增,到60即归0 
       JNE DIS
       MOV SEC,0
       INC MIN
       .IF(MIN==60)                
       MOV MIN,O

DIS:   MOV AX,SEC                 ;完成秒计时值的显示
       CALL DECSHOW
       ;MOV AX,0E0DH               回车,置光标到行首
       ;INT 10H

OVER:  MOV DX,PCI_INTCSR
       SUB DX,19H
       IN  AL,DX 
       MOV DX,PCI_INTCSR          ;清PCI卡中断控制寄存器标志位
       ADD DX,2
       MOV AX,003FH
       OUT DX,AX

       MOV DX,INTR_OCW2           ;向PC机内部8259发送中断结束命令
       MOV AL,20H
       OUT DX,AL
       MOV AL,20H
       OUT 20H,AL
       IRET
MYISR ENDP
       
DECSHOW PROC NEAR
       MOV DX,0                   ;完成秒计时值的显示
       MOV BX,10
       DIV BX
       MOV SEGG,DX
       MOV SEGS,AX
       MOV AX,MIN
       MOV DX,O
       DIV BX
       MOV  MING,DX
       MOV  MINS,AX
       MOV  AL,80H
       MOV  DX,MY8255_MODE
       OUT  DX,AL
       
        MOV  SI,OFFSET TIME1
        MOV AL,[SI+MINS]     
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,07H
        OUT DX,AL
        CALL DALLY
        INC SI

        MOV  SI,OFFSET TIME2
        MOV AL,[SI+MING]
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,0BH
        OUT DX,AL
        CALL DALLY
        INC SI

        MOV  SI,OFFSET TIME1
        MOV AL,[SI+SECS]
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,0CH
        OUT DX,AL
        CALL DALLY
        INC SI

        MOV  SI,OFFSET TIME1
        MOV AL,[SI+SECG]
        MOV DX,MY8255_B
        OUT DX,AL
        MOV DX,MY8255_C
        MOV AL,0DH
        OUT DX,AL
        CALL DALLY
        MOV  SI,
        RET
        DECSHOW ENDP

DALLY 	PROC NEAR                    ;软件延时子程序
        PUSH CX
        MOV CX,00FFH
D1:     MOV AX,00FFH
D2:     DEC AX
		JNZ D2
		LOOP D1
		POP CX
		RET
DALLY 	ENDP
        CODE ENDS
        END START


⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -