Beiträge von BugFix

Zitat von Oscar

Wenn Du dazu auch ein Datenblatt hast, wird das wohl gehen.

Hab mir gerade eine Platine geholt und mal nachgeschaut. Ist ein MPXV5004. Datenblatt habe ich auch gefunden.

Hier habe ich nur einen anderen Spannungsbereich: 1V Offset und linearer Output 1V/kPa - also max. 5V. Das anzupassen, wird aber nicht so schwer sein.

Ich habe auch noch einen MPXM2010GS/GST1, da nur bis 10kPa, wäre der eigentlich geeigneter - aber dann brauche ich extra Spannungsversorgung.

Da packt einen das Bastelfieber.

Schade, dass ich die vielen kleinen Displays der Geräte nicht verwerten kann. die Displays sind rein mechanisch auf die Platine gecklickt und haben per "Gummileiste" Verbindung zu Kontaktflächen auf der Platine. (Wird angesteuert von einem Philips PCF2100CT). Aber das ist ein anderer Schuh.

Mir ist gerade die Idee gekommen, dass ich das Druckmessgerät evtl. einsparen kann. Ich habe noch zig.. Platinen von verschrotteten Geräten, die einen Drucksensor haben - sieht so aus wie dieser.

Dann kann ich das zu testende Gerät direkt anschliessen. Mal testen.

Boah, das ist ja echt geiles Männerspielzeug!!

Aber du hättest mal nen Tipp geben können wegen der Bootloadereinstellung (habs aber nach 5 min googeln dann gefunden):

Nano_setting.png

Nun kann ich anfangen.

Zitat von Mr-Ferret

ich muss ganz klar sagen, ich verstehe die Funktion nicht!

Du übergibst als Parameter das Query (Abfrageergebnis) und ein Array mit den in der Abfrage enthaltenen Feldnamen.

Ist dieses nur einer, wird ein 1D-Array erstellt, bei mehreren ein 2D-Array (je Feld eine Spalte).

Dann wird durch das Query iteriert, solange nicht .EOF (EndOfFile).

Zu jedem übergebenem Feldnamen wird aus dem Ergebnis jetzt der Wert abgefragt und in das Array übertragen.

Sind alle Werte übertragen wird das Array auf die Anzahl der Einträge gestutzt und ausgegeben.

Ansonsten ist noch Management enthalten, um das Array bei Bedarf zu vergrößern.

Mehr zu Arrays findest du in meiner Signatur.

Meinst du nicht auch, dass dieses Thema vorerst ohne Relevanz ist, solange die Kernfunktionalität deines Projektes nicht gegeben ist?

Bring erst mal alles ans Laufen, bevor du dir um Installationsroutinen Sorgen machst.

Jetzt hilft nur Probieren:

In der Iteration: MsgBox(1, "", $element.Name)

oder: .Value

Oder versuchen zu indexieren:

$PaperBreite = $BreiteHoehe(0)
$PaperHoehe = $BreiteHoehe(1)

Sollte das Syntaxfehler ergeben, schon in der Abfrage den Index setzen (falls das geht):

$PaperBreite = $activeDwg.Paperspaces.Item($PSnew.name).Properties(193)(0)

$PaperHoehe = $activeDwg.Paperspaces.Item($PSnew.name).Properties(193)(1)

Zitat von water

Stelle mal fest, um welchen Typ es sich tatsächlich handelt:

Sehr wahrscheinlich ist das ein Objekt. Vielleicht findest du auch in der Doku einen Hinweis, was .Paperspaces.Item(..).Properties(..) zurückgibt.

Ein COM-Array kannst du möglicherweise nicht indexieren, da es von AutoIt nicht als Array identifiziert wird. Aber Iterieren sollte möglich sein:

For $element In $BreiteHoehe
    MsgBox(1, "", $element)
Next

Danke dir dafür.

Wird mal was anderes als Handys reparieren.

Danke!

Ich werde das mal auf meine ToDoList packen und berichte hier, wenn ich fertig bin.

Zitat von Oscar

Die 1V sind Maximum hast Du oben geschrieben. Das ist definitiv so?

Ja, alle Druckmessgeräte geben ihr Signal analog von 0 bis 1 Volt aus.

