Dimmer 220v/60Hz - 16F84A

[MisterCarlitos]

Hola a Todos .. bueno!! estoy haciendo un Dimmer pero no consigo detectar el paso por cero.. e visto inumerables circuitos de detecion, ya que e decidido no usar, bueno..  e visto el dimmer del Señor Nocturno  .. jeje bueno si que me dejo impresionado. pero quiero obiarme tambien el transformador, tambien e visto una resistencia en el orden de los X - Megahomios, que se conecta directamente a una de las lineas de red.. y va directo a un pin de un pic.. quisisera a ver si alguno de ustedes puede saber como calcular esa resistencia... y si tienen una rutina si pudiera en ASM para detectar esa onda que se genera y entra al pin del pic  (yo lo estoy haciendo en la RA2), ya que no logro hacer que lo detecte.. se los agradeceria mucho.. bueno el circuito que estoy usando es el siguiente:

en ese caso le puse una resistencia de 1 Mohm..  =P   pero no funciono..
bueno por la Rb2 sale al optoacoplador estoy usando un MOC3021 y un triack BT136  pero en la imagen puse un led
para mas o menos ver la patita pero se supone que es la que dispara no ..?? j

bueno solo necesito la deteccion del paso por cero.. aver si alguien a tenido una esperiencia con esta deteccion y si me podria ayudar.. se lo agradeceria mucho!!    saludos a todos

[Nocturno]

La clave está en meter esa señal senoidal por un pin Schmitt Trigguer. Con una resistencia de 1M conectada a RA4 deberías poder hacerlo sin problemas.

[Rulo]

     En este hilo habia un documento donde se veia como calcular la resistencia y me parece traia un ejemplo en ASM, pero ya no esta mas 

http://www.todopic.com.ar/foros/index.php?topic=11472.0

                ahora no puedo, pero si alguien mas lo tiene y lo sube antes bien, si no mañana lo pongo por aca.


            un Saludo.

[MisterCarlitos]

Gracias por las respuestas..  Señor Nocturno  Entonces... Cambiaré el pin al Ra4 y como seria la onda que entre a ese pin???
que amplitudes entria?? y mas o menos expliqueme como seria la captura de ese paso cero.. se lo agradeceria mucho..

y Rulo tambien contigo me uno al llamado de dicho archivo.. porfavor si alguien lo tiene que lo cuelgue.. seria muy grato!!
ya que quiero aprender a detectar ese paso por cero que ya me tiene loco!! 

[Nocturno]

Aunque la onda que entra es senoidal, el PIC en ese pin no tiene conversor ADC, por lo que sólo leerás un 0 en el semiciclo negativo y un 1 en el positivo.

[MisterCarlitos]

Bueno
 entonces seria una onda cuadrada la que entra por el pin del Ra4 detectaria la onda cuadrada  .. comienzo con la deteccion del Cero ... espero el tiempo X (dado por el pulsador), activo el triac, y espero el cambio a 1, Desactivo el Triac espero el tiempo X denuevo, activo el triac y espero el Paso por cero.. y asi sucesivamente... estaria bien asi??

(preguntaria cada instante el estado del pin RA4)

aqui tambien adjunto las imagenes de una conexion AC de 120V /60Hz  de un AN521 que encontre.

Bueno, ya que me dijiste que entra un cero y un uno la imagen de la señal de entrada puede ser util para otrsa cosas 

ahora la conexio que hacen en el pin RA0 , parecida al RA4 del 16F84 ahi se nota que le ponen un diodo para igualar a una de las entradas normales o estoy mal.
(conectare directamente la resistencia de 1 M directamente al pin RA4)
ahi esta la imagen:

[MisterCarlitos]

Bueno.. Segun mi imaginacion seria la onda asi:

Bueno como la entrada en la RA4 sera como la linea verde mas o menos hice un programita asi aver corrijanlo si esque estoy mal:


;************Rutina de deteccion de flanco alto (detecta1) y rutina de deteccion de flanco bajo (detecta2)
detecta1
bucle

       btfsc  porta,4
       return
       goto bucle

detecta2
bucle1

      btfss  porta,4
      return
      goto bucle1
;***********************************************



este es mi Disparo del Triac:

;**********Rutina de disparo del triac por el RB2*************

envio

call  detecta1      ;detecta el flanco alto (el 1 del RA4)
bsf  portb,2         ;dispara el Triac
call  tiempot        ; llama a un tiempo total  designado por cualquiera de los pulsadores (esta en la Parte Positiva de la senoidal)
bcf  portb,2         ; deja de disparar el Triac
call  detecta2      ; Detecta el Flanco bajo (el 0 del RA4)
bsf  portb,2         ; dispara nuevamente el Triac
call  tiempot        ;Vuelve a llamar el mismo tiempo en la zona negativa senoidal
bcf  portb,2         ; dejo de disparar el triac

btfsc  porta,0      ;reviso mi boton UP
call  up
btfsc  porta,1      ;reviso mi boton Down
call  down
goto envio          ; y entro a un bucle mientras no se presione ningun boton


La imagen de la rutina envio seria la Siguiente:

jeje disculpen la perfeccion de la onda senoidal.. esque me temblaba la mano 

algunas correciones aver si me equivoque en algo se los agradecaria

[todopic]

Hola Mister Carlitos, veo que disparas el triac y lueego haces la demora,  eso te dispararia al 100%
lo que tienes que hacer, es, luego de detectar el cruce por cero, realizar la demora, y luego disparar (para retrasar el angulo de disparo)
el retardo no podra ser mayor que medio periodo

