TODOPIC

Mecatrónica => DMX512 - Diseños y Proyectos => Mensaje iniciado por: todopic en 18 de Mayo de 2008, 20:01:32

Título: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 18 de Mayo de 2008, 20:01:32

Hola Amigos!, les presento este proyecto, que ya está en funcionamiento  :-/ :mrgreen:

Continuando con el codigo receptor DMX, luego de verificar el funcionamiento para un motor (empleando 4 leds) agregué para comandar en forma individual, un par de motores, empleo para exitarlos, 2 ULM2003

(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6932)

Código: ASM

1. ;*****************************************************************        
2. ;receptor dmx - decodifica 3 canales - dos motores pap y velocidad
3. ; Norberto Pellegrini - Todopic Electronica
4. ;*****************************************************************
5. ;24/12/06 12:09a.m. HAY QUE EMPLEAR EL MICRO A 20 MHZ
6. ; verificacion de tiempos y compensacion con NOP de las tramas
7. ;*****************************************************************
8.  
9.     list p=16f628
10.         #include p16f628.inc
11.  
12.         ERRORLEVEL      -302, -307      ;(NO FIGURAN LOS ERRORES DE CAMBIO DE PAGINA)
13.  
14.        
15.         CBLOCK  H'20'   ;32 decimal     H'0C'
16. ;ASIGNACION DE REGISTRO DE USO GENERAL
17.         CONTA_T ;TIEMPO DEL BREAK, DE 88 uS
18.         CONTABIT        ;8 BIT DE DATOS
19.         CHANEL          ;CONTADOR DE CANALES LEIDOS POR EL RECEPTOR
20.         DIPSWICH        ;seteos de direccion
21.         DIPSWICH_MAS1   ;DIRECCION MAS UNO O SIGUIENTE
22.         DIPSWICH_MAS2   ;DIRECCION MAS DOS
23.         DATOS                   ;BYTE DE RECEPCION RS485 DE DMX
24.         POSICION
25.         PASOS_PAN
26.         PASOS_TILT
27.         CONTA_PASOS_PAN
28.         CONTA_PASOS_TILT
29.         CONTA_PAN       ;CONTADOR DE TABLA DE PASOS DEL MOTOR
30.         CONTA_TILT      ;CONTADOR DE LA TABLA DEL SEGUNDO MOTOR
31.         DESTELLO
32.         DESTELLO1       ;SON LOS CONTADORES PARA PRODUCIR EL
33.         DESTELLO2       ;DESTELLO DEL LED INDICADOR DE FALTA DE SEÑAL DMX
34.         VELOCIDAD
35.         COMPENSAR               ;TIEMPO A COMPENSAR EN LOS DELAY PARA REDUCIR LA VELOCIDAD AL ESTAR MAS CERCA DE LA POSICION
36.         RESTO
37.         RETARDO
38.         PUERTO  ;       BYTE AUXILIAR PARA FORMAR EL AND DE LAS SALIDAS AL PUERTO B
39.         LOOP1
40.         LOOP2
41.         LOOP3
42.         ENDC
43.        
44.  
45. #DEFINE DMX     PORTA,3 ; en el prototipo era 4
46. #DEFINE FC_PAN  PORTA,1
47. #DEFINE FC_TILT PORTA,2
48. #DEFINE LED     PORTA,0
49.  
50.  
51.         __CONFIG   _HS_OSC &  _WDT_ON & _PWRTE_ON & _CP_OFF & _BODEN_ON & _LVP_OFF & _MCLRE_OFF
52. ;               osc 20 mhz
53.  
54. ;**********************************************************************
55. RESET   org     00h     ;el vector de reset es la dirección 00
56.  
57.  
58.                 goto    INICIO  ;se salta al inicio del programa
59.  
60. ;**********************************************************************
61.         org     05h
62.  
63. ;*************** SUBRUTINA DE RETARDO DE 2 Us   **************         
64. ;-------------------------------------------------------------
65. DEMORA2US ; ES EN REALIDAD DE 1.8 uS PARA COMPENZAR
66.         NOP     ;1 uS
67.         NOP
68.         CLRWDT
69.         NOP
70.         NOP     ;1 uS
71.         RETURN
72. ;**********************************************************************************
73. ;##################################################################################
74. ;**********************************************************************************
75. ;TABLA DE POSICIONAMIENTO DE LOS MEDIO PASOS DEL MOTOR PAP DE PANORAMICO
76. TABLA_PAN       ADDWF   PCL,F
77.                 GOTO    CORREGIR1
78.                 RETLW   B'11110001'     ;LOS 4 BIT DE MAYOR PESO ESTAN EN UNO PARA HACER BUNA AND ENTRE TABLAS
79.                 RETLW   B'11110011'
80.                 RETLW   B'11110010'
81.                 RETLW   B'11110110'
82.                 RETLW   B'11110100'
83.                 RETLW   B'11111100'
84.                 RETLW   B'11111000'
85. ULTIMO  RETLW   B'11111001'
86.                 MOVLW   .1                      ;LIMITE MAXIMO DE LA TABLA
87.                 MOVWF   CONTA_PAN
88.                 GOTO    TABLA_PAN+2
89. ;---------------------------------------------------------------------------------------------
90. CORREGIR1                       ;SI ERA CERO, LO PASO AL VALOR 8 DE LA TABLA (LIMITE MINIMO DE LA TABLA)
91.                 MOVLW   .8
92.                 MOVWF   CONTA_PAN
93.                 GOTO    ULTIMO
94. ;************************************************************************************************
95. ;################################################################################################
96. ;************************************************************************************************
97. ;TABLA DE POSICIONAMIENTO DE LOS MEDIO PASOS DEL MOTOR PAP DE TILT
98. TABLA_TILT      ADDWF   PCL,F
99.                 GOTO    CORREGIR2
100.                 RETLW   B'00011111'     ;LOS 4 BIT DE MENOR PESO SON 1 PARA HACER UNA AND ENTRE LAS TABLAS
101.                 RETLW   B'00111111'
102.                 RETLW   B'00101111'
103.                 RETLW   B'01101111'
104.                 RETLW   B'01001111'
105.                 RETLW   B'11001111'
106.                 RETLW   B'10001111'
107. ULTIMO2 RETLW   B'10011111'
108.                 MOVLW   .1                      ;LIMITE MAXIMO DE LA TABLA
109.                 MOVWF   CONTA_TILT
110.                 GOTO    TABLA_TILT+2
111. ;---------------------------------------------------------------------------------------------
112. CORREGIR2                       ;SI ERA CERO, LO PASO AL VALOR 8 DE LA TABLA (LIMITE MINIMO DE LA TABLA)
113.                 MOVLW   .8
114.                 MOVWF   CONTA_TILT
115.                 GOTO    ULTIMO2
116.                
117. ;************************************************************************************************
118. ;############################  PROGRAMA  PRINCIPAL ##############################################
119. ;************************************************************************************************
120.  
121. INICIO
122.        
123.         MOVLW 0x07
124.         MOVWF CMCON     ;PARA EL 16F628, ELIMINO LOS COMPARADORES, TODAS SALIDAS DIGITALES
125.  
126.         BSF             STATUS,RP0      ;BANCO 1
127.         MOVLW   B'00000000'     ; 8 TODAS SALIDAS PARA CONTROLAR 2 MOTORES PAP
128.         MOVWF   TRISB
129.         MOVLW   B'11111110'     ;1 SALIDAS
130.         MOVWF   TRISA
131.         BCF             STATUS,RP0      ;BANCO 0
132.         CLRF    TMR0
133.  
134. ;       MOVLW   B'11111111'
135.         CLRF    PORTB           ;coloco en cero las salidas
136.         CLRF    PORTA
137.         CLRF    DATOS
138.         CLRF    CHANEL
139.         BCF             LED
140.         MOVLW   .1
141.         MOVWF   CONTA_PASOS_PAN
142.         MOVWF   CONTA_PASOS_TILT
143.         MOVWF   CONTA_PAN
144.         MOVWF   CONTA_TILT
145.         MOVWF   PASOS_PAN
146.         MOVWF   PASOS_TILT
147.         CALL    DEMORA
148.         CLRF    PUERTO
149.         CLRF    PORTB
150.         CLRWDT
151.         PAGESEL POSICION_CERO
152.         LCALL   POSICION_CERO   ;BUSQUEDA DE LOS CEROS DE CADA EJE
153.        
154. ;*************************************************************************************************
155. ;#####################  PULSO DE ARRANQUE O SINCRONISMO BREAK ####################################             
156. ;**************************************************************************************************
157. ;ESPERA LA LLEGADA DEL PULSO BREAK, QUE TIENE QUE SER DE AL MENOS 88 uS A 1 SEGUNDO, SINO ES ERROR
158. ;ESTE PULSO BAJO DE 88 uS INDICA EL COMIENZO DE LA TRAMA DMX, QUE ES CICLICA
159. BREAK
160.         CLRWDT
161. ;------------------------------------------------------------------------------------  
162.         MOVLW 0x07
163.         MOVWF CMCON     ;PARA EL 16F628, ELIMINO LOS COMPARADORES, TODAS SALIDAS DIGITALES
164.  
165.         BSF             STATUS,RP0      ;BANCO 1
166.         MOVLW   B'00000000'     ; 8 entradas PARA ASIGNAR UNA DE LAS 255 DIRECCIONES POSIBLES
167.         MOVWF   TRISB
168.         MOVLW   B'11111110'     ;1 SALIDAS
169.         MOVWF   TRISA
170.         BCF             STATUS,RP0      ;BANCO 0
171.         PAGESEL DEMORA2US
172. ;------------------------------------------------------------------------------
173.         ;LEER EL CANAL DMX SETEADO EN LOS DIP SWICH
174.         MOVLW   .1      ;PORTB,W
175.         MOVWF   DIPSWICH        ;DIRECCION DMX QUE SE ASIGNA EMPLEANDO 8 DIP SWICH (EN BINARIO)
176.         INCF    DIPSWICH,W     
177.         MOVWF   DIPSWICH_MAS1   ;ES UN VALOR MAS DE LA DIRECCION ASIGNADA
178.         INCF    DIPSWICH_MAS1,W
179.         MOVWF   DIPSWICH_MAS2   ;ES DOS VALORES MAS DE LA DIRECCION ASIGNADA
180.  
181.         MOVLW   .80
182.         MOVWF   CONTA_T
183.         MOVLW   .255    ;PARA QUE EMPIECE A CONTAR DESDE EL CANAL CERO
184.         MOVWF   CHANEL
185.  
186. ;---------------------------------------------------------------------------
187. CONTINUAR
188.         DECFSZ  DESTELLO2,F     ;RETARDOS EN LOS DESTELLOS A LA ESPERA DE SEÑAL DMX
189.         GOTO    ES_CERO
190.         DECFSZ  DESTELLO1,F    
191.         GOTO    ES_CERO
192.         INCF    DESTELLO,F
193.         BCF             LED                                     ;MIENTRAS ESTA EN CERO APAGO EL LED INDICADOR DE SE¥AL DMX
194.         BTFSC   DESTELLO,2 ; Y QUEDARA DESTELLANDO LENTO
195.         BSF             LED
196.  
197. ES_CERO
198.         BTFSC   DMX                                     ;ES LA ENTRADA DMX CERO?, SI SALTAR
199.         GOTO    BREAK
200.         DECFSZ  CONTA_T,F       ;SI LLEGA A CERO, ES PORQUE EL BREAK DURO POR LO MENOS 88 uS (80)
201.         GOTO    ES_CERO
202.         BTFSS   DMX                                     ;ESPERO A QUE TERMINE EL PULSO DE BREAK, POR SI ES MAYOR A 88 US
203.         GOTO    $-1                                     ;Y DETERMINO EL COMIENZO DEL PULSO "MARK" QUE ES ALTO (UNO) DE 8 uS
204.        
205. MARK    ;                                                       DURACION DE 8 uS EN ALTO
206.         CALL DEMORA2US                  ;2 uS, VERIFICO A LA MITAD DEL PULSO
207.  
208.         BTFSS   DMX                                     ; MITAD DEL PRIMER PULSO, LEO SI ESTA EN UNO
209.         GOTO    BREAK                           ;HAY ERROR
210.        
211.         CALL DEMORA2US          ;FINAL DEL PRIMER PULSO
212.         CALL DEMORA2US          ;PRIMER MITAD DEL 2DO PULSO
213.  
214.         BTFSS   DMX                                     ; MITAD DEL SEGUNDO PULSO
215.         GOTO    BREAK                           ;HAY ERROR
216.  
217. PROX    ;<---------SINCRONIZACION DEL PULSO DE START #########################################################
218.         INCF    CHANEL,F
219.                                                                         ;SI EL NUMERO DE CANAL ES XX SETEADO CON LOS DIPSWICH
220.                                                                         ; VER EL VALOR DE DATA, Y ACTUAR
221.  
222.         BTFSC   DMX             ;ME QUEDO ESPERANDO LOS 2uS FINALES DE MARK
223.         GOTO    $-1             ;HASTA QUE APAREZCA EL PULSO BAJO DE START
224.                                                         ;AL DETECTAR EL BAJO DE STAR, ME
225.         ;CALL           DEMORA2US       ;DESPLAZO A LA MITAD DEL PRIMER BIT
226.         NOP
227.         CLRWDT
228.         NOP
229.         MOVLW   .8
230.         MOVWF   CONTABIT        ;CADA BIT DURA 4 uS
231.  
232. START           ;CAIGO EN LA MITAD DEL PULSO START, QUE TIENE QUE SER BAJO
233.         BSF             LED
234.         CLRF    DATOS
235.         BTFSC   DMX     ;SI ES BAJO, ESTA CORRECTO, SI ES UNO, ES ERROR, ASI QUE ESPERO LA PROXIMA SECUENCIA
236.         GOTO    BREAK  
237.         NOP
238.         CLRWDT
239.         NOP
240. OTRO
241.         CALL    DEMORA2US
242. ;       CALL    DEMORA2US ; MITAD DEL BIT 0
243.         NOP
244.         NOP
245.         CLRWDT
246.         NOP
247.         RRF             DATOS,F
248.         BCF             DATOS,7
249.         BTFSC   DMX
250.         BSF             DATOS,7
251.         DECFSZ  CONTABIT,F
252.         GOTO    OTRO
253. ;       CALL    DEMORA2US
254.        
255.  
256.         CLRWDT
257.  
258. ;STOP   ;DOS BIT DE STOP EN ALTO, SOLO DETECTO EL PRIMERO Y PROCESO LA INFO
259. ;       BTFSS   DMX             ;MIRO EN LA MITAD DEL PRIMER BIT DE STOP EN ALTO (A LOS 38 uS)
260. ;       GOTO    BREAK   ;HAY ERROR
261.  
262.  
263. ;-----------------PRIMER CANAL - DATOS DEL CANAL MOTOR PAP PAN
264. CANAL1 
265.         MOVF    CHANEL,W               
266.         XORWF   DIPSWICH,W             
267.         BTFSS   STATUS,Z       
268.         GOTO    SIGUIENTE      
269.                                                         ;TOMO EL DATO DMX PARA EL CONTROL DE PAN
270.         ;NOP
271.         ;NOP
272.         ;NOP
273.         MOVF    DATOS,W ;cambio de variable, de dato lo paso a PASOS
274.         MOVWF   PASOS_PAN           ;PORTB     
275.         GOTO    PROX   
276.  
277. ;-----------------SEGUNDO CANAL -------  DATOS DEL CONTROL DE TILT
278. SIGUIENTE
279.         MOVF    CHANEL,W                ;VERIFICO EN PRIMER LUGAR,
280.         XORWF   DIPSWICH_MAS1,W ;SI LA CUENTA LLEGO A 26 (MAQUINA DE HUMO
281.         BTFSS   STATUS,Z                ;SI ES IGUAL, SALTA, SINO VA AL PROXIMO
282.         GOTO    SIGUIENTE3     
283.  
284.         ;NOP   
285.         ;NOP   
286.         ;NOP   
287.         MOVF    DATOS,W
288.         MOVWF   PASOS_TILT
289.         GOTO    PROX
290. ;-----------------TERCER CANAL
291. SIGUIENTE3     
292.         MOVF    CHANEL,W                ;VERIFICO EN PRIMER LUGAR,
293.         XORWF   DIPSWICH_MAS2,W ;SI LA CUENTA LLEGO A 26 (MAQUINA DE HUMO
294.         BTFSS   STATUS,Z                ;SI ES IGUAL, SALTA, SINO VA AL PROXIMO
295.         GOTO    PROX    ;NO ES NINGUNO DE LOS 3 VALORES, SIGO ESPERANDO AL CANAL CORRESPONDIENTE
296.  
297.         MOVF    DATOS,W
298.         MOVWF   VELOCIDAD       ;RETARDOS EN LOS AVANCES DE LOS MOTORES DE PAN Y TILT
299.         GOTO    COMPARAR
300.  
301.  
302. ;****************************************************************************************************
303. ;********    posicionamiento de LOS MOTORES**********************************************************
304. ;****************************************************************************************************
305. ;>>>>>>>>>>>  MOTOR DE PAN  <<<<<<<<<<<<<<<<<<<<
306.  
307. COMPARAR        ;VERIFICA SI LLEGO AL LUGAR PARA DETENERSE, O TIENE QUE GIRAR  A DERECHA O IZQUIERDA
308. ;       Comparar
309.         CLRF    STATUS
310.         MOVF    PASOS_PAN,W             ;VALOR LEIDO EN DATOS POR DMX
311.         XORWF   CONTA_PASOS_PAN,W       ;y lo compara con la CONTA_PASOS_PAN QUE ES EL VALOR DE POSICION ACTUAL
312.         BTFSS STATUS,Z                  ;¨ Son iguales ?
313.         GOTO NOT_EQ1    ;PASOS ES DISTINTO A CUENTA_PASOS, TIENE QUE CALCULAR PARA DONDE GIRAR
314.         GOTO EQ1                ;PASOS ES IGUAL A CUENTA_PASOS, TIENE QUE DETENER MOTOR
315.  
316. EQ1     ;NO SE REALIZA NINGUNA VARIACION EN LOS DELAY PATRONES
317. ;       CLRF    COMPENSAR       ;NO HAY VARIACION DE TIEMPOS, Y DETENER EL MOTOR
318.         GOTO    COMPARAR2       ;BREAK  ;IR A DETECTAR EL COMIENZO DE LA PROXIMA TRAMA DMX
319.        
320. NOT_EQ1
321.         MOVF PASOS_PAN, W
322.         SUBWF CONTA_PASOS_PAN,W  ;F-W   GUARDO RESULTADO EN W  
323.         BTFSS STATUS, C
324.         GOTO GIRO_DERECHA1
325.         GOTO GIRO_IZQUIERDA1    
326.  
327. GIRO_DERECHA1
328.         INCF    CONTA_PASOS_PAN,F
329.         INCF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
330.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
331.         MOVWF   COMPENSAR
332.         MOVF    CONTA_PASOS_PAN,W
333.         SUBWF   PASOS_PAN,W
334.         MOVWF   COMPENSAR       ; PROPORCIONAL AL RETARDO, MAS LEJOS, MENOS TIEMPO
335.  
336.         GOTO    COMPARAR2       ;NDP
337.        
338. GIRO_IZQUIERDA1
339.         DECF    CONTA_PASOS_PAN,F
340.         DECF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
341.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
342.         MOVWF   RESTO
343.         MOVF    PASOS_PAN,W
344.         SUBWF   CONTA_PASOS_PAN,W
345.         SUBWF   RESTO,W
346.         MOVWF   COMPENSAR       ;VALOR  PROPORCIONAL AL RETARDO, MAS CERCA, MAS  TIEMPO
347.         GOTO    COMPARAR2       ;NDP
348.        
349.        
350. ;***********************************************************************************************
351. ;################  POSICIONAMIENTO DEL MOTOR DE TILT  ##########################################
352. ;***********************************************************************************************
353. COMPARAR2       ;VERIFICA SI LLEGO AL LUGAR PARA DETENERSE, O TIENE QUE GIRAR  A DERECHA O IZQUIERDA
354. ;       Comparar
355.         CLRF    STATUS
356.         MOVF    PASOS_TILT,W            ;
357.         XORWF   CONTA_PASOS_TILT,W      ;y lo compara con la CONTA_PASOS QUE ES EL VALOR DE POSICION ACTUAL
358.         BTFSS STATUS,Z                  ;¨ Son iguales ?
359.         GOTO NOT_EQ2    ;PASOS ES DISTINTO A CUENTA_PASOS, TIENE QUE CALCULAR PARA DONDE GIRAR
360.         GOTO EQ2                ;PASOS ES IGUAL A CUENTA_PASOS, TIENE QUE DETENER MOTOR
361.  
362. EQ2     ;NO SE REALIZA NINGUNA VARIACION EN LOS DELAY PATRONES
363. ;       CLRF    COMPENSAR       ;NO HAY VARIACION DE TIEMPOS, Y DETENER EL MOTOR
364. ;       GOTO    BREAK   ;IR A DETECTAR EL COMIENZO DE LA PROXIMA TRAMA DMX
365.         GOTO    NDP
366.        
367. NOT_EQ2
368.         MOVF PASOS_TILT, W
369.         SUBWF CONTA_PASOS_TILT,W  ;F-W   GUARDO RESULTADO EN W 
370.         BTFSS STATUS, C
371.         GOTO GIRO_DERECHA2
372.         GOTO GIRO_IZQUIERDA2    
373.  
374. GIRO_DERECHA2
375.         INCF    CONTA_PASOS_TILT,F
376.         INCF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
377.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
378.         MOVWF   COMPENSAR
379.         MOVF    CONTA_PASOS_TILT,W
380.         SUBWF   PASOS_TILT,W
381.         MOVWF   COMPENSAR       ; PROPORCIONAL AL RETARDO, MAS LEJOS, MENOS TIEMPO
382.  
383.         GOTO    NDP
384.        
385. GIRO_IZQUIERDA2
386.         DECF    CONTA_PASOS_TILT,F      ;
387.         DECF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
388.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
389.         MOVWF   RESTO
390.         MOVF    PASOS_TILT,W
391.         SUBWF   CONTA_PASOS_TILT,W
392.         SUBWF   RESTO,W
393.         MOVWF   COMPENSAR       ;VALOR  PROPORCIONAL AL RETARDO, MAS CERCA, MAS  TIEMPO
394.  
395.         GOTO    NDP
396.  
397.  
398.  
399.  
400. ;************************************************************************************************
401. NDP                     MOVF    CONTA_PAN,W
402.                         PAGESEL TABLA_PAN
403.                         LCALL   TABLA_PAN
404.                         ;DEMORA PROPORCIONAL A LA DIFERENCIA ENTRE PASOS, MAS PASOS MENOS DEMORA, ESTA MAS LEJOS...
405.                         MOVWF   PUERTO
406.                        
407.                         MOVF    CONTA_TILT,W
408.                         PAGESEL TABLA_TILT
409.                         LCALL   TABLA_TILT
410.                         ANDWF   PUERTO,W        ;UNO AMBAS SALIDA DE TABLA PARA SALIR POR EL PUERTO B
411.                        
412.                         MOVWF   PORTB
413.  
414.         ;               MOVF    VELOCIDAD,W ;PASO EL DATO DE VELOCIDAD LEIDO EN EN TERCER CANAL
415.         ;               MOVWF   COMPENSAR       ;AL CONTADOR DE DEMORAS COMPENSAR
416.  
417.         ;               CALL    DEMORA
418.                         GOTO    BREAK   ;GOTO   COMPARAR
419. ;;*********************************************************************************************
420. DELAY   CALL    DEMORA          ;RETARDO ENTRA PASOS, VARIABLE SEGUN LA DIFERENCIA DE PASOS
421.                 DECFSZ  COMPENSAR,F     ;A MAS PASOS, MENOS DEMORA, AL ESTAR MAS CERCA, INCREMENTA LA DEMORA
422.                 GOTO    DELAY           ;PARA QUE EL MOTOR SE ACERQUE DE FORM MAS SUAVE
423.                 RETURN
424.  
425. DEMORA 
426.                 MOVLW   .2
427.                 MOVWF   LOOP1
428. OTRO2   NOP
429.                 CLRWDT
430.                 DECFSZ  LOOP1,F
431.                 GOTO    OTRO2
432.                 RETURN
433.  
434.  
435. ;#################################################################################################
436.  
437.         ORG     100H   
438. POSICION_CERO   ;EN EL ENCENDIDO, AMBOS EJES GIRAN HASTA ENCONTRAR EL FIN DE CARRERA RESPECTIVO
439. ;                                       Y COLOCAR EN CERO LOS CONTADORES CRRESPONDIENTES
440.                 MOVLW   .255
441.                 MOVWF   CONTA_PASOS_TILT
442.                 MOVWF   CONTA_PASOS_PAN
443.                 MOVWF   POSICION
444.        
445. BUSCAR_CERO
446. ;                               GIRO_IZQUIERDA DEL MOTOR DE TILT, EN BUSQUEDA DE LLEGAR AL FIN DE CARRERA, PARA SU POSICION DE CERO
447.         BTFSS   FC_TILT ;ESTA TOCANDO EL FIN DE CARRERA DE TILT
448.         GOTO    $+3
449.         DECF    CONTA_PASOS_TILT,F      ;
450.         DECF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
451.  
452.         BTFSS   FC_PAN          ;ESTA TOCANDO EL FIN DE CARRERA DE PAN
453.         GOTO    $+3
454.         DECF    CONTA_PASOS_PAN,F       ;
455.         DECF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
456.  
457.         MOVF    CONTA_PAN,W
458.         PAGESEL TABLA_PAN      
459.         LCALL   TABLA_PAN      
460.         MOVWF   PUERTO
461.         MOVF    CONTA_TILT,W
462.         PAGESEL TABLA_TILT     
463.         LCALL   TABLA_TILT     
464.         ANDWF   PUERTO,W        ;UNO AMBAS SALIDA DE TABLA PARA SALIR POR EL PUERTO B
465.                        
466.         MOVWF   PORTB
467.  
468.         PAGESEL DELAY2
469.         LCALL   DELAY2
470.         LCALL   DELAY2
471.         DECFSZ  POSICION,F
472.         GOTO    BUSCAR_CERO     ;REPITE ESTE LOOP UN MAXIMO DE 255 VECES, PARA ASEGURARNOS SI ESTAN EN EL LADO OPUESTO
473.  
474.         CLRF    CONTA_PASOS_PAN
475.         CLRF    CONTA_PASOS_TILT
476. ;       INCF    CONTA_PASOS_TILT,F      ;ME ASEGURO QU TOMEN EL VALOR UNO
477. ;       INCF    CONTA_PASOS_PAN,F
478.  
479.  
480.         RETURN
481.  
482.                
483. ;************************************************************************************************
484.  
485. DELAY2 
486.                 MOVLW   .150
487.                 MOVWF   LOOP3
488.                 MOVLW   .100
489.                 MOVWF   LOOP1
490. OTRO22  NOP
491.                 NOP
492.                 NOP
493.                 NOP
494.                 NOP
495.                 NOP
496.                 CLRWDT
497.                 DECFSZ  LOOP1,F
498.                 GOTO    OTRO22
499.                 DECFSZ  LOOP3,F
500.                 GOTO    OTRO22-2
501.         INCF    DESTELLO,F
502.         BCF             LED                                    
503.         BTFSC   DESTELLO,2 ; DESTELLO DEL LED INDICADOR DMX, EN ESTE CASO, INDICA QUE SE ESTA POSICIONANDO A CERO
504.         BSF             LED
505.                 RETURN
506.  
507.         END

EL  Circuito impreso
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6934)

El proyecto terminado y funcionando, plaqueta
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6936)

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: RALF2 en 18 de Mayo de 2008, 21:48:22

