Equipos de iluminacion (efectos, roboticas, algo de dmx, y mucho DIY)

Deltaeco · Jun 5, 2012

gracias fernandoae , voy a ver el post completo pero poco a poco porque ahorita llevamos 100 paginas amigo.. y parece una broma pero leer 100 paginas es media hora y apuradas jajaja

saludos chicos!

fernandoae · Jun 5, 2012

Mas de media hora! es mucho, igual ahi hable con andres cuenca para ver si me envia todo el contenido de este tema con adjuntos y todo para hacer una web y organizar las cosas por categorias, etc.

Deltaeco · Jun 5, 2012

fernandoae dijo:

Ok compañero, si porque cuando el post es pequeño, de 10 a 20 paginas es mas o menos coherente poderlo leer y demás, pero cuando se extiende y se sacan tantas conclusiones nos liamos mucho XDD

Un saludo ¡

djwash · Jun 5, 2012

Lo malo de los led de 10mm 20mA es que la luz que emiten no es muy nitida, ya que la forma del encapsulado no es perfecta como la de los de 5mm, es como que la punta esta algo deformada, al menos son asi los que se consiguen aca.

Tambien hay que tener en cuenta que tienen exactamente el mismo diodo que los de 5mm, son la misma porqueria, pero con encapsulado mas grande, y para armar placas del tipo Revo Roll y otras como las que he subido ocupan mucho espacio, necesitarias una placa 4 veces mas grande, y una lupa tambien 4 veces mas grande, lo cual es un desproposito, en definitiva no sirven para maquinas con lupa.

Los de 10mm de 825000mcd andan bien, pero tambien sirven mas para bañadores o parXX.

fernandoae · Jun 5, 2012

Ahh vos dijiste 10mm!!!!! mi cabeza habia interpretado 5mm

Deltaeco · Jun 6, 2012

Buenos días chicos. DJWash, a que te refieres con lo de ''bañadores o parXX.'' no se lo que es, un saludo ¡¡

djwash · Jun 6, 2012

Deltaeco dijo:

Bañadores led con cosas como estas, hay de otros modelos tambien.

Y tachos PAR son los tachos que se usan para iluminar o ambientar, vienen con lampara halogena y ahora con LED.

Saludos.

Deltaeco · Jun 6, 2012

Perfecto , muchas gracias por tu explicación amigo , me acabas de dar una idea con los bañadores, ya se donde gastar los led rítmicos rgb jajaja.

saludos ¡¡

fernandoae · Jun 6, 2012

jsfh2000 si no me equivoco en esta parte esta la direccion inicial:

;dmx1.mbas,200 :: while TRUE
L__main69:
;dmx1.mbas,201 :: adres = 1
MOVLW 1
MOVWF _adres+0
CLRF _adres+1
GOTO L__main69
;dmx1.mbas,204 :: wend
GOTO $+0
; end of _main

Igual estaria bueno que el autor publique el código fuente, que si no me equivoco es en MIkrobasic.

jfsh2000 · Jun 8, 2012

Hola amigo Fernandoae

el codigo original es el siguiente ya intente cambiar el valor de adres a 10 y solo funcionas del 10 al 16 se anulan los dos últimos canales y si se coloca una dirección mas alta no funciona.

De antemano muchas gracias

Código:

  program DMX
'
'  DMX 9 Channel PWM
'
'  PIC 16F628A @20MHz
'
'  Mardaso 2008
'

Const aantalkanalen as byte=9
Dim ch_count, offset, i, j, adres as Integer
Dim dat as byte[aantalkanalen]
Dim startcode, nutteloos, brk, led0, led1, led2, led3, led4, led5, led6, led7, led8 as byte
Dim counter as word

Sub procedure init_usart
    SPBRG = 0x04
    TXSTA.BRGH = 1

    TXSTA.SYNC = 0
    PIE1=0
    PIE1.RCIE = 1
    RCSTA.RX9 = 1

    nutteloos=RCREG
    nutteloos=RCREG
    nutteloos=RCREG

    RCSTA.CREN = 1
    RCSTA.SPEN = 1
    INTCON.PEIE=1
    INTCON.GIE=1
End sub


sub procedure init_timer0
  counter = 0            ' Initialize counter
  INTCON=0
  TMR0 = 160             ' load value TMR0
  INTCON.GIE=1
  INTCON.T0IE=1         ' Enable TMRO interrupt
  INTCON.T0IF=0
