Proteus 模拟呼吸灯

; ledpwm.asm --- drive a blue LED with PWM                     21/04/2006
; Copyright (c) 2006 John Honniball

.include "m8def.inc"

            .org 0x0000

; 端口 B 位 2 上的LED
            .equ LED_PORT = PortB
            .equ LED_BIT = 2

; 该程序驱动连接到 AVR 的 I/O 端口的单个 LED。 它将 LED 的阴极连接到 AVR 引脚，
;LED 的阳极通过电阻器。 该电阻的值取决于 LED 的颜色，但通常为几百欧姆。
;我们通过脉宽调制 （PWM） 控制 LED 的亮度，
; 就像脉动那样地周期运动或变化 从未完全“熄灭昏暗状态”到全亮度再调至昏暗状态，然后再变回来。
;为此，设置最小亮度、最大亮度值。
            .equ MIN_BRIGHT = 15 ;最小亮度
            .equ MAX_BRIGHT = 255 ;最大亮度

; 此值控制 LED 从亮到暗的循环速度。 是的我们为亮度的每一步生成的PWM周期数
;坡道，上坡和坡道。 数字越大，脉动越慢。
            .equ N_CYCLES = 6                      ;周期数

; 重置后开始执行程序
            ldi r16,low(RAMEND)                     ; 初始化堆栈到RAM顶部
            out SPL,r16
            ldi r16,high(RAMEND)
            out SPH,r16

; 初始化硬件
            ldi r16,0xff                            ; 将端口B设置为所有输出
            out DDRB,r16

            sbi LED_PORT,LED_BIT                      ;通过将输出引脚设置为高电平关闭蓝色LED

; 从LED处于最低水平开始，然后上升到最大水平
dopwm:      ldi r17,MIN_BRIGHT                       ; R17保持当前亮度水平
adjust_1:         ldi r18,N_CYCLES                         ; R18计算PWM周期，从而计算脉动速度
adjust_2:         cbi LED_PORT,LED_BIT                      ; 输出引脚低，LED亮起
            mov r16,r17                             ;R16控制延迟长度（=R17）
            rcall delayn4us                         ;调用延迟子程序
            sbi LED_PORT,LED_BIT                      ; 输出引脚高，LED熄灭
            ldi r16,255
            sub r16,r17                             ; R16控制延迟长度（=255-R17）
            rcall delayn4us                         ; 调用延迟子程序
            dec r18                                 ;递减PWM周期计数器
            brne adjust_2
            inc r17                                 ; 亮度增加一步
            brne adjust_1

; 现在逐渐降低到最小亮度
            ldi r17,MAX_BRIGHT                       ;R17 保持当前亮度水平
adjust_3: ldi r18,N_CYCLES ;R18 计算 PWM 周期，从而计算脉动速度
adjust_4: cbi LED_PORT,LED_BIT ;输出引脚低电平，LED 亮起
            MOV R16,R17 ;R16 控制延迟长度 （= R17）
            rcall delayn4us ;呼叫延迟子例程
            sbi LED_PORT,LED_BIT ;输出引脚高电平，LED 熄灭
             ldi R16,255
            sub R16,R17 ;R16 控制延迟长度 （= 255 - R17）
            rcall delayn4us ;呼叫延迟子例程
            dec R18 ;递减PWM周期计数器
            brne adjust_4
             dec R17 ;亮度降低一级
            CPI r17,MIN_BRIGHT ;我们达到最低限度了吗？
            brne adjust_3

            rjmp dopwm                              ; 循环回到开始

; delayn 4US
;延迟 （R16 * 4） 微秒
delayn4us:  tst r16                                 ; R16 = 0？（无延迟）
            breq dly4
dly2:       ldi r24,low(16)
            ldi r25,high(16)
dly3:       sbiw r24,1                              ; 2 个周期
            brne dly3                               ; 2 个周期
            dec r16
            brne dly2
dly4:       ret                                     ;返回