Go Down

Topic: robotermotor ansteuern mit l293d (Read 3 times) previous topic - next topic

Webmeister

Eine Übersetzung deines Programmcodes wirst du hier nicht bekommen, aber dieses Tutorial hilft dir dabei.
(im verlinkten Tutorial als PDF findest du weitere Links zu fertigen Arduino-Funktionen)
http://oomlout.co.uk/?p=222

funkheld

hallo, wie kann ich das jetzt umsetzen in den arduinio.
es ist eine motorsteuerung für mein roboter in bascom.
funktioniert wunder mit bascom, links vor...usw...

gruss

Code: [Select]

$regfile = "M644pdef.dat"
$crystal = 16000000
$hwstack = 32
$swstack = 32
$framesize = 64
$baud = 19200

Config Portc.2 = Output
Config Portc.3 = Output
Config Portc.4 = Output
Config Portc.5 = Output

Config Portd.4 = Output
Config Portd.5 = Output

Declare Sub Li_vor()
Declare Sub Re_vor()
Declare Sub Li_zurueck()
Declare Sub Re_zurueck()
Declare Sub Robby_vor()
Declare Sub Robby_zurueck()
Declare Sub Robby_links()
Declare Sub Robby_rechts()
Declare Sub Robby_aus()

Dim M_wert As Word

M_wert = 120

Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Clear Down , Prescale = 256

Start Timer1

Wait 1

Call Li_vor()
Wait 1
Call Robby_aus()
Waitms 100

Call Li_zurueck()
Wait 1
Call Robby_aus()
Waitms 100

Call Re_vor()
Wait 1
Call Robby_aus()
Waitms 100

Call Re_zurueck()
Wait 1
Call Robby_aus()

End

Sub Re_vor()
   Portc.4 = 0
   Portc.5 = 1

   Pwm1a = M_wert
End Sub

Sub Re_zurueck()
   Portc.4 = 1
   Portc.5 = 0

   Pwm1a = M_wert
End Sub

Sub Li_zurueck()
   Portc.2 = 1
   Portc.3 = 0

   Pwm1b = M_wert
End Sub

Sub Li_vor()
   Portc.2 = 0
   Portc.3 = 1

   Pwm1b = M_wert
End Sub

Sub Robby_aus()
   Pwm1a = 0
   Pwm1b = 0
End Sub

Go Up