end sub


Sub procedure interrupt
  if INTCON.T0IF=1 then
      inc(counter)          ' Increment value of counter on every cycle
      If counter <= led0 then
         portb.4 = 1
      else
         portb.4 = 0
      end if
      If counter <= led1 then
         portb.5 = 1
      else
         portb.5 = 0
      end if
      If counter <= led2 then
         portb.6 = 1
      else
         portb.6 = 0
      end if
      If counter <= led3 then
         portb.7 = 1
      else
         portb.7 = 0
      end if
      If counter <= led4 then
         porta.0 = 1
      else
         porta.0 = 0
      end if
      If counter <= led5 then
         porta.1 = 1
      else
         porta.1 = 0
      end if
        If counter <= led6 then
         porta.2 = 1
      else
         porta.2 = 0
      end if
      If counter <= led7 then
         porta.3 = 1
      else
         porta.3 = 0
      end if
      If counter <= led8 then
         porta.4 = 1
      else
         porta.4 = 0
      end if

      if counter = 255 then ' if counter is 255, then reset counter
        counter = 0
        ' To prevent clitches load the data at the end of the pwm cyclus
        led0 = dat[0]
        led1 = dat[1]
        led2 = dat[2]
        led3 = dat[3]
        led4 = dat[4]
        led5 = dat[5]
        led6 = dat[6]
        led7 = dat[7]
        led8 = dat[8]
      end if
      TMR0   = 160          ' load value TMR0
      INTCON.T0IE=1         ' Enable TMRO interrupt
      INTCON.T0IF=0
      portb.3=0
  end if
  'Uart interrupt routine
  if PIR1.RCIF=1 then
    portb.3=1
    if (RCSTA.OERR) then
       RCSTA.SPEN=0
       RCSTA.SPEN=1
       nutteloos=RCREG
       nutteloos=RCREG
       nutteloos=RCREG
       RCSTA.CREN=0
       RCSTA.CREN=1
       ch_count=0
       brk=0
    else
       if (RCSTA.FERR) then
          nutteloos=RCREG
          ch_count=0
          offset=0
          brk=0xFF
       else
          if (brk = 0xFF) then
             if (ch_count=0) then
                startcode=RCREG
             else
                 if (adres<1)  then
                    nutteloos = RCREG
                    for j=0  to aantalkanalen-1
                        dat[j]=0
                    next j
                  else
                     ' ------------------------------ Hier adres controleren en evt. uitlezen
                     if (ch_count >= adres) and (ch_count < (adres + aantalkanalen)) and (startcode = 0) then
                        dat[offset] = RCREG
                        offset= offset + 1
                     else
                        nutteloos = RCREG
                     end if
                    ' ------------------------------
                 end if
             end if
             ch_count = ch_count + 1
          else
              nutteloos = RCREG
              ch_count = 0
          end if
       end if
      end if
    PIR1.RCIF=0
    end if
end sub


main:
  TRISA = 0xE0              ' PORTA is output
  PORTA = 0x00              ' Initialize PORTA
  TRISB = 0x02              ' PORTB is output
  PORTB = 0x00              ' Initialize PORTB
  CMCON = 0x07              ' comperators off
  OPTION_REG = $80          ' Assign prescaler to TMR0
 '
 ' Option register
 ' bit <2:0>     | Timer0 prescaler Rate
 '---------------------------------------
 '      000      |         1:2
 '      001      |         1:4
 '      010      |         1:8
 '      011      |         1:16
 '      100      |         1:32
 '      101      |         1:64
 '      110      |         1:128
 '      111      |         1:256
 '---------------------------------------

  PORTB.0 = 0                 ' Set SN75176 to recieve data
  PORTB.3 = 1
  ch_count=0
  brk=0

  for j=0 to aantalkanalen-1
     dat[j] = 0
  next j

init_timer0
init_usart

  counter = 0            ' Initialize counter

  while TRUE
      adres = 1
    '

   wend
end.

es el código del amigo Gervit
solo requiero de su ayuda para modifica las direcciones dmx Para que funcione con otras direcciones ya que actualmente funciona solo con los primeros 8 canales este fue publicado en el mensaje #1163 el autor es el amigo gervit.

saludos a todos
de antemano muchas gracias por su apoyo amigos saludos

[/QUOTE]

RORO · Jul 27, 2012

djwash dijo:

