Hi leute wie ich schon beschrieben habe, nutze ich das Rn Control 2560. Ich versuche nun den srf05 anzuschließen. Meine erste frage wäre kann ich dies direkt tun oder müssen da noch Widerstände vor? Ich habe das Beispiel Programm so umgeschrieben das es eigentlich passen müsste, ich versuche den neuen Modus zu nutzen also einen Pin für signal ein und aus..

Code:
$prog , 255 , &B11011001 ,                                  'Quarz an / Teiler aus / Jtag aus
$regfile = "m2560def.dat"
$hwstack = 82
$framesize = 68
$swstack = 68
$crystal = 16000000                                         'Quarzfrequenz
Config Com4 = 9600 , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
Open "com4:" For Binary As #4
Disable Interrupts


Dim Zeitmessung As Word
Dim Entfernung As Word

Print #4 , "**** SRF05 mit RN-MINICONTROL *****"
Print #4 , "Entfernung in cm anzeigen"

' Der Ultraschallsensor wird am Port A Pin 7 angeschlossen
Config Pinj.4 = Output                                      ' Bestimme den Anschluss des Sensors und setze ihn auf Output

Do
    Portj.4 = 0                                             'Port Low
    Pulseout Portj , 4 , 40                                 '10uS Impuls bei 4 MHz senden  (10*4=40)
    Pulsein Zeitmessung , Pinj , 4 , 1                      ' Den Puls wieder empfangen
    Zeitmessung = Zeitmessung * 10                          'mal 10 da Pulsein in 10uS Einheiten Ergebnis ermittelt
    Entfernung = Zeitmessung / 58                           'Umrechnen in Zentimeter
    Print #4 , "Entfernung: " ; Entfernung ; " cm"
    Wait 1
Loop
Ich hoffe ihr könnt mir helfen...