通达信战无不胜指标公式源码

高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);
 H1:=高1-(高1-低1)*0.191;
 H2:=高1-(高1-低1)*0.382;
 H3:=高1-(高1-低1)*0.5;
 H4:=高1-(高1-低1)*0.618;
 H5:=高1-(高1-低1)*0.809;
突破:=REF(EMA(C,14),1);
 A1X:=(EMA(C,10)-突破)/突破*100;
 JZ:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1)),COLORFFFF00,LINETHICK2;
 N1:=100;{www.qill.cn分析家公式网www.88gs.com}
 KD:=BARSLAST(CURRBARSCOUNT=N1);
 GD:=CONST(IF(ISLASTBAR=1,HHV(H,KD),0));
 DD:=CONST(IF(ISLASTBAR=1,LLV(L,KD),0));
 KJ:=GD-DD;
 GD4:=IF(CURRBARSCOUNT<=N1/2,GD,DRAWNULL);
 ND:=IF(BARSCOUNT(C)>=8,8,BARSCOUNT(C));
 AMOV:=VOL*(C+L+H)/3;
 MN:=SUM(AMOV,ND)/SUM(VOL,ND);
 AAC:=CROSS(A1X,0),LINETHICK0;
 BBC:=CROSS(0,A1X),LINETHICK0;
 DRAWICON(AAC,JZ*0.98,34);
 DRAWICON(BBC,JZ*1.015,35);
 LC:= REF(CLOSE,1);
 RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
逃顶:=CROSS(82,RSI);
 DRAWICON( 逃顶,H*1.01,15);
 DRAWTEXT( 逃顶,H*1.01,' ←快跑'),COLORFFFFFF;
平衡:=IF(CURRBARSCOUNT<=N1,DD+KJ/2,DRAWNULL),COLOR00FFFF,NODRAW;
压力:=IF(CURRBARSCOUNT<=N1,GD-KJ*0.191,DRAWNULL),COLORFF00FF,NODRAW;
支撑:=IF(CURRBARSCOUNT<=N1,DD+KJ*0.191,DRAWNULL),COLOR00FF00,NODRAW;
高区:IF(CURRBARSCOUNT<=N1,GD,DRAWNULL),COLORRED,DOTLINE;
低区:IF(CURRBARSCOUNT<=N1,DD,DRAWNULL),COLOR00FF00,DOTLINE;
 A1:=BARSLAST(MONTH!=REF(MONTH,1))+1;
月±%:(CLOSE/REF(CLOSE,A1)-1)*100,COLOR00FFFF,NODRAW;
 DRAWKLINE(H,O,L,C);
 DRAWTEXT(CURRBARSCOUNT=1,压力,'0.809'),COLOR0000FF;
 DRAWTEXT(CURRBARSCOUNT=1,平衡,'0.500'),COLORFFFFFF;
 DRAWTEXT(CURRBARSCOUNT=1,支撑,'0.191'),COLOR00FFFF;
 C1:=C>=JZ;
 C2:=C<JZ;
 AA:=C1>=C2 ;
 BB:=C2>C1 ;
 STICKLINE(AA,C,O,3,0),COLORRED;
 STICKLINE(AA,H,L,0,0),COLORRED;
 STICKLINE(BB,C,O,3,0),COLOR00FF00;
 STICKLINE(BB,H,L,0,0),COLOR00FF00;
 {www.qill.cn红}
STICKLINE(AA,CLOSE,OPEN,3,0),COLOR000099;
 STICKLINE(AA,CLOSE,OPEN,2.2,0),COLOR0000CC;
 STICKLINE(AA,CLOSE,OPEN,1.5,0),COLOR0000FF;
 STICKLINE(AA,CLOSE,OPEN,0.5,0),COLORCC66FF;
 {www.qill.cn蓝}
STICKLINE(BB,CLOSE,OPEN,3,0),COLORFF7700;
 STICKLINE(BB,CLOSE,OPEN,2.2,0),COLORFF9900;
 STICKLINE(BB,CLOSE,OPEN,1.5,0),COLORFFBB00;
 STICKLINE(BB,CLOSE,OPEN,0.5,0),COLORCYAN;
 MN1:SUM(AMOV,ND)/SUM(VOL,ND),COLORFF0000,LINETHICK3;
 NOTEXT1:IF(C>MN1,MN1,DRAWNULL),LINETHICK3,COLOR0000FF;
 NOTEXT2:IF(C<MN1,MN1,DRAWNULL),LINETHICK3,COLOR00FFFF;
 AAA:= C>MN;
 BBB:= C<MN;
 DDD:= A1X>=0;
 EE:= A1X<0;
 TT:=IF(ISLASTBAR,240/FROMOPEN,1);
 NN:=120;
 HH:=HHV(V*TT,NN);
 LL:=LLV(V,NN);
最高:=CONST(HH);
最低:=CONST(LL);
最高2:=CONST(HHV(H,NN));
最低2:=CONST(LLV(L,NN));
 PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;
 RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
 AAD:=最低3;
 STICKLINE(AAA,AAD-0.000*AAD,AAD-0.030*AAD,4,0),COLORRED;
 STICKLINE(BBB,AAD-0.005*AAD,AAD-0.025*AAD,4,0),COLOR00DDDD;
 STICKLINE(DDD,AAD-0.035*AAD,AAD-0.065*AAD,4,0),COLORDD00DD;
 STICKLINE(EE,AAD-0.040*AAD,AAD-0.060*AAD,4,0),COLORAAAAAA;