Haz una pregunta
  Foros de Electrónica » Diseño analógico » Diseño de circuitos en general
Foros Registrarse ¿Olvidaste tu contraseña?

Temas similares

11/07/2014 #221

Avatar de djsound

Claro que si meta, ese pic es mas pequeño pero yo publique esto es precisamente por que tu no dabas con pics jejejejeje
(Llevo tiempo intentándolo con PIC bajo asm y no me como una rosca, ajajjaja jaj ajajaj ajaj.)
y propusiste arduino como solución, vas a volver a los pics? obviamente no voy a utilizar toda la tarjeta, para esto voy a a construir un standalone,http://codigofacilito.com/videos/cur...ino_standalone que es básicamente sacar el solo chip ya programado de la tarjeta arduino, con sus componentes asociados en una pcb hecha a plancha.

Como dato curioso, este proyecto lo estoy fabricando a petición de mi esposa que estaba cansada de levantarse a media noche (nos quedamos dormidos viendo tv) y apagar la luz, (acá en BOGOTA hace muchooo frió a esa hora) y pues pensé en hacerlo de esta forma; de hecho lo empece con pic 16f84 pero también me volví un 8 y como tengo arduino uno empece a buscar la info y di con ese proyecto, al cual lo he venido mejorando para que cumpla los deseos de mi MUJERZOTA jejeje!
11/07/2014 #222

Avatar de Meta

Hola:

No he abandonado los PIC, pero me estoy centrando en Arduino porque los PIC en asm me tiene negro, ajjajajajajja.

Hay que hacer su propia PCB si lo quieres como proyecto final, la placa arduino es para prototipos.

Saludo.
13/07/2014 #223

Avatar de djsound

Aqui esta el PCB y el archivo en Wizard, listo para instalar en la caja del interrutor.
Imágenes Adjuntas
Tipo de Archivo: png pcb.PNG (14,1 KB (Kilobytes), 43 visitas)
Archivos Adjuntos
Tipo de Archivo: rar dimmer2.rar (2,2 KB (Kilobytes), 34 visitas)
15/07/2014 #224

Avatar de djsound

Unas foticos del pcb terminado listo para ensamblar, cuando este funcionando subo video!
Imágenes Adjuntas
Tipo de Archivo: jpg Foto1748.jpg (59,5 KB (Kilobytes), 32 visitas)
Tipo de Archivo: jpg Foto1749.jpg (74,6 KB (Kilobytes), 35 visitas)
Tipo de Archivo: jpg Foto1750.jpg (120,1 KB (Kilobytes), 30 visitas)
10/09/2014 #225


djsound terminaste el interruptor? lo instalaste ya? podrias mostrarlo, gracias
12/02/2015 #226


DUDAS:Protocolo infrarojo sony.
reyvilla dijo dijo: Ver Mensaje
Debido a un problema que tengo con la pc no puedo subir el video, mas sin embargo realice unas lecturas como indique por el puerto serial y los resultados fueron muy bueno, aunque hay que decir que dependiendo de la distancia los tiempos de los pulsos cambian un poco no se a que puede deberse a la atenuación por la distancia ya que solo ocurre cuando no apunto directamente el control. Anexo el codigo en pbp y el circuito lo subo luego ya que lo hice directo en el protoboard, anexo tambien las lecturas obtenidas en el serial comunicator del microcode.

Código:
'****************************************************************
'*  Name    : UNTITLED.BAS                                      *
'*  Author  : [select VIEW...EDITOR OPTIONS]                    *
'*  Notice  : Copyright (c) 2012 [select VIEW...EDITOR OPTIONS] *
'*          : All Rights Reserved                               *
'*  Date    : 17/03/2012                                        *
'*  Version : 1.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'****************************************************************

					
@ DEVICE PIC16F628A
@ DEVICE INTRC_OSC_NOCLKOUT 
@ DEVICE WDT_OFF        
@ DEVICE PWRT_OFF       
@ DEVICE MCLR_OFF       
@ DEVICE BOD_OFF        
@ DEVICE LVP_OFF        
@ DEVICE CPD_OFF        
@ DEVICE PROTECT_OFF 
INCLUDE  "modedefs.bas"
DEFINE OSC 4

CMCON = 0
TRISA = %00000000      
TRISB = %00000010 
PORTA = %00000000
PORTB = %00000000
 

