三色动力指标公式源码 三色战法指标

 通达信指标公式源码概况：

指标类别： 通达信指标公式

授权方式： 免费版

指标评级： ★★★★★

指标分类： 策略

画线方法： 副图

三色动力指标公式源码  

LF:=100*(EMA(IF(C>O,VOL,0),10)-EMA(IF(C<O,VOL,0),10))/EMA(VOL,5);  

JF:=50*EMA((2*C-REF(C,1)-REF(O,1)),10)/EMA(H-L,5);LJF:=SMA((JF+LF)/2,3,1);  

量价指标:JF+LF,COLORFFFFFF;量价趋势:LJF,COLOR00FFFF,LINETHICK2;  

量价动力:3*LJF-2*SMA(LJF,3,1),COLOR0000FF;  

布林极限:=100*(C-MA(C,20))/STD(C,20);  

布林K值:=EMA(布林极限,10);  

VAR2:=EMA(布林极限,5);  

VAR3:=EMA(布林K值,5);  

STICKLINE(VAR2>=VAR3,101,103,3,0),COLOR00FFFF;  

STICKLINE(布林极限>=0,99,101,3,0),COLOR0000FF;  

VAR1K:=(L+H+2*C)/4;  

VAR2K:=REF(VAR1K,1);  

VAR3K:=SMA(VAR1K-VAR2K,6,1)/SMA(ABS(VAR1K-VAR2K),2,1)*100;  

MMS:=VAR3K+50;  

MMM:=EMA(MMS,8);  

STICKLINE(MMS>=100,105,107,6,0),COLORFFFFFF;  

STICKLINE(MMS<0,-12,-14,2,0),COLORFFFFFF;  

MAV:=(C*2+H+L)/4;  

SK:=EMA(MAV,1)-EMA(MAV,40);  

SD:=EMA(SK,5);  

B:=(SK-SD)*50;  

A:=(HHV(H,5)-C)/(HHV(H,5)-LLV(L,5))*10;  

A1:=(3*A-2*SMA(A,3,1));  

短线阻力:=IF(A1>50,50,IF(A1<-5,-5,A1));  

短线能量:=IF(B<-20,-20,IF(B>50,50,B));  

STICKLINE(短线能量>=短线阻力,0,短线能量+10,2,0),COLOR0000FF;  

STICKLINE(短线能量>=短线阻力AND短线能量-REF(短线能量,1)<0,0,短线能量/2+10,2,0),COLOR00FF00;  

STICKLINE(短线能量<短线阻力,0,短线能量+10,2,0),COLORFF0000;  

BIAS1W:=(C-MA(C,6))/MA(C,6)*100;{BIAS}  

BIAS2W:=(C-MA(C,12))/MA(C,12)*100;  

BIAS3W:=(C-MA(C,24))/MA(C,24)*100;  

MM:=(BIAS1W+2*BIAS2W+3*BIAS3W)/6;  

MN:=MA(MM,3);  

STICKLINE(MN<-12,-10,-12,2,0),COLOR00FF00;  

RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;  

K:=SMA(RSV,3,1),COLORFF0000;  

D:SMA(K,3,1),COLORFF0000;  

J:3*K-2*D,COLOR00FF00;  

DRAWICON(CROSS(J,D)ANDD<=20,18,12);  

IF(J<K,J,DRAWNULL),COLORFFFF00;  

动力KDJ:IF(J>K,J,DRAWNULL),COLOR00FFFF;  

IF(J>KANDJ<REF(J,1),J,DRAWNULL),COLOR00FF00;  

IF(J>K,D,DRAWNULL),COLOR00FF00;  

三色战法指标  

ZGD:=HHV(H,90)*0.99;  

ZGD2:=CONST(ZGD);  

ZDD:=LLV(L,90);  

ZDD2:=CONST(ZDD);  

{DRAWBAND(ZGD2,RGB(50,50,50),ZDD2,DRAWNULL);}  

急速超跌:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14;  

VAR1:=(CLOSE>REF(CLOSE,1)ANDCLOSE>REF(CLOSE,2));  

