Ich hab gerade mal eine kleine Microcontrollerplatine für den ATiny2313 gebastelt und das
folgendes Program draufgeladen :
Code:
' Pinbelegung:
' Schalter vorne =PD2
' Enable Motor1 = PB=0
' Motor1 Eingang A = PB1
' Motor1 Eingang B = PB2
' Enable Motor2 = PB4
' Motor2 Eingang A = PB5
' Motor2 Eingang B = PB6
$regfile = "attiny2313.dat"
$crystal = 1000000
Config Portb.0 = Output
Config Portb.1 = Output
Config Portb.2 = Output
Config Portb.4 = Output
Config Portb.5 = Output
Config Portb.6 = Output
Config Pind.2 = Input
Portd.2 = 1
Do
If Pinb.0 = 1 Then 'Wenn keine kolision (vorne) erfolgt
Portb.0 = 1 'fahre vorwärts.
Portb.4 = 1
Portb.1 = 1
Portb.5 = 1
End If
If Pinb.0 = 0 Then 'Wenn kollision (vorne) erfolgt,
Portb.1 = 0 'Bremse,
Portb.2 = 0
Portb.5 = 0
Portb.6 = 0
Waitms 20 'warte 20 ms
Portb.1 = 1 'Drehe 200ms
Portb.2 = 0
Portb.5 = 0
Portb.6 = 1
Waitms 200
Portb.1 = 0 'Bremse
Portb.2 = 0
Portb.5 = 0
Portb.6 = 0
Waitms 20 'warte 20ms
End If
Loop
End
.
Das Flashen funktioniert mit dem Programm "myAVR ProgTool" von der Myavr Seite einwandfrei.
Ist vieleicht ganz interessant für andere mit dem mySmartUSB ligth programmer.
jetzt verkabel ich das ganze mal, und schau ob es läuft.
Lesezeichen