Zitat von Oscar

Und diese 1V entsprechen 20mBar (tun sie das immer oder ist das einstellbar?). Und ist die Kennlinie linear?

Sollte linear sein. Um da sicher zu gehen, habe ich das Unterprogramm Kalibration, um eine Referenz zu bekommen. Es kann auch passieren dass ich ein Druckmessgerät mit max 50 mbar nutze (Ausgang ist auch hier 0 bis 1 Volt). Mit der entsprechenden Umrechnung/Linienanpassung würde ich mich dann später befassen. Aber das ist reine Rechenarbeit.

Zitat von Oscar

Und ist WLAN vorhanden? Und Internet?

WLAN und Internet sind im Servicebereich nicht verfügbar.

Zitat von Oscar

Willst Du Dir dann die Meßergebnisse auf den Rechner holen und dort speichern?

Oder sollen die lieber auf eine SD-Karte gespeichert werden?

Es gibt zwei Szenarien:

1. konstante Druckeinstellung während der gesamten Messung

2. Messung mit veränderlichen Druckwerten während der Aufzeichnung

Bei 1. kann das natürlich alles im Nachhinein ausgelesen werden.

Bei 2. muss die Interaktion (Druckänderung am Gerät) auch in der Doku auftauchen, d.h. hier müssen die Aufzeichnungsdaten ins Log am PC übertragen werden, dann Druck ändern, neuen Druckwert im Log eintragen, weiter messen usw.

Insofern schwebt mir eigentlich eher ein Szenario vor, dass ausschliesslich vom PC gesteuert wird (der muss sowieso angeschlossen sein zur Fernsteuerung des Gerätes).

So elegant die Aufzeichnungslösung auch ist, ist das für mich eigentlich schon zu viel.

Streng genommen brauche ich nur:

- mit AutoIt erreichbare Schnittstelle, die 0 bis 1 V digitalisiert

- und bei Bedarf frage ich ab, welcher Wert gerade an der Schnittstelle anliegt

Für mich hätte das den Vorteil, dass alle Softwareroutinen AutoIt-seitig verlaufen und ich dort jederzeit Anpassungen im Ablauf vornehmen kann.

Deshalb war meine Anfrage auch auf AD-Wandler ausgerichtet.

Aber:

Ich denke, dass die Stand-Alone Lösung auch sinnvoll ist. Modul mal schnell zum AD schicken, der hängt es an ein Kundengerät und liest dann die SD-Karte aus.

Die umfangreichere Variante mit Druckänderungen vom PC aus brauche ich auch, reicht aber, wenn sie in der Zentrale zur Verfügung steht.

Zitat von Mr-Ferret

Gibt es keine Möglichkeit das Ergebnis einer Abfrage (Select) in ein Array zu schreiben und dann den Feldern zu zuordnen?

Na dafür schreibt man sich dann eine Funktion, die das tut.

Mal hier auf Basis des Bsp. aus dem EN-Forum auf die Schnelle erstellt (ungetestet)

$sql = _MySQLConnect("sa","sa","mydb","mywebsite.com")
$var = _Query($sql,"SELECT * FROM mytable WHERE user = 'username'")

Local $aCol[] = ["user_name"]
Local $aRes = _MySQLArrayFromQuery($var, $aCol)

_MySQLEnd($sql)


Func _MySQLArrayFromQuery(ByRef $Query, $aFields)
    Local $n = 0, $nCount = 1000, $2ndDim = True
    Local $aResult[$nCount][UBound($aFields)]
    If UBound($aFields) = 1 Then 
        ReDim $aResult[$nCount]
        $2ndDim = False
    EndIf
    With $Query
        While Not .EOF
            $n += 1
            If Mod($n, 1000) = 0 Then
                If $2ndDim Then
                    ReDim $aResult[$n+1000][UBound($aFields)]
                Else
                    ReDim $aResult[$n+1000]
                EndIf
            EndIf
            For $i = 0 To UBound($aFields) -1
                If $2ndDim Then
                    $aResult[$n-1][$i] = .Fields($aFields[$i]).value
                Else
                    $aResult[$n-1] = .Fields($aFields[$i]).value
                EndIf
            Next
        WEnd
    EndWith
    If $2ndDim Then
        ReDim $aResult[$n][UBound($aFields)]
    Else
        ReDim $aResult[$n]
    EndIf
    Return $aResult