Muy bueno ese proyecto, amigo todopic  :mrgreen:
Y utilizando el pcb wizard para ello  :D

Muy buenas figuras!

Saludos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: RICHI777 en 18 de Mayo de 2008, 22:41:20

Muy bueno el proyecto !!! una pregunta, con que programa dibujas el mecanizado ?
Gracias desde ya !

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 18 de Mayo de 2008, 22:48:30

Cita de: RALF2 en 18 de Mayo de 2008, 21:48:22

Muy bueno ese proyecto, amigo todopic  :mrgreen:
Y utilizando el pcb wizard para ello  :D

Muy buenas figuras!

Saludos

Ja ja, ok Ralf, y para Richi777, es el PCB wizard ,es muy simple de emplear, y para estos circuitos simples es ideal, tambien genera la vista de como quedará terminado (muy similar a la ultima foto )

Mañana colocaré un video de como funciona...
por ahora otra foto
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6938)

Un abrazo

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: stk500 en 18 de Mayo de 2008, 22:54:40

 :-/ :-/ sin palabra  :-/ :-/
Saludo Norbe

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 18 de Mayo de 2008, 23:02:53

Hola Rafa!, esto es ideal para tu trabajo!, ademas, se posiciona a cero, empleando un par de sensores .... al iniciar el funcionamiento, gira para encontrar el cero mecanico en ambos ejes/motores... el led destella rapidamente...
luego, queda casi fijo, indicando señal dmx  :mrgreen:

Un abrazo!

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: stk500 en 18 de Mayo de 2008, 23:10:54

lo voy a probar, tengo un monton de  motores PAP por ahi pasando hambre, una pregunta!! en el programa habla de Dip switch pero no lo veo en el esquema? o son los canales fijos???  :mrgreen que escondido te lo tenia  :D :D :D
a ver cuando sube el esquema
un abrazote Norber

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 18 de Mayo de 2008, 23:48:04

Ok Stk, lo que pasa es que el codigo originalmente leia el dip swich para conocer la direccion dmx... y lo fuì corrigiendo... y ahora, donde era la entrada, paso a ser salida de motores  :lol:

de alli la diferencia en el codigo... pero estoy empleando en la direccion numero 1... por eso el pulsador en el esquema... que aun no funciona, y será para cargar la dirección...  :-)

cuando esté listo lo cargo nuevamente....

Ok al esquematico....

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 19 de Mayo de 2008, 00:38:58

 :D :D
Aqui el esquematico  :D

(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6941)

y ademas los pines de los integrados, para no renegar en la busqueda  :mrgreen:

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: Nocturno en 19 de Mayo de 2008, 01:30:11

