liushuideng.asm

pmw的有一个例子： PWM 控制 LED 灯渐亮渐灭程序 * 利用定时器控制产生占空比可变的 PWM 波 * 按K1

pmw的有一个例子：

; PWM 控制 LED 灯渐亮渐灭程序                                                   *
; 利用定时器控制产生占空比可变的 PWM 波                                         *
; 按K1，PWM值增加，则占空比减小,LED 灯渐暗。                                    *
; 按K2，PWM值减小，则占空比增加,LED 灯渐亮。                                    *
;当PWM值增加到最大值或减小到最小值时，蜂鸣器将报警                              *
;资源：p0口,8路指示灯。p1.4,p1.5亮度控制按键（端口按键）p3.7小喇叭报警          *

;－－－－－－－－－－－－－－－－－－－－－－－－－－－－
         PWM   EQU  7FH            ;PWM赋初始值
         OUT   EQU  P0             ;8个LED灯的接口
         INCKEY EQU  P1.4          ;K1,PWM值增加键。
         DECKEY EQU  P1.5          ;K2,PWM值减小键。
         BEEP   EQU  P3.7
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－
         ORG   0000H
         SJMP  START
         ORG   000BH
         SJMP  INTT0
         ORG   001BH
         SJMP  INTT1
         ORG   0030H
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－
;主程序
;定时器0工作在模式1，定时器1工作在模式2。
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－
START:
          MOV  SP,#30H
          MOV TMOD,#21H
          MOV TH1,PWM               ;脉宽调节
          MOV TL1,#00H
          MOV TH0,#0FCH             ;1ms延时常数
          MOV TL0,#066H             ;频率调节
          SETB EA
          SETB ET0
          SETB ET1
          SETB TR0
LOOP:     MOV A,PWM                ;
          JB INCKEY,LOOP1          ;增加键是否按下？
          CALL DELAY               ;延时去抖动
          JB INCKEY,LOOP1
          CJNE A,#0FFH,PWMINC      ;是否到最大值？
          CALL  BEEP_BL            ;是，蜂鸣器报警。
          SJMP LOOP
PWMINC:
          INC PWM                  ;调节脉宽（脉宽减小）
          SJMP LOOP

LOOP1:    JB DECKEY,LOOP2          ;减小键是否按下？
          CALL DELAY               ;延时去抖动
          JB DECKEY,LOOP2
          CJNE A,#02H,PWMDEC       ;是否到最小值？
          CALL  BEEP_BL            ;是，蜂鸣器报警。
          SJMP LOOP
PWMDEC:
          DEC PWM                  ;调节脉宽（脉宽增加）
LOOP2:    SJMP LOOP
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
;T0中断服务子程序   （频率）
;控制定时器1中断
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
INTT0:
          CLR  TR1
          MOV TH0,#0FCH              ;1ms延时常数
          MOV TL0,#066H               ;频率调节
          MOV  TH1,PWM
          SETB TR1
          MOV  OUT,#00H              ;启动输出
          RETI
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
;T1中断服务子程序      （脉宽）
;控制PWM脉冲宽度
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
INTT1:
          CLR  TR1           ;脉宽调节结束
          MOV  OUT,#0FFH     ;结束输出
          RETI
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
;10ms延时子程序
;－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
DELAY:
          MOV R6,#50
DELAY1:
          MOV R7,#100
          DJNZ R7,$
          DJNZ R6,DELAY1
          RET
;-----------------------------------------------
;蜂鸣器响一声子程序
;-----------------------------------------------
BEEP_BL:
           MOV   R6,#100
  BL1:     CALL  BL2
           CPL   BEEP
           DJNZ  R6,BL1
           MOV   R5,#25
           CALL  DELAY2
           RET
  BL2:     MOV   R7,#180
  BL3:     NOP
           DJNZ  R7,BL3
           RET
 DELAY2:                      ;延时R5×10MS
           MOV   R6,#50
  BL4:     MOV   R7,#100
  BL5:     DJNZ  R7,BL5
           DJNZ  R6,BL4
           DJNZ  R5,DELAY2
           RET
;---------------------------------------------------
           END