EndFunc

So, nun mal etwas detaillierter.

Ich versorge Patienten mit Therapiegeräten im Bereich Schlafmedizin. Diese Geräte halten mittels pneumatischer Schienung die Atemwege offen und verhindern somit die nächtlichen Atemaussetzer.

Häufig melden sich Patienten, die meinen, dass ihr Gerät manchmal/plötzlich/immer zu wenig/zu viel Druck liefert. In 99,9% der Fälle ist das aber eine rein subjektive Wahrnehmung. Um hier aber etwas handfestes dem Kunden vorlegen zu können, möchte ich eine dokumentierte Messung erstellen.

Bisher wird das Gerät morgens eingeschaltet (statt Patient ist ein Verschluss mit definiertem Leckagefluß, der dem handelsüblicher Therapiemasken entspricht, adaptiert). Und immer wieder mal wirft der Servicemitarbeiter einen Blick auf den Wert am Messgerät. Zum Feierabend steht dann fest, ob in den 8h (entspricht also der max. Nutzung beim Patienten) das Gerät abweicht.

Das möchte ich nun automatisieren, Ablauf, wie auf dem angehängten PAP (Rx ist das Kürzel für Therapiedruck).

Rx_Recording.pdf

Bin zur Zeit noch nicht wieder daheim. Aber schonmal Danke für die Tipps. Detaillierte Beschreibung des Projektes folgt noch.

Schaue ich mir nächste Woche näher an, wenn ich wieder in der Heimat bin. Danke erst mal für die Infos.

Das ist natürlich unschlagbar günstig. Bekommt man die Teile normal zu kaufen oder nur beim Chinamann des Vertrauens?

Auflösung hatte ich aus der Doku zu einem industriellen Wandler entnommen und wurde dort als Aufzeichnungsdichte angegeben.

Wie du es beschreibst, ist es das, was ich als Spreizung kenne. Die 1V maximal entsprächen einem oberen Druckwert von 20 mbar. Eine Genauigkeit von 0,5 mbar ist ausreichend, also eine "Spreizung" auf 40 Schritte. Und auch bei einer 50 mbar Messung wären es dann nur 100 Steps.

Die Auflösung ist nicht das Problem (im Normalfall 1 Meßwert / Minute).

Damit auch meine technisch unbedarften Kolleginnen (ist nicht sexistisch - ist die Wahrheit) eine Messung durchführen können, ist ein Eigenbaumodul wohl nicht so optimal.

Aber ich habe noch RS232 auf USB Adapter. Da kann ich evtl. die Signalleitung missbrauchen (sofern ich das Teil überhaupt per AutoIt ansprechen kann).

Ich möchte Langzeitmessungen (Druck) durchführen. Meine Messgeräte bieten einen Analog Output 0-1 Volt an. Nun brauche ich einen AD Wandler, den ich per USB anstöpseln kann mit entsprechenden, über Autoit ansprechbaren, Treibern.

Könnt ihr mir etwas empfehlen?

Zitat von hipfzwirgel

die Ausgabe 14-52-30 anstatt 14:52:30 ???

Liegt an deinem PC? Keine Ahnung, was du da eingestellt hast. Wenn du Doppelpunkte einfügst, werden die auch ausgegeben,

Verwende die Makros und baue dir dein Datum selbst zusammen:

$sToday = @MDAY & '.' & @MON & '.' & @YEAR

Es ist aber übersichtlicher, wenn man das Datum in der Form "YYYY-MM-DD" verwendet. In einer Liste ist es dann nämlich sortierbar, und Punkte dürfen zwar in den Dateinamen, haben m.M. nach dort nichts zu suchen. In der Windowswelt geht man ja davon aus, dass eine Datei ein Suffix hat (was für ein Stuß). Somit würde der letzte Punkt das Suffix vom Dateinamen trennen. Es werden aber häufig auch Dateien ohne Suffix genutzt und dann wäre ein Punkt im Dateinamen kontraproduktiv.