Autor Tema: Tiro los Guante con el DMXPACK!!!!!  (Leído 6966 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado stk500

  • Moderadores
  • DsPIC33
  • *****
  • Mensajes: 4919
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #15 en: 05 de Diciembre de 2007, 05:05:46 »

Desconectado jfh900

  • Moderador Local
  • DsPIC30
  • *****
  • Mensajes: 3595
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #16 en: 05 de Diciembre de 2007, 07:23:03 »
En cuanto tenga un hueco me pongo a ello.

Un saludo
* Cuando hables, procura que tus palabras sean mejores que el silencio.
* 'Todos somos ignorantes, lo que ocurre es que no todos ignoramos las mismas cosas.' Albert Einstein.
* No hay nada peor que un experto para evitar el progreso en un campo
* "La vida es como una novela. No importa que sea larga, sino que esté bien narrada" Seneca
* La vida no se vive por las veces que respiras, sino por los momentos que dejan sin aliento.
* Dios dijo: ∇·E=ρ/ε0 ; ∇·B=0 ; ∇xE=-dB/dt ; ∇xB= μ0ε0dE/dt..y la luz se hizo..!!..

Desde España Jesús

Desconectado stk500

  • Moderadores
  • DsPIC33
  • *****
  • Mensajes: 4919
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #17 en: 16 de Abril de 2008, 03:18:43 »
 :shock: aqui me salieron varios errores que en los mensajes y no me sale todos lo que puse, oseas esta incompleto  :?

amigo Jesus, muchas gracias por contestarme aunque sea tarde, pues bien investigando todos estos tiempos por Red encontre muchas cosas,
y aprendi muchas gracias a mi amigote El Genio de la Botella Alias Nocturno  :D :D :D
aparte el poco tiempo que he tenido por motivo de trabajo , pero encontre estos ,

Aqui le pongo la variable, y estoy intentando Compilar tal como esta, y me da un monton de errores, claro este code viene del propio Autor

variable   basic=0            ; If Basic =1 then basic version

   errorlevel 0, -302
   RADIX    DEC      
   list      p=16f870            ; list directive to define processor
   #include <p16f870.inc>        ; processor specific variable definitions
   
   __CONFIG _CP_OFF & _WDT_OFF & _BODEN_ON & _PWRTE_ON & _HS_OSC & _WRT_ENABLE_ON & _LVP_OFF & _DEBUG_OFF & _CPD_OFF

; Programme constants

Start_Vector      EQU   .0
Interrupt_Vector   EQU .4
Common_Ram_Base       EQU   H'70'
Ram_Base          EQU   H'20'
Osc_Freq          EQU   .20000000   ; Pic Frequency
Instruction_rate    EQU Osc_Freq/.4   ; Instruction Rate

;    Phase control constants
Resolution          EQU   .256         ; Analogue dimming resolution
Mains_freq          EQU   .100         ; 100 Parts a second
Interupts_s          EQU Mains_freq*Resolution   ; Interupts per second
Amount_to_cnt      EQU   Instruction_rate/Interupts_s   ; number to count in timer0
Timer0_cnt          EQU   .256-Amount_to_cnt   ; invert value to count (timer0 counts till overflow)
Delay_Value          EQU   .40

;   DMX Constants
Baud_Rate           EQU .250000
Baud_Rate_Constant  EQU (Osc_Freq/(.16*Baud_Rate))-.1
Number_Of_Channels  EQU .6
startcode         EQU   .0

;   Preset Constants
Max_Preset         EQU   .9      ; Maxium Presets allowed (EEdata = max * 4 bytes)

; ***********   Define Flags   *************
;      IFlag
Break_Detected   equ 0   ; Break detected
Start_Detected   equ 1   ; Start Byte detected
Valid_Channel   equ 2   ; Reached valid channels
No_DMX_Data      equ 7   ; No recieved DMX Data

;      Flag

longcount   equ 0   ; Long count flag (2.5s) when activated      
presetmode   equ 1   ; Preset Mode on no DMX data
curve      equ 2   ; S Curve selected
switch      equ 3   ; Switch curve selected
DMX_Data   equ 4   ; New DMX Data recieved
phase_done   equ 5   ; Flag to show mains phase complete
dmx_error   equ 6   ; Error detected in DMX tranmission
mains_fail   equ   7   ; Maind Failure Flag

;       Flag2
savepreset   equ 0   ; save preset started flag

;      DFlag   
dmx_recieve   equ 0   ; Dmx recieve display
dmx_msb      equ 1   ; Displaying DMX MSB
dmx_csb      equ 2   ; Displaying DMX CSB
dmx_lsb      equ 3   ; Displaying DMX LSB
preset_intro   equ 4   ; Displaying Preset Intro

; control ports

#DEFINE      Zerocross   PORTB,0
#DEFINE      channel1op   PORTB,1
#DEFINE      channel2op   PORTB,2
#DEFINE      channel3op   PORTB,3
#DEFINE      channel4op   PORTB,4
#DEFINE     Data_Rec_LED    PORTC,4      ; Not Used on 7 seg Pack  ***
#DEFINE      Data_Error_LED   PORTC,5      ; Not Used on 7 seg Pack  ***
#DEFINE      display_clk      PORTC,5      ; Not Used on Basic Version
#DEFINE      display_data   PORTC,4      ; Not Used on basic Version



voy a tener que estudiarlo para acaba con este lio de projectos  :D
quizas alguien encontres Solucion
Gracias por todas ayudas

 

Desconectado Nocturno

  • Administrador
  • DsPIC33
  • *******
  • Mensajes: 18286
    • MicroPIC
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #18 en: 16 de Abril de 2008, 03:28:15 »
No entiendo ese código, Rafael, ¿sabes qué compilador de Basic hay que usar?
En cualquier caso, sólo has pegado la parte de las definiciones, ¿no?

Desconectado stk500

  • Moderadores
  • DsPIC33
  • *****
  • Mensajes: 4919
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #19 en: 16 de Abril de 2008, 04:17:32 »
tu no entiende y meno yo tampoco, me meti en el Foro del Autor en epanorama.net y de ahi lo baje ya que muchos estaban con dudas como yo, ahora mismo no tengo tiempo porque estoy en el Curro, pero estoy buscando Info de eso, no se que compilador usa y creo que es Basic pro algo asi
 :x :x
Saludo

Desconectado jfh900

  • Moderador Local
  • DsPIC30
  • *****
  • Mensajes: 3595
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #20 en: 16 de Abril de 2008, 05:45:58 »
El programa está en ensamblador y la página con el programa es:

http://www.epanorama.net/digipack/Digi_Pack/dmx_pack.asm

Y en la página del autor esta la información:

http://www.epanorama.net/digipack/

Y aquí está un fichero Zip con el esquema, el programa fuente y el HEX ya compilado:

http://www.epanorama.net/digipack/Digi_Pack/dmx_pack.zip

Un saludo
« Última modificación: 16 de Abril de 2008, 05:54:48 por jfh900 »
* Cuando hables, procura que tus palabras sean mejores que el silencio.
* 'Todos somos ignorantes, lo que ocurre es que no todos ignoramos las mismas cosas.' Albert Einstein.
* No hay nada peor que un experto para evitar el progreso en un campo
* "La vida es como una novela. No importa que sea larga, sino que esté bien narrada" Seneca
* La vida no se vive por las veces que respiras, sino por los momentos que dejan sin aliento.
* Dios dijo: ∇·E=ρ/ε0 ; ∇·B=0 ; ∇xE=-dB/dt ; ∇xB= μ0ε0dE/dt..y la luz se hizo..!!..

Desde España Jesús

Desconectado stk500

  • Moderadores
  • DsPIC33
  • *****
  • Mensajes: 4919
Re: Tiro los Guante con el DMXPACK!!!!!
« Respuesta #21 en: 16 de Abril de 2008, 07:03:47 »
Muchas gracias Jesus!
pero debo decirte que de ahi mismo me lo baje desde un principio, solo que con tu observa en el Define yo no veo claro ya que los ponr con Mplab y me salio muchos errores, lastima desde aqui donde trabajo no puedo ahora probarlo.
Saludo


 

anything