Ya estamos deseando ver el vídeo, gran Norberto. Enhorabuena.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 21 de Mayo de 2008, 12:11:34

 :D :D Ok Nocturno... aqui un par de pequeños videos de como està funcionando... en especial, como responde al cambio de giro de acuerdo a la señal dmx, ademas, como regresa siempre a la posicion inicial

Un gran abrazo!

Norberto
pd: tengo que corregir un par de cositas en el codigo...  :D

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: aitopes en 21 de Mayo de 2008, 12:52:58

Hola Norberto!
Que gran trabajo. Felicitaciones!!! Mereces un par de   :-/ :-/

 :D

Saludos.
Ariel.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: Nocturno en 21 de Mayo de 2008, 14:52:16

¡Qué chulada!, a tus pies, gran jefe.

Yo también te pongo unos  :-/ :-/ :-/ :-/

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: MGLSOFT en 21 de Mayo de 2008, 15:31:49

Excelente!!
Lo unico malo es que aun no se le anima al C !!! :D :D :D

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 22 de Mayo de 2008, 00:08:34

ja ja ja... una cosa , o Ariel es muy  mezquino con los  :-/  , o en España cotizan a la mitad  :D :D :D :D

Gracias amigos!!!!

Ok a lo del C, te digo Marcos, que  con el seminario, y con el web servserver.... no me queda otra!!!!, se que me tengo que meter...  pero el tiempo!!!!!  :mrgreen:

Un abrazo

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: stk500 en 22 de Mayo de 2008, 01:47:34

 :-/ :-/ te quedo chulisimo el video y tu projecto   :-/ :-/
voy a intentar hacerlo con un 16F870 a ver que, y a ver si me puede dar la fuente original  :mrgreen:
Saludote Norber 

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: lagruya en 22 de Mayo de 2008, 13:12:33

Muy bueno!
felicitaciones  :-/ :-/ :-/

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: josmaroal en 13 de Junio de 2008, 18:04:02

Soy nuevo en este foro, asi como tambien en programacion de pic, recien estoy aprendiendo Mikrobasic.
Como uno de los importantes proyecto que quiero implantar, aprovechando la genialidad del amigo Nolberto con su preoyecto PAP por DMX.
Les doy un saludo a todos y espero contar con su ayuda y paciencia (por alguna pregunta sosa jejej).
Gracias a los creadores de este foro por su gran aporte y apoyo a los que no se rinden para seguir aprendiendo.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 13 de Junio de 2008, 23:15:42

Hola, Josmaoral me solicito el .hex de este proyecto...

asi que, aqui está!  :mrgreen:

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: josmaroal en 14 de Junio de 2008, 05:17:05

Gracias amigo Norberto.... ahora si manos a la obra.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: stk500 en 14 de Junio de 2008, 05:21:17

Hola Josmaroal aqui estamos para ayudar en lo que se pueda  :mrgreen: ya no comentaras de tu projetos
un Saludo

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: josmaroal en 17 de Junio de 2008, 18:11:10

Amigo Norberto, realice el ruteado del diagrama(con corel Draw) usando el modelo del PBC que entregas en tu proyecto pero al cotejarlo con tu esquema hay pequeñas diferencias: en diagrama >>16F628 pin9  a  ULN2003 pin7 .......16F628 pin6  a  ULN2003 pin1 ,
en PBC >>16F628 pin9  a  ULN2003 pin1 .......16F628 pin6  a  ULN2003 pin7, trate  de entender en el programa cual eran los puertos, pero no estoy preparado para eso todavia, por tal motivo te pido me ayudes indicandome cual es lo correcto.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 17 de Junio de 2008, 22:13:45

ok Jos, y no te olvides de postear tu proyecto terminado y compartirlo co todos nosotros  :mrgreen:

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: josmaroal en 20 de Junio de 2008, 05:14:21

Amigo Norberto, son las 3am aqui en mi paiz y acabo de terminar el armado y probar tu proyecto fue sensacional verlo funcionar.
Tengo algunas preguntas al respecto:
Solo funciona un motor el otro no responde(revise el circuito), es del Programa supongo o no es el canal-DMX 2 ?.
El motor que funciona no responde con la velocidad que se ve en tu video, sigue girando hasta que alcanza la psicion ordenada,. puede ser el tablero o la señal DMX ?.
Bueno seguire probando y tratando de entender el software aunque la verdad eso es chino para mi.
Gracias por tu gran proyecto creo que estoy entrando por la puerta grande a estos nuevos sistemas.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: josmaroal en 25 de Junio de 2008, 18:18:59

Hola Norberto y stk500, ahi pongo unas fotos del proyecto PAPxDMX, armado y funcionando, (con algunos incovenientes) pronto pondre un video de como camina aunque prefiero seguir intentado averiguar unos dias mas algunos errores que debo haber cometido.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 27 de Junio de 2008, 00:10:08

Hola Jos!, me alegro que lo pudiste armar!!!  :-/ , el programita, esta escrito para el canal 1 y 2
tengo que mejorarlo, con algun micro mas grande para setearlo mediante dipswich o algu otro metodo....
yo envio la señal desde la consolita, que ademas, me muestra la "data" o numero que esta enviando
El motor se posiciona al valor que le envias, y se detiene al llegar en esa posicion,
En el arranque, trata de llegar a la "posicion cero" hasta que acciona algun interuptor "fin de carrera" , eso seria para emplear en iluminacion robotizada que mueve los espejos...  :-)
No se que motores estas empleando..., o con que voltaje lo estas alimentando....

Hoy, de casualidad, le encontre una falla que tengo que corregir, y es que si no le llega señal DMX, quedan girando, en busca del cero...  :mrgreen:, ni bien lo tenga, lo posteo nuevamente...  pero te tiene que funcionar ok?

Mantenenos informado ok?

Suerte!

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: PACMER en 18 de Enero de 2009, 05:50:33

SIEMPRE tarde en mis comentarios :(, apenas hace como un mes que comence en el foro :-)
solo queria preguntarte de cuantos pasos son tus motores?

y otra los motores de de los floppy de que tipo son?

espero tu respuesta, por cierto tu trabajo esta exclente :-/.

GRACIW

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: exflaco en 27 de Junio de 2009, 06:25:12

Exelente trabajo Norberto Primero,buenisimo el trabajo en asm se puede interpretar y entendor todo el protocolo deja el C para mas adelante,lo primero,es lo primero y funciona jeje te doy  :-/ :-/ :-/ :-/ :-/ :-/ y mas :-/ :-/ :-/   :D el que se anime que le ponga los cascabeles al gato,digo los espejos a los  los pap

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: sistemas en 01 de Septiembre de 2010, 15:47:42

HOla:
primero que nada tengo que felicitarte por tu trabajo, esta exelente. pero me podrias explicar para que son las entradas o salidas que estan a un lado del led. y otra cosa que espero disculpes mi ignorancia pero cres que sea muy complicado añadirle a tu proyecto el dip-switch ke indique el numero de dispositivo en la DMX. asi como ponerle su salida DMX. Me explico. a un lado del push-button hay tres entradas que son las que van a la consola DMX y lo que pregunto es que si se pueden poner otas tres que sean las de salida para asi conectar otro dispositivo. Y por ultimo es posible hacer que se conecten mas motores que solo dos.
de antemano muchas gracias tu proyecto esta exelente

Cita de: todopic en 18 de Mayo de 2008, 20:01:32

Hola Amigos!, les presento este proyecto, que ya está en funcionamiento  :-/ :mrgreen:

Continuando con el codigo receptor DMX, luego de verificar el funcionamiento para un motor (empleando 4 leds) agregué para comandar en forma individual, un par de motores, empleo para exitarlos, 2 ULM2003

(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6932)

Código: ASM

1. ;*****************************************************************        
2. ;receptor dmx - decodifica 3 canales - dos motores pap y velocidad
3. ; Norberto Pellegrini - Todopic Electronica
4. ;*****************************************************************
5. ;24/12/06 12:09a.m. HAY QUE EMPLEAR EL MICRO A 20 MHZ
6. ; verificacion de tiempos y compensacion con NOP de las tramas
7. ;*****************************************************************
8.  
9.     list p=16f628
10.         #include p16f628.inc
11.  
12.         ERRORLEVEL      -302, -307      ;(NO FIGURAN LOS ERRORES DE CAMBIO DE PAGINA)
13.  
14.        
15.         CBLOCK  H'20'   ;32 decimal     H'0C'
16. ;ASIGNACION DE REGISTRO DE USO GENERAL
17.         CONTA_T ;TIEMPO DEL BREAK, DE 88 uS
18.         CONTABIT        ;8 BIT DE DATOS
19.         CHANEL          ;CONTADOR DE CANALES LEIDOS POR EL RECEPTOR
20.         DIPSWICH        ;seteos de direccion
21.         DIPSWICH_MAS1   ;DIRECCION MAS UNO O SIGUIENTE
22.         DIPSWICH_MAS2   ;DIRECCION MAS DOS
23.         DATOS                   ;BYTE DE RECEPCION RS485 DE DMX
24.         POSICION
25.         PASOS_PAN
26.         PASOS_TILT
27.         CONTA_PASOS_PAN
28.         CONTA_PASOS_TILT
29.         CONTA_PAN       ;CONTADOR DE TABLA DE PASOS DEL MOTOR
30.         CONTA_TILT      ;CONTADOR DE LA TABLA DEL SEGUNDO MOTOR
31.         DESTELLO
32.         DESTELLO1       ;SON LOS CONTADORES PARA PRODUCIR EL
33.         DESTELLO2       ;DESTELLO DEL LED INDICADOR DE FALTA DE SEÑAL DMX
34.         VELOCIDAD
35.         COMPENSAR               ;TIEMPO A COMPENSAR EN LOS DELAY PARA REDUCIR LA VELOCIDAD AL ESTAR MAS CERCA DE LA POSICION
36.         RESTO
37.         RETARDO
38.         PUERTO  ;       BYTE AUXILIAR PARA FORMAR EL AND DE LAS SALIDAS AL PUERTO B
39.         LOOP1
40.         LOOP2
41.         LOOP3
42.         ENDC
43.        
44.  
45. #DEFINE DMX     PORTA,3 ; en el prototipo era 4
46. #DEFINE FC_PAN  PORTA,1
47. #DEFINE FC_TILT PORTA,2
48. #DEFINE LED     PORTA,0
49.  
50.  
51.         __CONFIG   _HS_OSC &  _WDT_ON & _PWRTE_ON & _CP_OFF & _BODEN_ON & _LVP_OFF & _MCLRE_OFF
52. ;               osc 20 mhz
53.  
54. ;**********************************************************************
55. RESET   org     00h     ;el vector de reset es la dirección 00
56.  
57.  
58.                 goto    INICIO  ;se salta al inicio del programa
59.  
60. ;**********************************************************************
61.         org     05h
62.  
63. ;*************** SUBRUTINA DE RETARDO DE 2 Us   **************         
64. ;-------------------------------------------------------------
65. DEMORA2US ; ES EN REALIDAD DE 1.8 uS PARA COMPENZAR
66.         NOP     ;1 uS
67.         NOP
68.         CLRWDT
69.         NOP
70.         NOP     ;1 uS
71.         RETURN
72. ;**********************************************************************************
73. ;##################################################################################
74. ;**********************************************************************************
75. ;TABLA DE POSICIONAMIENTO DE LOS MEDIO PASOS DEL MOTOR PAP DE PANORAMICO
76. TABLA_PAN       ADDWF   PCL,F
77.                 GOTO    CORREGIR1
78.                 RETLW   B'11110001'     ;LOS 4 BIT DE MAYOR PESO ESTAN EN UNO PARA HACER BUNA AND ENTRE TABLAS
79.                 RETLW   B'11110011'
80.                 RETLW   B'11110010'
81.                 RETLW   B'11110110'
82.                 RETLW   B'11110100'
83.                 RETLW   B'11111100'
84.                 RETLW   B'11111000'
85. ULTIMO  RETLW   B'11111001'
86.                 MOVLW   .1                      ;LIMITE MAXIMO DE LA TABLA
87.                 MOVWF   CONTA_PAN
88.                 GOTO    TABLA_PAN+2
89. ;---------------------------------------------------------------------------------------------
90. CORREGIR1                       ;SI ERA CERO, LO PASO AL VALOR 8 DE LA TABLA (LIMITE MINIMO DE LA TABLA)
91.                 MOVLW   .8
92.                 MOVWF   CONTA_PAN
93.                 GOTO    ULTIMO
94. ;************************************************************************************************
95. ;################################################################################################
96. ;************************************************************************************************
97. ;TABLA DE POSICIONAMIENTO DE LOS MEDIO PASOS DEL MOTOR PAP DE TILT
98. TABLA_TILT      ADDWF   PCL,F
99.                 GOTO    CORREGIR2
100.                 RETLW   B'00011111'     ;LOS 4 BIT DE MENOR PESO SON 1 PARA HACER UNA AND ENTRE LAS TABLAS
101.                 RETLW   B'00111111'
102.                 RETLW   B'00101111'
103.                 RETLW   B'01101111'
104.                 RETLW   B'01001111'
105.                 RETLW   B'11001111'
106.                 RETLW   B'10001111'
107. ULTIMO2 RETLW   B'10011111'
108.                 MOVLW   .1                      ;LIMITE MAXIMO DE LA TABLA
109.                 MOVWF   CONTA_TILT
110.                 GOTO    TABLA_TILT+2
111. ;---------------------------------------------------------------------------------------------
112. CORREGIR2                       ;SI ERA CERO, LO PASO AL VALOR 8 DE LA TABLA (LIMITE MINIMO DE LA TABLA)
113.                 MOVLW   .8
114.                 MOVWF   CONTA_TILT
115.                 GOTO    ULTIMO2
116.                
117. ;************************************************************************************************
118. ;############################  PROGRAMA  PRINCIPAL ##############################################
119. ;************************************************************************************************
120.  
121. INICIO
122.        
123.         MOVLW 0x07
124.         MOVWF CMCON     ;PARA EL 16F628, ELIMINO LOS COMPARADORES, TODAS SALIDAS DIGITALES
125.  
126.         BSF             STATUS,RP0      ;BANCO 1
127.         MOVLW   B'00000000'     ; 8 TODAS SALIDAS PARA CONTROLAR 2 MOTORES PAP
128.         MOVWF   TRISB
129.         MOVLW   B'11111110'     ;1 SALIDAS
130.         MOVWF   TRISA
131.         BCF             STATUS,RP0      ;BANCO 0
132.         CLRF    TMR0
133.  
134. ;       MOVLW   B'11111111'
135.         CLRF    PORTB           ;coloco en cero las salidas
136.         CLRF    PORTA
137.         CLRF    DATOS
138.         CLRF    CHANEL
139.         BCF             LED
140.         MOVLW   .1
141.         MOVWF   CONTA_PASOS_PAN
142.         MOVWF   CONTA_PASOS_TILT
143.         MOVWF   CONTA_PAN
144.         MOVWF   CONTA_TILT
145.         MOVWF   PASOS_PAN
146.         MOVWF   PASOS_TILT
147.         CALL    DEMORA
148.         CLRF    PUERTO
149.         CLRF    PORTB
150.         CLRWDT
151.         PAGESEL POSICION_CERO
152.         LCALL   POSICION_CERO   ;BUSQUEDA DE LOS CEROS DE CADA EJE
153.        
154. ;*************************************************************************************************
155. ;#####################  PULSO DE ARRANQUE O SINCRONISMO BREAK ####################################             
156. ;**************************************************************************************************
157. ;ESPERA LA LLEGADA DEL PULSO BREAK, QUE TIENE QUE SER DE AL MENOS 88 uS A 1 SEGUNDO, SINO ES ERROR
158. ;ESTE PULSO BAJO DE 88 uS INDICA EL COMIENZO DE LA TRAMA DMX, QUE ES CICLICA
159. BREAK
160.         CLRWDT
161. ;------------------------------------------------------------------------------------  
162.         MOVLW 0x07
163.         MOVWF CMCON     ;PARA EL 16F628, ELIMINO LOS COMPARADORES, TODAS SALIDAS DIGITALES
164.  
165.         BSF             STATUS,RP0      ;BANCO 1
166.         MOVLW   B'00000000'     ; 8 entradas PARA ASIGNAR UNA DE LAS 255 DIRECCIONES POSIBLES
167.         MOVWF   TRISB
168.         MOVLW   B'11111110'     ;1 SALIDAS
169.         MOVWF   TRISA
170.         BCF             STATUS,RP0      ;BANCO 0
171.         PAGESEL DEMORA2US
172. ;------------------------------------------------------------------------------
173.         ;LEER EL CANAL DMX SETEADO EN LOS DIP SWICH
174.         MOVLW   .1      ;PORTB,W
175.         MOVWF   DIPSWICH        ;DIRECCION DMX QUE SE ASIGNA EMPLEANDO 8 DIP SWICH (EN BINARIO)
176.         INCF    DIPSWICH,W     
177.         MOVWF   DIPSWICH_MAS1   ;ES UN VALOR MAS DE LA DIRECCION ASIGNADA
178.         INCF    DIPSWICH_MAS1,W
179.         MOVWF   DIPSWICH_MAS2   ;ES DOS VALORES MAS DE LA DIRECCION ASIGNADA
180.  
181.         MOVLW   .80
182.         MOVWF   CONTA_T
183.         MOVLW   .255    ;PARA QUE EMPIECE A CONTAR DESDE EL CANAL CERO
184.         MOVWF   CHANEL
185.  
186. ;---------------------------------------------------------------------------
187. CONTINUAR
188.         DECFSZ  DESTELLO2,F     ;RETARDOS EN LOS DESTELLOS A LA ESPERA DE SEÑAL DMX
189.         GOTO    ES_CERO
190.         DECFSZ  DESTELLO1,F    
191.         GOTO    ES_CERO
192.         INCF    DESTELLO,F
193.         BCF             LED                                     ;MIENTRAS ESTA EN CERO APAGO EL LED INDICADOR DE SE¥AL DMX
194.         BTFSC   DESTELLO,2 ; Y QUEDARA DESTELLANDO LENTO
195.         BSF             LED
196.  
197. ES_CERO
198.         BTFSC   DMX                                     ;ES LA ENTRADA DMX CERO?, SI SALTAR
199.         GOTO    BREAK
200.         DECFSZ  CONTA_T,F       ;SI LLEGA A CERO, ES PORQUE EL BREAK DURO POR LO MENOS 88 uS (80)
201.         GOTO    ES_CERO
202.         BTFSS   DMX                                     ;ESPERO A QUE TERMINE EL PULSO DE BREAK, POR SI ES MAYOR A 88 US
203.         GOTO    $-1                                     ;Y DETERMINO EL COMIENZO DEL PULSO "MARK" QUE ES ALTO (UNO) DE 8 uS
204.        
205. MARK    ;                                                       DURACION DE 8 uS EN ALTO
206.         CALL DEMORA2US                  ;2 uS, VERIFICO A LA MITAD DEL PULSO
207.  
208.         BTFSS   DMX                                     ; MITAD DEL PRIMER PULSO, LEO SI ESTA EN UNO
209.         GOTO    BREAK                           ;HAY ERROR
210.        
211.         CALL DEMORA2US          ;FINAL DEL PRIMER PULSO
212.         CALL DEMORA2US          ;PRIMER MITAD DEL 2DO PULSO
213.  
214.         BTFSS   DMX                                     ; MITAD DEL SEGUNDO PULSO
215.         GOTO    BREAK                           ;HAY ERROR
216.  
217. PROX    ;<---------SINCRONIZACION DEL PULSO DE START #########################################################
218.         INCF    CHANEL,F
219.                                                                         ;SI EL NUMERO DE CANAL ES XX SETEADO CON LOS DIPSWICH
220.                                                                         ; VER EL VALOR DE DATA, Y ACTUAR
221.  
222.         BTFSC   DMX             ;ME QUEDO ESPERANDO LOS 2uS FINALES DE MARK
223.         GOTO    $-1             ;HASTA QUE APAREZCA EL PULSO BAJO DE START
224.                                                         ;AL DETECTAR EL BAJO DE STAR, ME
225.         ;CALL           DEMORA2US       ;DESPLAZO A LA MITAD DEL PRIMER BIT
226.         NOP
227.         CLRWDT
228.         NOP
229.         MOVLW   .8
230.         MOVWF   CONTABIT        ;CADA BIT DURA 4 uS
231.  
232. START           ;CAIGO EN LA MITAD DEL PULSO START, QUE TIENE QUE SER BAJO
233.         BSF             LED
234.         CLRF    DATOS
235.         BTFSC   DMX     ;SI ES BAJO, ESTA CORRECTO, SI ES UNO, ES ERROR, ASI QUE ESPERO LA PROXIMA SECUENCIA
236.         GOTO    BREAK  
237.         NOP
238.         CLRWDT
239.         NOP
240. OTRO
241.         CALL    DEMORA2US
242. ;       CALL    DEMORA2US ; MITAD DEL BIT 0
243.         NOP
244.         NOP
245.         CLRWDT
246.         NOP
247.         RRF             DATOS,F
248.         BCF             DATOS,7
249.         BTFSC   DMX
250.         BSF             DATOS,7
251.         DECFSZ  CONTABIT,F
252.         GOTO    OTRO
253. ;       CALL    DEMORA2US
254.        
255.  
256.         CLRWDT
257.  
258. ;STOP   ;DOS BIT DE STOP EN ALTO, SOLO DETECTO EL PRIMERO Y PROCESO LA INFO
259. ;       BTFSS   DMX             ;MIRO EN LA MITAD DEL PRIMER BIT DE STOP EN ALTO (A LOS 38 uS)
260. ;       GOTO    BREAK   ;HAY ERROR
261.  
262.  
263. ;-----------------PRIMER CANAL - DATOS DEL CANAL MOTOR PAP PAN
264. CANAL1 
265.         MOVF    CHANEL,W               
266.         XORWF   DIPSWICH,W             
267.         BTFSS   STATUS,Z       
268.         GOTO    SIGUIENTE      
269.                                                         ;TOMO EL DATO DMX PARA EL CONTROL DE PAN
270.         ;NOP
271.         ;NOP
272.         ;NOP
273.         MOVF    DATOS,W ;cambio de variable, de dato lo paso a PASOS
274.         MOVWF   PASOS_PAN           ;PORTB     
275.         GOTO    PROX   
276.  
277. ;-----------------SEGUNDO CANAL -------  DATOS DEL CONTROL DE TILT
278. SIGUIENTE
279.         MOVF    CHANEL,W                ;VERIFICO EN PRIMER LUGAR,
280.         XORWF   DIPSWICH_MAS1,W ;SI LA CUENTA LLEGO A 26 (MAQUINA DE HUMO
281.         BTFSS   STATUS,Z                ;SI ES IGUAL, SALTA, SINO VA AL PROXIMO
282.         GOTO    SIGUIENTE3     
283.  
284.         ;NOP   
285.         ;NOP   
286.         ;NOP   
287.         MOVF    DATOS,W
288.         MOVWF   PASOS_TILT
289.         GOTO    PROX
290. ;-----------------TERCER CANAL
291. SIGUIENTE3     
292.         MOVF    CHANEL,W                ;VERIFICO EN PRIMER LUGAR,
293.         XORWF   DIPSWICH_MAS2,W ;SI LA CUENTA LLEGO A 26 (MAQUINA DE HUMO
294.         BTFSS   STATUS,Z                ;SI ES IGUAL, SALTA, SINO VA AL PROXIMO
295.         GOTO    PROX    ;NO ES NINGUNO DE LOS 3 VALORES, SIGO ESPERANDO AL CANAL CORRESPONDIENTE
296.  
297.         MOVF    DATOS,W
298.         MOVWF   VELOCIDAD       ;RETARDOS EN LOS AVANCES DE LOS MOTORES DE PAN Y TILT
299.         GOTO    COMPARAR
300.  
301.  
302. ;****************************************************************************************************
303. ;********    posicionamiento de LOS MOTORES**********************************************************
304. ;****************************************************************************************************
305. ;>>>>>>>>>>>  MOTOR DE PAN  <<<<<<<<<<<<<<<<<<<<
306.  
307. COMPARAR        ;VERIFICA SI LLEGO AL LUGAR PARA DETENERSE, O TIENE QUE GIRAR  A DERECHA O IZQUIERDA
308. ;       Comparar
309.         CLRF    STATUS
310.         MOVF    PASOS_PAN,W             ;VALOR LEIDO EN DATOS POR DMX
311.         XORWF   CONTA_PASOS_PAN,W       ;y lo compara con la CONTA_PASOS_PAN QUE ES EL VALOR DE POSICION ACTUAL
312.         BTFSS STATUS,Z                  ;¨ Son iguales ?
313.         GOTO NOT_EQ1    ;PASOS ES DISTINTO A CUENTA_PASOS, TIENE QUE CALCULAR PARA DONDE GIRAR
314.         GOTO EQ1                ;PASOS ES IGUAL A CUENTA_PASOS, TIENE QUE DETENER MOTOR
315.  
316. EQ1     ;NO SE REALIZA NINGUNA VARIACION EN LOS DELAY PATRONES
317. ;       CLRF    COMPENSAR       ;NO HAY VARIACION DE TIEMPOS, Y DETENER EL MOTOR
318.         GOTO    COMPARAR2       ;BREAK  ;IR A DETECTAR EL COMIENZO DE LA PROXIMA TRAMA DMX
319.        
320. NOT_EQ1
321.         MOVF PASOS_PAN, W
322.         SUBWF CONTA_PASOS_PAN,W  ;F-W   GUARDO RESULTADO EN W  
323.         BTFSS STATUS, C
324.         GOTO GIRO_DERECHA1
325.         GOTO GIRO_IZQUIERDA1    
326.  
327. GIRO_DERECHA1
328.         INCF    CONTA_PASOS_PAN,F
329.         INCF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
330.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
331.         MOVWF   COMPENSAR
332.         MOVF    CONTA_PASOS_PAN,W
333.         SUBWF   PASOS_PAN,W
334.         MOVWF   COMPENSAR       ; PROPORCIONAL AL RETARDO, MAS LEJOS, MENOS TIEMPO
335.  
336.         GOTO    COMPARAR2       ;NDP
337.        
338. GIRO_IZQUIERDA1
339.         DECF    CONTA_PASOS_PAN,F
340.         DECF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
341.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
342.         MOVWF   RESTO
343.         MOVF    PASOS_PAN,W
344.         SUBWF   CONTA_PASOS_PAN,W
345.         SUBWF   RESTO,W
346.         MOVWF   COMPENSAR       ;VALOR  PROPORCIONAL AL RETARDO, MAS CERCA, MAS  TIEMPO
347.         GOTO    COMPARAR2       ;NDP
348.        
349.        
350. ;***********************************************************************************************
351. ;################  POSICIONAMIENTO DEL MOTOR DE TILT  ##########################################
352. ;***********************************************************************************************
353. COMPARAR2       ;VERIFICA SI LLEGO AL LUGAR PARA DETENERSE, O TIENE QUE GIRAR  A DERECHA O IZQUIERDA
354. ;       Comparar
355.         CLRF    STATUS
356.         MOVF    PASOS_TILT,W            ;
357.         XORWF   CONTA_PASOS_TILT,W      ;y lo compara con la CONTA_PASOS QUE ES EL VALOR DE POSICION ACTUAL
358.         BTFSS STATUS,Z                  ;¨ Son iguales ?
359.         GOTO NOT_EQ2    ;PASOS ES DISTINTO A CUENTA_PASOS, TIENE QUE CALCULAR PARA DONDE GIRAR
360.         GOTO EQ2                ;PASOS ES IGUAL A CUENTA_PASOS, TIENE QUE DETENER MOTOR
361.  
362. EQ2     ;NO SE REALIZA NINGUNA VARIACION EN LOS DELAY PATRONES
363. ;       CLRF    COMPENSAR       ;NO HAY VARIACION DE TIEMPOS, Y DETENER EL MOTOR
364. ;       GOTO    BREAK   ;IR A DETECTAR EL COMIENZO DE LA PROXIMA TRAMA DMX
365.         GOTO    NDP
366.        
367. NOT_EQ2
368.         MOVF PASOS_TILT, W
369.         SUBWF CONTA_PASOS_TILT,W  ;F-W   GUARDO RESULTADO EN W 
370.         BTFSS STATUS, C
371.         GOTO GIRO_DERECHA2
372.         GOTO GIRO_IZQUIERDA2    
373.  
374. GIRO_DERECHA2
375.         INCF    CONTA_PASOS_TILT,F
376.         INCF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
377.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
378.         MOVWF   COMPENSAR
379.         MOVF    CONTA_PASOS_TILT,W
380.         SUBWF   PASOS_TILT,W
381.         MOVWF   COMPENSAR       ; PROPORCIONAL AL RETARDO, MAS LEJOS, MENOS TIEMPO
382.  
383.         GOTO    NDP
384.        
385. GIRO_IZQUIERDA2
386.         DECF    CONTA_PASOS_TILT,F      ;
387.         DECF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
388.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
389.         MOVWF   RESTO
390.         MOVF    PASOS_TILT,W
391.         SUBWF   CONTA_PASOS_TILT,W
392.         SUBWF   RESTO,W
393.         MOVWF   COMPENSAR       ;VALOR  PROPORCIONAL AL RETARDO, MAS CERCA, MAS  TIEMPO
394.  
395.         GOTO    NDP
396.  
397.  
398.  
399.  
400. ;************************************************************************************************
401. NDP                     MOVF    CONTA_PAN,W
402.                         PAGESEL TABLA_PAN
403.                         LCALL   TABLA_PAN
404.                         ;DEMORA PROPORCIONAL A LA DIFERENCIA ENTRE PASOS, MAS PASOS MENOS DEMORA, ESTA MAS LEJOS...
405.                         MOVWF   PUERTO
406.                        
407.                         MOVF    CONTA_TILT,W
408.                         PAGESEL TABLA_TILT
409.                         LCALL   TABLA_TILT
410.                         ANDWF   PUERTO,W        ;UNO AMBAS SALIDA DE TABLA PARA SALIR POR EL PUERTO B
411.                        
412.                         MOVWF   PORTB
413.  
414.         ;               MOVF    VELOCIDAD,W ;PASO EL DATO DE VELOCIDAD LEIDO EN EN TERCER CANAL
415.         ;               MOVWF   COMPENSAR       ;AL CONTADOR DE DEMORAS COMPENSAR
416.  
417.         ;               CALL    DEMORA
418.                         GOTO    BREAK   ;GOTO   COMPARAR
419. ;;*********************************************************************************************
420. DELAY   CALL    DEMORA          ;RETARDO ENTRA PASOS, VARIABLE SEGUN LA DIFERENCIA DE PASOS
421.                 DECFSZ  COMPENSAR,F     ;A MAS PASOS, MENOS DEMORA, AL ESTAR MAS CERCA, INCREMENTA LA DEMORA
422.                 GOTO    DELAY           ;PARA QUE EL MOTOR SE ACERQUE DE FORM MAS SUAVE
423.                 RETURN
424.  
425. DEMORA 
426.                 MOVLW   .2
427.                 MOVWF   LOOP1
428. OTRO2   NOP
429.                 CLRWDT
430.                 DECFSZ  LOOP1,F
431.                 GOTO    OTRO2
432.                 RETURN
433.  
434.  
435. ;#################################################################################################
436.  
437.         ORG     100H   
438. POSICION_CERO   ;EN EL ENCENDIDO, AMBOS EJES GIRAN HASTA ENCONTRAR EL FIN DE CARRERA RESPECTIVO
439. ;                                       Y COLOCAR EN CERO LOS CONTADORES CRRESPONDIENTES
440.                 MOVLW   .255
441.                 MOVWF   CONTA_PASOS_TILT
442.                 MOVWF   CONTA_PASOS_PAN
443.                 MOVWF   POSICION
444.        
445. BUSCAR_CERO
446. ;                               GIRO_IZQUIERDA DEL MOTOR DE TILT, EN BUSQUEDA DE LLEGAR AL FIN DE CARRERA, PARA SU POSICION DE CERO
447.         BTFSS   FC_TILT ;ESTA TOCANDO EL FIN DE CARRERA DE TILT
448.         GOTO    $+3
449.         DECF    CONTA_PASOS_TILT,F      ;
450.         DECF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
451.  
452.         BTFSS   FC_PAN          ;ESTA TOCANDO EL FIN DE CARRERA DE PAN
453.         GOTO    $+3
454.         DECF    CONTA_PASOS_PAN,F       ;
455.         DECF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
456.  
457.         MOVF    CONTA_PAN,W
458.         PAGESEL TABLA_PAN      
459.         LCALL   TABLA_PAN      
460.         MOVWF   PUERTO
461.         MOVF    CONTA_TILT,W
462.         PAGESEL TABLA_TILT     
463.         LCALL   TABLA_TILT     
464.         ANDWF   PUERTO,W        ;UNO AMBAS SALIDA DE TABLA PARA SALIR POR EL PUERTO B
465.                        
466.         MOVWF   PORTB
467.  
468.         PAGESEL DELAY2
469.         LCALL   DELAY2
470.         LCALL   DELAY2
471.         DECFSZ  POSICION,F
472.         GOTO    BUSCAR_CERO     ;REPITE ESTE LOOP UN MAXIMO DE 255 VECES, PARA ASEGURARNOS SI ESTAN EN EL LADO OPUESTO
473.  
474.         CLRF    CONTA_PASOS_PAN
475.         CLRF    CONTA_PASOS_TILT
476. ;       INCF    CONTA_PASOS_TILT,F      ;ME ASEGURO QU TOMEN EL VALOR UNO
477. ;       INCF    CONTA_PASOS_PAN,F
478.  
479.  
480.         RETURN
481.  
482.                
483. ;************************************************************************************************
484.  
485. DELAY2 
486.                 MOVLW   .150
487.                 MOVWF   LOOP3
488.                 MOVLW   .100
489.                 MOVWF   LOOP1
490. OTRO22  NOP
491.                 NOP
492.                 NOP
493.                 NOP
494.                 NOP
495.                 NOP
496.                 CLRWDT
497.                 DECFSZ  LOOP1,F
498.                 GOTO    OTRO22
499.                 DECFSZ  LOOP3,F
500.                 GOTO    OTRO22-2
501.         INCF    DESTELLO,F
502.         BCF             LED                                    
503.         BTFSC   DESTELLO,2 ; DESTELLO DEL LED INDICADOR DMX, EN ESTE CASO, INDICA QUE SE ESTA POSICIONANDO A CERO
504.         BSF             LED
505.                 RETURN
506.  
507.         END

EL  Circuito impreso
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6934)

El proyecto terminado y funcionando, plaqueta
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6936)

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 01 de Septiembre de 2010, 18:06:14

