-         

Ergebnis 1 bis 3 von 3

Thema: RNBFRA mit Ultraschallsensor - Pulsein

  1. #1
    Unregistriert
    Gast

    RNBFRA mit Ultraschallsensor - Pulsein

    Anzeige

    Hallo!

    Ich habe ein Verständnisproblem mit meinem Aufbau:

    Ich möchte an das RNBFRA einen Ultraschallsensor hängen. Soweit ich das nun verstanden habe, habe ich durch den PCF eine Porterweiterung (damit ich mehrere Sensoren anhängen kann). Dieser kommuniziert mit meinen Mikrocontroller per I2C. Ich kann also alle Portein bzw. ausgänge setzen und abfragen.

    Jetzt habe ich aber im Bascom folgenden Befehl gefunden, die die Abfrage sehr einfach machen würden: pulsein

    Damit kann ich direkt auf einem Pin messen, wielange das Echo vom Ultraschallsensor an dem Pin anliegt.

    Wie kann ich das mit dem RNBFRA implementieren??

    Danke,
    Martin

  2. #2
    Unregistriert
    Gast

    Beitrag

    Mittlerweile habe ich es so halbwegs verstanden (denke ich).

    Jetzt setze ich einen Pin für 15 us auf high um dann die Ultraschallmessung mit dem hc-sr04 Modul zu starten.

    Meine Idee wäre nun, dass ich am PCF eine Pegeländerung vom Echosignal sehen müsste, dass ich mir über RS232 schicke. Leider tut sich nichts?!

    Hat diesbezüglich jemand einen Ansatz?

    $regfile = "m32def.dat" ' oder bei Mega16 $regfile = "m16def.dat"

    Const Writeeingabeport_adr = &H7E 'I2C Adr PCF 2
    Const Readeingabeport_adr = &H7F 'I2C Adr PCF 2

    Dim I2cdaten As Byte

    Dim I2cdaten2 As Byte 'Datenbyte aus PCF8574

    Dim B1 As Byte
    Dim I As Byte

    $baud = 9600
    $crystal = 8000000 'Quarzfrequenz
    Config Scl = Portc.0 'Ports fuer IIC-Bus
    Config Sda = Portc.1

    Portd.6 = 0 'Schrittmotoren erst mal ausschalten
    I2cinit

    '******** Diese 4 Befehle sind nur ab RNBFRA Version 1.2 (nicht in V 1.1)
    ' notwendig und bzw. möglich (erweiterte Energiesparfunktion und LED´s)
    ' Bei Board 1.1 bitte auskommentieren oder löschen
    I2cstart
    I2cwbyte &H74 'Schreibbefehl an PCF3 schicken
    ' Led´s ein ,Motorendstufen ein, Port-Peripherie ein, RBN-Bus Sleep Modus aus (also Peripherie aktiv)
    I2cwbyte &B00000010 'Datenbyte an PCF3
    I2cstop
    '*********

    I = 0
    I2cdaten = 1

    Do
    I2cstart
    I2cwbyte Writeeingabeport_adr
    I2cwbyte &B00000000
    I2cstop

    Waitus 15

    I2cstart
    I2cwbyte Writeeingabeport_adr
    I2cwbyte &B00001000 'äußerer Pin ist 4.
    I2cstop

    Waitus 15

    I2cstart
    I2cwbyte Writeeingabeport_adr
    I2cwbyte &B00000000
    I2cstop



    Dim A As Byte

    For A = 1 To 100

    I2cstart
    I2cwbyte Readeingabeport_adr 'Lesebefehl an PCF schicken
    I2crbyte I2cdaten , Nack 'Datenbyte von PCF lesen
    I2cstop


    Print I ; " Eingangsport Wert" ; I2cdaten


    Waitus 100

    Incr I

    Next A

    Waitms 1000

    Loop




    End

  3. #3
    Erfahrener Benutzer Roboter Genie
    Registriert seit
    03.09.2009
    Ort
    Berlin (Mariendorf)
    Beiträge
    938
    Zitat Zitat von Unregistriert Beitrag anzeigen
    Meine Idee wäre nun, dass ich am PCF eine Pegeländerung vom Echosignal sehen müsste
    Hast du schon mal überschlagen, welchen kürzesten Abfragezyklus du mit dem PCF (welcher genau) und der maximalen Clockfrequenz, vermutlich 400 kHz hinkriegst und welcher Messungenauigkeit das entspricht? Vielleicht genügt es ja, aber du verschenkst Genauigkeit durch die relativ langsame I2C-Kommunikation.

    Die Lösung mit pulsein() ist bezüglich der Messgenauigkeit sicherlich der bessere Weg.

Ähnliche Themen

  1. pulsein
    Von Horst12 im Forum Basic-Programmierung (Bascom-Compiler)
    Antworten: 3
    Letzter Beitrag: 17.09.2013, 21:57
  2. Arbeiten mit dem PULSEIN-Befehl
    Von Powell im Forum Basic-Programmierung (Bascom-Compiler)
    Antworten: 0
    Letzter Beitrag: 02.07.2007, 16:14
  3. Pulseout & Pulsein mit SRF04
    Von hacker im Forum Basic-Programmierung (Bascom-Compiler)
    Antworten: 2
    Letzter Beitrag: 24.12.2006, 11:50
  4. Unlösbares Problem mit PULSEIN ?? Tips gesucht!! Hilfe
    Von m@rkus33 im Forum Basic-Programmierung (Bascom-Compiler)
    Antworten: 28
    Letzter Beitrag: 06.06.2006, 22:30
  5. RC-Kanal auslesen mit PULSEIN
    Von Björn im Forum Basic-Programmierung (Bascom-Compiler)
    Antworten: 11
    Letzter Beitrag: 04.04.2006, 13:05

Benutzer, die dieses Thema gelesen haben: 0

Derzeit gibt es keine Benutzer zum Anzeigen.

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •