ultraschall srf08 mit bascom

[pebisoft]

hallo, ich möchte mit basocm das srf08 ultraschallmodul ansteuern/auslesen. es hat einen i2c-anschluss. wer kann weiterhelfen.
mfg pebisoft

[Joerg]

Hallo pebisoft,

ein Beispiel zum SRF08 mit Bascom findest du hier:

http://www.robot-electronics.co.uk/shop/Examples.htm

Viele Grüße
Jörg

[Freiheitspirat]

Eigentlich steht ja alles in der Beschreibung des SRF08, aber hier mal einen Stück kommentierter Code:

Ultraschall:
I2cstart 'Messung auslösen
I2cwbyte 0 '0 Adresse für alle Bausteine (Broadcastadresse)
I2cwbyte 0 'Register 0 - Befehlsregister
I2cwbyte 81 'Befehl 81 - Messung in cm
I2cstop

Waitms 65 'delay 65mS auf Ergebnis warten

I2cstart
I2cwbyte 224 'E0 Addresse vom 1. US
I2cwbyte 2 'Register 2 (+3) = 1. Entfernung

I2cstart
I2cwbyte 225 'Leseadresse (E1)
I2crbyte Msb , Ack 'Register 2 lesen
I2crbyte Lsb , Nack 'Register 3 lesen
I2cstop
Entfernungus = Makeint(lsb , Msb) 'Word als Ergebnis von 2 Bytes bauen
Print "Entfernung: " + Str(entfernungus)

Return

[pebisoft]

danke für die tipps.
mfg pebisoft

[LuK-AS]

kannst auch hier gucken:

http://www.cwnet.de/html/modules.php...catid=&topic=2

Gruss Clemens

[pebisoft]

hallo, eure programmvorschläge für das ansprechen sind hervorragend.
sie funktionieren einwandfrei. nur ein problem: nach 6-7 messungen zeigt er nur noch 255 an , auch wenn der gegenstand näher ist. wenn ich resete macht er wieder 6-7 messungen und zeigt wieder 255, woran liegt das.
mfg pebisoft

[LuK-AS]

hast Du PullUps an den I2C Leitungen??

[pebisoft]

ja 10k-ohm. es werden ja 6-7 präzise messungen durchgeführt und genau ausgegeben und danach nur noch 255. wenn ich resete geht er wieder von vorn los 6-7mal. das i2ceeprom 24c256 funktioniert einwandfrei an diesem anschluss mit daten speichern und lesen.
in der beschreibung steht, das es dem I2C eeprom 24... conform ist.
läuft vielleicht irgendein speicher am srf08 über, der vielleicht entleert werden muss.
mfg pebisoft

[pebisoft]

dieses programm funktioniert. wenn du es dir mal anschauen würdest, 3 absätze vorher
mfg pebisoft

[pebisoft]

es trat schon einmal so ein problem auf hier irgendwo, finde es aber nicht mehr.