- 精华
- 0
- 在线时间
- 12 小时
- UID
- 227090
- 积分
- 92
- 帖子
- 4
- 阅读权限
- 30
- 注册时间
- 2016-1-19
- 最后登录
- 2018-2-25
- 精华
- 0
- UID
- 227090
- 积分
- 92
- 帖子
- 4
- 主题
- 3
- 阅读权限
- 30
- 注册时间
- 2016-1-19
- 最后登录
- 2018-2-25
|
代码如下:
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
|
|