-         

Ergebnis 1 bis 2 von 2

Thema: Analogwert weiterverarbeiten

  1. #1
    Erfahrener Benutzer Roboter-Spezialist
    Registriert seit
    24.04.2005
    Ort
    Bayern
    Alter
    31
    Beiträge
    336

    Analogwert weiterverarbeiten

    Anzeige

    hallo
    ich will mit dem Analogwert den ich bekomme einen Servo steuern, doch er zeigt mir immer einen Fehler an. was ist den da falsch?
    Code:
    $regfile = "m32def.dat"
    $crystal = 8000000
    $baud = 9600
    
    Config Serialout = Buffered , Size = 20
    Config Adc = Single , Prescaler = Auto
    Config Servos = 1 , Servo1 = Portc.7 , Reload = 10
    Config Portc = Output
    
    Start Adc
    Enable Interrupts
    Dim W As Word
    
    Print "adc"
    
    
    Do
    
    
    
      W = Getadc(0)
      Print W
      Waitms 200
    
    If W > 300 Then
    Servo(1) = 130
    
    
    Loop
    End

  2. #2
    Erfahrener Benutzer Robotik Einstein
    Registriert seit
    20.06.2004
    Beiträge
    1.941
    "end if" fehlt, oder alles in einer zeile.
    mfg pebisoft

Berechtigungen

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