Hi,
Schonmal DANKE.
Habe das jetzt umgeändert, doch jetzt kommt noch folgende Fehlermeldung hinzu:

Error:7 Line:0 IF THEN expected (36) , in File:
Error:23 Line:0 END IF expected , in File:

Wie gesagt, der Code sieht bis jetzt so aus:
Code:
 $regfile = "m32def.dat"                                    'Die Anweisung bestimmt Controllertyp, hier AVR Mega 8
 $framesize = 32                                            'Stackanweisungen, die eigentlich nur bei größeren Programmen
 $swstack = 32                                              'wirklich nötig werden
 $hwstack = 32
 $crystal = 16000000                                        'Die Frequenz des verwendeten Quarzes


 Ddra.1 = 0                                                 'Pins A.1 und A.2 werden als Eingänge konfiguriert
 Ddra.2 = 0
 Ddra.3 = 1                                                 'Pins A.3 und A.4 werden als Ausgänge konfiguriert
 Ddra.4 = 1
 Ddrb.1 = 0                                                 'Eingang für Start-Taster wird konfiguriert
 Config Porta.1 = 1                                         'Pullupwiderstand der Eingänge wird aktiviert
 Config Porta.2 = 1
 Config Porta.3 = 0                                         'Ausgänge werden auf LOW gesetzt
 Config Porta.4 = 0
 Config Portb.1 = 1                                         'Pullupwiderstand wird aktiviert

 Do
 If Pinb.1 = 1 Then                                         'Bei Betätigung des Tasters...


 If Pina.1 = 1 Then                                         'Wenn Lichtsensor 1 auf HIGH,...
 Porta.3 = 1                                                'Dann Motor 1 auf HIGH,...
 Else                                                       'Sonst Motor 1 auf LOW
 Porta.3 = 0

 If Pina.2 = 1 Then                                         'Wenn Lichtsensor 2 auf HIGH,...
 Porta.4 = 1                                                'Dann Motor 2 auf HIGH,...
 Else                                                       'Sonst Motor 2 auf LOW
 Porta.4 = 0

 Loop                                                       'Wiederholen

 End If
 Pinb.1 = 1                                         'Bei erneuter Betätigung des Tasters beenden
Hoffe, du kannst mir helfen.
DANKE

MfG
V-Robot