Hallo,

kennt jemand eine Funktion um ein INT Wert in einen String zu wandeln, OHNE das das Vorzeichen mit ausgegeben wird? Bei dem FC16 aus der IEC Bibliothek wird immer das Vorzeichen mit ausgegeben. Die einzige Möglichkeit wäre in einem weiteren Schritt die 1.Stelle des Strings zu löschen. Ist auf die Dauer recht viel Arbeit. Schöner wäre wenn ich den String direkt ohne Vorzeichen erzeugen könnte.

mfg

Bart

Es gibt doch ne Funktion die dir den absoluten Wert, also ohne Vorzeichen liefert. 

Nimm dir diese Funktion, speicher das Ergebnis in einer Lokalvariable zwischen, und mach dann aus der Lokalvariable deinen String. Dann solltest du auch kein Vorzeichen mehr haben.

Die ABS Funktion die einen absoluten Wert liefert gibt es nur für REAL. Außerdem ist die Eingangsvariable als INT deklariert und daher wird das Bit 15 immer als Vorzeichen ausgewertet. Von daher müsste die Konvertierfunktion direkt das Vorzeichen ignorieren.

mfg

Bart

Hallo,

bilde einfach mit NEGI das Zweierkomplement wenn der Integer Wert negativ ist, dann hast Du auch immer ein positives Ergebnis.

Grüße

H0556

Hallo,

wenn nur das Vorzeichen stört und ein Leerzeichen an der Stelle kein Problem ist dann lässt sich das ja leicht überschreiben.

z.B.

String[1] := ' ';

oder in AWL

L    ' '

T String[1]

Grüße

H0556

Wie schon im ersten Beitrag geschrieben habe ich derzeit nur die Lösung in einem weiteren Schritt das Vorzeichen durch eine weitere Funktion zu löschen. Zum einen würde das Leerzeichen stören, zum zweiten lese ich über die LEN Funktion die Istlänge des Strings aus und diese soll nur die benötigten Zeichen enthalten.

mfg

Bart

Hallo,

dann würde ich eine Funktion schreiben in der die Funktionen  I_STRNG, LEN und RIGHT enthalten sind mit dem Eingangsparameter Integer Und dem Rückgabewert String. Dann muss nur Der FC16 durch den neuen FC ersetzt werden. Der Wert von LEN kann dann gleich als Ausgabewert mit angegeben werden.

z.B. so

FUNCTION FC_I_String :STRING[6]
VAR_INPUT
    i :INT;
END_VAR

VAR_OUTPUT
    Length : INT;
END_VAR

VAR_TEMP
    iString: STRING[6];
    sErgebnis : STRING[6];
    len1, len2 :INT;
END_VAR
   
BEGIN
iString :='';
sErgebnis := '';
iString:= I_STRNG(I:=i);
len1 := LEN(S:=iString);
len2 := len1 - 1 ;
sErgebnis := RIGHT(IN:=iString, L:=len2);
Length :=Len2;
FC_I_String := sErgebnis;

end_FUNCTION

Grüße

H0556

In Funktion packen..

FUNCTION String xy (String #myString)
 if FIND(IN1 := #myString, IN2 := '+') <> 0 then
     #myString := DELETE(IN := #myString, L := 1, P := FIND(IN1 := #myString, IN2 := '+'));
 end_if;
 #xy :=  #myString;
END_FUNCTION