pjoddi
Level-2
- Beiträge
- 216
- Reaktionspunkte
- 55
-> Hier kostenlos registrieren
Ich versuche, unter WinCC (V6.2) per Mausklick ein VB-Script zu aktivieren, welches eine Variable hochzählt, und zwar selbstständig bis zu einem Wert X.
Sinn der Aktion ist die Animation eines Textes, der Quasi in das Bild reinfliegt, d.h, die Variable soll nachher als Dynamisierte Position für den Text verwendet werden.
Um eine flüssige Darstellung zu bekommen und die Kommunikation (bzw. die WinCC-Performance) nicht zu belasten, möchte ich den Wert nicht in der SPS, sondern intern in WinCC hochzählen.
Im groben tut das Script es ja, jedoch nicht ganz so wie gewünscht, er zählt nicht bis zum Ende, sondern hört irgendwo bei ca. der Hälfte des voreingestellten Wertes auf, also wenn ich 50 einstelle, zählt er mal 21, mal 23, mal 25, stelle ich den Wert auf 100, zählt er so ca. bis 50.
So sieht das Script aus, welches über den Button aktiviert wird:
Ist das so kompletter Mist oder kann jemand bei der Verbesserung helfen?
Sinn der Aktion ist die Animation eines Textes, der Quasi in das Bild reinfliegt, d.h, die Variable soll nachher als Dynamisierte Position für den Text verwendet werden.
Um eine flüssige Darstellung zu bekommen und die Kommunikation (bzw. die WinCC-Performance) nicht zu belasten, möchte ich den Wert nicht in der SPS, sondern intern in WinCC hochzählen.
Im groben tut das Script es ja, jedoch nicht ganz so wie gewünscht, er zählt nicht bis zum Ende, sondern hört irgendwo bei ca. der Hälfte des voreingestellten Wertes auf, also wenn ich 50 einstelle, zählt er mal 21, mal 23, mal 25, stelle ich den Wert auf 100, zählt er so ca. bis 50.
So sieht das Script aus, welches über den Button aktiviert wird:
Code:
Sub OnClick(ByVal Item)
Dim Wert
Dim i
Set Wert = HMIRuntime.Tags("Sägezahn")
For i = 1 To 40
Wert.Read
Wert.Value = Wert.Value + 1
Wert.Write
Wert.Read
Next
If Wert.Value >= 40 Then Wert.Write 0
End Sub
Ist das so kompletter Mist oder kann jemand bei der Verbesserung helfen?