t1led.asm

可以熟悉51单片机中断机制 大大方便学习51单片机

;********************************************************************************
;流水灯 （定时中断）    P0、P2 LED显示                                          *
;********************************************************************************
;*  日期:  2008-2-25                                                            *
;*  版本:  3.0                                                                  *
;*  作者:  深圳志博电子有限公司     专业8051单片机教学站                        *
;*  邮箱: [e-mail]                                                       *
;*  网站： http://www.elecmcu.com     http://www.elecmcu.com    更多例程请登陆网站   *
;********************************************************************************
;*  硬件：此程序在本公司志博电子实验仪运行通过                           *
;********************************************************************************
;* 【版权】 Copyright(C)深圳志博电子有限公司 www.elecmcu.com  All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                  *
;********************************************************************************
         ORG 0000H
         AJMP MAIN
         ORG 001BH       ;定时器1的中断向量地址
         AJMP TIME1
         ORG 0030H
;**********************************************************
MAIN:
         MOV  P2,#0FFH
         MOV 30H,#00H     ;计数器单元清0
         MOV 31H,#0FEH
         MOV TMOD,#10H    ;定时/计数器1工作于方式1
         MOV TH1,#4CH
         MOV TL1,#00H     ;50ms定时常数
         SETB EA          ;开总中断
         SETB ET1         ;允许定时/计数器1 中断
         SETB TR1         ;启动定时/计数器1 中断
LOOP:
         AJMP LOOP
;*********************************************************
;定时器1的中断服务程序
;*********************************************************
TIME1:
         PUSH ACC
         PUSH PSW           ;将PSW和ACC推入堆栈保护
         MOV TH1,#4CH
         MOV TL1,#00H       ;重置定时常数
         INC 30H
         MOV A,30H
         CJNE A,#10,T_END   ;30H单元中的值到10了吗?
         MOV 30H,#00H       ;清计数器
         MOV  A,31H
         MOV  P2,A
         RL  A
         MOV  31H,A
T_END:
         POP PSW
         POP ACC
         RETI
;*********************************************************
         END