Hola, me alegro que te agrade el diseñito...
es posible colocar más motores repitiendo este diseño, si te fijas en el programa dice

Código: ASM

1. MOVLW   .1      ;PORTB,W        MOVWF   DIPSWICH        ;DIRECCION DMX QUE SE ASIGNA EMPLEANDO 8 DIP SWICH (EN BINARIO)

es decir, configura para el canal 1 y 2, (el micro es muy pequeño, asi que solo dos motores)
Las entradas que dicen FC1 significa Fin de Carrera, y es para conectar algun sensor o reed swich o interruptor , ya que al encender, como cualquioer movil de iluminacion, se setea, buscando la posicion cero...   :mrgreen:

Saludos!

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: sistemas en 01 de Septiembre de 2010, 22:29:34

oye Norberto muchisimas gracias por haberme contestado.
me alegra que todabia estubieras ahi ya que el foro me advertia que tenia mucho tiempo sin uso.
me voy a poner a trabajar en este proyecto espero que si en el camino me trabo un poco todabia estes ahi para echarme la mano de antemano gracias por tu anterior respuesta.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: djemix en 11 de Agosto de 2011, 21:32:01

hola amigos del foro! mi nombre es emiliano y estoy muy interesado en realizar un proyecto de un receptor DMX 512, lo cierto es que estube buscando por toos lados pero no encontre lo que quiero, y lo que encuentro por una u otra causa no puedo desarrollarlo. lo que me gustaria hacer es un receptor DMX con 3 salidas PWM, para controlar leds  y de ser posible con algun pic ya que no trabajo con los atmega...
gracias a todos! y si alguien me puede hechar una manito se lo voy a agradecer!

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: electrofernando en 12 de Diciembre de 2011, 23:22:11

Hola a todos soy nuevo en esto y estoy intentando entender este proyecto que esta muy bueno
Mi pregunta es la siguiente .... en el programa esta las instrucciones para hacer la comparacion con un dip switch que indica
el canal DMX . Donde va conectado el dip switch?
Gracias

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: jfsh2000 en 02 de Abril de 2012, 15:34:47

Muy Buen trabajo amigo  ((:-)) ((:-)) ((:-)) ((:-)) ((:-))

solo tengo una duda se pueden asignar otro canales por medio de la configuracion del asm o por dip swich.

estoy intentando hacer unas luces

de antemano muchas gracias

saludos a todos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 05 de Abril de 2012, 13:18:48

Hola, tu consulta, esta un poquito más arriba, y si, es posible  :mrgreen:
http://www.todopic.com.ar/foros/index.php?topic=21800.msg266242#msg266242

Saludos!

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: jfsh2000 en 06 de Abril de 2012, 03:35:49

Muchas gracias Norberto

ya arme el circuito y programe el pic pero solo gira el motor del canal 1 el canal 2 no hace nada no responde ya intercambie el ULM2003 pendando que estaba dañado pero sigue sin funcionarno  se a que se deba lo grabe con el hex que se encuentra mas arriba
 :)
saludos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 06 de Abril de 2012, 10:00:52

Hola Jfsh, el programa tal cual está, es el que aparece en el video... revisa las conexiones ... el cristal de 20mhz.... tiene que salir andando... ..
 no se que consola estas empleando, porque quizás está asignado otro canal en lugar del canal 2...

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: jfsh2000 en 06 de Abril de 2012, 21:22:18

Gracias Norberto

estoy usando una controladora sunlite 2006 por conexion usb

Revisare las conexiones seguí el diagrama que viene en la pagina tengo algunas dudas con respecto a la pcb ya que es un poco diferente en cuanto al diagrama ya que en el diagrama no aparece el switch.

saludos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 06 de Abril de 2012, 21:57:01

Hola, no entiendo... no hay ningun dipswich, ni en el diagrama, ni en la placa... solo figuran en el programa, pero está, empleados como registros... y se le carga la dirección uno... dos y tres...
La idea es para luego cambiar la forma de dar la dirección con un dipswich... pero así funciona...

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: jfsh2000 en 06 de Abril de 2012, 23:06:44

Hola Norberto :P

Ya lo tengo funcionando en los dos canales tuve que compilar nuevamente el codigo en asm a hex ya que el problema era el hex que estaba adjntado en la paguina ya que solo funcionaba el canal 1.

en cuanto a la direccion de dmx tambien hice pruebas cambiando el valor del canal y funciona correctamente,

La velocidad de los motores es muy buena como la de tu video.

solo tengo una duda mas como puedo modificar el programa para motores de impresora de 48 pasos ya que es un por el momento solo tengo 1 de 200 pasos y muchos de impresora.

Solo me resta empezar a armar el gabinete y colocar un espejo. cuando lo tenga listo subo fotografías.
muchas gracias por tu apoyo  :lol: :lol:
saludos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 07 de Abril de 2012, 23:59:16

Hola, me alegro que ya te funciona...  que tengas un motor de menos pasos, solo  producirá mas vueltas del eje... pero el programa es el mismo...

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: naldo santos en 23 de Abril de 2012, 04:24:48

Cita de: jfsh2000 en 06 de Abril de 2012, 23:06:44

Hola Norberto :P

Ya lo tengo funcionando en los dos canales tuve que compilar nuevamente el codigo en asm a hex ya que el problema era el hex que estaba adjntado en la paguina ya que solo funcionaba el canal 1.

en cuanto a la direccion de dmx tambien hice pruebas cambiando el valor del canal y funciona correctamente,

La velocidad de los motores es muy buena como la de tu video.

solo tengo una duda mas como puedo modificar el programa para motores de impresora de 48 pasos ya que es un por el momento solo tengo 1 de 200 pasos y muchos de impresora.

Solo me resta empezar a armar el gabinete y colocar un espejo. cuando lo tenga listo subo fotografías.
muchas gracias por tu apoyo  :lol: :lol:
saludos

Bom dia Caro Amigo !  

Estou com mesmo problema que vc estava é que fiz este magnifico projeto e utilizei este arquivo Hex acima e só funcionou um motor tentei gerar outro arquivo hex
porem não sei utilizar o assembler teria como postar o seu arquivo Hex para poder baixar? estou muito ancioso para ver funcionando, :lol: por favor me ajudem!!!!

Grato !

Naldo Santos.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 23 de Abril de 2012, 07:57:38

Cita de: naldo santos en 23 de Abril de 2012, 04:24:48

Bom dia Caro Amigo !  

Estou com mesmo problema que vc estava é que fiz este magnifico projeto e utilizei este arquivo Hex acima e só funcionou um motor tentei gerar outro arquivo hex
porem não sei utilizar o assembler teria como postar o seu arquivo Hex para poder baixar? estou muito ancioso para ver funcionando, :lol: por favor me ajudem!!!!

Grato !

Naldo Santos.

Hola Naldo, el archivo HEX para descargar (http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=7199)

Saludos!

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: naldo santos en 25 de Abril de 2012, 10:39:40

Cita de: naldo santos en 23 de Abril de 2012, 04:24:48

Cita de: jfsh2000 en 06 de Abril de 2012, 23:06:44

Hola Norberto :P

Ya lo tengo funcionando en los dos canales tuve que compilar nuevamente el codigo en asm a hex ya que el problema era el hex que estaba adjntado en la paguina ya que solo funcionaba el canal 1.

en cuanto a la direccion de dmx tambien hice pruebas cambiando el valor del canal y funciona correctamente,

La velocidad de los motores es muy buena como la de tu video.

solo tengo una duda mas como puedo modificar el programa para motores de impresora de 48 pasos ya que es un por el momento solo tengo 1 de 200 pasos y muchos de impresora.

Solo me resta empezar a armar el gabinete y colocar un espejo. cuando lo tenga listo subo fotografías.
muchas gracias por tu apoyo  :lol: :lol:
saludos

Bom dia Caro Amigo !  

Estou com mesmo problema que vc estava é que fiz este magnifico projeto e utilizei este arquivo Hex acima e só funcionou um motor tentei gerar outro arquivo hex
porem não sei utilizar o assembler teria como postar o seu arquivo Hex para poder baixar? estou muito ancioso para ver funcionando, :lol: por favor me ajudem!!!!

Grato !

Naldo Santos.

Obrigado caro amigo! compilei o hex que me enviaste e funcionou os dois motores,porem estou usando motores bipolar de 1.8graus e 200 passos por revolução e ficou muito lento a velocidade ,pergunto em que local no codigo posso alterar a velocidade dos motores?
teria como?

grato e no aguardo.

Naldo Santos.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 25 de Abril de 2012, 10:45:19

Hola Naldo, puedes disminuir el valor de la demora

Código: ASM

1. DELAY2          MOVLW   .150
2.                 MOVWF   LOOP
3.              MOVLW      .100
4.                 MOVWF   LOOP1

en lugar de .150, coloca .50... o prueba un valor que no pierda pasos,...   :mrgreen:

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: naldo santos en 25 de Abril de 2012, 12:54:51

Cita de: naldo santos en 25 de Abril de 2012, 10:39:40

Cita de: naldo santos en 23 de Abril de 2012, 04:24:48

Cita de: jfsh2000 en 06 de Abril de 2012, 23:06:44

Hola Norberto :P

Ya lo tengo funcionando en los dos canales tuve que compilar nuevamente el codigo en asm a hex ya que el problema era el hex que estaba adjntado en la paguina ya que solo funcionaba el canal 1.

en cuanto a la direccion de dmx tambien hice pruebas cambiando el valor del canal y funciona correctamente,

La velocidad de los motores es muy buena como la de tu video.

solo tengo una duda mas como puedo modificar el programa para motores de impresora de 48 pasos ya que es un por el momento solo tengo 1 de 200 pasos y muchos de impresora.

Solo me resta empezar a armar el gabinete y colocar un espejo. cuando lo tenga listo subo fotografías.
muchas gracias por tu apoyo  :lol: :lol:
saludos

Bom dia Caro Amigo !  

Estou com mesmo problema que vc estava é que fiz este magnifico projeto e utilizei este arquivo Hex acima e só funcionou um motor tentei gerar outro arquivo hex
porem não sei utilizar o assembler teria como postar o seu arquivo Hex para poder baixar? estou muito ancioso para ver funcionando, :lol: por favor me ajudem!!!!

Grato !

Naldo Santos.

Obrigado caro amigo! compilei o hex que me enviaste e funcionou os dois motores,porem estou usando motores bipolar de 1.8graus e 200 passos por revolução e ficou muito lento a velocidade ,pergunto em que local no codigo posso alterar a velocidade dos motores?
teria como?

grato e no aguardo.

Naldo Santos.

