今天设计出了1AA调光手电的程序（第五页好了，继续） - 第7页 - 手电讨论区精华版(Essentials) - 手电大家谈-手电筒爱好者之家

北斗发表于 2007-5-10 01:37

呵呵，我终于找到你了，原来最终导致第五页打不开的就是你啊！哈哈，怪不得你可以看到。呵呵

发烧友 发表于 2007-5-10 06:27

<div class="quote">以下是引用北斗在2007-05-10 01:37:07的发言： 呵呵，我终于找到你了，原来最终导致第五页打不开的就是你啊！哈哈，怪不得你可以看到。呵呵</div>我也是很难才看到第五页的，难道与我用IE7有关？

ujff0574 发表于 2007-5-10 08:05

这个是论坛BUG 还是一种防止信息过多的保护措施？？

xiewg 发表于 2007-5-10 11:13

估计是引用的问题，偶那个回复里引用了楼上的数据

xiewg 发表于 2007-5-10 11:18

搞定了，偶用FF的IE tab可以看到，从外部修改数据编辑帖子。。。这论坛还真不少bug啊。。。

ldch 发表于 2007-5-10 11:56

哈哈，竟然通过这个帖子发现论坛BUG，也算有点贡献了

jljhma2000 发表于 2007-5-13 17:34

长学文啊。可以看看TI的TPS6103X的资料，它的曲线很好（个人认为），但是很遗憾输入是1.8-5.5的，不能用在1AA上。

ldch 发表于 2007-5-13 22:53

TPS6103X是升压模式的，不是非常适合驱动 LED，适合 2AA，锂电的话电压高于 LED 电压，这个 IC 就不是很好了。TPS63000 就是升降压的，适合单锂电条件应用，外部最好再配置电流检测 ICTPS6120x是兼容AA的，只是AA条件下效率仍然不够满意，但是可以兼容到AA，还是它的优势。上面这些IC估计都不便宜，反正济南这里是根本找不到。有个深圳的网友说可以找到样品，希望将来搞高级货时可以用上。[此帖子已经被作者于1179072808编辑过]

ldch 发表于 2007-5-14 00:16

刚才试验成功了软件PWM程序，也学会了PIC的中断的使用，这样一来，想设计什么样的闪光模式就设计成什么样的了。软件PWM速度不高，不过对付眼睛暂留作用也够了。往后继续学习、改进，发掘更多功能出来。    这几个程序段的调试成功，离第一步目标越来越近了。先搞出第一个具有各种功能的，以后再慢慢改进。

ldch 发表于 2007-5-14 00:40

PWM按照256级分辩率，频率较低，改为32级，频率就高些了，对手电来说也没没必要分这么细。频率明天拿示波器测试测试。很晚了，困了，明天接着搞

ujff0574 发表于 2007-5-14 09:50

精度10位吧至于频率高于500HZ就可以了

jljhma2000 发表于 2007-5-15 16:26

我不是很明白。上面提到的这些元件都是输出电压可以调整的。而LED是要调电流的呀。怎样调整电流呀？——是在IC的输出端再加一些电路，来控制LED的电流供给吗？

jljhma2000 发表于 2007-5-15 16:28

我提到的IC(TPS6103X)也是输出电压可以控制的。但是怎样控制电流啊？

ldch 发表于 2007-5-15 19:12

<div class="quote" twffan="done">以下是引用jljhma2000在2007-05-15 16:28:01的发言： 我提到的IC(TPS6103X)也是输出电压可以控制的。但是怎样控制电流啊？</div> TPS6xxx1都是输出电压3.3V的，TPS6xxx2输出电压都是5.0V的，TPS6xxx0都是可调输出电压的，反馈电压是0.5V。即使是3.3V的也可以通过外部电阻改成3.3～5之间可调。 这些IC本身都不带电流取样反馈电路，按照标准的电阻分压接法取得反馈信号，电路外特性表现为稳压电路。控制输出电流本质上也是控制电压，可以在LED回路上串联小电阻对LED电流进行取样，然后通过运放把这个信号放大，运放输出接IC的反馈端子。当然，更可以用专用的电流取样反馈IC，如下图所示：这个图来自论坛，主IC应该是TPS61030。从这个图中看，标记为ACM的IC跟美信的MAX4073T相似，这是个专用的电流取样IC。MAX4073T的电压增益是20倍，图中两个取样电阻是0.22和0.12并联，大约78毫欧，通过700mA电流的话压降为.0546V，乘20得1.092，比TPS61030的反馈电压高，通过电路板上的R2、R3分压取得反馈电压。TPS61030自身的电池检测在这里好像没有使用。 其实，还有很多手电实际上就是用PWM来调光，通过改变LED点亮所占的时间比，也就是所谓占空比来调节亮度。如果PWM频率低的话，就会有频闪感觉了。 [此帖子已经被作者于1179230658编辑过]

ldch 发表于 2007-5-16 00:39

呵呵，程序终于完成了

