Hallo zusammen, ich hab heut schon mal etwas am Code gebastelt da mein ISP-Kabel morgen kommen
sollte. Und nun wollte ich malragen ob der Code so ok ist oder ob da der Microcontroler in Flammen aufgeht
.
Code:
' Pinbelegung:
' Schalter vorne =PC0
' Schalter hinten =PC6
' Enable Motor1 = PA=0
' Motor1 Eingang A = PA1
' Motor1 Eingang B = PA2
' Enable Motor2 = PA4
' Motor2 Eingang A = PA5
' Motor2 Eingang B = PA6
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 1000000
Config Pina.0 = Output
Config Pina.1 = Output
Config Pina.2 = Output
Config Pina.4 = Output
Config Pina.5 = Output
Config Pina.6 = Output
Config Pinc.0 = Input
Config Pinc.6 = Input
Pinc.0 = 1
Pinc.6 = 1
Do
If Pinc.0 = 1 Then
Pina.0 = 1
Pina.4 = 1
Pina.1 = 1
Pina.5 = 1
End If
If Pinc.0 = 0 Then
Pina.1 = 0
Pina.2 = 0
Pina.5 = 0
Pina.6 = 0
Waitms 20
Pina.1 = 1
Pina.2 = 0
Pina.5 = 0
Pina.6 = 1
Waitms 100
Waitms 100
Pina.1 = 0
Pina.2 = 0
Pina.5 = 0
Pina.6 = 0
End If
If Pinc.6 = 1 Then
Pina.0 = 1
Pina.4 = 1
Pina.1 = 1
Pina.5 = 1
End If
If Pinc.6 = 0 Then
Pina.1 = 0
Pina.2 = 0
Pina.5 = 0
Pina.6 = 0
Waitms 20
Pina.1 = 1
Pina.2 = 0
Pina.5 = 0
Pina.6 = 1
Waitms 100
Waitms 100
Pina.1 = 0
Pina.2 = 0
Pina.5 = 0
Pina.6 = 0
End If
Loop
End
Der Bot soll einfach nur irgendwo gegenfahren, Bremsen,Wenden und weiter fahren.
Lesezeichen