serias tan amable de subir el pdf del pcb circular , te felicito por tu trabajo

gracias

fernandoae · Jul 28, 2012

La verdad que esta medio quedado el tema, pero bueno

Aca les paso un esquemita de una fuente de corriente constante switching sencilla, con componentes fáciles de conseguir... ideal para alimentar leds de potencia, no requiere disipador como las basadas en el LM317

endryc1 · Jul 31, 2012

Saludos para todos, les tengo una pregunta. estoy probando con una 555 y dos 4017 para hacer un juego de luces led, pero tengo una duda. ¿cual es la mejor manera de lograr el mayor brillo posible sin quemar los led? lei algo de pulsos a 10uS a 10khz o algo asi, si alguien me puede ayudar lo agradecere mucho, gracias desde cubita la bella

fernandoae · Jul 31, 2012

Lo que podes hacer para obtener mas brillo es usar la técnica de los pulsos que comenté mas arriba, habria que ver como aplicarlo a tu sistema de leds solamente, cuando puedas subi el esquema y lo vemos, saludos!

endryc1 · 2012-08-01T09:12:13-0500

fernandoae, gracias por responder, me puedes explicar bien lo de los pulsos para probarlo en el protoboard antes de meter mano al PCB

fernandoae ya encontre lo que posteaste, voy a hacer un diagrama y lo subo para ver si entendi la idea, si estas por ahi revisa en un rato para que lo veas

ahi va el esquema nooo definitivo, solo para ver si entendi la idea, esperate que tengo que investigar como subir la imagen

fernandoae, gracias por responder, me puedes explicar bien lo de los pulsos para probarlo en el protoboard antes de meter mano al PCB

fernandoae ya encontre lo que posteaste, voy a hacer un diagrama y lo subo para ver si entendi la idea, si estas por ahi revisa en un rato para que lo veas

ahi va el esquema nooo definitivo, solo para ver si entendi la idea, esperate que tengo que investigar como subir la imagen

aqui pongo otra version que creo es la correcta

endryc1 · 2012-08-01T11:44:26-0500

bueno hablando de luces tambien, tengo en la casa un tubo de xenon de 1500w y vi un esquema de un flasheo de 1500w paginas atras, la pregunta es. ¿alguien lo probo ya?

fernandoae · 2012-08-01T22:55:36-0500

Esta es la forma correcta de hacerlo, es mas facil y preciso dar el ancho de pulso con un 4017

hay un transistor que es comun a todos los leds, y despues va uno por cada led.. se entiende mas o menos el esquemita?

endryc1 · 2012-08-02T07:34:31-0500

fijate a ver si entendi

fernandoae · 2012-08-02T10:46:18-0500

No entendisteee jaja :cabezon:

... Ahi donde marcaste vos van las salidas de tu secuenciador con 4017... o sea de ahi manejas el encendido y apagado de los leds. Lo que hace el 4017 que puse en el esquema es hacer que los pulsos tengan una duracion del 10% del tiempo total...

y donde dice 555 clock tenes que hacer un generador de pulsos con un 555.. no importa mucho la frecuencia, tiene que ser de 1khz o mas

endryc1 · 2012-08-02T11:45:59-0500

compa ahora siiii entenndiiiii

, graciassss mil, hoy pruebo y despues te digo como anda el proyecto. gracias de nuevooo

Iniciado por	Temas similares	Foro	Respuestas	Fecha
	Reiniciar contador de equipo de medicina	Dudas en general	1	Hoy a las 10:13 AM
M	Equipo de sonido Lg mct703-aou no prende.	Reparación de equipos de Audio	4	Abr 12, 2018
J	Duda con Fuente alimentación para equipo de Ozono	Diseño de circuitos en general	4	Abr 4, 2018
M	Equipo sonido Aiwa DBX-DS11	Reparación de equipos de Audio	0	Mar 30, 2018
M	Equipos de iluminacion para discotecas	Diseño de circuitos en general	10	Feb 13, 2007

Equipos de iluminacion (efectos, roboticas, algo de dmx, y mucho DIY)

Deltaeco

fernandoae

Deltaeco

djwash

fernandoae

Deltaeco

djwash

Deltaeco

fernandoae

jfsh2000

RORO

fernandoae

Adjuntos

endryc1

fernandoae

endryc1

Adjuntos

endryc1

fernandoae

Adjuntos

endryc1

Adjuntos

fernandoae

endryc1

Temas similares