- 3D-Druck Einstieg und Tipps         
Seite 2 von 2 ErsteErste 12
Ergebnis 11 bis 12 von 12

Thema: Fliegenfangender Roboter

  1. #11
    Erfahrener Benutzer Roboter Genie
    Registriert seit
    23.04.2007
    Ort
    stuttgart
    Beiträge
    1.127
    Anzeige

    Powerstation Test
    danke fuer die tipps, dahcte wenn ich nur 2 Servos dranbau, tuts auch nen mega8 ohne quarz, mehr soll es ja nich können.. aber dann werd ich mal nen 8mhz quarz dranhängen...
    meine projekte: robotik.dyyyh

  2. #12
    Moderator Robotik Visionär Avatar von radbruch
    Registriert seit
    27.12.2006
    Ort
    Stuttgart
    Alter
    61
    Beiträge
    5.799
    Blog-Einträge
    8
    Hallo

    Mit diesem Programm:

    Code:
    'Servo steuern mit dem RP6                                          6.3.2008 mic'
    
    $regfile = "m32def.dat"
    $crystal = 8000000
    
    $hwstack = 32
    $swstack = 8
    $framesize = 8
    
    'Dims --------------------------------------------------------------------------'
    
    Dim Servopos1 As Byte
    Dim Servopos2 As Byte
    Dim Temp As Integer
    Dim Stellzeit As Integer
    
    'Ports -------------------------------------------------------------------------'
    
    Config Porta.0 = Output
    Config Porta.1 = Output
    
    
    'Variablen vorbelegen ----------------------------------------------------------'
    
    ' Mitte ist ~80
    Servopos1 = 10
    Servopos2 = 150
    
    'Hauptprogramm -----------------------------------------------------------------'
    
    Disable Interrupts
    
    Do
       For Stellzeit = 0 To 100
          Set Porta.0
          For Temp = 1 To Servopos1
             Waitus 10
          Next Temp
          Reset Porta.0
    
          Set Porta.1
          For Temp = 1 To Servopos2
             Waitus 10
          Next
          Reset Porta.1
    
         For Temp = 1 To 500
             Waitus 10
          Next
       Next Stellzeit
    
       If Servopos1 = 10 Then Servopos1 = 150 Else Servopos1 = 10
       If Servopos2 = 45 Then Servopos2 = 125 Else Servopos2 = 45
    Loop
    kann mein RP6 das:

    Bild hier  
    http://www.youtube.com/watch?v=lN_NalOYS_4

    Das sollte auch mit einem 1Mhz Mega8 funktionieren.

    Gruß

    mic
    Bild hier  
    Atmel’s products are not intended, authorized, or warranted for use
    as components in applications intended to support or sustain life!

Seite 2 von 2 ErsteErste 12

Berechtigungen

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

12V Akku bauen