回复：冒泡算法扩展-技术论坛-工业支持中心-西门子中国

回复：冒泡算法扩展

ieasy

帖子

44
精华

0
被关注

16

论坛等级：侠士

注册时间：2012-03-05

普通如何晋级?

发布于 2015-01-22 16:47:54

9楼

展开查看

以下是引用zhangli0在2015-01-22 14:11:15的发言 >8楼：我这里只是定义了内部变量，如果要输入数据，你需要在两个for循环之前给那两个数组赋值的。直接通过程序赋值，不需要管脚，因为你的是固定的，如果你一定要通过输入引脚赋值的话，你需要插入参数，然后定义12个输入变量，连接你的x，y轴的数据，然后程序中把这些数据赋值给这两个数组。

FUNCTION FC27 : INT
VAR_INPUT
Input_X:ARRAY[0..7] OF REAL;//x轴数据输入
Input_Y:ARRAY[0..7] OF REAL;//y轴数据输入
END_VAR

VAR_TEMP
input1:ARRAY[0..7] OF REAL;//x轴输入
input2:ARRAY[0..7] OF REAL;//y轴输入
temp:REAL;//临时变量
i:INT;
j:INT;

END_VAR

FOR i:=0 TO 7 DO
FOR j:=0 TO 7 DO
IF input1[i]>input1[j] THEN
temp:=input1[i];
input1[i]:=input1[j];
input1[j]:=input1[i];//x轴交换
temp:=input2[i];
input2[i]:=input2[j];
input2[j]:=input2[i];//y轴交换
END_IF;
END_FOR;
END_FOR;

// Statement Section
;
FC27 := 100;
END_FUNCTION

SCL赋值试了半天也没编译成功。。。