BIT_IR         VAR BYTE(8)
COMANDO	       VAR BYTE
SYMBOL IN_TSOP = PORTB.1
SYMBOL TX      = PORTB.2
CLEAR

INICIO: 

DETECCION_DE_IR:
COMANDO = 0 

PULSIN IN_TSOP,0,BIT_IR(0)  'PRIMER PULSO NEGADO SE GUARDA EN BIT_IR
IF BIT_IR(0) = 0 THEN GOTO DETECCION_DE_IR   'Si no se recibe nada se queda en DETECCION_DE_IR
IF BIT_IR(0) < 240 THEN GOTO DETECCION_DE_IR  'si el pulso no dura 2.4ms se queda en DETECCION_DE_IR


EXTRAE_BITS:
PULSIN IN_TSOP,0,BIT_IR(1) 
IF BIT_IR(1) < 120 THEN  'SI EL BIT 1 DE BIT_IR ES MENOR A 120
COMANDO.bit0 = 0         'EL BIT 0 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bit0 = 1         'EL BIT 0 DE COMANDO ES IGUAL A 1
ENDIF

PULSIN IN_TSOP,0,BIT_IR(2)
IF BIT_IR(2) < 120 THEN  'SI EL BIT 2 DE BIT_IR ES MENOR A 120
COMANDO.bIT1 = 0         'EL BIT 1 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bIT1 = 1         'EL BIT 1 DE COMANDO ES IGUAL A 1
ENDIF

PULSIN IN_TSOP,0,BIT_IR(3)
IF BIT_IR(3) < 120 THEN  'SI EL BIT 3 DE BIT_IR ES MENOR A 120
COMANDO.bit2 = 0         'EL BIT 2 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bit2 = 1         'EL BIT 2 DE COMANDO ES IGUAL A 1
ENDIF

PULSIN IN_TSOP,0,BIT_IR(4)
IF BIT_IR(4) < 120 THEN  'SI EL BIT 4 DE BIT_IR ES MENOR A 120
COMANDO.bit3 = 0         'EL BIT 3 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bit3 = 1         'EL BIT 3 DE COMANDO ES IGUAL A 1
ENDIF

PULSIN IN_TSOP,0,BIT_IR(5)
IF BIT_IR(5) < 120 THEN  'SI EL BIT 5 DE BIT_IR ES MENOR A 120
COMANDO.bit4 = 0         'EL BIT 4 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bit4 = 1         'EL BIT 4 DE COMANDO ES IGUAL A 1
ENDIF

PULSIN IN_TSOP,0,BIT_IR(6)
IF BIT_IR(6) < 120 THEN  'SI EL BIT 6 DE BIT_IR ES MENOR A 120
COMANDO.bit5 = 0         'EL BIT 5 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bit5 = 1         'EL BIT 5 DE COMANDO ES IGUAL A 1
ENDIF

PULSIN IN_TSOP,0,BIT_IR(7)
IF BIT_IR(7) < 120 THEN  'SI EL BIT 7 DE BIT_IR ES MENOR A 120
COMANDO.bit6 = 0         'EL BIT 6 DE COMANDO ES IGUAL A 0
ELSE	                 'SI NO 
COMANDO.bit6 = 1         'EL BIT 6 DE COMANDO ES IGUAL A 1
ENDIF

