通达信军团神剑指标源码

通达信军团神剑指标源码

军团神剑主图指标公式股票软件源码如下:
 MA3:MA(CLOSE,3),COLOR9000F5;
 MA18:MA(CLOSE,18),COLOR0099FF,LINETHICK2;
 {融胜通道}
 M10:=EMA(C,10);
 融胜:=M10,COLORRED,LINETHICK2;
 FF:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
 DD:=DMA(CLOSE,FF);
 高抛:(1+14/100)*DD,DOTLINE,COLORGREEN;
 压力:(1+7/100)*DD,DOTLINE,COLORFFFF00;
 支撑:(1-7/100)*DD,DOTLINE,COLORBLUE;
 低吸:(1-14/100)*DD,DOTLINE,COLORRED;
 中轨:(压力+支撑)/2,DOTLINE,COLORMAGENTA;
 DRAWTEXT(CURRBARSCOUNT=1,高抛,'高抛'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,压力,'压力'),COLORFFFF00;
DRAWTEXT(CURRBARSCOUNT=1,中轨,'中轨'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=1,支撑,'支撑'),COLORBLUE;
DRAWTEXT(CURRBARSCOUNT=1,低吸,'低吸'),COLORRED;
 IF(MA3>=REF(MA3,1) AND MA3>支撑,MA3,DRAWNULL),COLORRED,LINETHICK4;
 {【平均成本】}
 平均成本:((COST(18)+COST(8))/2+COST(13))/2,COLORYELLOW,LINETHICK2;{本句含有未来函数COST，自己决定去留本句吧}
 {【追+加+抛+出货】}
 A:=(REF(EMA(CLOSE,5),1));
 B:=CROSS(EMA(CLOSE,5),EMA(SLOPE(CLOSE,21)*20+CLOSE,42));
 DRAWTEXT(B,LOW*0.995,'追'),COLORFFFF00,LINETHICK2;
 RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);
 J:=3*K-2*D;
 DRAWTEXT(CROSS(J,D),LOW*0.98,'加'),COLOR00FFFF,LINETHICK2;
 VAR29:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
 VAR2A:=SMA(VAR29,5,1);
 VAR2B:=SMA(VAR2A,10,1);
 VAR2C:=CROSS(VAR2B,VAR2A);
 VAR2D:=VAR2B>80 OR VAR2A>80;
 VAR2E:=VAR2C AND VAR2D;
 VAR33:=HIGH;
 VAR34:=LOW;
 逃顶:=STICKLINE(VAR2E,VAR33,VAR34,4,0);
 DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),HIGH*1.01,'抛'),COLORGREEN;
 X6:=REF(CLOSE,1);
 X7:=SMA(MAX(CLOSE-X6,0),7,1)/SMA(ABS(CLOSE-X6),7,1)*100;
 X8:=CROSS(79,X7);
 X9:=FILTER(X8,4);DRAWTEXT(X9,HIGH*1.03,'出货'),COLOR9000F5;
 STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,3.15,0),COLOR337777;
 STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,2.45,0),COLOR339999;
 STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.75,0),COLOR33BBBB;
 STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.05,0),COLOR33DDDD;
 STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,0.35,0),COLOR33FFFF;
 DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L*0.99,'地量买点'),COLOR33FFFF;
 DRAWTEXT(CROSS(88,RSI),(HIGH*1.01),'R背'),COLOR00FF00;
 VAR2S:=(2*CLOSE+HIGH+LOW)/4;
 VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1);
 VAR4S:=LLV(LOW,5);
 VAR5S:=HHV(HIGH,4);
 散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;
 庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S;
 STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,3.15,0),COLOR770077;
 STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,2.45,0),COLOR990099;
 STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,1.75,0),COLORBB00BB;
 STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,1.05,0),COLORDD00DD;
 STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,0.35,0),COLORFF00FF;
 DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L*0.99,'吸'),COLORFF00FF;