以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  急求帮助  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=30678)

--  作者:ghc63
--  发布时间:2012/11/16 6:52:29
--  急求帮助

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;


--  作者:jinzhe
--  发布时间:2012/11/16 8:46:42
--  
能否用中文来描述一下公式想要表达的含义
--  作者:ghc63
--  发布时间:2012/11/16 9:41:19
--  
 

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



--  作者:jinzhe
--  发布时间:2012/11/16 9:57:00
--  

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;


--  作者:ghc63
--  发布时间:2012/11/16 10:22:30
--  

我得到iChange是通过

 

 

iChange:=JFF-REF(JFF,1);

得到的要输出irend怎么写


--  作者:jinzhe
--  发布时间:2012/11/16 10:24:56
--  

删除掉定义ICHANGE那一行


--  作者:ghc63
--  发布时间:2012/11/16 10:36:40
--  
输出值没有irend
--  作者:jinzhe
--  发布时间:2012/11/16 10:43:36
--  
irend2:irend;
--  作者:ghc63
--  发布时间:2012/11/16 12:45:26
--  

a1:=ref(irend,1);

这句老说irend值没定义怎么办
--  作者:jinzhe
--  发布时间:2012/11/16 15:29:17
--  
把这句放到if ichange=0前面