同一个程序极速版可以编译,旗舰版编译通不过,请指教
代码如下: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>Abs(-20) And VAR7;
VAR9=VAR2>Abs(-20) And Close<Open And (Close-Close)/Close*1000>20;
if(VARA=VAR8 Or VAR9 )
if(VARA || VARA || VARA )
VARA=False;
VARC=VAR2<-13 And VAR3;
VARD=VAR2<-13 And Close>Open And (Close-Close)/Close*1000>20;
if(VARE=VARC Or VARD )
if(VARE || VARE || VARE)
VARE=False;
VAR10=VAR2>Abs(-13) And VAR7;
VAR11=VAR2>Abs(-13) And Close<Open And (Close-Close)/Close*1000>20;
if(VAR12=VAR10 Or VAR11)
if(VAR12 || VAR12 || VAR12)
VAR12=False;
If(VARE==True)
PlotString("attention short","短线关注",Low,Red);
If(VAR12==True)
PlotString("control risk","控制风险",High,Cyan);
RSI=SMA(Max(Close-Close,0 ),6,1)/SMA(Abs(Close-Close),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)
{
PlotNumeric("High",Max(A,A));
PlotNumeric("Low",Min(A,A));
PlotNumeric("Close",Max(A,A));
PlotNumeric("Open",Min(A,A));
}
Else
{
PlotNumeric("High",Max(A,A));
PlotNumeric("Low",Min(A,A));
PlotNumeric("Open",Max(A,A));
PlotNumeric("Close",Min(A,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
页:
[1]