通达信三角主升副图指标改进版 源码附图
通达信三角主升副图指标改进版 源码附图
底部之王:=IF(EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3)>-5,EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),-5),COLORWHITE;
VA5:=HHV(HIGH,34);
VA6:=(2*CLOSE+HIGH+LOW)/4;
VA8:=LLV(LOW,34);
VA9:=EMA((VA6-VA8)/(VA5-VA8)*100,13);
VA10:=EMA(0.667*REF(VA9,1)+0.333*VA9,2);
生命线:=EMA(VA10,1);
AC5:=3*SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,21,1)-2*SMA(SMA((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100,20,1),8,1);
低位转强:=(CROSS(AC5,20));
开始拉升:=(CROSS(VA9,生命线) AND VA9>VA10 AND VA9<55 AND C>O);
极低涨:=LLV(C,500)=LLV(C,5) AND C/REF(C,1)>(1+9.8/100);
V1:=LLV(LOW,10);
V2:=HHV(H,25);
价位线:=EMA((C-V1)/(V2-V1)*4,4);
VUR0:=(((((2 * OPEN) + HIGH) + LOW) + (3 * CLOSE)) / 7);
VUR1:=(CAPITAL * VUR0);
VUR2:=(SMA(AMOUNT,10,1) / 1000);
VUR3:=MA((CLOSE * 3),5);
VUR4:=((((VUR2 * (CLOSE * 3)) / VUR3) * 1) / 10);
VUR5:=((((VUR2 * (OPEN * 3)) / VUR3) * 1) / 10);
VUR6:=((((VUR2 * (HIGH * 3)) / VUR3) * 1) / 10);
VUR7:=((((VUR2 * (LOW * 3)) / VUR3) * 1) / 10);
VUR8:=(((((2 * VUR5) + VUR6) + VUR7) + (3 * VUR4)) / 7);
VUR9:=EMA(DMA(EMA(VUR4,2),(SUM(VOL,1) * VUR8)),2);
VURA:=EMA((VUR1 - VUR9),1);
VU1:=IF((VURA > REF(VURA,1)),((VURA - REF(VURA,1)) * 15 / 1000),0);
VU2:=IF((VURA < REF(VURA,1)),((VURA - REF(VURA,1)) * 15 / 1000),0);
VU3:=SUM(VU1,15);
VU4:=EMA(VU3,10);
VU5:=REF(VU4,1);
VU6:=EMA(CLOSE,13);
VU7:=(VU6 < REF(VU6,1));
VU8:=(VU7 AND (VU4 > VU5));
VU9:=(SUM(VU2,21) * (0 - 1));
VUA:=EMA(EMA(VU9,5),8);
VUB:=REF(VUA,1);
买线:=VU5;
卖线:=VUB;
OK:=REF(CLOSE,1);
鱼:=SMA(MAX(CLOSE-OK,0),7,1)/SMA(ABS(CLOSE-OK),7,1)*100;
RSI4:=SMA(鱼,7,1);
HH:=BARSLAST(鱼<=15)<5;
白绿线:=SMA(鱼,7,1);
深水鱼:=CROSS(鱼,RSI4) AND 白绿线>15 AND HH;{15}
BU:=深水鱼;
BB2:=IF(C>REF((6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+1*REF(H,5))/(6+5+4+3+2+1) ,1),1,IF(C<REF((6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+1*REF(L,5))/(6+5+4+3+2+1) ,1),-1,0));
DD2:=BARSLAST(NOT(BB2=0));
BF:=IF(BB2=0,REF(BB2,DD2),BB2);
鱼跃龙门:BU,NODRAW,COLORRED;
止损:C<REF(O,BARSLAST(BU>0)) AND COUNT(C<REF(O,BARSLAST(BU>0)),BARSLAST(BU>0)) =1 AND IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1)>0,NODRAW, COLORGREEN;{6}
区间:=COUNT(BU,BARSLAST(BU)+1)=1 AND COUNT(止损,BARSLAST(BU>0)+1) =0 AND COUNT(CROSS(0,IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1)), BARSLAST(BU>0)+1)=0,NODRAW,COLORLIMAGENTA;{COLOR696960;6}
鱼进龙门:(COUNT(BU,BARSLAST(BU)+1)=1 AND COUNT(止损,BARSLAST(BU>0)+1) =0 AND COUNT(CROSS(0,IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1)), BARSLAST(BU>0) +1)=1
AND CROSS(0,IF(MA(CLOSE,1)>IF(BF=-1,MA(HIGH,1.01),MA(LOW,1.01)) ,1,-1))) OR 止损,NODRAW;
STICKLINE(鱼进龙门>0,0,16,3,0),COLORYELLOW;
DRAWTEXT(鱼进龙门,14,'←鱼跃龙门'),COLORMAGENTA;
STICKLINE(鱼跃龙门>0,0,10,4,0),COLORRED;{红色柱}
STICKLINE(鱼跃龙门>0 AND 低位转强,16,10,2,0),COLORLIRED;
STICKLINE(鱼跃龙门>0 AND 开始拉升,16,10,1,0),COLORFF00FF;
STICKLINE(鱼跃龙门>0 AND 极低涨,16,10,1,0),COLORYELLOW;
DRAWTEXT(鱼跃龙门,8,'★有鱼徘徊'),COLORYELLOW;
A1:="KD.K#DAY"(9,3,3); A2:="KD.D#DAY"(9,3,3);
A3:="KD.K#WEEK"(9,3,3); A4:="KD.D#WEEK"(9,3,3);
A5:="KD.K#MONTH"(9,3,3); A6:="KD.D#MONTH"(9,3,3);
A7:="KDJ.J#WEEK"(9,3,3);
A8:="KD.K"(9,3,3); A9:="KD.D"(9,3,3);
RSVP:=(C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*20-20;
KV:=SMA(RSVP,3,1);
DV:=SMA(KV,3,1);
JV:=3*KV-2*DV;
ZDZK1:=EMA(JV,6);
ZDZK2:=REF(ZDZK1,1);
凤:=IF(ZDZK1>=ZDZK2,ZDZK1+2,ZDZK2);
雉:=IF(ZDZK2-ZDZK1,ZDZK2,ZDZK1);
MTM:=C-REF(C,1);
龙:=30*EMA(EMA(MTM,50),50)/EMA(EMA(ABS(MTM),61),61);
凰:=MA(龙,6);
龙凤呈祥:=CROSS(凰<龙,0.13) AND 龙>凤 AND 凤>雉;
STICKLINE(底部之王>5 AND 龙凤呈祥 AND A3>A4,10,0,2,0),COLORWHITE;
STICKLINE(底部之王>5 AND 龙凤呈祥 AND A3>A4 AND COUNT(低位转强,2)>0,16,10,2,0),COLORLIRED;
STICKLINE(底部之王>5 AND 龙凤呈祥 AND A3>A4 AND COUNT(开始拉升,2)>0,16,10,1,0),COLORFF00FF;
STICKLINE(底部之王>5 AND 龙凤呈祥 AND A3>A4 AND COUNT(极低涨,2)>0,16,10,1,0),COLORYELLOW;
DRAWTEXT(底部之王>5 AND 龙凤呈祥 AND A3>A4,11,' 龙凤呈祥'),COLORRED;
VARR1:=EMA(EMA(CLOSE,3),1);
控:=(VARR1-REF(VARR1,1))/REF(VARR1,1)*100;
控盘:=IF(底部之王>5 AND 控>3,控,0);
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND A3>A4 AND 价位线>=1.8,控盘,0,3.5,0),COLOR00FFDD;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND A3>A4 AND 价位线>=1.8,控盘,0,2.5,0),COLOR00FFAA;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND A3>A4 AND 价位线>=1.8,控盘,0,1.5,0),COLOR00FFCC;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0 AND A3>A4 AND 价位线>=1.8,控盘,0,1,0),COLOR00FFFF;
主力吸货:IF(控盘>REF(控盘,3) AND 控>0 AND A3>A4 AND 价位线>=1.8,控,0),COLOR00FFFF;
股票:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
短线:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
选股技巧:=SUM(股票,5);
主升:=SUM(短线,5);
通达信指标:=IF(选股技巧>主升,(选股技巧-主升)/选股技巧,IF(选股技巧=主升,0,(选股技巧-主升)/主升));
AA16:=MA(通达信指标,5);
AA18:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
AA19:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
AA1A:=SUM(AA18,3);
AA1B:=SUM(AA19,3);
AA1C:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
AA1D:=MA(AA1C,3);
强:IF(底部之王>5 AND A3>A4 AND 价位线>=1.8,BARSLAST(EMA(CLOSE,5)<REF(EMA(CLOSE,5),1)),0), COLORRED;
AA1E:=HHV(CLOSE,2);
AA1F:=BARSLAST(AA1E<REF(AA1E,2));
股票0:=IF(AA1F>=1,LLV(AA1E,AA1F),LOW);
股票1:=股票0+股票0*AA1F*0.5/100;
股票2:=IF(股票1<REF(股票1,1),MA(LOW,3),股票1);
股票3:=股票0+股票0*(AA1F-1)*1.618/100;
山:IF(底部之王>5 AND A3>A4 AND 价位线>=1.8,COUNT(EMA(CLOSE,5)>REF(EMA(CLOSE,5),1),5),0);
股票4:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
股票5:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
股票6:=SUM(AA18,3);
股票7:=SUM(AA19,3);
股票8:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
股票9:=MA(AA1C,3);
STICKLINE(底部之王>5 AND A1>A2 AND 强>=1 AND 山>=1 AND A3>=A4 AND 价位线>=1.8,0 ,-1 ,5 ,0 ),COLORLIRED;
STICKLINE(底部之王>5 AND A3>A4 AND 价位线>=1.8,-2 ,-1 ,5 ,0 ),COLORGRAY;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
买入或持股:STICKLINE(山>0 AND (买线>卖线 OR (控盘>REF(控盘,3) AND 控盘>0)),强,0,2,0), COLORRED;
股票A:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
股票B:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
股票C:=SUM(AA18,3);
股票D:=SUM(AA19,3);
股票E:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
股票F:=MA(AA1C,3);
{下跌→抛出: STICKLINE(山>0,强,山,2,1), COLORF0F000;}
短线0:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
短线1:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
短线2:=SUM(AA18,3);
短线3:=SUM(AA19,3);
短线4:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
短线5:=MA(AA1C,3);
观望:STICKLINE(山=0 AND 强=0 AND A3>A4 AND 价位线>=1.8,0,1,4,1), COLORBLUE;
短线6:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
短线7:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
短线8:=SUM(AA18,3);
短线9:=SUM(AA19,3);
短线A:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
短线B:=MA(AA1C,3);
植被:STICKLINE(山<强 AND A3>A4 AND 价位线>=1.8,强,山,1,0), COLOR00FF00;
短线C:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
短线D:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
短线E:=SUM(AA18,3);
短线F:=SUM(AA19,3);
选股技巧0:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
选股技巧1:=MA(AA1C,3);
选股技巧2:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*10;
选股技巧3:=IF(OPEN<=REF(OPEN,1),0,MAX(HIGH-OPEN,OPEN-REF(OPEN,1)));
选股技巧4:=IF(OPEN>=REF(OPEN,1),0,MAX(OPEN-LOW,OPEN-REF(OPEN,1)));
选股技巧5:=SUM(AA18,3);
选股技巧6:=SUM(AA19,3);
选股技巧7:=IF(AA1A>AA1B,(AA1A-AA1B)/AA1A,IF(AA1A=AA1B,0,(AA1A-AA1B)/AA1B));
选股技巧8:=MA(AA1C,3);
STICKLINE(底部之王>5 AND REF(山,1)=0 AND 山>0 AND A3>A4 AND 价位线>=1.8,0,-1,2,0), COLORRED;
DRAWTEXT(底部之王>5 AND REF(强,3)>0 AND REF(强,2)>0 AND REF(强,1)>0 AND 强=0 AND REF(强,1)>山,REF(强,1),'盘整'),COLORYELLOW;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE-VAR1)/(VAR2-VAR1))*100),5);
AK:=EMA((((CLOSE-VAR1)/(VAR2-VAR1))*50),13);
AB:=CROSS(AK1,AK);
鱼跃:=AB=1;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
趋势:=SMA(((CLOSE- LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100),3,1);
CBH:=趋势<50;
YYU:=鱼跃 OR (BB1 AND CC1 AND DD1 AND EE1);
鱼跃龙门2:(CBH AND YYU AND 山=1)*10,COLORLIRED;
DRAWTEXT(鱼跃龙门2=10,14,'←鱼跃龙门'),COLORMAGENTA;
P1:=5;P2:=20;
VARD1:=MA(VOL,P1)=HHV(MA(VOL,P1),P2);
VARD2:=VOL>MA(VOL,P1);
VARD3:=VARD1 AND VARD2;
VARD4:=REF(VARD3,1) OR REF(VARD3,2) OR REF(VARD3,3) OR REF(VARD3,4) OR REF(VARD3,5) OR REF(VARD3,6) OR REF(VARD3,7) OR REF(VARD3,8) OR REF(VARD3,9) OR REF(VARD3,10) OR REF(VARD3,11) OR REF(VARD3,12) OR REF(VARD3,13) OR REF(VARD3,14) OR REF(VARD3,15) OR REF(VARD3,16) OR REF(VARD3,17) OR REF(VARD3,18) OR REF(VARD3,19) OR REF(VARD3,20);
大牛股:10*(VARD1 AND VARD2 AND NOT(VARD4) AND 强>=1 AND 山>=1);
DRAWTEXT(底部之王>5 AND 大牛股=10,8,'★大牛'),COLORRED;
