Aufgabe des Professors...

[t18935]

Hallo Bruno,
ja die Off-Line Klassifizierung von u(t) und i(t) habe ich bereits im DIAdem gefunden, da gibts ja einige Funktionen zur Klassifizierung die ich nehmen kann....
Die genaue Definition der Lichtbogen und Kurzschlusszeiten schau ich zuhause nochmal nach, aber soweit ich weiß, ist die Lichtbogenzeit da, wo der Spannungsverlauf ziemlich eben ist und die Kurzschlußzeit ist da, wo die Spannung nach unten fliegt und der Strom nach oben.
Ich schau aber nochmal nach und poste es heute abend.
(Sorry, aber bei dem Code werde ich nochmal deine Hilfe brauchen )

[t18935]

Also wir bekommen am Donnerstag genauere Infos zum Filtern und wegen der Klassifizierung der Lichtbogen und Brennzeiten. Melde mich dann gleich wieder.

Gruß t18935

[t18935]

Hallo,

von den vorherigen Semestern gibt es noch eine Datei zur Sprachauswahl, die wir benutzen dürfen. Das sind alles .sud Dateien.
Wie kann ich denn diese öffnen und bearbeiten?

[Bruno]

Hallo t18935,
in DIAdem gibt es sozusagen 2x VBS, einmal im Script Editor und einmal unter Bearbeiten/Dialog erstellen. Letzters erzeut die SUD Dateien und dient dazu, userspezifische Dialoge zu erstellen. Diese können wiederum auch eigenen funktionellen Code enthalten.
Gruß
Bruno

[t18935]

Ok, das mit dem SUD hab ich gesehen.
Also ich glaube mit der Berechnung dieser Zeiten musst mit nochmal helfen. Kann ich da den Code von dir nehmen oder muss ich noch was dazu schreiben (Ich habe noch nie VBS programmiert )
Alle anderen Fragen wurden zum Großteil heute geklärt.

Grüße
t18935

[Bruno]

Hallo t18935,
der Code ist nur ein mögliches Grundgerüst...
Aber Programmiererfahung in anderen Sprachen hast Du?
Gruß
Bruno

[t18935]

Ja, in php...
Aber das ist auch schon ne Weile her. So wie du das gemacht hast hat er es auch erklärt, man muss schauen wann es unter 5 kommt, dann wieder über 5 und diese Zeit muss genommen werden. Die Zeit dazwischen ist die Zeit einer Lichtbogenbrennzeit.

Gruß t18935

[Bruno]

Ich hab das Gerüst noch mal ein wenig verfeinert.

Ich will Dir aber auch nicht alle Arbeit abnehmen

Code:

Option Explicit  'Erzwingt die explizite Deklaration aller Variablen in einem Script.
Dim i, Un, Lichtbogen, mySpannung, myStrom, startzeit, endzeit, delta_t
Un = 5  'Triggerschwelle
Lichtbogen = False  'kein Lichtbogen
Set mySpannung = Data.Root.ChannelGroups(1).Channels("Spannung_0 (Skaliert)")

for i= 1 to mySpannung.Properties("length").Value 'Alle Messwerte untersuchen
  if not(Lichtbogen) and (mySpannung(i) > Un) then
    Lichtbogen = true  'Triggerschwelle überschritten, hier muss noch die Zeit ermittelt werden
    startzeit = i*mySpannung.Properties("wf_increment").Value
  end if
  if Lichtbogen and (mySpannung(i) < Un) then
    Lichtbogen = false 'Triggerschwelle unterschritten, hier muss delta t berechnet und gespeichert werden
    endzeit = i*mySpannung.Properties("wf_increment").Value
    delta_t = endzeit - startzeit
    msgbox delta_t
  end if
next

Gruß
Bruno

[t18935]

Hey echt klasse! Am Wochenende beginne ich damit das Skript zu schreiben. Ich hoffe ich schaffe das mit der Programmierung
Muss einige Werte Einstellbar machen, das wird ein Spaß, da werden nochmal Fragen kommen
Gleich eine Vorweg, ich habe gestern mir das mit den sud Dateien angeschaut. Das ist ja mehr oder weniger eine Eingabemaske die da erstellt werden kann. Wenn ich nun die Eingabemaske habe und z.B. auf Auswerten drücke, dann sollen ja die ganzen Dinge wie in der Aufgabenbeschreibung passieren. Muss ich dann dazu ein VBS Skript schreiben, in das alles gelegt wird, oder muss das in diese .sud geschrieben werden?

Gruß t18935

[t18935]

Ok, die Frage mit der SUD und VBS hat sich erledigt, hab das tolle Hilfe Video gefunden. So werde ich es hinbekommen bis auf das was du geschrieben hast