Caro amigo ! muito grato pela ajuda e resposta  rapida , fiz o que me pediu mudei o valor delay2 MOVLW  .150  para .50 e  o motor
se moveu com uma velocidade bastante agradavél para o ponto inicial (0) e quando acionei o potenciometro do canal referente ao motor o mesmo se movimentou lentamente como antes, resumindo só alterou a velocidade de deslocamento ao ponto inicial,tem mais algo que eu posso tentar?

Grato !

Naldo Santos.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: rafaelcarlos en 21 de Junio de 2012, 22:41:29

Hola ,antes que nada felicitarte por este proyecto, esta buenisimo, y cade vez me intereso mas en el tema que de a poco me esta apasionando, estoy tratando de hacer este proyecto,  hay cosas que no entiendo , por ejemplo, el capacitor de tantalio que funcion cumple y de que valor es. Tal vez parece una burrada peroooooo... el que no pregunta no aprende
Desde ya muchas gracias por de compartir tus conosimientos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 22 de Junio de 2012, 21:08:17

Hola Rafaelcarlos, me alegra que estés interesado en iluminación...  el capacitor de tantalio, se suelda lo más cerca a los pines de alimentación del micro, y muchas veces, hasta es soldado directamente en la parte de soldaduras. Actúa como filtro en la alimentación. y podes colocar valores de 1uF a 10uF. ten en cuenta que es polarizado.

Saludos!

Norberto

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: rafaelcarlos en 24 de Junio de 2012, 21:59:51

Muchas Gracias Norberto por tu contestacion y tendre en cuenta la polaridad, voy a ver si lo puedo armar y luego subo mis comentarios , La verdad que tu contestacion me alienta a seguir intentando realizar las cosas ya que otras paginas he preguntado alguna duda y nunca me respondieron
Te agradezco por tu contestacion
saludos
Rafael

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: rafaelcarlos en 16 de Julio de 2012, 17:36:32

Hola Norberto queria agradecerte por tu proyecto ya lo hice funcionar  :-/ :-/ :-/ :-/ :-/ pero me cuesta conseguir motores en alghun momentito subo algunas fotos
Muchas gracias por tu ayuda
Rafael

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: marco en 31 de Octubre de 2012, 22:04:15

Hola desde cochabamba; muy bueno tu proyecto "receptor dmx para dos motores" Ya lo tengo funcionando de maravilla pero tengo una duda como puedo reemplazar el pic16f628 por un pic16f877 u otro pic para aumentar mas motores, lo intente pero no quiere compilar (creo que es el MCLRE de la cabecera); te agradecere mucho si me colaboras. un saludo espero tu pronta respuesta

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: AgusPic en 27 de Enero de 2014, 13:32:34

Cita de: marco en 31 de Octubre de 2012, 22:04:15

Hola desde cochabamba; muy bueno tu proyecto "receptor dmx para dos motores" Ya lo tengo funcionando de maravilla pero tengo una duda como puedo reemplazar el pic16f628 por un pic16f877 u otro pic para aumentar mas motores, lo intente pero no quiere compilar (creo que es el MCLRE de la cabecera); te agradecere mucho si me colaboras. un saludo espero tu pronta respuesta

Yo necesito hacer algo parecido....¿Se puede cambiar el Pic para poder controlar 4 motores?...Si eso es posible por favor pasenme que tipo de pic seria y como quedaria la placa ya terminada y modificada....¿Porque necesito hacer esto?...Porque con mi Papá estamos queriendo armar o "diseñar" un Cabezal Movil Led en el cual usaremos una placa DMX Rgb para controlar un led de 10 o 15w y vamos a usar este diseño de placa para controlar(si es posible) 4 motores...2 que lo hagan girar y otros 2 para el movimiento de unos "dibujos" y movimiento de una Lente para cambiar el tamaño de la circunferencia....
Bueno si es posible modificar la placa necesito que por favor me manden algunas imagenes de como quedaria la placa terminada y modificada y tambien como se programaria el Pic ya que soy nuevo en todo esto de los Pic´s y en el foro....

Desde ya Muchas Gracias.. :-/ :-/ :-/ :-/

Saludos

Agus

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: riscal en 27 de Mayo de 2014, 14:42:25

Cita de: todopic en 19 de Mayo de 2008, 00:38:58

Buenas tardes desde España, muy buen trabajo Nonberto, estoy interesado saber si has pueto el pulsador para la direcion de dmx no lo he visto en ningun lado

muchas gracias y saludo al foro 

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: tomlico en 26 de Agosto de 2015, 16:12:45

Saludos a tod@s. Necesito que me ayudéis. He montado el circuito pero al darle señal dmx el motor da como saltos y no gira. Espero que haya alguien todavía en este foro. gracias.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: locodelafonola en 27 de Agosto de 2015, 21:03:35

hoal

Cita de: tomlico en 26 de Agosto de 2015, 16:12:45

Saludos a tod@s. Necesito que me ayudéis. He montado el circuito pero al darle señal dmx el motor da como saltos y no gira. Espero que haya alguien todavía en este foro. gracias.

 trata de invertir los dos punta de bobina (una de cada una) y contame

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: tomlico en 29 de Agosto de 2015, 08:12:42

Gracias locodelafonola por tu respuesta, en cuanto puedo lo probaré. No se si tu has realizado este proyecto, porque tengo algunas dudas mas. En el esquema vienen piezas que luego no las veo en la foto del proyecto terminado. Otras de la foto no coinciden con las piezas del esquema. Y lo mas difícil para mi, parece que el archivo hex está mal y hay que compilarlo otra vez, y de eso no tengo ni idea. Si me puedes resolver alguna de mis dudas te lo agradecería. Gracias.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: stk500 en 29 de Agosto de 2015, 08:28:35

Cita de: todopic en 18 de Mayo de 2008, 20:01:32

Hola Amigos!, les presento este proyecto, que ya está en funcionamiento  :-/ :mrgreen:

Continuando con el codigo receptor DMX, luego de verificar el funcionamiento para un motor (empleando 4 leds) agregué para comandar en forma individual, un par de motores, empleo para exitarlos, 2 ULM2003

(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6932)

Código: ASM

