Nachdem mir radbruch das ganze programm schon einmal formatiert hat poste ich es jetzt da mir noch eine Frage aufgekommen ist:
Nach dem Unterprogramm besteht Bascom darauf, dass man noch ein loop hinzufügt. Aber soweit ich weiß hat man dann eine schleife. Deshalb ist meine Frage: Wie muss man das programmieren dass er nach einmaligen durchlauf wieder zurück zum hauptprogramm springt?
PS Dass noch nichts im Hauptprogramm steht weiß ich
$regfile = "M32def.dat"
$crystal = 8000000
' Interruptserviceroutinen(ISR) Zuordnen
On Int0 Unterprogramm1
On Int1 Unterprogramm1
On Int2 Unterprogramm1
' erst enablen wenn alle Interrupteinstellungen erledigt sind
Enable Interrupts
' es reicht die funktionen der Pins einmalig festzulegen
Config Pinc.3 = Output
Config Pinc.4 = Output
Config Pinc.5 = Output
Config Pind.6 = Output
Portc.3 = 0
Portc.4 = 1
Portc.5 = 0
Portd.6 = 1 'Portd?
' Hauptschleife
Do
Loop
' Programmende
End
' ISR
Unterprogramm1:
Portc.4 = 0
Portc.5 = 1
Portd.6 = 0
Wait 2
Portd.6 = 1
Wait 2
Portd.6 = 0
Do
Waitms 5
Portc.3 = 1
Waitms 5
Portc.3 = 1
Loop
Return
Danke im Vorraus
MfG Dark
Lesezeichen