Mensajes

Holas:

El proyecto sigue en pie, probando bajo PIC16F88 con un motor de 5Vdc, para los lectores les dejo un montaje de prototipo.



Gracias por visitar.

Hola:

Esquema electrónico, diagrama de flujo, en qué consiste.

Para que en manejar display de 7 segmentos, en este caso.

Saludo

Hola:

Al menos di que es Arduino, la gente no es adivina. Lo se porque esstoy metido en ello.

Creal al menos un esquema para saber de que va. Piedes simplificar código, parace que está muy bien estructurado.

Saludo.

Hola:

Hay comumentación por internet para aprneder PIC, sobre todo buenos libros. No se aprende en dos días.

Saludos.

Hola:

Nuevo esquema. Se incluye un pequeño altavoz como los que usan los ordenadores o PC viejos o un zumbador piezo eléctrico. A pesar de que funcioinan los dos al mismo tiempo, a la hora de montar el circuito, decidirás mmontar físicamente un altavoz o un zumbador. El zumbador te puede dejar zumbado y funciona 5V directamente. El altavoz requiere un trasistor y una resistencia. Es tu elección final.



Estoy con el programa nuevo para adaptor los códigos del altavoz y zumbador.


Programando y haciendo un tutorial sobre el MPLAB con Word. Esto es trabajo de horas y como comprenderás, tardaré en publicarlo. Te daré el aviso cuando lo acabe.

Saludo.

Edito:
Hecho un minitutorial en pdf.
https://drive.google.com/file/d/0B6HKwsbbpgrLQTBUckNaUTMzYUU/edit?usp=sharing

Saludo.

[Lista de componentes:]

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.

Código (asm) [Seleccionar] Expandir

; 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.

[Descarga directa pinchando aquí:]

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.

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.html

Puede 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.

[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.]

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:

Código (asm) [Seleccionar] Expandir


; 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...

[Lista de componentes para el segundo esquema:]

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.