程序功能：   高亮－50％－10％－暴闪，采用软件PWM模式调节亮度，单片机GPIO0端子作为控制输出端子。切换方式：   每次打开电源后，如果2秒内关闭，则下次再开电源将改变模式；如果持续时间高于2秒，则下次打开电源按照上次模式点亮。持续2秒后会有个低频闪烁作为模式记忆提示。#include "P12F629.INC"EEADDRA EQU 20H  ;定义EEPROM A地址 EEADDRB EQU 21H  ;定义EEPROM B地址 TEMP EQU 22H  ;定义临时变量 EEREADA EQU 23H  ;定义EEPROM A预写 EEREADB EQU 24H  ;定义EEPROM B预写 DELY1 EQU 25H  ;定义延时变量1 DELY2 EQU 26H  ;定义延时变量2 DELY3 EQU 27H  ;定义延时变量3 TEMP1 EQU 28H  ;定义临时变量1 AA EQU 29H  ;定义PWM低电平时间常数 BB EQU 2AH  ;定义PWM低电平时间常数 COUNT0 EQU 2BH  ;定义定时器延时常数 ORG 00H  ;复位向量地址  GOTO STAR ;转向主程序 ORG 04H  ;中断向量地址  GOTO T0INT ORG 06H  ;主程序起始地址 STAR  BCF STATUS,RP0  ;体选择BANK0  MOVLW 01H  MOVWF EEADDRA  ;初始化EEPROM A地址  MOVLW 02H  MOVWF EEADDRB  ;初始化EEPROM B地址  MOVLW 1EH  MOVWF COUNT0  ;初始化定时器延时常数 CLRF GPIO  ;清GPIO寄存器  CLRF TMR0  ;清Timer0 MOVLW 07H  MOVWF CMCON  ;关闭比较器19H BSF STATUS,RP0  ;体选择BANK1    MOVLW 87H  MOVWF OPTION_REG  ;禁止上拉,预分频系数256  MOVLW 20H  MOVWF INTCON   ;关全局中断,允许Timer0中断,中断标志清零 ;CLRF ANSEL  ;清9FH模拟选择寄存器 MOVLW 08H  MOVWF TRISIO  ;除GPIO3外,其他管脚都是输出 BCF STATUS,RP0  CALL DELAY1  ;延时  ;CALL DELAY1 CALL EEREAD_A ;读取EEPROM A数据  CALL EEREAD_B ;读取EEPROM B数据 MOVF EEREADB,W  XORLW 01H  ;EEPROM A数据跟01比较  BTFSS STATUS,Z  GOTO A4   ;不相等,跳转A3执行  GOTO A_A   ;相等,跳转A_A执行   A4     ;判断EEPROM A数据是否超过4  BCF STATUS,RP0  INCF EEREADA  MOVF EEREADA,W  XORLW 05H  BTFSS STATUS,Z  GOTO WRA    A_1     ;EEPROM A数据超过3,则令其为1  MOVLW 01H  MOVWF EEREADAWRA  MOVF EEREADA,W  MOVWF TEMP  CALL WREEA BSF STATUS,RP0  BSF INTCON,GIE  ;开全局中断   A_A  BCF STATUS,RP0  MOVF EEREADA,W  XORLW 01H  BTFSS STATUS,Z  GOTO AA2 BCF STATUS,RP0  MOVLW 00H  MOVWF TEMP  CALL WREEB   ;EEPROM B写入0 BCF STATUS,RP0  MOVF EEREADA,W  MOVWF TEMP  CALL WREEA   ;重写EEPROM AFINISH BCF STATUS,RP0  BSF GPIO,00H   ;GP0输出高电平,对应全亮  NOP  GOTO FINISHT0INT     ;Timer0中断程序  BSF STATUS,RP0  BCF INTCON,T0IF   ;清Timer0中断标志 BCF STATUS,RP0  DECFSZ COUNT0,F  RETFIE   ;中断返回  BSF STATUS,RP0  BCF INTCON,GIE   ;关闭全局中断  BCF INTCON,T0IE   ;关闭Timer0中断 BCF STATUS,RP0  MOVLW 01H  MOVWF TEMP  CALL WREEB   ;EEPROM B写入1LIGHTA BCF STATUS,RP0   ;闪烁  CLRF GPIO  CALL DELAY1  CALL DELAY1  CALL DELAY1  COMF GPIO  CALL DELAY1  CALL DELAY1  CALL DELAY1  BCF STATUS,RP0  RETFIE   ;中断返回AA2  BCF STATUS,RP0  MOVF EEREADA,W  XORLW 02H  BTFSS STATUS,Z  GOTO AA3 BCF STATUS,RP0  MOVLW 00H  MOVWF TEMP  CALL WREEB   ;EEPROM B写入0 BCF STATUS,RP0  MOVF EEREADA,W  MOVWF TEMP  CALL WREEA   ;重写EEPROM A BCF STATUS,RP0  MOVLW 01FH  MOVWF AA  MOVWF BB  ;50%占空比 LIGHT1 BCF STATUS,RP0  CLRF GPIO  CALL DEYA  COMF GPIO  CALL DEYB  GOTO LIGHT1AA3  BCF STATUS,RP0  MOVF EEREADA,W  XORLW 03H  BTFSS STATUS,Z  GOTO AA4  BCF STATUS,RP0  MOVLW 00H  MOVWF TEMP  CALL WREEB   ;EEPROM B写入0 BCF STATUS,RP0  MOVF EEREADA,W  MOVWF TEMP  CALL WREEA   ;重写EEPROM A BCF STATUS,RP0  MOVLW 05H  MOVWF AA  MOVLW 2DH  MOVWF BB  ;10%占空比 LIGHT2 BCF STATUS,RP0  CLRF GPIO  CALL DEYA  COMF GPIO  CALL DEYB  GOTO LIGHT2AA4  BCF STATUS,RP0  MOVF EEREADA,W  XORLW 04H  BTFSS STATUS,Z  GOTO AA1  BCF STATUS,RP0  MOVLW 00H  MOVWF TEMP  CALL WREEB   ;EEPROM B写入0 BCF STATUS,RP0  MOVF EEREADA,W  MOVWF TEMP  CALL WREEA   ;重写EEPROM ALIGHT3 BCF STATUS,RP0   ;闪烁  CLRF GPIO  CALL DELAY1  COMF GPIO  CALL DELAY1  GOTO LIGHT3AA1  MOVLW 01H  MOVWF EEREADA  GOTO WRA   EEREAD_A  ;读取EEPROM A  BCF STATUS,RP0  MOVF EEADDRA,W  BSF STATUS,RP0  MOVWF EEADR  BSF EECON1,RD  NOP  MOVF EEDATA,W  BCF STATUS,RP0  MOVWF EEREADA  RETURNEEREAD_B  ;读取EEPROM B  BCF STATUS,RP0  MOVF EEADDRB,W  BSF STATUS,RP0  MOVWF EEADR  BSF EECON1,RD  NOP  MOVF EEDATA,W  BCF STATUS,RP0  MOVWF EEREADB  RETURN   WREEA    ;写EEPROM A,TEMP传送写入数据  BCF STATUS,RP0  ;取BANK0  MOVF EEADDRA,W  ;取A地址  BSF STATUS,RP0  ;取BANK1  MOVWF EEADR  ;A地址进入EEADR  BCF STATUS,RP0  ;取BANK0  MOVF TEMP,W  ;取写入数据  BSF STATUS,RP0  ;取BANK1  MOVWF EEDATA  ;待写数据进入EEDATA  BSF EECON1,WREN  BCF INTCON,GIE  MOVLW 55H  MOVWF EECON2  MOVLW 0AAH  MOVWF EECON2  BSF EECON1,WR  BSF STATUS,RP0  BSF INTCON,GIE  RETURNWREEB    ;写EEPROM B,TEMP传送写入数据  BCF STATUS,RP0  ;取BANK0  MOVF EEADDRB,W  ;取B地址  BSF STATUS,RP0  ;取BANK1  MOVWF EEADR  ;B地址进入EEADR  BCF STATUS,RP0  ;取BANK0  MOVF TEMP,W  ;取写入数据  BSF STATUS,RP0  ;取BANK1  MOVWF EEDATA  ;待写数据进入EEDATA  BSF EECON1,WREN  BCF INTCON,GIE  MOVLW 55H  MOVWF EECON2  MOVLW 0AAH  MOVWF EECON2  BSF EECON1,WR  BSF STATUS,RP0  BSF INTCON,GIE  RETURNDELAY1  MOVLW  4FH     ;外循环常数  MOVWF  DELY1     ;外循环寄存器 LOOP0 MOVLW  0FFH     ;中循环常数  MOVWF  DELY2     ;中循环寄存器 LOOP1 DECFSZ  DELY2     ;中循环寄存器递减  GOTO  LOOP1     ;继续中循环  DECFSZ  DELY1     ;外循环寄存器递减  GOTO  LOOP0     ;继续外循环  RETURNDEYA MOVF AA,W  MOVWF TEMP D1 DECFSZ TEMP  GOTO D1  RETURNDEYB MOVF BB,W  MOVWF TEMP D2 DECFSZ TEMP  GOTO D2  RETURNEND

mioa 发表于 2007-5-16 09:40

这个强.....让调光不再神话!就让暴风雨来得得猛烈些吧.

sdwhailong 发表于 2007-5-16 14:56

高人！

xiewg 发表于 2007-5-16 15:28

这样的话，是不是可以做成最简单的锂电驱动，锂电直驱，用PWM控制电路的通断，记得LED可以承受比较大的脉冲电路。

hanarmy 发表于 2007-5-16 16:45

祝贺下！

ldch 发表于 2007-5-17 10:28

<div class="quote" twffan="done">以下是引用xiewg在2007-05-16 15:28:26的发言： 这样的话，是不是可以做成最简单的锂电驱动，锂电直驱，用PWM控制电路的通断，记得LED可以承受比较大的脉冲电路。</div>  这倒是，可以构成最简单的锂电调光电路了，基本元件：PIC12F629、MOS、限流电阻（限制LED电流最大值）、电源滤波电容，然后根据自己需要刷程序，想要几档要几档

页: 1 2 3 4 5 6 [7] 8 9

手电大家谈-手电筒爱好者之家's Archiver

呵呵，程序终于完成了