设为首页收藏本站

 找回密码
 注册
查看: 1469|回复: 0
打印 上一主题 下一主题

同一个程序极速版可以编译,旗舰版编译通不过,请指教 [复制链接]

Rank: 2

精华
0
UID
227090
积分
92
帖子
4
主题
3
阅读权限
30
注册时间
2016-1-19
最后登录
2018-2-25
跳转到指定楼层
1#
发表于 2018-2-8 12:18:14 |只看该作者 |倒序浏览
代码如下:

Params

Vars
      Numeric RSI;
        Numeric TEMP1;   
        Numeric TEMP2;
       
        NumericSeries DIFF;
        NumericSeries DEA;
        NumericSeries JJ;
        NumericSeries A;
        NumericSeries VAR2;
       
        Bool JC;
        Bool SC;
        Bool DCJC;
        Bool VAR3;
        Bool VAR7;
        Bool VAR8;
        Bool VAR9;
        Bool VAR10;
        Bool VAR11;
     Bool VARC;
        Bool VARD;
       
        BoolSeries VARA;
        BoolSeries VARE;
        BoolSeries VAR12;
       
Begin

    DIFF=XAverage(Close,5) - XAverage(Close,20);
    DEA=XAverage(DIFF,10);
    JC=CrossOver(DIFF,DEA);
    SC=CrossOver(DEA,DIFF);
    DCJC=JC AND (DEA>0);
       
    VAR2=(Close-Average(Close,30))/Average(Close,30)*100;
    VAR3=Close>Open And Open-Low>High-Close;
    If(Close>Open)
             TEMP1=Close;
    Else
         TEMP1=Open;
    If (Open<Close)
             TEMP2=Open;
    Else
         TEMP2=Close;
    VAR7=Open>Close And High-TEMP1>TEMP2-Low;
    VAR8=VAR2[1]>Abs(-20) And VAR7;
    VAR9=VAR2[1]>Abs(-20) And Close<Open And (Close[1]-Close)/Close[1]*1000>20;
    if(VARA=VAR8 Or VAR9 )
         if(VARA[1] || VARA[2] || VARA[3] )
           VARA=False;
    VARC=VAR2[1]<-13 And VAR3;
    VARD=VAR2[1]<-13 And Close>Open And (Close-Close[1])/Close[1]*1000>20;
    if(VARE=VARC Or VARD )
      if(VARE[1] || VARE[2] || VARE[3])
           VARE=False;
    VAR10=VAR2[1]>Abs(-13) And VAR7;
    VAR11=VAR2[1]>Abs(-13) And Close<Open And (Close[1]-Close)/Close[1]*1000>20;
    if(VAR12=VAR10 Or VAR11)
         if(VAR12[1] || VAR12[2] || VAR12[3])
           VAR12=False;
    If(VARE==True)
         PlotString("attention short","短线关注",Low,Red);
    If(VAR12==True)
         PlotString("control risk","控制风险",High,Cyan);
    RSI=SMA(Max(Close-Close[1],0 ),6,1)/SMA(Abs(Close-Close[1]),6,1)*100;
    If(CrossOver(84,RSI))
      PlotString("escape","→ 逃顶",High,Blue);       
    If(CrossOver(RSI,11))
      PlotString("bargain hunting","→ 低吸",Low,Red);       
    JJ=(Close+High+Low)/3;
    A=XAverage(JJ,11);
    If(A>A[1])
    {
         PlotNumeric("High",Max(A[1],A));
      PlotNumeric("Low",Min(A[1],A));
      PlotNumeric("Close",Max(A[1],A));
      PlotNumeric("Open",Min(A[1],A));
    }
    Else
    {
      PlotNumeric("High",Max(A[1],A));
      PlotNumeric("Low",Min(A[1],A));
      PlotNumeric("Open",Max(A[1],A));
      PlotNumeric("Close",Min(A[1],A));
    }             
         PlotNumeric("天籁",Highest(High,35),0,Red);  
         PlotNumeric("地籁",Lowest(Low,55),0,Red);
         PlotNumeric("5日",Average(Close,5));
         PlotNumeric("10日",Average(Close,10));
         PlotNumeric("20日",Average(Close,20));  
      PlotNumeric("60日",Average(Close,60));
         PlotNumeric("120日",Average(Close,120));
         PlotNumeric("无穷成本均线",SMA(Close,5,0.1));
         
End
您需要登录后才可以回帖 登录 | 注册

bottom

静态版|手机版|联系我们|交易开拓者 ( 粤ICP备07044698   

GMT+8, 2024-4-23 21:17

Powered by Discuz! X2 LicensedChrome插件扩展

© 2011-2012 交易开拓者 Inc.

回顶部