Pointer to Byte

[enter]

Zuviel Werbung?
-> Hier kostenlos registrieren

Ich habe hier eine Funktion die ich für Beckhoff geschrieben habe die einen String in byte's wandelt möchte diese gerne in SCL oder AWL umsetzten weiß aber nicht wirklich wie ich das mache

FUNCTION by : BYTE
VAR_INPUT
	str : STRING;
END_VAR
VAR
pChar : POINTER TO BYTE;
END_VAR 

pChar := ADR(str);
	ASC := pChar^;

 

[Larry Laffer]

Hallo,
was soll denn das sein ? Eine Art MID-Funktion, die dir den ASCII-Code des adressierten String-Bytes ausgibt ?

Wie auch immer. Du machst dir auf den übergebenen String eine AT-Sicht als ein Array_of_Byte in gleicher Größe (SCL). Dieses Array kannst du dann nach Belieben indexieren und dur erhältst dann so den ASCII-Code.

Gruß
Larry

 

[enter]

Zuviel Werbung?
-> Hier kostenlos registrieren

 FUNCTION FC99 : void
var_input
myString : STRING [6] ;
end_var
VAR_output
my1Ascii:BYTE;
my2Ascii:BYTE;
my3Ascii:BYTE;
my4Ascii:BYTE;
my5Ascii:BYTE;
my6Ascii:BYTE;
END_VAR
VAR
myString2 :STRING[6];
a_myString AT myString2 : ARRAY [1 ..8] OF BYTE ;    
END_VAR
myString2:=myString;
my1Ascii :=a_myString[3]; 
my2Ascii :=a_myString[4]; 
my3Ascii :=a_myString[5]; 
my4Ascii :=a_myString[6]; 
my5Ascii :=a_myString[7];
my6Ascii :=a_myString[8];   
END_FUNCTION

@Larry Laffer kann mann das so machen ?

 

[Larry Laffer]

Ja ... das sollte funktionieren ...