1. ;*****************************************************************        
2. ;receptor dmx - decodifica 3 canales - dos motores pap y velocidad
3. ; Norberto Pellegrini - Todopic Electronica
4. ;*****************************************************************
5. ;24/12/06 12:09a.m. HAY QUE EMPLEAR EL MICRO A 20 MHZ
6. ; verificacion de tiempos y compensacion con NOP de las tramas
7. ;*****************************************************************
8.  
9.     list p=16f628
10.         #include p16f628.inc
11.  
12.         ERRORLEVEL      -302, -307      ;(NO FIGURAN LOS ERRORES DE CAMBIO DE PAGINA)
13.  
14.        
15.         CBLOCK  H'20'   ;32 decimal     H'0C'
16. ;ASIGNACION DE REGISTRO DE USO GENERAL
17.         CONTA_T ;TIEMPO DEL BREAK, DE 88 uS
18.         CONTABIT        ;8 BIT DE DATOS
19.         CHANEL          ;CONTADOR DE CANALES LEIDOS POR EL RECEPTOR
20.         DIPSWICH        ;seteos de direccion
21.         DIPSWICH_MAS1   ;DIRECCION MAS UNO O SIGUIENTE
22.         DIPSWICH_MAS2   ;DIRECCION MAS DOS
23.         DATOS                   ;BYTE DE RECEPCION RS485 DE DMX
24.         POSICION
25.         PASOS_PAN
26.         PASOS_TILT
27.         CONTA_PASOS_PAN
28.         CONTA_PASOS_TILT
29.         CONTA_PAN       ;CONTADOR DE TABLA DE PASOS DEL MOTOR
30.         CONTA_TILT      ;CONTADOR DE LA TABLA DEL SEGUNDO MOTOR
31.         DESTELLO
32.         DESTELLO1       ;SON LOS CONTADORES PARA PRODUCIR EL
33.         DESTELLO2       ;DESTELLO DEL LED INDICADOR DE FALTA DE SEÑAL DMX
34.         VELOCIDAD
35.         COMPENSAR               ;TIEMPO A COMPENSAR EN LOS DELAY PARA REDUCIR LA VELOCIDAD AL ESTAR MAS CERCA DE LA POSICION
36.         RESTO
37.         RETARDO
38.         PUERTO  ;       BYTE AUXILIAR PARA FORMAR EL AND DE LAS SALIDAS AL PUERTO B
39.         LOOP1
40.         LOOP2
41.         LOOP3
42.         ENDC
43.        
44.  
45. #DEFINE DMX     PORTA,3 ; en el prototipo era 4
46. #DEFINE FC_PAN  PORTA,1
47. #DEFINE FC_TILT PORTA,2
48. #DEFINE LED     PORTA,0
49.  
50.  
51.         __CONFIG   _HS_OSC &  _WDT_ON & _PWRTE_ON & _CP_OFF & _BODEN_ON & _LVP_OFF & _MCLRE_OFF
52. ;               osc 20 mhz
53.  
54. ;**********************************************************************
55. RESET   org     00h     ;el vector de reset es la dirección 00
56.  
57.  
58.                 goto    INICIO  ;se salta al inicio del programa
59.  
60. ;**********************************************************************
61.         org     05h
62.  
63. ;*************** SUBRUTINA DE RETARDO DE 2 Us   **************         
64. ;-------------------------------------------------------------
65. DEMORA2US ; ES EN REALIDAD DE 1.8 uS PARA COMPENZAR
66.         NOP     ;1 uS
67.         NOP
68.         CLRWDT
69.         NOP
70.         NOP     ;1 uS
71.         RETURN
72. ;**********************************************************************************
73. ;##################################################################################
74. ;**********************************************************************************
75. ;TABLA DE POSICIONAMIENTO DE LOS MEDIO PASOS DEL MOTOR PAP DE PANORAMICO
76. TABLA_PAN       ADDWF   PCL,F
77.                 GOTO    CORREGIR1
78.                 RETLW   B'11110001'     ;LOS 4 BIT DE MAYOR PESO ESTAN EN UNO PARA HACER BUNA AND ENTRE TABLAS
79.                 RETLW   B'11110011'
80.                 RETLW   B'11110010'
81.                 RETLW   B'11110110'
82.                 RETLW   B'11110100'
83.                 RETLW   B'11111100'
84.                 RETLW   B'11111000'
85. ULTIMO  RETLW   B'11111001'
86.                 MOVLW   .1                      ;LIMITE MAXIMO DE LA TABLA
87.                 MOVWF   CONTA_PAN
88.                 GOTO    TABLA_PAN+2
89. ;---------------------------------------------------------------------------------------------
90. CORREGIR1                       ;SI ERA CERO, LO PASO AL VALOR 8 DE LA TABLA (LIMITE MINIMO DE LA TABLA)
91.                 MOVLW   .8
92.                 MOVWF   CONTA_PAN
93.                 GOTO    ULTIMO
94. ;************************************************************************************************
95. ;################################################################################################
96. ;************************************************************************************************
97. ;TABLA DE POSICIONAMIENTO DE LOS MEDIO PASOS DEL MOTOR PAP DE TILT
98. TABLA_TILT      ADDWF   PCL,F
99.                 GOTO    CORREGIR2
100.                 RETLW   B'00011111'     ;LOS 4 BIT DE MENOR PESO SON 1 PARA HACER UNA AND ENTRE LAS TABLAS
101.                 RETLW   B'00111111'
102.                 RETLW   B'00101111'
103.                 RETLW   B'01101111'
104.                 RETLW   B'01001111'
105.                 RETLW   B'11001111'
106.                 RETLW   B'10001111'
107. ULTIMO2 RETLW   B'10011111'
108.                 MOVLW   .1                      ;LIMITE MAXIMO DE LA TABLA
109.                 MOVWF   CONTA_TILT
110.                 GOTO    TABLA_TILT+2
111. ;---------------------------------------------------------------------------------------------
112. CORREGIR2                       ;SI ERA CERO, LO PASO AL VALOR 8 DE LA TABLA (LIMITE MINIMO DE LA TABLA)
113.                 MOVLW   .8
114.                 MOVWF   CONTA_TILT
115.                 GOTO    ULTIMO2
116.                
117. ;************************************************************************************************
118. ;############################  PROGRAMA  PRINCIPAL ##############################################
119. ;************************************************************************************************
120.  
121. INICIO
122.        
123.         MOVLW 0x07
124.         MOVWF CMCON     ;PARA EL 16F628, ELIMINO LOS COMPARADORES, TODAS SALIDAS DIGITALES
125.  
126.         BSF             STATUS,RP0      ;BANCO 1
127.         MOVLW   B'00000000'     ; 8 TODAS SALIDAS PARA CONTROLAR 2 MOTORES PAP
128.         MOVWF   TRISB
129.         MOVLW   B'11111110'     ;1 SALIDAS
130.         MOVWF   TRISA
131.         BCF             STATUS,RP0      ;BANCO 0
132.         CLRF    TMR0
133.  
134. ;       MOVLW   B'11111111'
135.         CLRF    PORTB           ;coloco en cero las salidas
136.         CLRF    PORTA
137.         CLRF    DATOS
138.         CLRF    CHANEL
139.         BCF             LED
140.         MOVLW   .1
141.         MOVWF   CONTA_PASOS_PAN
142.         MOVWF   CONTA_PASOS_TILT
143.         MOVWF   CONTA_PAN
144.         MOVWF   CONTA_TILT
145.         MOVWF   PASOS_PAN
146.         MOVWF   PASOS_TILT
147.         CALL    DEMORA
148.         CLRF    PUERTO
149.         CLRF    PORTB
150.         CLRWDT
151.         PAGESEL POSICION_CERO
152.         LCALL   POSICION_CERO   ;BUSQUEDA DE LOS CEROS DE CADA EJE
153.        
154. ;*************************************************************************************************
155. ;#####################  PULSO DE ARRANQUE O SINCRONISMO BREAK ####################################             
156. ;**************************************************************************************************
157. ;ESPERA LA LLEGADA DEL PULSO BREAK, QUE TIENE QUE SER DE AL MENOS 88 uS A 1 SEGUNDO, SINO ES ERROR
158. ;ESTE PULSO BAJO DE 88 uS INDICA EL COMIENZO DE LA TRAMA DMX, QUE ES CICLICA
159. BREAK
160.         CLRWDT
161. ;------------------------------------------------------------------------------------  
162.         MOVLW 0x07
163.         MOVWF CMCON     ;PARA EL 16F628, ELIMINO LOS COMPARADORES, TODAS SALIDAS DIGITALES
164.  
165.         BSF             STATUS,RP0      ;BANCO 1
166.         MOVLW   B'00000000'     ; 8 entradas PARA ASIGNAR UNA DE LAS 255 DIRECCIONES POSIBLES
167.         MOVWF   TRISB
168.         MOVLW   B'11111110'     ;1 SALIDAS
169.         MOVWF   TRISA
170.         BCF             STATUS,RP0      ;BANCO 0
171.         PAGESEL DEMORA2US
172. ;------------------------------------------------------------------------------
173.         ;LEER EL CANAL DMX SETEADO EN LOS DIP SWICH
174.         MOVLW   .1      ;PORTB,W
175.         MOVWF   DIPSWICH        ;DIRECCION DMX QUE SE ASIGNA EMPLEANDO 8 DIP SWICH (EN BINARIO)
176.         INCF    DIPSWICH,W     
177.         MOVWF   DIPSWICH_MAS1   ;ES UN VALOR MAS DE LA DIRECCION ASIGNADA
178.         INCF    DIPSWICH_MAS1,W
179.         MOVWF   DIPSWICH_MAS2   ;ES DOS VALORES MAS DE LA DIRECCION ASIGNADA
180.  
181.         MOVLW   .80
182.         MOVWF   CONTA_T
183.         MOVLW   .255    ;PARA QUE EMPIECE A CONTAR DESDE EL CANAL CERO
184.         MOVWF   CHANEL
185.  
186. ;---------------------------------------------------------------------------
187. CONTINUAR
188.         DECFSZ  DESTELLO2,F     ;RETARDOS EN LOS DESTELLOS A LA ESPERA DE SEÑAL DMX
189.         GOTO    ES_CERO
190.         DECFSZ  DESTELLO1,F    
191.         GOTO    ES_CERO
192.         INCF    DESTELLO,F
193.         BCF             LED                                     ;MIENTRAS ESTA EN CERO APAGO EL LED INDICADOR DE SE¥AL DMX
194.         BTFSC   DESTELLO,2 ; Y QUEDARA DESTELLANDO LENTO
195.         BSF             LED
196.  
197. ES_CERO
198.         BTFSC   DMX                                     ;ES LA ENTRADA DMX CERO?, SI SALTAR
199.         GOTO    BREAK
200.         DECFSZ  CONTA_T,F       ;SI LLEGA A CERO, ES PORQUE EL BREAK DURO POR LO MENOS 88 uS (80)
201.         GOTO    ES_CERO
202.         BTFSS   DMX                                     ;ESPERO A QUE TERMINE EL PULSO DE BREAK, POR SI ES MAYOR A 88 US
203.         GOTO    $-1                                     ;Y DETERMINO EL COMIENZO DEL PULSO "MARK" QUE ES ALTO (UNO) DE 8 uS
204.        
205. MARK    ;                                                       DURACION DE 8 uS EN ALTO
206.         CALL DEMORA2US                  ;2 uS, VERIFICO A LA MITAD DEL PULSO
207.  
208.         BTFSS   DMX                                     ; MITAD DEL PRIMER PULSO, LEO SI ESTA EN UNO
209.         GOTO    BREAK                           ;HAY ERROR
210.        
211.         CALL DEMORA2US          ;FINAL DEL PRIMER PULSO
212.         CALL DEMORA2US          ;PRIMER MITAD DEL 2DO PULSO
213.  
214.         BTFSS   DMX                                     ; MITAD DEL SEGUNDO PULSO
215.         GOTO    BREAK                           ;HAY ERROR
216.  
217. PROX    ;<---------SINCRONIZACION DEL PULSO DE START #########################################################
218.         INCF    CHANEL,F
219.                                                                         ;SI EL NUMERO DE CANAL ES XX SETEADO CON LOS DIPSWICH
220.                                                                         ; VER EL VALOR DE DATA, Y ACTUAR
221.  
222.         BTFSC   DMX             ;ME QUEDO ESPERANDO LOS 2uS FINALES DE MARK
223.         GOTO    $-1             ;HASTA QUE APAREZCA EL PULSO BAJO DE START
224.                                                         ;AL DETECTAR EL BAJO DE STAR, ME
225.         ;CALL           DEMORA2US       ;DESPLAZO A LA MITAD DEL PRIMER BIT
226.         NOP
227.         CLRWDT
228.         NOP
229.         MOVLW   .8
230.         MOVWF   CONTABIT        ;CADA BIT DURA 4 uS
231.  
232. START           ;CAIGO EN LA MITAD DEL PULSO START, QUE TIENE QUE SER BAJO
233.         BSF             LED
234.         CLRF    DATOS
235.         BTFSC   DMX     ;SI ES BAJO, ESTA CORRECTO, SI ES UNO, ES ERROR, ASI QUE ESPERO LA PROXIMA SECUENCIA
236.         GOTO    BREAK  
237.         NOP
238.         CLRWDT
239.         NOP
240. OTRO
241.         CALL    DEMORA2US
242. ;       CALL    DEMORA2US ; MITAD DEL BIT 0
243.         NOP
244.         NOP
245.         CLRWDT
246.         NOP
247.         RRF             DATOS,F
248.         BCF             DATOS,7
249.         BTFSC   DMX
250.         BSF             DATOS,7
251.         DECFSZ  CONTABIT,F
252.         GOTO    OTRO
253. ;       CALL    DEMORA2US
254.        
255.  
256.         CLRWDT
257.  
258. ;STOP   ;DOS BIT DE STOP EN ALTO, SOLO DETECTO EL PRIMERO Y PROCESO LA INFO
259. ;       BTFSS   DMX             ;MIRO EN LA MITAD DEL PRIMER BIT DE STOP EN ALTO (A LOS 38 uS)
260. ;       GOTO    BREAK   ;HAY ERROR
261.  
262.  
263. ;-----------------PRIMER CANAL - DATOS DEL CANAL MOTOR PAP PAN
264. CANAL1 
265.         MOVF    CHANEL,W               
266.         XORWF   DIPSWICH,W             
267.         BTFSS   STATUS,Z       
268.         GOTO    SIGUIENTE      
269.                                                         ;TOMO EL DATO DMX PARA EL CONTROL DE PAN
270.         ;NOP
271.         ;NOP
272.         ;NOP
273.         MOVF    DATOS,W ;cambio de variable, de dato lo paso a PASOS
274.         MOVWF   PASOS_PAN           ;PORTB     
275.         GOTO    PROX   
276.  
277. ;-----------------SEGUNDO CANAL -------  DATOS DEL CONTROL DE TILT
278. SIGUIENTE
279.         MOVF    CHANEL,W                ;VERIFICO EN PRIMER LUGAR,
280.         XORWF   DIPSWICH_MAS1,W ;SI LA CUENTA LLEGO A 26 (MAQUINA DE HUMO
281.         BTFSS   STATUS,Z                ;SI ES IGUAL, SALTA, SINO VA AL PROXIMO
282.         GOTO    SIGUIENTE3     
283.  
284.         ;NOP   
285.         ;NOP   
286.         ;NOP   
287.         MOVF    DATOS,W
288.         MOVWF   PASOS_TILT
289.         GOTO    PROX
290. ;-----------------TERCER CANAL
291. SIGUIENTE3     
292.         MOVF    CHANEL,W                ;VERIFICO EN PRIMER LUGAR,
293.         XORWF   DIPSWICH_MAS2,W ;SI LA CUENTA LLEGO A 26 (MAQUINA DE HUMO
294.         BTFSS   STATUS,Z                ;SI ES IGUAL, SALTA, SINO VA AL PROXIMO
295.         GOTO    PROX    ;NO ES NINGUNO DE LOS 3 VALORES, SIGO ESPERANDO AL CANAL CORRESPONDIENTE
296.  
297.         MOVF    DATOS,W
298.         MOVWF   VELOCIDAD       ;RETARDOS EN LOS AVANCES DE LOS MOTORES DE PAN Y TILT
299.         GOTO    COMPARAR
300.  
301.  
302. ;****************************************************************************************************
303. ;********    posicionamiento de LOS MOTORES**********************************************************
304. ;****************************************************************************************************
305. ;>>>>>>>>>>>  MOTOR DE PAN  <<<<<<<<<<<<<<<<<<<<
306.  
307. COMPARAR        ;VERIFICA SI LLEGO AL LUGAR PARA DETENERSE, O TIENE QUE GIRAR  A DERECHA O IZQUIERDA
308. ;       Comparar
309.         CLRF    STATUS
310.         MOVF    PASOS_PAN,W             ;VALOR LEIDO EN DATOS POR DMX
311.         XORWF   CONTA_PASOS_PAN,W       ;y lo compara con la CONTA_PASOS_PAN QUE ES EL VALOR DE POSICION ACTUAL
312.         BTFSS STATUS,Z                  ;¨ Son iguales ?
313.         GOTO NOT_EQ1    ;PASOS ES DISTINTO A CUENTA_PASOS, TIENE QUE CALCULAR PARA DONDE GIRAR
314.         GOTO EQ1                ;PASOS ES IGUAL A CUENTA_PASOS, TIENE QUE DETENER MOTOR
315.  
316. EQ1     ;NO SE REALIZA NINGUNA VARIACION EN LOS DELAY PATRONES
317. ;       CLRF    COMPENSAR       ;NO HAY VARIACION DE TIEMPOS, Y DETENER EL MOTOR
318.         GOTO    COMPARAR2       ;BREAK  ;IR A DETECTAR EL COMIENZO DE LA PROXIMA TRAMA DMX
319.        
320. NOT_EQ1
321.         MOVF PASOS_PAN, W
322.         SUBWF CONTA_PASOS_PAN,W  ;F-W   GUARDO RESULTADO EN W  
323.         BTFSS STATUS, C
324.         GOTO GIRO_DERECHA1
325.         GOTO GIRO_IZQUIERDA1    
326.  
327. GIRO_DERECHA1
328.         INCF    CONTA_PASOS_PAN,F
329.         INCF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
330.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
331.         MOVWF   COMPENSAR
332.         MOVF    CONTA_PASOS_PAN,W
333.         SUBWF   PASOS_PAN,W
334.         MOVWF   COMPENSAR       ; PROPORCIONAL AL RETARDO, MAS LEJOS, MENOS TIEMPO
335.  
336.         GOTO    COMPARAR2       ;NDP
337.        
338. GIRO_IZQUIERDA1
339.         DECF    CONTA_PASOS_PAN,F
340.         DECF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
341.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
342.         MOVWF   RESTO
343.         MOVF    PASOS_PAN,W
344.         SUBWF   CONTA_PASOS_PAN,W
345.         SUBWF   RESTO,W
346.         MOVWF   COMPENSAR       ;VALOR  PROPORCIONAL AL RETARDO, MAS CERCA, MAS  TIEMPO
347.         GOTO    COMPARAR2       ;NDP
348.        
349.        
350. ;***********************************************************************************************
351. ;################  POSICIONAMIENTO DEL MOTOR DE TILT  ##########################################
352. ;***********************************************************************************************
353. COMPARAR2       ;VERIFICA SI LLEGO AL LUGAR PARA DETENERSE, O TIENE QUE GIRAR  A DERECHA O IZQUIERDA
354. ;       Comparar
355.         CLRF    STATUS
356.         MOVF    PASOS_TILT,W            ;
357.         XORWF   CONTA_PASOS_TILT,W      ;y lo compara con la CONTA_PASOS QUE ES EL VALOR DE POSICION ACTUAL
358.         BTFSS STATUS,Z                  ;¨ Son iguales ?
359.         GOTO NOT_EQ2    ;PASOS ES DISTINTO A CUENTA_PASOS, TIENE QUE CALCULAR PARA DONDE GIRAR
360.         GOTO EQ2                ;PASOS ES IGUAL A CUENTA_PASOS, TIENE QUE DETENER MOTOR
361.  
362. EQ2     ;NO SE REALIZA NINGUNA VARIACION EN LOS DELAY PATRONES
363. ;       CLRF    COMPENSAR       ;NO HAY VARIACION DE TIEMPOS, Y DETENER EL MOTOR
364. ;       GOTO    BREAK   ;IR A DETECTAR EL COMIENZO DE LA PROXIMA TRAMA DMX
365.         GOTO    NDP
366.        
367. NOT_EQ2
368.         MOVF PASOS_TILT, W
369.         SUBWF CONTA_PASOS_TILT,W  ;F-W   GUARDO RESULTADO EN W 
370.         BTFSS STATUS, C
371.         GOTO GIRO_DERECHA2
372.         GOTO GIRO_IZQUIERDA2    
373.  
374. GIRO_DERECHA2
375.         INCF    CONTA_PASOS_TILT,F
376.         INCF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
377.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
378.         MOVWF   COMPENSAR
379.         MOVF    CONTA_PASOS_TILT,W
380.         SUBWF   PASOS_TILT,W
381.         MOVWF   COMPENSAR       ; PROPORCIONAL AL RETARDO, MAS LEJOS, MENOS TIEMPO
382.  
383.         GOTO    NDP
384.        
385. GIRO_IZQUIERDA2
386.         DECF    CONTA_PASOS_TILT,F      ;
387.         DECF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
388.         MOVLW   .255    ;ESTE ERA EL VALOR DEL TEMPORIZADOR
389.         MOVWF   RESTO
390.         MOVF    PASOS_TILT,W
391.         SUBWF   CONTA_PASOS_TILT,W
392.         SUBWF   RESTO,W
393.         MOVWF   COMPENSAR       ;VALOR  PROPORCIONAL AL RETARDO, MAS CERCA, MAS  TIEMPO
394.  
395.         GOTO    NDP
396.  
397.  
398.  
399.  
400. ;************************************************************************************************
401. NDP                     MOVF    CONTA_PAN,W
402.                         PAGESEL TABLA_PAN
403.                         LCALL   TABLA_PAN
404.                         ;DEMORA PROPORCIONAL A LA DIFERENCIA ENTRE PASOS, MAS PASOS MENOS DEMORA, ESTA MAS LEJOS...
405.                         MOVWF   PUERTO
406.                        
407.                         MOVF    CONTA_TILT,W
408.                         PAGESEL TABLA_TILT
409.                         LCALL   TABLA_TILT
410.                         ANDWF   PUERTO,W        ;UNO AMBAS SALIDA DE TABLA PARA SALIR POR EL PUERTO B
411.                        
412.                         MOVWF   PORTB
413.  
414.         ;               MOVF    VELOCIDAD,W ;PASO EL DATO DE VELOCIDAD LEIDO EN EN TERCER CANAL
415.         ;               MOVWF   COMPENSAR       ;AL CONTADOR DE DEMORAS COMPENSAR
416.  
417.         ;               CALL    DEMORA
418.                         GOTO    BREAK   ;GOTO   COMPARAR
419. ;;*********************************************************************************************
420. DELAY   CALL    DEMORA          ;RETARDO ENTRA PASOS, VARIABLE SEGUN LA DIFERENCIA DE PASOS
421.                 DECFSZ  COMPENSAR,F     ;A MAS PASOS, MENOS DEMORA, AL ESTAR MAS CERCA, INCREMENTA LA DEMORA
422.                 GOTO    DELAY           ;PARA QUE EL MOTOR SE ACERQUE DE FORM MAS SUAVE
423.                 RETURN
424.  
425. DEMORA 
426.                 MOVLW   .2
427.                 MOVWF   LOOP1
428. OTRO2   NOP
429.                 CLRWDT
430.                 DECFSZ  LOOP1,F
431.                 GOTO    OTRO2
432.                 RETURN
433.  
434.  
435. ;#################################################################################################
436.  
437.         ORG     100H   
438. POSICION_CERO   ;EN EL ENCENDIDO, AMBOS EJES GIRAN HASTA ENCONTRAR EL FIN DE CARRERA RESPECTIVO
439. ;                                       Y COLOCAR EN CERO LOS CONTADORES CRRESPONDIENTES
440.                 MOVLW   .255
441.                 MOVWF   CONTA_PASOS_TILT
442.                 MOVWF   CONTA_PASOS_PAN
443.                 MOVWF   POSICION
444.        
445. BUSCAR_CERO
446. ;                               GIRO_IZQUIERDA DEL MOTOR DE TILT, EN BUSQUEDA DE LLEGAR AL FIN DE CARRERA, PARA SU POSICION DE CERO
447.         BTFSS   FC_TILT ;ESTA TOCANDO EL FIN DE CARRERA DE TILT
448.         GOTO    $+3
449.         DECF    CONTA_PASOS_TILT,F      ;
450.         DECF    CONTA_TILT,F    ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
451.  
452.         BTFSS   FC_PAN          ;ESTA TOCANDO EL FIN DE CARRERA DE PAN
453.         GOTO    $+3
454.         DECF    CONTA_PASOS_PAN,F       ;
455.         DECF    CONTA_PAN,F     ;CONTADOR DE TABLA DE SECUENCIA PARA EL PAP
456.  
457.         MOVF    CONTA_PAN,W
458.         PAGESEL TABLA_PAN      
459.         LCALL   TABLA_PAN      
460.         MOVWF   PUERTO
461.         MOVF    CONTA_TILT,W
462.         PAGESEL TABLA_TILT     
463.         LCALL   TABLA_TILT     
464.         ANDWF   PUERTO,W        ;UNO AMBAS SALIDA DE TABLA PARA SALIR POR EL PUERTO B
465.                        
466.         MOVWF   PORTB
467.  
468.         PAGESEL DELAY2
469.         LCALL   DELAY2
470.         LCALL   DELAY2
471.         DECFSZ  POSICION,F
472.         GOTO    BUSCAR_CERO     ;REPITE ESTE LOOP UN MAXIMO DE 255 VECES, PARA ASEGURARNOS SI ESTAN EN EL LADO OPUESTO
473.  
474.         CLRF    CONTA_PASOS_PAN
475.         CLRF    CONTA_PASOS_TILT
476. ;       INCF    CONTA_PASOS_TILT,F      ;ME ASEGURO QU TOMEN EL VALOR UNO
477. ;       INCF    CONTA_PASOS_PAN,F
478.  
479.  
480.         RETURN
481.  
482.                
483. ;************************************************************************************************
484.  
485. DELAY2 
486.                 MOVLW   .150
487.                 MOVWF   LOOP3
488.                 MOVLW   .100
489.                 MOVWF   LOOP1
490. OTRO22  NOP
491.                 NOP
492.                 NOP
493.                 NOP
494.                 NOP
495.                 NOP
496.                 CLRWDT
497.                 DECFSZ  LOOP1,F
498.                 GOTO    OTRO22
499.                 DECFSZ  LOOP3,F
500.                 GOTO    OTRO22-2
501.         INCF    DESTELLO,F
502.         BCF             LED                                    
503.         BTFSC   DESTELLO,2 ; DESTELLO DEL LED INDICADOR DMX, EN ESTE CASO, INDICA QUE SE ESTA POSICIONANDO A CERO
504.         BSF             LED
505.                 RETURN
506.  
507.         END

EL  Circuito impreso
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6934)

El proyecto terminado y funcionando, plaqueta
(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6936)

Cita de: todopic en 19 de Mayo de 2008, 00:38:58

:D :D
Aqui el esquematico  :D

(http://www.todopic.com.ar/foros/index.php?action=dlattach;topic=21800.0;attach=6941)

y ademas los pines de los integrados, para no renegar en la busqueda  :mrgreen:

este projecto funciona 100x100
Yo siempre digo que, el que lee todas las informaciones tiene Ventaja. :P

Saludos

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: locodelafonola en 29 de Agosto de 2015, 14:39:59

hola

Cita de: tomlico en 29 de Agosto de 2015, 08:12:42

Gracias locodelafonola por tu respuesta, en cuanto puedo lo probaré. No se si tu has realizado este proyecto, porque tengo algunas dudas mas. En el esquema vienen piezas que luego no las veo en la foto del proyecto terminado. Otras de la foto no coinciden con las piezas del esquema. Y lo mas difícil para mi, parece que el archivo hex está mal y hay que compilarlo otra vez, y de eso no tengo ni idea. Si me puedes resolver alguna de mis dudas te lo agradecería. Gracias.

bueno en realidad., yo de pic nada de nada ., uso atmega., pero con los motores tengo problemas seguido

Y se debe a que la mayoria que tengo no tiene una etiqueta o algun dato., asi que la posicion de las bobinas , voltaje y ademas si es unipolar o bipolar ., es toda una historia

muchos de los casos no funcionan porque esta invertidas las bobinas ., (tambien el voltaje hace ese efecto)

aca te muestro los que tengo(mas de 20)., esto son los "cuadraditos" y tambien tengo otro tanto .,  de los "redonditos"( yo los catalogo con numeros 1,2,3, etc  

pero .,  si tenes problemas con el esquema o alguna conexion electronica ., alli te podria ayudar

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: tomlico en 13 de Septiembre de 2015, 18:26:42

Saludos a todos los forer@s. Necesito realizar este proyecto. Lo he montado todo, el motor 1 salta un paso adelante y otro atras, no se porque pasa esto. el motor 2 no hace absolutamente nada. He leido que el archivo hex publicado estaba mal. Rogaría que alguien que haya hecho este proyecto ultimamente pudiera poner el archivo hex en perfecto estado. Por favor no se como hacerlo funcionar, necesito mucha ayuda. Gracias a tod@s.

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: locodelafonola en 14 de Septiembre de 2015, 06:30:59

hola

Cita de: tomlico en 13 de Septiembre de 2015, 18:26:42

Saludos a todos los forer@s. Necesito realizar este proyecto. Lo he montado todo, el motor 1 salta un paso adelante y otro atras, no se porque pasa esto. el motor 2 no hace absolutamente nada. He leido que el archivo hex publicado estaba mal. Rogaría que alguien que haya hecho este proyecto ultimamente pudiera poner el archivo hex en perfecto estado. Por favor no se como hacerlo funcionar, necesito mucha ayuda. Gracias a tod@s.

Te vuelvo a repetir ., ese no es sintoma de programacion o pic

El montaje y el archivo .HEX publicado es correcto ¿¿¿ de que detalle mal hablas ???? ., si hay algun error seria bueno saberlo ¡¡¡¡

El primero ., el problema esta en la coneccion de el motor., seguro una bobina invertida ., por lo tanto ., mal la secuencia de pasos

El segundo me arriesgaria a decir que .,  esta mal conectado ., pero sin mas datos .,  o alguna foto detallada ., es jugar a ser adivino

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: tomlico en 25 de Septiembre de 2015, 09:55:43

Saludos. He conseguido que giren los motores, pero no les puedo cambiar la velocidad. Van muy lentos. Son de 1.8 grados. Le he conseguido cambiar la velocidad cuando se posicionan en cero, con la variacion que se pone en el foro, pero cuando los muevo con DMX no se como hacer que corran mas. Necesito ayuda. Gracias

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: stk500 en 25 de Septiembre de 2015, 10:54:28

Por lo que comenta, quiere que te hagan el trabajo, en el programa el amigo todopic lo explica todos, osea te recomiendo que lea todos los mensaje  y la velocidad esta fijada porque es paraa Motor con Balon de Cristal(Luz Sicodelica) claro que podria alterar el programa añadiendo un canal para variar la velocidad, eso va a tu gustos.
Saludo

Título: Re: DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 06 de Octubre de 2015, 10:11:16

Cita de: todopic en 21 de Mayo de 2008, 12:11:34

:D :D Ok Nocturno... aqui un par de pequeños videos de como està funcionando... en especial, como responde al cambio de giro de acuerdo a la señal dmx, ademas, como regresa siempre a la posicion inicial

Un gran abrazo!

Norberto
pd: tengo que corregir un par de cositas en el codigo...  :D

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: w3-sistemas en 16 de Enero de 2016, 10:28:17

hola estoy queriendo hacer algo similar pero con un pic18f26k22 y en c, tengo problemas con la lectura dmx por la uart, el resto no me es un problema, si alguien me da una mano se lo agradeceria, saludos

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: KILLERJC en 16 de Enero de 2016, 13:39:38

Cita de: w3-sistemas en 16 de Enero de 2016, 10:28:17

hola estoy queriendo hacer algo similar pero con un pic18f26k22 y en c, tengo problemas con la lectura dmx por la uart, el resto no me es un problema, si alguien me da una mano se lo agradeceria, saludos

Si pones el codigo es mas facil darte una solucion.

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: w3-sistemas en 22 de Enero de 2016, 17:27:29

//LECTURA DEL PROTOCOLO DMX512 MEDIANTE INTERRUPCION
//DE LA USART   
    else if (PIR1bits.RCIF) // SI PIR1bits.RCIF es = a 1 , hay un dato pendiente de procesar
    {       
    cRCSTAbits.cRCSTA = RCSTA; //Hacemos una copia del registro RCSTA porque
     //sus bits cambian de valor al leer RCREG y tambien al modificar CREN
     DatoRx = RCREG; //En RCREG está el dato que acaba de recibir la USART

     if (cRCSTAbits.fOERR) // Si se reciben más de 3 bytes sin haberlos procesado, se
    {                             // produce un error de Overrun. En este caso, se borra el
      CREN=0;              // error reiniciando CREN y dejamos  la interrupción preparada
      CREN=1;             // para procesar la siguiente trama DMX
      DmxEstado = DMX_ESPERA_BYTE;
      return;
    }
     // Máquina de estados
    switch (DmxEstado)
    {
//-----------------------------------------------
      case DMX_ESPERA_BYTE:   // si estamos en este estado y hay error FRAME
      // significa que estamos en el medio de un Byte. Hay que seguir esperando
      // hasta que desaparezca el error.
            if (!cRCSTAbits.fFERR)
            // Ha llegado un byte en forma correcta. Ahora esperaremos la señal Break
            DmxEstado = DMX_ESPERA_BREAK;
            break;
//-----------------------------------------------
      case DMX_ESPERA_BREAK:   // estamos esperando la señal Break
        // Esta señal se identifica porque es un pulso en cero demaciado largo
         // para la usart y entonces detecta que el bit de stop nunca llego y pone a 1 FERR
         // para indicarnos que hubo error de Frame
        if (cRCSTAbits.fFERR)
          // Tras recibir el error de frame podemos suponer que es el break para lo cual
           // nos aseguramos preguntando por el valor que hay en DatoRx ya que todos sus
           // bits deben ser cero, de lo contrario siguimos esperando
           if (!DatoRx)
            DmxEstado = DMX_ESPERA_START;
        break;
//-----------------------------------------------
      case DMX_ESPERA_START: // ya hemos recibido el Break y ahora hay que
          // esperar el byte cero de la trama el cual debe contener el valor 0, que será la
         // la  señal de Start.
        // Mientras tanto, si recibimos un error de Frame, hay que volver a
        // empezar para recibir la señal desde el comienzo de la trama.
            if (cRCSTAbits.fFERR)
            DmxEstado = DMX_ESPERA_BYTE;
            else {
            if (!DatoRx)
            {
            // Llegados a este punto, ya hemos recibido el Byte Start=0
            // entonces comenzamos la lectura de la trama de valores DMX.
            iTramaDmx = 0; //inicializo las variables para leer la tramaDmx
             cntCanales=0;
            DmxEstado = DMX_RECEPCION_DATOS;
            } else
            // Si el dato recibido no es 0, volvemos a empezar
            DmxEstado = DMX_ESPERA_BREAK;
        }
        break;
//-----------------------------------------------
      case DMX_RECEPCION_DATOS:
        // En este estado estamos recibiendo la trama de datos DMX
        // Si se detecta un error de Frame es que ha habido un error y
        // comenzamos nuevamente desde el principio.
        if (cRCSTAbits.fFERR)
         {
            if (!DatoRx)
                 DmxEstado = DMX_ESPERA_START; // si DatoRx=0 voy a Start
            else
                 DmxEstado = DMX_ESPERA_BYTE; //si DatoRx!=0 voy a Byte
         }
         else // apartir de aca buscamos el comienzo del canal seleccionado
            {       // guardamos en un vector la cantidad de canales que posee el dispositivo
                 if(CanalInicio) //si el canal seleccionado es cero no hago nada (solo para dip)
             {
                 if(++cntCanales>=CanalInicio)
                 {
                     if(iTramaDmx<NUMERO_CANALES)
                     {
                        vTramaDmx[iTramaDmx++]=DatoRx;
                     }
                     else
                     {
                         if(cntCanales>=TOTAL_CANALES)
                         {
                             DmxEstado = DMX_ESPERA_BREAK;
                         }
                     }
                 }
             }
             else
             {
                DmxEstado = DMX_ESPERA_BREAK;
             }
        } 
        break;
//-----------------------------------------------         
    }//switch
    }//usart



el error salta en las lineas al prinsipio donde esta

 CREN=0;
 CREN=1;
yo creo que por que fue hecha para un 883 y no lo acepta el 26k22

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: KILLERJC en 25 de Enero de 2016, 21:41:44

Bueno pienso lo siguiente.

Si tenes el codigo en una interrupcion y ocurre un Overrun especialmente cuando tenes buffer para 2 caracteres + un tercero en el registro de desplzamiento llegando. Entonces estas haciendo algo mal. O es demasiado lento el micro lo cual no creo que pueda ocurrir.

Por otro lado, esto:

Código: C

1. cRCSTAbits.cRCSTA = RCSTA;

Utilizando la misma nomeclatura que la MCHP, asi que voy a suponer que estas usando XC8, Si utilizas las misma nomeclatura, cRCSTAbits es una estructura de 8 bits, y cRCSTA es de 1 bit, por lo tanto estarias intentando meter un registro de 8 bits (RCSTA) en 1 bit ( cRCSTAbits.cRCSTA ).

Por otra parte ese micro tiene 2 UART, por lo tanto seria RCSTA1 o RCSTA2. Y no un RCSTA solo como si tuviera un solo UART.
Tambien esto:

Código: C

1. CREN=0;              // error reiniciando CREN y dejamos  la interrupción preparada
2.       CREN=1;             // para procesar la siguiente trama DMX

No deberias poder hacerlo asi, ya que CREN no estan definidos de forma "suelta" sino en su estructura, ya que ese CREN puede servir para ambos, tanto para la UART1 como la 2,

Código: C

1. RCSTA1bits.CREN=0;
2. RCSTA1bits.CREN=1;

( Si es que usas la UART1, obviamente )

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: w3-sistemas en 28 de Enero de 2016, 19:29:38

i tenes razon lo implemento y te aviso, gracias

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: rosvill7 en 01 de Junio de 2017, 12:57:16

podria servir para controla tilt-pan de una camara de 18 kg para un brazo roboticio jimmyjib :shock:

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: w3-sistemas en 04 de Junio de 2017, 21:49:46

si perfectamente

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: Misael_perez en 17 de Septiembre de 2020, 04:09:11

  8)   :o Buen dia... me gustaría saber en que parte del código podría agregarse la opción de asignar dirección por medio de un dipswitch... espero encontrar alguna respuesta...

gracias esta genial el proyecto

Título: Re:DMX - otra más! receptor DMX y control de dos motores PAP a 1/2 paso
Publicado por: todopic en 03 de Octubre de 2020, 20:13:39

Hola Misael, como estas?
si, es posible, pero con otro micro mas grande en cantidad de pines, o un multiplexor de entradas....  este codigo fué escrito hace muchos años atras!... :mrgreen:

saludos!

Norberto