SEROUT TX,N2400,["COMANDO: "   ,#COMANDO,10]
IF COMANDO < 10 THEN
COMANDO = COMANDO + 1
SEROUT TX,N2400,["BOTON: "   ,#COMANDO,10]
ENDIF

IF COMANDO = 16 THEN
SEROUT TX,N2400,["BOTON: +CANAL",10]
ENDIF
IF COMANDO = 17 THEN
SEROUT TX,N2400,["BOTON: -CANAL",10]
ENDIF
IF COMANDO = 18 THEN
SEROUT TX,N2400,["BOTON: +VOMUMEN",10]
ENDIF
IF COMANDO = 19 THEN
SEROUT TX,N2400,["BOTON: -VOMUMEN",10]
ENDIF
IF COMANDO = 20 THEN
SEROUT TX,N2400,["BOTON: SILENCIO",10]
ENDIF
IF COMANDO = 21 THEN
SEROUT TX,N2400,["BOTON: PODER",10]
ENDIF
IF COMANDO = 59 THEN
SEROUT TX,N2400,["BOTON: PODER",10]
ENDIF 

SEROUT TX,N2400,["PULSO 1 : ",#BIT_IR(1),10]
SEROUT TX,N2400,["PULSO 2 : ",#BIT_IR(2),10]
SEROUT TX,N2400,["PULSO 3 : ",#BIT_IR(3),10]
SEROUT TX,N2400,["PULSO 4 : ",#BIT_IR(4),10]
SEROUT TX,N2400,["PULSO 5 : ",#BIT_IR(5),10]
SEROUT TX,N2400,["PULSO 6 : ",#BIT_IR(6),10]
SEROUT TX,N2400,["PULSO 7 : ",#BIT_IR(7),10]

GOTO DETECCION_DE_IR
Hasta aquí todo bien espero sirva de ayuda para empezar, ya faltaría ponerse con los
demás protocolos RC5, JVA, NEC, etc... Cualquier cosa que correjir me avisan
Que tal reyvilla y a todo el foro:
Sobre el protocolo infrarrojo SONY que publicaste tengo algunas dudas sobre las lineas que no estan comentadas como por ejemplo esta linea... ¿porque condicionas COMANDO<10 y luego lo incrementas o sumas 1?,esa es mi duda?
ya desde aqui no le entiendo podran ayudarme?

SEROUT TX,N2400,["COMANDO: " ,#COMANDO,10]
IF COMANDO < 10 THEN
COMANDO = COMANDO + 1
SEROUT TX,N2400,["BOTON: " ,#COMANDO,10]
ENDIF

y la gran preguntota ya teniendo los 7 bits de comando individuales como los unifico?
o basta nada mas con sacar el DEC de comando?esa es mi otra duda.

...y luego aqui porque? o con que fin sacas el valor decimal de los 7 BIT_IR(1) hasta BIT_IR(7)


SEROUT TX,N2400,["PULSO 1 : ",#BIT_IR(1),10]
SEROUT TX,N2400,["PULSO 2 : ",#BIT_IR(2),10]
SEROUT TX,N2400,["PULSO 3 : ",#BIT_IR(3),10]
SEROUT TX,N2400,["PULSO 4 : ",#BIT_IR(4),10]
SEROUT TX,N2400,["PULSO 5 : ",#BIT_IR(5),10]
SEROUT TX,N2400,["PULSO 6 : ",#BIT_IR(6),10]
SEROUT TX,N2400,["PULSO 7 : ",#BIT_IR(7),10]

GOTO DETECCION_DE_IR

Gracias,haber si me pueden contestar porfavor...
09/03/2015 #227

Avatar de djsound

Bueno volvi a mostrar mi resultado, jejeje despues de un largo tiempo dejo un video demostrativo del dispositivo... ya lo había utilizado y aproveche que tuvo una falla para desmontarlo y hacer un pequeño video.
09/03/2015 #228

Avatar de Meta

Hola:

Ahora con Arduino es muchísimo más fácil de programarlo. Eso si, no usar la placa Arduino UNO, puedes extraer el AVR y hacer tu propia placa.


En cuanto al vídeo de djsound. Buen trabajo.
09/03/2015 #229

Avatar de djsound

Claro que si meta, Arduino simplifica las tareas de programación por los codigos abiertos que existen, yo trate de hacer esto con Puertas Logicas, Con un 555 y hasta con un pic y ninguno me fue tan funcional simple y compacto como este final que realice. Dejo el vídeo final. Gracias por sus comentarios.
09/03/2015 #230

Avatar de Meta

Puedes poner el tu aporte por aquí si lo deseas.

Buen trabajo.
10/03/2015 #231

Avatar de salvador33

Fenomenal muy buen proyecto te felicito
05/09/2015 #232


Les comparto el que yo realice
Respuesta
¿Tienes una mejor respuesta a este tema? ¿Quieres hacerle una pregunta a nuestra comunidad y sus expertos? Registrate

Buscar más temas sobre:
Lupa Diseño de circuitos en general

Alarmas, temporizadores, acondicionadores de señal...

Cerrar
Foros de Electrónica » Diseño analógico » Diseño de circuitos en general

Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Search Engine Optimization by vBSEO ©2011, Crawlability, Inc.