Norberto

[MisterCarlitos]

Hola TodoPic   gracias por tu respuesta ... mmm bueno eso del disparo al 100 % no lo sabia bueno entonces cambiare codigo, buneo no es muy dificil.. ahora con eso de que el dipsparo siempre tendra que ser menor de medio periodo no lo entendi..  podrias explicarme un poco mas?? seria chevere!!

[MisterCarlitos]

jejejeje en que estaba pensando!!!  oh si entendi lo del medio periodo perdon por esa respuesta anterior......
pues si tiene que ser menor a medio periodo, bueno como se lee en el codigo supuestamente detecto el alto y disparo... pasa el tiempo y apago al a proxima deteccion..., (ahi es medio periodo), luego se repite para la negativa..
bueno el cambio seria:

detecto el 1 en RB4 , llamo al tiempot.. luego disparo el triac (asi como me dijiste), luego detecto el 0 (ahi termino el medio periodo y estoy entrando en la parte negativa) apago el triac..... llamo al tiempot , luego disparo nuevamente el triac (en la parte negativa), ... espero el 1(de la parte negativa y ahi finaliza un periodo) .....lo apago .. y luego comienza en trajin denuevo...!!!


ahora esta bien la deteccion del paso por cero???

[todopic]

Hola, recuerda que el triac, si no tiene corriente de compuerta, se "apaga" solo al pasar por cero... asi que con solo mandarle un pequeño pulso, seria suficiente ok?
otra seria ponerle un bcf en cada  la subrutina de busqueda de flanco 

me voy a comerrrrr 

Norberto

[MisterCarlitos]

Buena Todopic esa de la del triac no la sabia...!!! jejeje y si voy a tratar con ese bcf .... gracias por la respuesta y buen probecho Saludos!!

[KALLITOS]

Paisa date una leida a esto y date una vueltita por aqui

Saludos

[MisterCarlitos]

Hola Kallitos   Gracias por los links.. en el primero ya me apunte.. y el segundo esta de la PTM ... es lo que estubieron diciendo Sr. Nocturno  y  TodoPic muy bueno por ciero te pasaste!!!

[MisterCarlitos]

   List   p=16f84a
      #include <p16f84a.inc>
      radix   hex
      
   
status   equ   0x03
porta   equ   0x05
portb   equ   0x06
f      equ   1
w      equ   0
#define   banco1   bsf   status,5
#define   banco0   bcf   status,5
PDel0   equ   0x3c
PDel1   equ   0x3e
PDe20   equ   0x54
PDe21   equ   0x56
valormax   equ   0x3f
valormin   equ   0x40
calculo      equ   0x41
decrement   equ   0x42
evento   equ   0x44

   org   0x00
   goto inicio
   org 0x04
   org 0x05

inicio
   banco1
   movlw   0x1f
   movwf   porta
   movlw   0x00
   movwf   portb
   banco0

   movlw   d'13'
   movwf   valormax
   movlw   0x00
   movwf   valormin
   movlw   0x00
   movwf   portb
   movwf   calculo

inicio1

   btfsc   porta,0
   goto UP
   btfsc   porta,1
   goto DOWN
   call   envio
   goto inicio1

UP
   
   movf   valormax,0
   xorwf   calculo,0
   btfsc   status,2
   goto    iguala13

   incf   calculo,1
   movf   valormax,0
   subwf   calculo,0
   btfss   status,0
   goto   MenorMayor
   
   

MenorMayor

   movf   calculo,0
   movwf   decrement
   call   envio
   goto inicio1


iguala13

   bcf      portb,2
   btfsc   porta,1
   goto    DOWN
   goto    iguala13


   
DOWN

   movf   valormin,0
   xorwf   calculo,0
   btfsc   status,2
   goto    iguala0

   decf   calculo,1
   movf   calculo,0
   subwf   valormin,0
   btfss   status,0
   goto   MenorMayor
      

iguala0

   bsf      portb,2
   btfsc   porta,0
   goto    UP
   goto    iguala0
   
envio

   call   detecta1
   call   tiempoT
   bsf      portb,2
   bcf      portb,2
   call   detecta2
   call   tiempoT
   bsf      portb,2
   bcf      portb,2
   btfsc   porta,0
   call   UP
   btfsc   porta,1
   call   DOWN
   goto    envio


tiempoT
   movf   valormin,0
   xorwf   calculo,0
   btfsc   status,2
   goto    iguala0
   
   movf   calculo,0
   movwf   evento
denuevo
      call   retardo
      decfsz   evento,1
      goto denuevo
      return


retardo
      movlw     .158      ; 1 set numero de repeticion
        movwf     PDel0     ; 1 |
PLoop0  clrwdt              ; 1 clear watchdog
        decfsz    PDel0, 1  ; 1 + (1) es el tiempo 0  ?
        goto      PLoop0    ; 2 no, loop
        clrwdt              ; 1 ciclo delay
        return              ; 2+2 Fin.


detecta1
bucle
   btfsc   porta,4
   return
   goto    bucle


detecta2
bucle1
   btfss   porta,4
   return
   goto    bucle1

   end

este es mi programa del pic no me funciona creo que algo esta mal siempre que lo enchufo el pco siempre se queda prendido.. pareciera que no lee los pulsadores


aver si me ayudan en con el codigo!!!