VAR2:=(REF(VAR1,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR3:=(REF(VAR2,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR4:=(REF(VAR3,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR5:=(REF(VAR4,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR6:=(REF(VAR5,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR7:=(REF(VAR6,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR8:=(REF(VAR7,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR9:=(REF(VAR8,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VARA:=(REF(VAR9,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VARB:=(REF(VARA,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VARC:=(REF(VARB,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VARD:=(CLOSE<REF(CLOSE,1)ANDCLOSE<REF(CLOSE,2));  

VARE:=(REF(VARD,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VARF:=(REF(VARE,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR10:=(REF(VARF,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR11:=(REF(VAR10,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR12:=(REF(VAR11,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR13:=(REF(VAR12,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR14:=(REF(VAR13,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR15:=(REF(VAR14,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR16:=(REF(VAR15,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR17:=(REF(VAR16,1)ANDCLOSE<=REF(CLOSE,1)ANDCLOSE>=REF(CLOSE,2));  

VAR18:=(REF(VAR17,1)ANDCLOSE>=REF(CLOSE,1)ANDCLOSE<=REF(CLOSE,2));  

VAR19:=REF(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,1)ANDVAR1;  

VAR1A:=((REF(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,1))ANDVARD);  

红色持股:VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,NODRAW,COLOR0000FF;  

青色观望:VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,NODRAW,COLORFFFF00;  

意志短买:VAR19,NODRAW,COLOR33FFCC;  

品红离场:VAR1A,NODRAW,COLORFF00FF;  

上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),NODRAW,COLOR0000FF;  

月:REF(MONTH,BARSCOUNT(CLOSE)-1),NODRAW,COLORFF00FF;  

日:REF(DAY,BARSCOUNT(CLOSE)-1),NODRAW,COLOR00FFFF;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),2.8,0),COLOR000088;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),2.6,0),COLOR000099;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),2.4,0),COLOR0000AA;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),2.2,0),COLOR0000BB;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),2.0,0),COLOR0000CC;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),1.8,0),COLOR0000DD;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),1.5,0),COLOR0000EE;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,CLOSE,REF(CLOSE,1),1,0),COLOR0000FF;  

STICKLINE(VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC,LOW,HIGH,0.0,0),COLOR0000FF;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),2.8,0),COLOR888800;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),2.6,0),COLOR999900;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),2.4,0),COLORAAAA00;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),2,2),COLORBBBB00;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),2.0,0),COLORCCCC00;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),1.8,0),COLORDDDD00;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),1.5,0),COLOREEEE00;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,CLOSE,REF(CLOSE,1),1,0),COLORFFFF00;  

STICKLINE(VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18,LOW,HIGH,0.0,0),COLORFFFF00;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2.8,0),COLOR33AACC;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2.6,0),COLOR33AACC;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2.4,0),COLOR33BBCC;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,2),COLOR33CCCC;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2.0,0),COLOR33DDCC;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),1.8,0),COLOR33EECC;  

STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLOR33FFCC;  

DRAWTEXT(VAR19,REF(CLOSE,1),'←意志短买'),COLOR33FFCC;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2.8,0),COLORFF33FF;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2.3,0),COLORFF44FF;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,0),COLORFF55FF;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1.8,0),COLORFF66FF;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1.5,0),COLORFF77FF;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1.3,0),COLORFF88FF;  

STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1,0),COLORFF99FF;  

DRAWTEXT(VAR1A,REF(CLOSE,1)+0.1,'←意志离场'),COLORFF99FF;  

MA3:=MA(CLOSE,3);  

YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6;  

辰星线:(20*YTSL+19*REF(YTSL,1)+18*REF(YTSL,2)+17*REF(YTSL,3)+16*REF(YTSL,4)+15*REF(YTSL,5)+14*REF(YTSL,6)+13*REF(YTSL,7)+12*REF(YTSL,8)+11*REF(YTSL,9)+10*REF(YTSL,10)+9*REF(YTSL,11)+8*REF(YTSL,12)+7*REF(YTSL,13)+6*REF(YTSL,14)+5*REF(YTSL,15)+4*REF(YTSL,16)+3*REF(YTSL,17)+2*REF(YTSL,18)+REF(YTSL,20))/211,COLOR0000FF;  

牵牛线:MA(CLOSE,26),COLORFF00FF;  

等待:=IF(MA3>辰星线,辰星线,MA3);  

IF(等待>REF(等待,1),等待,DRAWNULL),LINETHICK2,COLOR0000FF;  

IF(辰星线>REF(辰星线,1),辰星线,DRAWNULL),LINETHICK2,COLOR0000FF;  

IF(辰星线<REF(辰星线,1),辰星线,DRAWNULL),COLOR00FF00;  

IF(牵牛线>REF(牵牛线,1),牵牛线,DRAWNULL),LINETHICK2,COLORFF00FF;  

IF(牵牛线<REF(牵牛线,1),牵牛线,DRAWNULL),COLOR669933;  

VAR1:=MA(HHV(HIGH,485),17);  

VAR2:=MA(HHV(HIGH,222),17);  

VAR3:=MA(HHV(HIGH,96),17);  

VAR4:=MA(LLV(LOW,485),17);  

VAR5:=MA(LLV(LOW,222),17);  

VAR6:=MA(LLV(LOW,96),17);  

VAR7:=MA((VAR4*0.96+VAR5*0.96+VAR6*0.96+VAR1*0.558+VAR2*0.558+VAR3*0.558)  

/6,17);  

VAR8:=MA((VAR4*1.25+VAR5*1.23+VAR6*1.2+VAR1*0.55+VAR2*0.55+VAR3*0.65)/6,17);  

VAR9:=MA((VAR4*1.3+VAR5*1.3+VAR6*1.3+VAR1*0.68+VAR2*0.68+VAR3*0.68)/6,17);  

VARA:=MA((VAR7*3+VAR8*2+VAR9)/6*1.738,17);  

VARB:=IF(DATE<=1341231,VARA,VARA*DAY);  

VARC:=LOW;  

VARD:=REF(LOW,1);  

VARE:=SMA(ABS(VARC-VARD),3,1)/SMA(MAX(VARC-VARD,0),3,1)*100;  

VARF:=MA(IF(CLOSE*1.35<=VARB,VARE*10,VARE/10),3);  

VAR10:=LLV(LOW,30);  

VAR11:=HHV(VARF,30);  

VAR12:=1341231;  

TJ:=IF(DATE<=VAR12,MA(IF(LOW<=VAR10,(VARF+VAR11*2)/2,0),3),100000000);  

挖坑:REF(TJ,2)>REF(TJ,3)ANDTJ<REF(TJ,1);