单片机闪烁灯设计

;*************************************************;* 本程序是一个LED灯的循环闪烁程序,用INT键来切换*;* 闪烁模式 *;*************************************************include c>;*----MODESEL equ 20hMODESELB equ 21hCount equ 22hCount1 equ 23hCount2 equ 24hPORTDB equ 25h

本文引用地址：

org 0goto startorg 4goto ISR

org 10startclrf PORTD ;清D口movlw 00hmovwf MODESEL ;初始化模式选择寄存器movwf MODESELBmovlw b'10010000'movwf INTCON ;初始化中断控制bsf STATUS,RP0clrf TRISD ;设D口全为输出movlw b'10111111'OPTION ;选择INT下降沿有效

bcf STATUS,RP0call FMselmovwf PORTDBmovwf PORTDmain btfsc PORTB,0 ;goto $+6 ; call Delay ; 按键去抖动btfsc PORTB,0goto $+3 ; /call FMsel ;/movwf PORTDBmovf MODESELB,W ;movwf MODESEL ;call LongDelaybcf STATUS,Crlf PORTDB,1btfsc STATUS,Cbsf PORTDB,0movf PORTDB,Wmovwf PORTDgoto main

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

;*----------------LongDelayclrf Countclrf Count1movlw 0x01movwf Count2LDloopdecfsz Count,fgoto LDloopdecfsz Count1,fgoto LDloopdecfsz Count2,fgoto LDloopreturn

福州面部填充医院

南昌吸脂医院

南京双眼皮医院