首页 > 应用 > 单片机应用
[导读]
PIC单片机LED流水灯程序;*************************************************************include ;************************************************** __CONFIG 3F39H;设置配置位中振荡方式为XT,其它

PIC单片机LED流水灯程序

本文引用地址: http://www.21ic.com/app/mcu/201807/765485.htm

;*************************************************************
include
;**************************************************
__CONFIG 3F39H;设置配置位中振荡方式为XT,其它全部禁止或关闭

;*----
MODESEL equ 20h
MODESELB equ 21h
Count equ 22h
Count1 equ 23h
Count2 equ 24h
PORTDB equ 25h


;*-----

org 0
nop
goto start
org 4
goto ISR

org 10
start
clrf PORTC ;清c口
MOV lw 00h
MOV wf MODESEL ;初始化模式选择寄存器
MOV wf MODESELB
MOV lw b'10010000'
MOV wf INTCON ;初始化中断控制
bsf STATUS,RP0
clrf TRISC ;设C口全为输出
MOV lw b'10111111'
MOV WF OPTION_REG ;选择INT下降沿有效

bcf STATUS,RP0
callFMsel
MOV wf PORTDB
MOV wf PORTC
main
btfsc PORTB,0 ;
goto $+6 ;
call Delay ; 按键去抖动
btfsc PORTB,0
goto $+3 ; /
call FMsel ;/
MOV wf PORTDB
MOV f MODESELB,W ;
MOV wf MODESEL ;
call LongDelay
bcf STATUS,C
rlf PORTDB,1
btfsc STATUS,C
bsf PORTDB,0
MOV f PORTDB,W
MOV wf PORTC
goto main

;*----------
Delay ; call指令占用2个指令周期
clrf Count ; 清 Count占用1个指令周期
Dloop
decfsz Count,f ; 这两行指令将延时
goto Dloop ; (256 * 3) -1 个指令周期
return ; return占用2个指令周期

;*----------------
LongDelay
clrf Count
clrf Count1
MOV lw 0x01
MOV wf Count2
LDloop
decfsz Count,f
goto LDloop
decfsz Count1,f
goto LDloop
decfsz Count2,f
goto LDloop
return

;*---------------
FMsel
MOV f MODESEL,w
MOV wf MODESELB
MOV f MODESEL,w
addwf PCL
retlw b'11111000'
retlw b'11110000'
retlw b'11100000'
retlw b'11000000'
retlw b'10000000'
MOV lw 00h
MOV wf MODESELB
bsf INTCON,GIE
retlw b'11111000'
return

;*-------------
ISR
btfss INTCON,INTF
goto $+3
bcf INTCON,INTF
incf MODESEL
retfie
end


换一批

延伸阅读

[单片机应用] 单片机通信时序解析

单片机通信时序解析

随着我们对通信技术的深入学习,大家要逐渐在头脑中建立起时序这种概念。所谓“时序”从字面意义上来理解,一是“时间问题”,二是“顺序问题”。先说“顺序问题”,这个相对简单一些。我们在学 UART 串口通信的时候......

关键字:单片机 通信时序

[单片机应用] 51单片机学习笔记,操作1602液晶

51单片机学习笔记,操作1602液晶

TX-1C板操作并行模式的1602液晶液晶第1,2脚是gnd和vcc第3脚是对比度调节第4脚是数据/指令选择端RS第5脚是读写选择端R/W,我们这次只写不读,故直接接地第6脚是读写使能EN第7到14脚是数据口,我们接STC89C52RC的P......

关键字:51单片机 1602液晶

[单片机应用] ARM7单片机(学习ing)—(一)、输入/输出端口GPIO编程—02

ARM7单片机(学习ing)—(一)、输入/输出端口GPIO编程—02

一、输入/输出端口GPIO编程一—(02)、控制LCD1602显示~~废话不多说了~~直接上图~~然后是程序~~MDK1_2.c//------------------------------------------------------......

关键字:ARM7 单片机 GPIO编程

[汽车电子] Allegro发布简易降压-升压解决方案,扩展汽车LED驱动器产品组合

Allegro发布简易降压-升压解决方案,扩展汽车LED驱动器产品组合

Allegro MicroSystems, LLC(以下简称Allegro)宣布推出62xx/808xx 系列照明LED驱动器产品 的最新成员 ALT80802。新产品能够满足采用12V电池输入驱动,单个LED串具有3到4个白光LED的重要......

关键字:Allegro 降压-升压解决方案 LED驱动器

[单片机应用] PIC16F877A的timer

PIC16F877A的timer

----------------------------------------------------------timer 0-------------------------------------------------------......

关键字:PIC16F877A timer

[单片机应用] 固态继电器在PIC单片机控制的多回路温度检测系统的应用

固态继电器在PIC单片机控制的多回路温度检测系统的应用

1.引言 对于塑料制瓶工艺, 塑料加热处于溶融状态, 经高压注射成为管胚, 短时间冷却以后, 经过高压空气的吹胀, 在制瓶模具中成型。其工艺特点之一是: 溶融状态下的塑料定时流动; 成为管胚之后, 将与外部空气接触 2......

关键字:固态继电器 PIC 单片机控制 温度检测系统

[显示光电] 机场驱逐猛禽新招术:LED“大眼睛”吓跑它

机场驱逐猛禽新招术:LED“大眼睛”吓跑它

研究小组在两个LED显示屏上画上同心圆黑圈,类似人眼那样,并将其放在跑道周围关键处,全天候显示。研究人员对其观察了8800多次,结果表明,猛禽更倾向于在看不见该LED屏幕的区域活动。连续观察五周之后,猛禽的这种规避行为依然存在。 ......

关键字:LED 显示屏

我 要 评 论

网友评论

芯闻号

技术子站

更多

项目外包

更多

推荐博客