Autor
|
Tema: Ayuda con un proyecto! (Leído 22,586 veces)
|
Meta
|
Hola Para que no te sientas avandonado, estoy con el código. Por ahora te muesto uno incompleto y no útil, solo para que sepas que estoy trabajando. Edito: Ya he acabado. Saludo.
|
|
« Última modificación: 18 Febrero 2014, 20:06 pm por Meta »
|
En línea
|
|
|
|
Meta
|
Hola de nuevo: He acabado esquema como el código. Quiero saber si todo está correcto y eches un ojo a todo. Haz pedido el "esquema 1" lo mensionado antes. Mi otra propuesta es este "esquema 2" de abajo. Se ha incluido un pulsador más para el STOP, por ahora no es funcional, estoy en ello por si lo logro. Por ahora sigue siendo el Reset. Otra cosa que he incluido son 3 Led, para que en todo momento tengas la seguridad en que tiempo tienes activo el temporizador actualmente. Lista de componentes para el segundo esquema:Resistencias: R1, R2, R3, R4, R5 = 10 K - 1/4W. R7, R8, R9 = 330 Ohm - 1/4 W. R6 = 100 Ohm - 1/4 W.
Condensadores: C1, C2 = 22 pF / 6V C3 = 100 nF / 6V
Diodos: D1, D2, D3 = Led de 3 ó 5 mm color rojo, verde o naranja. 2V/25 mA.
Oscilador de cuarzo: X1 = 4 MHz
Circuitos integrados: IC1 = PIC16F84A-04 IC2 = L293D
Otros componentes: M1 = Motor DC 12 V. 5 micropulsadores. Aunque montes el primer esquema, la programación es del 2º y te funcionan igual. ¿Alguna otra sugerencia, pregunta, ayuda? un saludo.
|
|
« Última modificación: 18 Febrero 2014, 22:36 pm por Meta »
|
En línea
|
|
|
|
16BITS
Desconectado
Mensajes: 14
|
Creo que te quedo todo perfecto, la programacion me la pasarias por mi correo o aqui mismo lo subirias es que quisiera montarlo ya que cuento con el cargador de PIC. Muchas Gracias Por Tu Ayuda!
|
|
|
En línea
|
|
|
|
Meta
|
Hola: La programación está aquí. Muchas suerte. Quiero si es posible y tu tiempo lo permite que, cuando tengas montado aunque sea protoboard o PCB, muestres fotos reales del proyecto, y si incluye un vídeo, mejor que mejor. Con tu permiso, subiré esas fotos y vídeos a mi blog con el proyecto completo gracias a ti.El código fuente: ; ZONA DE DATOS ********************************************************************** LIST P=16F84A ; Procesador. INCLUDE <P16F84A.INC> ; Definición de las etiquetas del PIC. __CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC __IDlOCS 0001 ; Versión del programa. Variables UDATA_SHR RAM RES 1 RAM_1 RES 1 RAM_2 RES 1 RAM_3 RES 1 RAM_4 RES 1 RAM_5 RES 1 RAM_6 RES 1 RAM_7 RES 1 RAM_8 RES 1 RAM_9 RES 1 RAM_10 RES 1 RAM_11 RES 1 RAM_12 RES 1 RAM_13 RES 1 RAM_14 RES 1 RAM_15 RES 1 RAM_16 RES 1 RAM_17 RES 1 #DEFINE Pulsador_1 PORTA,4 ; Pulsador conectado a RA4. #DEFINE Pulsador_2 PORTA,3 ; Pulsador conectado a RA3. #DEFINE Pulsador_3 PORTA,2 ; Pulsador conectado a RA2. #DEFINE Pul_STOP PORTA,1 ; Pulsador de parada del motor. #DEFINE Motor PORTB,7 ; Línea donde se conecta el motor. #DEFINE Led_1 PORTB,6 ; Led 1. #DEFINE Led_2 PORTB,5 ; Led 2. #DEFINE Led_3 PORTB,4 ; Led 3. ; ZONA DE CÓDIGOS ******************************************************************** ORG 0 ; El programa comienza en la dirección 0. Inicio bsf STATUS,RP0 ; Acceso al Banco 1. bsf Pulsador_1 ; La línea RA4 se configura como entrada. bsf Pulsador_2 ; La línea RA3 se configura como entrada. bsf Pulsador_3 ; La línea RA2 se configura como entrada. bsf Pul_STOP ; La línea RA1 se configura como entrada. bcf Motor ; Se configura como salida. bcf Led_1 ; Led de aviso 5 minutos en activo. bcf Led_2 ; Led de aviso 10 minutos en activo. bcf Led_3 ; Led de aviso 20 minutos en activo. bcf STATUS,RP0 ; Acceso al Banco 0. bcf Motor ; En principio Motor apagado igual bcf Led_1 ; que los Leds. bcf Led_2 bcf Led_3 Principal btfsc Pulsador_1 ; ¿Pulsador presionado?, ¿(Pulsador)=0? goto Fin ; No. Vuelve a leerlo. call Retardo20ms ; Espera que se estabilicen los niveles de tensión. btfsc Pulsador_1 ; Comprueba si es un rebote. goto Fin ; Era un rebote y sale fuera. bsf Motor ; Activa el motor y bsf Led_1 ; enciende el Led 1 que significa call Retardo5m ; los 5 minutos encendido. bcf Motor ; Apaga el motor y bcf Led_1 ; el Led 1. EsperaDejePulsar_1 btfss Pulsador_1 ; ¿Dejó de pulsar?. ¿(Pulsador)=1? goto EsperaDejePulsar_1 ; No. Espera que deje de pulsar. Fin btfsc Pulsador_2 ; ¿Pulsador presionado?, ¿(Pulsador)=0? goto Fin2 ; No. Vuelve a leerlo. call Retardo20ms ; Espera que se estabilicen los niveles de tensión. btfsc Pulsador_2 ; Comprueba si es un rebote. goto Fin2 ; Era un rebote y sale fuera. bsf Motor ; Activa el motor y bsf Led_2 ; enciende el Led 2 que significa call Retardo10m ; los 10 minutos encendido. bcf Motor ; Apaga el motor y bcf Led_2 ; el Led 2. EsperaDejePulsar_2 btfss Pulsador_2 ; ¿Dejó de pulsar?. ¿(Pulsador)=1? goto EsperaDejePulsar_2 ; No. Espera que deje de pulsar. Fin2 btfsc Pulsador_3 ; ¿Pulsador presionado?, ¿(Pulsador)=0? goto Fin3 ; No. Vuelve a leerlo. call Retardo20ms ; Espera que se estabilicen los niveles de tensión. btfsc Pulsador_3 ; Comprueba si es un rebote. goto Fin3 ; Era un rebote y sale fuera. bsf Motor ; Activa el motor y bsf Led_3 ; enciende el Led 3 que significa call Retardo20m ; los 10 minutos encendido. bcf Motor ; Apaga el motor y bcf Led_3 ; el Led 3. EsperaDejePulsar_3 btfss Pulsador_3 ; ¿Dejó de pulsar?. ¿(Pulsador)=1? goto EsperaDejePulsar_3 ; No. Espera que deje de pulsar. Fin3 goto Principal ; Subrutinas **************************************************************** Retardo20ms ;199993 cycles movlw 0x3E movwf RAM_8 movlw 0x9D movwf RAM_9 Retardo20ms_0 decfsz RAM_8, f goto $+2 decfsz RAM_9, f goto Retardo20ms_0 ;3 cycles goto $+1 nop ;4 cycles (including call) return Retardo5m ;299999995 cycles movlw 0x54 movwf RAM_10 movlw 0xA1 movwf RAM_11 movlw 0xFD movwf RAM_12 movlw 0x02 movwf RAM_13 Retardo5m_0 decfsz RAM_10, f goto $+2 decfsz RAM_11, f goto $+2 decfsz RAM_12, f goto $+2 decfsz RAM_13, f goto Retardo5m_0 ;1 cycle nop ;4 cycles (including call) return Retardo10m ;599999992 cycles movlw 0xA9 movwf RAM_4 movlw 0x41 movwf RAM_5 movlw 0xFA movwf RAM_6 movlw 0x04 movwf RAM_7 Retardo10m_0 decfsz RAM_4, f goto $+2 decfsz RAM_5, f goto $+2 decfsz RAM_6, f goto $+2 decfsz RAM_7, f goto Retardo10m_0 ;4 cycles goto $+1 goto $+1 ;4 cycles (including call) return cblock RAM RAM_1 RAM_2 RAM_3 endc Retardo20m ;1199999995 cycles movlw 0x54 movwf RAM_14 movlw 0x82 movwf RAM_15 movlw 0xF3 movwf RAM_16 movlw 0x08 movwf RAM_17 Retardo20m_0 decfsz RAM_14, f goto $+2 decfsz RAM_15, f goto $+2 decfsz RAM_16, f goto $+2 decfsz RAM_17, f goto Retardo20m_0 ;1 cycle nop ;4 cycles (including call) return END
Espero que te vaya de maravilla, en el simulador me funciona bien, lo probaré también en realidad realidad. Suerete...
|
|
|
En línea
|
|
|
|
16BITS
Desconectado
Mensajes: 14
|
|
Re:
« Respuesta #24 en: 18 Febrero 2014, 23:48 pm » |
|
Me gustaría que me pasaras tu cuenta de PayPal para apoyarte por apoyarme compañero
Enviado desde mi XT1032 mediante Tapatalk
|
|
|
En línea
|
|
|
|
xiruko
Desconectado
Mensajes: 438
|
Meta yo soy más de programación de PICs en C y toco poco de ASM, y me quedé impresionado del trabajo que hiciste sin llevarte nada a cambio a parte de las gracias. Espero que el usuario se moleste en hacer unas fotos y un vídeo una vez lo tenga montado...Una posible mejora sería añadir control del motor por PWM para moderar la velocidad de giro a la que se asa la carne, aunque no sé si sería útil o es mejor hacerlo a una velocidad constante. Otra sería añadir protección contra sobrecorriente del motor y así evitar quemarlo en el caso de que hubiera algún fallo. Se podría hacer fácilmente con un comparador e interrupciones, aunque no sé si ese modelo tiene comparadores la verdad. En fin solo eran ideas para exprimir el PIC un poquito más. EDITO: bueno retiro lo dicho ya que no vi que 16BITS había publicado... y yo también me quedo a la espera de ver el proyecto montado Un saludo!
|
|
« Última modificación: 19 Febrero 2014, 00:00 am por xiruko »
|
En línea
|
|
|
|
Meta
|
|
Re:
« Respuesta #26 en: 19 Febrero 2014, 00:26 am » |
|
Me gustaría que me pasaras tu cuenta de PayPal para apoyarte por apoyarme compañero
Enviado desde mi XT1032 mediante Tapatalk
Hola campeón: He tardado en hacerlo porque tuve que mirar los libros viejos para recordar ciertas cosas del asm, ejejjejeej. Al final, el circuito funciona. Gracias a los apoyos, puedomos conseguir recursos que la gente me pidan para hacer proyectos de este tipo y más complejos, incluido tutoriales. No esperaba una donación tan pronto para este año y es de agradecer. El enlace está en el botón pequeño de donar, abajo. http://electronica-pic.blogspot.com.es/2010/11/dona-y-ayudas-para-futuros-proyectos.htmlPuede comentar cualquier cosa para el futuro. Ahhhhh, adaptaré para otros PIC similares del 16F84A para que la gente tenga más opción de montarlo si no encuentra el indicado. 16F27A/628A/648A, 16F87/88 y 16F886. Si una persona no encuentra uno en su tienda habitual, encuentra otro. Lo publicaré en el Blog las actuallizaciones. Gracias de nuevo por seguir adelante con el proyecto sin que te canses. Me di cuenta que este tema, tiene muchos visitantes. Meta yo soy más de programación de PICs en C y toco poco de ASM, y me quedé impresionado del trabajo que hiciste sin llevarte nada a cambio a parte de las gracias. Espero que el usuario se moleste en hacer unas fotos y un vídeo una vez lo tenga montado...Una posible mejora sería añadir control del motor por PWM para moderar la velocidad de giro a la que se asa la carne, aunque no sé si sería útil o es mejor hacerlo a una velocidad constante. Otra sería añadir protección contra sobrecorriente del motor y así evitar quemarlo en el caso de que hubiera algún fallo. Se podría hacer fácilmente con un comparador e interrupciones, aunque no sé si ese modelo tiene comparadores la verdad. En fin solo eran ideas para exprimir el PIC un poquito más. EDITO: bueno retiro lo dicho ya que no vi que 16BITS había publicado... y yo también me quedo a la espera de ver el proyecto montado Un saludo! Hola Xiruko: El C me estaba metiendo hace poco con CCS, ahora me dio por Arduino. Estoy aprendiendo y me queda mucho, ejejjejeje. El que sepa hacer este proyecto en C, es bienvenido, pruebo el código, hago pruebas en mi casa haber si sirve realmente que no sea simuladores, y lo subo al Blog si lo desean. Le animo que muestre fotos y vídeos del proyecto si lo desea. Siento curiosidad, de todas maneras, en estos momentos, estoy adaptando el PIC16F84A al PIC16F88 porque es el que tengo ahora en este mismo momento. En cuanto a exprimir el PIC un poquito más, más bien sería con el 16F88 que tiene más funciones. En cuanto a PWM, como es velocidad constante, no hace falta. Por cierto, se me olvidó poner el esquema, el condensador de protección del motor en paralelo. Lo actualizaré cuando pueda. Gracias por la sugerencia, gracias por seguir leyendo y aún así, me sorprende que en 5 días haya muchos visitante por este tema.
|
|
« Última modificación: 19 Febrero 2014, 00:51 am por Meta »
|
En línea
|
|
|
|
16BITS
Desconectado
Mensajes: 14
|
Muchas Gracias, Una PRegunta en que programa puedo montar la programacion para montarlo al pic :C
Ya Aporte Mi Donacion!
|
|
|
En línea
|
|
|
|
Meta
|
Hola: El MPLAP X lo puedes descargar en cualquier Sistema Operativo Windows, Linux y Mac en este enlace. Te viene con asm incluido. No olvidar que MPLAB X es un IDE. Descarga directa pinchando aquí:Windows: MPLAB X v2.00 - DESCARGAR. Linux: MPLAB X v2.00 - DESCARGAR. Mac: MPLAB X v2.00 - DESCARGAR. Muchos ánimos. Edito:He recibido donación para apoyar Blog. Muchísimas gracias y a los demás también por las sugerencias.
|
|
« Última modificación: 19 Febrero 2014, 09:40 am por Meta »
|
En línea
|
|
|
|
Meta
|
Hola de nuevo: Dejo el esquema mejorado, ya que se ha incorporado un condensador en el L293D y en el propio motor. Lista de componentes:Resistencias: R1, R2, R3, R4, R5 = 10 K - 1/4W. R7, R8, R9 = 330 Ohm - 1/4 W. R6 = 100 Ohm - 1/4 W.
Condensadores: C1, C2 = 22 pF / 6V C3,C5 = 100 nF / 6V C4 = 250 n / 16V
Diodos: D1, D2, D3 = Led de 3 ó 5 mm color rojo, verde o naranja. 2V/25 mA.
Oscilador de cuarzo: X1 = 4 MHz
Circuitos integrados: IC1 = PIC16F84A-04 IC2 = L293D
Otros componentes: Z1 = Zócalo de 18 pines. Z2 = Zócalo de 16 pines. M1 = Motor DC 12 V. 5 micropulsadores. Cosas que debes tener en cuenta. Si es la misma fuente alimenteción de los 5V y 12V, no le pasará nada. Si son de fuentes diferenes conectado a la misma masa, no funcionará. Código más optimizado y corregido. ; ZONA DE DATOS ********************************************************************** LIST P=16F84A ; Procesador. INCLUDE <P16F84A.INC> ; Definición de las etiquetas del PIC. __CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC __IDlOCS 0001 ; Versión del programa. Variables UDATA_SHR 0x0C RAM RES 1 RAM_1 RES 1 RAM_2 RES 1 RAM_3 RES 1 RAM_4 RES 1 RAM_5 RES 1 RAM_6 RES 1 RAM_7 RES 1 RAM_8 RES 1 RAM_9 RES 1 RAM_10 RES 1 RAM_11 RES 1 RAM_12 RES 1 RAM_13 RES 1 RAM_14 RES 1 RAM_15 RES 1 RAM_16 RES 1 RAM_17 RES 1 #DEFINE Pulsador_1 PORTA,4 ; Pulsador conectado a RA4. #DEFINE Pulsador_2 PORTA,3 ; Pulsador conectado a RA3. #DEFINE Pulsador_3 PORTA,2 ; Pulsador conectado a RA2. #DEFINE Pul_STOP PORTA,1 ; Pulsador de parada del motor. #DEFINE Motor PORTB,7 ; Línea donde se conecta el motor. #DEFINE Led_1 PORTB,6 ; Led 1. #DEFINE Led_2 PORTB,5 ; Led 2. #DEFINE Led_3 PORTB,4 ; Led 3. ; ZONA DE CÓDIGOS ******************************************************************** ORG 0 ; El programa comienza en la dirección 0. Inicio bsf STATUS,RP0 ; Acceso al Banco 1. bsf Pulsador_1 ; La línea RA4 se configura como entrada. bsf Pulsador_2 ; La línea RA3 se configura como entrada. bsf Pulsador_3 ; La línea RA2 se configura como entrada. bsf Pul_STOP ; La línea RA1 se configura como entrada. bcf Motor ; Se configura como salida. bcf Led_1 ; Led de aviso 5 minutos en activo. bcf Led_2 ; Led de aviso 10 minutos en activo. bcf Led_3 ; Led de aviso 20 minutos en activo. bcf STATUS,RP0 ; Acceso al Banco 0. bcf Motor ; En principio Motor apagado igual bcf Led_1 ; que los Leds. bcf Led_2 bcf Led_3 Principal btfsc Pulsador_1 ; ¿Pulsador presionado?, ¿(Pulsador)=0? goto Fin ; No. Vuelve a leerlo. call Retardo20ms ; Espera que se estabilicen los niveles de tensión. btfsc Pulsador_1 ; Comprueba si es un rebote. goto Fin ; Era un rebote y sale fuera. bsf Motor ; Activa el motor y bsf Led_1 ; enciende el Led 1 que significa call Retardo5m ; los 5 minutos encendido. bcf Motor ; Apaga el motor y bcf Led_1 ; el Led 1. EsperaDejePulsar_1 btfss Pulsador_1 ; ¿Dejó de pulsar?. ¿(Pulsador)=1? goto EsperaDejePulsar_1 ; No. Espera que deje de pulsar. Fin btfsc Pulsador_2 ; ¿Pulsador presionado?, ¿(Pulsador)=0? goto Fin2 ; No. Vuelve a leerlo. call Retardo20ms ; Espera que se estabilicen los niveles de tensión. btfsc Pulsador_2 ; Comprueba si es un rebote. goto Fin2 ; Era un rebote y sale fuera. bsf Motor ; Activa el motor y bsf Led_2 ; enciende el Led 2 que significa call Retardo10m ; los 10 minutos encendido. bcf Motor ; Apaga el motor y bcf Led_2 ; el Led 2. EsperaDejePulsar_2 btfss Pulsador_2 ; ¿Dejó de pulsar?. ¿(Pulsador)=1? goto EsperaDejePulsar_2 ; No. Espera que deje de pulsar. Fin2 btfsc Pulsador_3 ; ¿Pulsador presionado?, ¿(Pulsador)=0? goto Fin3 ; No. Vuelve a leerlo. call Retardo20ms ; Espera que se estabilicen los niveles de tensión. btfsc Pulsador_3 ; Comprueba si es un rebote. goto Fin3 ; Era un rebote y sale fuera. bsf Motor ; Activa el motor y bsf Led_3 ; enciende el Led 3 que significa call Retardo20m ; los 10 minutos encendido. bcf Motor ; Apaga el motor y bcf Led_3 ; el Led 3. EsperaDejePulsar_3 btfss Pulsador_3 ; ¿Dejó de pulsar?. ¿(Pulsador)=1? goto EsperaDejePulsar_3 ; No. Espera que deje de pulsar. Fin3 goto Principal ; Subrutinas **************************************************************** Retardo20ms ;199993 cycles movlw 0x3E movwf RAM_8 movlw 0x9D movwf RAM_9 Retardo20ms_0 decfsz RAM_8, f goto $+2 decfsz RAM_9, f goto Retardo20ms_0 ;3 cycles goto $+1 nop ;4 cycles (including call) return Retardo5m ;299999995 cycles movlw 0x54 movwf RAM_10 movlw 0xA1 movwf RAM_11 movlw 0xFD movwf RAM_12 movlw 0x02 movwf RAM_13 Retardo5m_0 decfsz RAM_10, f goto $+2 decfsz RAM_11, f goto $+2 decfsz RAM_12, f goto $+2 decfsz RAM_13, f goto Retardo5m_0 ;1 cycle nop ;4 cycles (including call) return Retardo10m ;599999992 cycles movlw 0xA9 movwf RAM_4 movlw 0x41 movwf RAM_5 movlw 0xFA movwf RAM_6 movlw 0x04 movwf RAM_7 Retardo10m_0 decfsz RAM_4, f goto $+2 decfsz RAM_5, f goto $+2 decfsz RAM_6, f goto $+2 decfsz RAM_7, f goto Retardo10m_0 ;4 cycles goto $+1 goto $+1 ;4 cycles (including call) return Retardo20m ;1199999995 cycles movlw 0x54 movwf RAM_14 movlw 0x82 movwf RAM_15 movlw 0xF3 movwf RAM_16 movlw 0x08 movwf RAM_17 Retardo20m_0 decfsz RAM_14, f goto $+2 decfsz RAM_15, f goto $+2 decfsz RAM_16, f goto $+2 decfsz RAM_17, f goto Retardo20m_0 ;1 cycle nop ;4 cycles (including call) return END
Si quieres una sugerencia más, añado dos salidas, por si pones un altavoz o un zumbador piezoeléctrico. Cuando termine el tiempo, a parte de apagarse el motor, suena un pitido como el microondas. Ya me dirás si te interesa, lo programo ingernamente, aunque físicamente no lo vayas a usar, si en el futuro decides ponerlo, solo es ponerlo, ya que la programación está hecha. Ya me dirás la respuesta. Sigo mejorando si puedo por si acaso... Muchas gracias de nuevo. Edito:Ya he sacado otro código con ayuda de amigos bajo el timer 0. Te podrás ahorrar el pulsador y las resistencias del RESET. La nueva función funciiona tal como la querías desde el principio. Por ejemplo: Si has pulsado el pulsador P2 de 10 minutos, mientras sigue el motor encendido, pulso cualquier pulsador, por ejeplo, el P1 de 5 minutos, ahora el temporizador empezará desce 0 y cuenta los 5 minutos. También tiene la posibilidad de pulsar el botón de Stop en cualquier momento, se detiene el proceso, puedes interrumpir el proceso y sin resetear el PIC. Si al final lo quieres así, me avisas, preparo el código mejor para que se entienda. Edito 2:A parte del nuevo código de asm, también tengo el de C bajo XC8. Lo subiré después de revisarlos. Saludo.
|
|
« Última modificación: 19 Febrero 2014, 23:20 pm por Meta »
|
En línea
|
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
AYUDA CON PROYECTO!!!!
Electrónica
|
carcepower
|
2
|
3,079
|
10 Marzo 2006, 12:33 pm
por plomo17
|
|
|
Ayuda con un Proyecto !!!!!!!!!
« 1 2 »
Programación Visual Basic
|
VirucKingX
|
10
|
4,321
|
26 Abril 2006, 04:04 am
por VirucKingX
|
|
|
ayuda con proyecto
Programación Visual Basic
|
claudio145
|
4
|
1,929
|
31 Agosto 2007, 01:19 am
por cark
|
|
|
Ayuda con un proyecto
« 1 2 3 4 »
Programación Visual Basic
|
lord manson
|
38
|
12,607
|
19 Julio 2008, 14:49 pm
por lord manson
|
|
|
Ayuda CON mi proyecto
« 1 2 »
Programación Visual Basic
|
blood_brother
|
11
|
5,486
|
23 Agosto 2009, 18:29 pm
por seba123neo
|
|