hallo,
versuche mit dem myAVRUSB-Board folgendes US-Modul anzusteuern:
http://www.projet.de/produkte-bauteile.html
und mir die Ergebnisse über RS232 ausgeben zu lassen. Doch leider ist der Erfolg nur mäßig!
verwende folgendes programm:
leider scheinen die PULSE-Funktionen von Bascom nicht so zu erfüllen, wie ich es mir denke. kann mir da eventuell jemand auf die sprünge helfen?Code:$regfile = "m8def.dat" $crystal = 3686400 $baud = 19200 Dim Zeitmessung As Word Dim Entfernung As Word Config Portc.2 = Output Do Portc.2 = 1 Pulseout Portc , 2 , 500 Pulsein Zeitmessung , Pinc , 2 , 0 Zeitmessung = Zeitmessung * 10 'mal 10 da Pulsein in 10uS Einheiten Ergebnis ermittelt Entfernung = Zeitmessung / 58 'Umrechnen in Zentimeter Print "Entfernung: " ; Entfernung ; " cm" Wait 1 Loop End
die entfernung beträgt immer 0 cm, da es zu einem overflow in der pulsein-funktion kommt.
grüße
webbi
p.s. vllt sollte das ganze in die software-ecke verschoben werden?!







Zitieren

Lesezeichen