44 lines
567 B
Markdown
44 lines
567 B
Markdown
```pascal
|
|
// Block Type: FC
|
|
// Block Number: 1922
|
|
// Original Network Languages: STL
|
|
|
|
FUNCTION "FW_DRand" : Void
|
|
{ S7_Optimized_Access := 'TRUE' }
|
|
VERSION : 0.1
|
|
|
|
VAR_INPUT
|
|
Channel : Real;
|
|
END_VAR
|
|
|
|
VAR_OUTPUT
|
|
RandomNumber : Real;
|
|
END_VAR
|
|
|
|
VAR_TEMP
|
|
mAux : Real;
|
|
END_VAR
|
|
|
|
BEGIN
|
|
|
|
// Network 1: (Original Language: STL)
|
|
|
|
// --- BEGIN STL Network 1 ---
|
|
|
|
L "gSystem_Time"
|
|
L "Channel"
|
|
MOD_D
|
|
CAC
|
|
RLD
|
|
DTR
|
|
ABS_R
|
|
L 2.147484E+09
|
|
DIV_R
|
|
T "RandomNumber"
|
|
|
|
// --- END STL Network 1 ---
|
|
|
|
END_FUNCTION
|
|
|
|
```
|