iChange 和iRrend是步长为10的变量如何实现下面的思想
IF iChange>=20 THEN iRrend:=20;
IF iChange=10 THEN
当(REF(iRrend,1)>=-10 时 iRrend:=20
当(REF(iRrend,1)<=-20 时 iRrend:=-10
IF iChange=0 THEN iRrend:=REF(iRrend,1);
IF iChange=-10 THEN
当(REF(iRrend,1)<=10 时 iRrend:=-20
当(REF(iRrend,1)>=20 时 iRrend:=10
IF iChange<=-20 THEN iRrend:=-20;
iChange是一变量他的值为20,10,0,-10,-20。由小到大或由大到小变化,
当iChange>=20 时,令 iRrend:=20
当iChange=10 时 令
如果前一iRrend 值 (REF(iRrend,1)>=-10 那么iRrend=20
如果前一iRrend 值 (REF(iRrend,1)>= -20 那么iRrend=-10
当iChange=0 时 令
iRrend 值保持不变 既iRrend:=REF(iRrend,1)
当iChange=-10 时 令
如果前一iRrend 值 (REF(iRrend,1) <=10 那么iRrend=-20
如果前一iRrend 值 (REF(iRrend,1) >=20 那么iRrend=10
当iChange=-20 时 令
令 iRrend:=-20
runmode:0;
variable:ichange[5]=0;
ichange[1]:=20;
ichange[2]:=10;
ichange[3]:=0;
ichange[4]:=-10;
ichange[5]:=-20;
n1:=sort(ichange,0,1,datecount);
irend:=drawnull;
a1:=ref(irend,1);
if ichange>=20 then irend:=20;
if ichange=10 then begin
if ref(irend,1)>=-10 then irend:=20;
if ref(irend,1)>=-20 then irend:=-10;
end
if ichange=0 then irend:=a1;
if ichange=-10 then begin
if ref(irend,1)<=10 then irend:=-20;
if ref(irend,1)>=20 then irend:=10;
end
if ichange:=-20 then iredn:=-20;
我得到iChange是通过
iChange:=JFF-REF(JFF,1);
得到的要输出irend怎么写
删除掉定义ICHANGE那一行
a1:=ref(irend,1);
这句老说irend值没定义怎么办