Willas Shrediquette Tricopter / Quadrocopter / Hexacopter

Zitat:

---

Ist über den Error-Level einfach zu machen.

---

Davon habe ich noch gar nichts gehört, kannst du das etwas näher beschreiben?

Mach ich.
Beim Programmstart in einer For-Schleife alle Com-Ports 1 bis 30 nach einander öffen. Gibt es beim Öffnen einen Errorlevel ungleich 0, dann gibt es den COM-Port auf diesem Rechner nicht. Dann nichts weiter machen und versuchen den nächsten COM-Port öffnen. Is der Error-Level = 0 beim Öffnen des Ports, dann ist dieser vorhanden und wird in die ComboBox eingetragen. Somit hast Du in der ComboBox nur die Com-Ports stehen, die der Rechner zur Verfügung stellt.

Hi holzi!
Ich habe im Netz eine Möglichkeit dafür gefunden:

Code:

---

                        comport.Items.Clear
                        'comport.Sorted=true
                        Dim ports As String()
                        Dim port As String
                       
                        ports = SerialPort.GetPortNames() 'Ports des Rechners ermitteln
                       
                        For Each port In ports
                                Try
                                        With SerialPort
                                                .PortName = port
                                                .ReadTimeout = Int32.Parse(50) 'ReadTimeout in ms
                                                .Open()
                                        End With
                                       
                                Catch es As Exception
                                       
                                Finally
                                        If SerialPort.IsOpen = True Then
                                                Me.comport.Items.Add(port)
                                        End If
                                       
                                        SerialPort.Close()
                                       
                                End Try
                        Next port

---

Bei der Zeile ports = SerialPort.GetPortNames() bekomme ich eine Warnung mit der ich irgendwie nichts anfangen kann:

Zitat:

---

Zugriff des freigegebenen Members, konstanten Members, Enumerationsmembers oder geschachtelten Typs über eine Instanz; der qualifizierende Ausdruck wird nicht ausgewertet. (BC42025) - C:\Users\William\Documents\SharpDevelop Projects\TriGUI_v1\TriGUI_v1\MainForm.vb:22

---

Außerdem dauert das Öffnen der verfügbaren COM ports ca. 8 Sekunden... Ist etwas lang, geht das vielleicht schneller...? Wenn nicht, würde ich da noch einen Button einfügen "Refresh available COM ports" und alle verfügbaren COM ports in einer Textdatei speichern. So müsste die Abfrage nicht jedes Mal durchgeführt werden, sondern nur wenn der User glaubt es könnte sich was geändert haben...

Hi Willa,
ich mach das in VB und das geht so schnell, dass das beim Programmstart nicht bemerkt wird.
Ich würde das wirklich über eine FOR-Schleife von 1 bis 30 machen. Wenn das Öffnen des Ports auf einen Fehler läuft, dann im Catch nichts machen und bei OK im Finaly den Port eintragen
Du könntest auch die Ports aus der Regestry auslesen. Sie stehen in HKEY_LOCAL_MACHINE\Hardware\DeviceMap\SerialComm
Dann die dort gefundenen Ports in die Combox einfügen.

Hi Villa,
könntest Du den Source-Code Des Programms veröffentlichen? Mich interessiert daran speziell Deine Datenübertrgung an das Board. Wäre prima von Dir.

Peter

Hi Peter, ich kann dir den Code schicken wenn du mir ne Mail an trashcan(bbeeii)gmx.com sendest. Ich möchte ihn im Mom noch nicht offiziell ins Netz stellen, weil ich daran noch viel ändern werde und ich dann immer das kompilierte Programm UND die Quellcodes aktuell halten muss....
Die Datenübertragung habe ich glaube ich ganz gut gelöst (strings als Kommandos und Bytearrays für die Daten). Jedenfalls funktionierts gut und sicher.

Ein supergeiles HD-Video hast du da bei Vimeo...
Sag mal wie hast du denn die ganzen Effekte und vorallem die Superzeitlupe am Anfang gemacht?
Bin dankbar für jeden Tipp!

Moin,
danke sehr :-D Die Effekte sind in mühsamer Kleinarbeit mit vielen versch. Programmen erstellt. Die Zeitlupe ist mit einer professionellen HighSpeed Kamera meiner Hochschule gemacht (Photron Fastcam APX-RS). Die kann sich aber kein normal sterblicher Mensch leisten...
P.S.: Ich habe jetzt des öfteren die Vermutung gehört, die HS-Aufnahmen sollten die Stabilität meines Copters zeigen. Das ist natürlich nicht der Fall, die Aufnahme dauert nur 0.096 Sekunden, da würde selbst ein frei fallender Backstein so aussehen als ob er stabil schwebt.

Schade, ich dachte das mit der Superzeitlupe hättest du mit ner normalen Cam mit Hilfe von Software gemacht.
Ich hab zwar auch ne HD-Cam aber die macht bei 200 Bildern pro Sekunde den Adler...
Hab da auch mal ein paar Vids für meinen Kumpel gemacht, kannst ja mal gucken: http://www.youtube.com/watch?v=JeE8L4hIPbo

Hallo Willa,
den Code habe ich Dir ja schon per Mail zugeschickt.
Hier habe ich nun auch das dazu gehörige Tutorial mit dem Thema "Feststellung der zur Verfügung stehenden COM-Ports auf dem Computer" veröffentlicht.
http://www.rn-wissen.de/index.php/Fe...f_dem_Computer

Peter