Hi,

hier ist mein Code. Genauso hab ichs getestet, also ganz einfach gehalten:

Code:
' E4V12 mit ATMEGA8 @ 8Mhz intern

'---------------------------------------------------------

 '$sim
 $regfile = "m8def.dat"
 $crystal = 8000000



  '---------------------------------------------------------


Config Pinc.0 = Input                                       'ADC freier Eingang
Config Pinc.1 = Input                                       'ADC "winkelsensor"
Config Pinc.5 = Input                                       'ADC Current Sense VNH2SP30

Config Pind.2 = Input                                       'freier I/O input
Config Pind.4 = Input                                       'freier I/O input
Config Pind.6 = Input                                       'freier I/O input
Config Pinb.0 = Input                                       'freier I/O input (ICP)

Config Pinb.1 = Input                                       'Hochschalten
Config Pinb.2 = Input                                       'Runterschalten

Config Pinb.3 = Output                                      'Motor IN A
Config Pinb.4 = Output                                      'Motor IN B
Config Pinb.5 = Output                                      'ZU Relais

 '---------------------- Variablen -----------------------------------



'++++++++++++++++ Hauptprogramm +++++++++++++++++++++++++++++++++

Portb.2 = 1

Do



If Pinb.2 = 0 Then

Portb.5 = 1

Waitms 300

Portb.5 = 0

End If

If Pinb.1 = 0 Then

Portb.5 = 1

Waitms 300

Portb.5 = 0

End If





Loop

'+++++++++++++++++++++++++++++++++++++++++++++++++



End