TODOPIC
Mecatrónica => DMX512 - Diseños y Proyectos => Mensaje iniciado por: stk500 en 22 de Enero de 2012, 17:04:31
-
Hoy acabo de terminar uno mas de mi proyectos y aqui se lo pongo.
Se trata de controlar 4 Canales DMX512, aqui uso el Atmega8 que tiene 6 canales ADC, osea que se puede con ese micro hasta 6 canales, tengo previsto hacer 16 canales para un cliente y este es un prototipo de prueba, esta previsto usar pulsador para Efecto Estrobo,secuenciales y otras combinaciones.
Tengo previstos subir un Video con todos mis proyectos funcionando, eso lo prometi cuando hice el receptor de 4 canales DMX512.
'**** 4-channel DMX512 Transmitter Version 0.1***
'**** Create for Rafael Jimenez **
'**** Bascom AVR version 2.0.7.3 **
'**** Date 11.11.2011 **
'*************************************************
$regfile = "m8def.dat" 'Atmega8. puede ser otro con ADC
$crystal = 16000000 'Quarzo de 16Mhz
$baud = 250000 '250000 Velocidad de Baudio
'$sim ' para la simulacion
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 8 'default use 10 for the SW stack
$framesize = 16
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 2 , Databits = 8 , Clockpol = 1
Config Lcdpin = Pin , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.1 , Rs = Portb.0
Config Lcd = 20 * 4
Cursor Off
Cls
Waitms 10
Config Adc = Single , Prescaler = Auto , Reference = Avcc 'configuramos ADC modo Automatico
'Start Adc
Config Porta = Input 'entrada de ADC
Dim Buffer(4) As Byte 'Buffer de 256 canales, aqui solo elegimos 4
Dim Null_byte(1) As Byte 'Cero byte
Dim Adc_ch1 As Integer 'Definimos ADC uno (adc0)
Dim Adc_ch2 As Integer 'Definimos ADC dos (adc1)
Dim Adc_ch3 As Integer ' "" " 'Definimos ADC tres (adc1)
Dim Adc_ch4 As Integer 'Definimos ADC cuatros (adc1)
Dim X1 As Single 'Variable para calculos en porcentaje de los niveles
Dim X2 As Single
Dim X3 As Single
Dim X4 As Single 'definimos Z para los calculos en porcentajes
Dim Z As Single
'Calculacion level for LCD in percent
Z = 0.0981
' Configuration UART
Usart_tx Alias Portd.1 'Puerto de UART
Config Usart_tx = Output 'configuramos la UART como transmisor
Do ' programa corre
Ucsrb.txen = 0 'Usart desactivado
Usart_tx = 0 'Reset
Waitus 200 'pausa
Usart_tx = 1 'Reset
Ucsrb.txen = 1 'Usart activado
Waitus 16 'MARK zw. RESET and Byte Start min. 8us
Printbin Null_byte(1)
Printbin Buffer(1)
'DMX-CODE START
'____________________
Adc_ch1 = Getadc(0) / 4 '
Adc_ch2 = Getadc(1) / 4
Adc_ch3 = Getadc(2) / 4
Adc_ch4 = Getadc(3) / 4
X1 = Adc_ch1 * Z
X1 = X1 * 4
X1 = Int(x1)
X2 = Adc_ch2 * Z
X2 = X2 * 4
X2 = Int(x2)
X3 = Adc_ch3 * Z
X3 = X3 * 4
X3 = Int(x3)
X4 = Adc_ch4 * Z
X4 = X4 * 4
X4 = Int(x4)
Locate 1 , 1
Lcd "1Ch"
Locate 1 , 4
Lcd Fusing(x1 , ".")
Locate 1 , 7
Lcd "-2Ch"
Locate 1 , 11
Lcd Fusing(x2 , ".")
Locate 1 , 14
Lcd "-3Ch"
Locate 1 , 18
Lcd Fusing(x3 , ".")
Locate 2 , 1
Lcd "4Ch"
Locate 2 , 4
Lcd Fusing(x4 , ".")
Buffer(1) = Adc_ch1
Buffer(2) = Adc_ch2
Buffer(3) = Adc_ch3
Buffer(4) = Adc_ch4
Start Adc
Loop
Return
aqui os pongo el Esquema
(http://img52.imageshack.us/img52/1153/4canalesdmx512transmiso.jpg) (http://imageshack.us/photo/my-images/52/4canalesdmx512transmiso.jpg/)
Uploaded with ImageShack.us (http://imageshack.us)
-
Deseando ver ese video, maestro
-
Muy intresante Rafa!... esperamos el video!!! :mrgreen: :-/
-
:mrgreen: :mrgreen: paciencia paciencia, mi trabajo ahora no me da muchos tiempo, todos lo tengo montado en Phrotoboard, asi que cuando lo monte en una placa mostrare todos mis proyectos DMX acabado y funcionando, este ultimo me llevo mas trabajo, ya que el Bascom AVR tiene HightLevel protocolo, en este caso para configurar la UART y el ADC, esto salio en la 5 ultimas versiones.
ahora es muy facil hacer aplicaciones con la UART :mrgreen:
muchas gracias por vuestras motivaciones
-
Hola! se que el post quedo quieto hace mucho pero si quiciera saber en que termino este proyecto y el esperado video de su funcionamiento jejeje
quedo atento a cualquier respuesta sobre el asunto.
-
Aqui os dejos el transmisor dew 4 canales funcionando
No es una dirección de youtube válidahttp://www.youtube.com/watch?feature=player_embedded&v=FQiU8C2c_GY#t=16
todos esta en mis projectos
http://www.todopic.com.ar/foros/index.php?topic=37769.0
-
((:-)) ((:-)) ((:-)) Felicitaciones Rafael!!!! ((:-)) ((:-)) ((:-))
Un gran abrazo!
-
¡Cómo te diviertes, abuelo!
-
Hola ,ya arme su receptor DMX de 3 canales pero no lo consegui probar con exito asique me gustaria construir su transmisor dmx de 4 para poder ver si realmente me funciona el receptor.Lo probe con una interface usb dmx hecha con un cable ftdi y un sn75176 y el software free styler pero no hubo exito hace cosas raras.Mi pregunta viene en el esquematico de su proyecto,en el cristal de cuarzo se podria sustituir por uno normal con sus dos condesadores.Soy novatillo y aun hay algunos componentes y encapsulados que no conozco.Gracias por su atencion
-
Hola stk 500 estoy interesado en armar el transmisor dmx512 de 4 canales pero tengo algunas dudas de como hacerlo:
la primera duda es acerca del cristal de cuarzo,en el esquematico sale algun tipo de resonador o cristal el cual como novato que soy aun no conozco.Mi pregunta se puede sustituir por un cristal normal de 16 MHz con sus dos condesadores conectado a sus dos pines correspondientes?? si es asi .¿implica cambios en el codigo a cargar en el atmega?
la segunda es si ¿podria utilizar en lugar del atmega8 el atmega328?Evidentemente habria que cambiar cosas del codigo se que habria que cambiar el uC pero no se como es la notacion del 328.
y por ultimo la tercera duda,en el video se ve como utilizas un LCD de 16*2 en lugar de el de 20*4 como puedo hacer para utilizar yo el 16*2 ,que cambios hay que hacer en el codigo?
Muchas gracias de antemano
Un saludo =) Sabe Usted usar el programa Bascom AVR ?
Sabe usted de electronica?
porque no espere que te lo haga, osea decir lo que tiene y como lo hace.
no soy el mago en microcontroladores ;-)