以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  [原创]请管理员看看下面的程序有什么错误码吗  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=4413)
--  作者：jeicent
--  发布时间：2010/12/13 15:03:05
--  [原创]请管理员看看下面的程序有什么错误码吗

VARIABLE:I=0,S=0;    
VAR1:=low;
VAR2:=high;
boolean SoundON1 := false;
boolean SoundON2 := false;

fl:low;
fh:high;
fc:close;

li_76:=0;

for (li_76=0 to datacount) do
begin

      li_0 := li_76;
      ld_52 := 0;
      ld_60 := 0;
     IF NOT(ISLASTBAR) THEN EXIT; 
      for (li_0 = li_76  to  li_76 + 9) do
     
           ld_60 = ld_60 + Abs(fh[li_0] - fl[li_0]);
     
      ld_52 = ld_60 / 10.0;
      l_ima_4: = ema(fc[li_76+1],4);
      l_ima_20 :=ema(fc[li_76+2],4) ;
      l_ima_36 := ema(fc[li_76],4);
      l_ima_12 := ema(fc[li_76+1],8);
      l_ima_28 := ema(fc[li_76+2],8);
      l_ima_44 := ema(fc[li_76],8);
      if (l_ima_4 > l_ima_12 && l_ima_20 < l_ima_28 && l_ima_36 > l_ima_44) then  g_ibuf_92[li_76] :(fl[li_76] - ld_52 / 2.0);
 
         if (l_ima_4 < l_ima_12 && l_ima_20 > l_ima_28 && l_ima_36 < l_ima_44) then g_ibuf_96[li_76] : (fh[li_76] + ld_52 / 2.0);
        
         drawicon(g_ibuf_92[li_76] > g_ibuf_96[li_76] ,g_ibuf_92[li_76],VTSOLID,2) ;

         drawicon(g_ibuf_92[li_76] < g_ibuf_96[li_76] ,g_ibuf_96[li_76],VTSOLID,2) ;

   
 END  
     
    

--  作者：王锋
--  发布时间：2010/12/13 15:18:09
--  

你的公式基本都不四金字塔的代码，请楼主认真学习以下金字塔的控制语句的语法。

建义仔细阅读金字塔的公式编写教程 http://www.weistock.com/bbs/dispbbs.asp?boardid=2&Id=370