|
发表于 2014-11-2 01:10:42
|
显示全部楼层
本帖最后由 dz20062008 于 2014-11-2 01:19 编辑
我用6T的单片机24MHZ的晶体做实验还是一眨一眨的,太慢了吗???谁有1T的单片机试试?楼主晶振是多少?于是示波器看,是PWM波,但没注意是否调频了,在百毫秒的脉冲宽度啊,郁闷。
这是我做的玩艺,心型LED火红呼吸灯。自我感觉过度很好,发给大家看看。而且代码的精简也不错的。Program Size: data=8.0 xdata=0 code=168楼主位的是Program Size: data=11.0 xdata=0 code=183而且没有进过优化过的。
楼主的代码的思路的却很不错/
/* 目的:心型矩阵PWM定频呼吸灯,PWM口是P3.7
材料:AT89S52,12M晶振
*/
PWM_OUT EQU P3.7
TEMP_N EQU 20H ;存PWM负半周中间变量
TEMP_P EQU 21H ;存PWM正半周中间变量
TEMP_NN EQU 22H ;存PWM负半周最终波形变量
TEMP_PP EQU 23H ;存PWM正半周最终波形变量
ORG 0000H
SJMP START
ORG 000BH
LJMP INT
RETI
ORG 0030H
START:
/* LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS
LCALL DELAY300MS ;运行等待
MOV P0,#00H ;初始化心型矩阵花型为全亮
MOV P1,#00H
CLR P2.0
CLR P2.1
CLR P2.2
CLR P2.3
CLR P2.4
CLR P2.5
CLR P2.6
CLR p3.0
CLR p3.1
CLR p3.2
CLR p3.3
CLR P3.4 */
CLR PWM_OUT ;初始化PWM输出为关
SETB F0 ;初始化明暗调节方向控制位,1为变量,0为变暗
MOV TEMP_N,#1D ;初始化PWM中间变量,最暗
MOV TEMP_P,#129D
MOV TMOD,#01H ;初始化定时器0工作在模式1,50毫秒一次中断
MOV TH0,#0B1H
MOV TL0,#0E0H
SETB EA
SETB ET0
SETB TR0
MAIN:
MOV TEMP_NN,TEMP_N ;把PWM中间变量的值传递给最终变量
MOV TEMP_PP,TEMP_P
CLR PWM_OUT ;输出低电平,小灯点亮
M_LOOP1: ;通过最终变量的值控制输出低电平时间
LCALL DELAY100US
DJNZ TEMP_NN,M_LOOP1
SETB PWM_OUT ;输出高电平,小灯熄灭
M_LOOP2: ;通过最终变量的值控制输出高电平时间
LCALL DELAY100US
DJNZ TEMP_PP,M_LOOP2
LJMP MAIN ;进入大循环
INT: ;中断子程序
CLR EA ;关中断
MOV TH0,#0B1H ;重新装入定时初值
MOV TL0,#0E0H
JNB F0,BA ;判断调节方向
MOV A,TEMP_N
CJNE A,#129D,L ;最亮了吗?
CLR F0 ;切换为由亮变暗
;LCALL DELAY300MS ;决定由亮变暗的等待时间
;LCALL DELAY300MS
;LCALL DELAY300MS
;LCALL DELAY300MS
;LCALL DELAY300MS
SETB EA ;开中断
RETI
L:
INC TEMP_N ;由暗变量的过度
DEC TEMP_P
SETB EA
RETI
BA: ;开始变暗
MOV A,TEMP_P
CJNE A,#129D,LL ;判断是不是最暗了
SETB F0 ;最暗了切换调节方向
LCALL DELAY300MS ;设定由暗变量的等待时间 ////////////
SETB EA ;开中断
RETI
LL:
DEC TEMP_N ;由亮变暗的过程
INC TEMP_P
SETB EA
RETI
DELAY100US: ;pwm最小长度因子
MOV R6,#01H
DL0:
MOV R5,#2FH
DJNZ R5,$
DJNZ R6,DL0
RET
DELAY300MS: ;亮暗切换等待延时函数
MOV R7,#7BH
DL11:
MOV R6,#74H
DL00:
MOV R5,#09H
DJNZ R5,$
DJNZ R6,DL00
DJNZ R7,DL11
RET
END ;程序结束
|
|