Hi ,

habe mal meinen Code noch umgestellt um es zu vereinfachen aber leider funktioniert der auch nicht.

jemand eine Idee???

Bye

Code:

'$sim
$regfile = "m8515.dat"                                      'Atmega 8515-16PU
$crystal = 16000000                                         'Quarz 16Mhz extern
$hwstack = 100
$swstack = 100
$framesize = 100
$baud = 250000
Config Dmxslave = Com1 , Channels = 9 , Start = 1 , Store = 9
Enable Interrupts





'Eingänge zuweisen
Config Pinc.0 = Input                                       'Eingänge von PortC.0 bis PortC.7 = DIP-Schalter
Config Pinc.1 = Input
Config Pinc.2 = Input
Config Pinc.3 = Input
Config Pinc.4 = Input
Config Pinc.5 = Input
Config Pinc.6 = Input
Config Pinc.7 = Input
Config Pine.1 = Input                                       'Eingänge von PortE.1 bis PortE.2 = DIP-Schalter
Config Pine.2 = Input
Config Pind.5 = Input                                       'Spare 1 (Ausgabe Invertieren)
Config Pind.4 = Input                                       'Spare 2
Config Pind.3 = Input                                       'Spare 3


'Ausgänge zuweisen
Config Portd.7 = Output                                     'LED Rot (Fehler)
Config Portd.6 = Output                                     'LED Orange (DMX Aktiv)
Config Porte.0 = Output                                     'Kanal 1
Config Porta.7 = Output                                     'Kanal 2
Config Porta.6 = Output                                     'Kanal 3
Config Porta.5 = Output                                     'Kanal 4
Config Porta.4 = Output                                     'Kanal 5
Config Porta.3 = Output                                     'Kanal 6
Config Porta.2 = Output                                     'Kanal 7
Config Porta.1 = Output                                     'Kanal 8
Config Porta.0 = Output                                     'Kanal 9




'Eingänge Alias Zuweisen
Dip_1 Alias Pinc.0
Dip_2 Alias Pinc.1
Dip_3 Alias Pinc.2
Dip_4 Alias Pinc.3
Dip_5 Alias Pinc.4
Dip_6 Alias Pinc.5
Dip_7 Alias Pinc.6
Dip_8 Alias Pinc.7
Dip_9 Alias Pine.2
Dip_10 Alias Pine.1
Spare_1 Alias Pind.5
Spare_2 Alias Pind.4
Spare_3 Alias Pind.3


'Ausgänge Alias Zuweisen
Led_rot Alias Portd.7                                       'Fehler LED
Led_orange Alias Portd.6                                    'DMX aktiv LED
Kanal_1 Alias Porte.0
Kanal_2 Alias Porta.7
Kanal_3 Alias Porta.6
Kanal_4 Alias Porta.5
Kanal_5 Alias Porta.4
Kanal_6 Alias Porta.3
Kanal_7 Alias Porta.2
Kanal_8 Alias Porta.1
Kanal_9 Alias Porta.0


'interne Pullup aktivieren
Portc.0 = 1
Portc.1 = 1
Portc.2 = 1
Portc.3 = 1
Portc.4 = 1
Portc.5 = 1
Portc.6 = 1
Portc.7 = 1
Porte.2 = 1
Porte.1 = 1
Portd.5 = 1
Portd.4 = 1
Portd.3 = 1



'##################START#################


'Power-On Sequenz
Led_rot = 1
Led_orange = 1
Waitms 1000
Led_rot = 0
Led_orange = 0
Waitms 1000
Led_rot = 1
Led_orange = 1
Waitms 1000
Led_rot = 0
Led_orange = 0
waitms 1000




'Hauptschleife

Do
Main:

If _dmx_received(1) > 0 Then
Kanal_1 = 1
End If

If _dmx_received(2) > 0 Then
Kanal_2 = 1
End If

If _dmx_received(3) > 0 Then
Kanal_3 = 1
End If

If _dmx_received(4) > 0 Then
Kanal_4 = 1
End If















Loop









'Ende des Programms
End