通达信 短线黑马选股指标 源码

A0:=HHV(H,13)-LLV(L,13); {13日最高价与最低价之差}A1:=HHV(H,13)-C;{13日最高价与收盘价之差}A2:=C-LLV(L,13);{收盘价与最低价之差}A3:= A1/A0*100-70;{思路之高价差在整个差值中比例减掉70，即获取三成权重}A4:=(C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100;{收盘价与60最低点距离，与60最高价最低价距离之比}A5:=(2*C+H+L)/4;{今日均价收盘双倍权重}A6:=SMA(A2/A0*100,3,1); {低价比例平滑处理}A7:=LLV(L,34);{34日最低价}A8:=SMA(A6,3,1)-SMA(A3,9,1);{再取移动平均，高出收盘部分与低于收盘部分的差距，两个不一致的权重？必要性？}A9:=IF(A8>100,A8-100,0); {差距大于100的话，那么就要减掉100，}AA:=HHV(H,34); {34日高价}AB:=A9*2; {差距的两倍，是两条移动均线的距离}AC:=EMA((A5-A7) / (AA-A7)*100,13);{34日高低价之间的比例关系平均移动曲线}AD:= EMA(0.667*REF(AC,1)+0.333*AC,2);AE:=SMA(A4,20,1); AF:=SMA(AB,2,1)-AB;B0:=EMA(0.667*REF(AC,1)+0.333*AC,2)-AC;B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70;B2:=SMA(B1,9,1)+100; B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;B4:=SMA(B3,3,1);B5:=SMA(B4,3,1)+100;B6:=B5-B2; B7:=IF(B6>60,B6-60,0);STICKLINE(REF(B7,1)<B7,B7,REF(B7,1),5,0),COLORRED;STICKLINE(REF(B7,1)>B7,B7,REF(B7,1),5,0),COLORFFFF00;主力:EMA((CLOSE-MA(CLOSE,7))/MA(CLOSE,7)*480,2),LINETHICK2,COLORRED;散户:EMA((CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*480,7),LINETHICK2,COLORWHITE;DRAWTEXT(CROSS(主力,散户) AND 主力<-10,-20,"升"),COLORYELLOW;DRAWICON(CROSS(主力,散户) AND 主力<-10 AND 散户>REF(散户,1)OR CROSS(主力,散户) AND 散户<-35 ,-15,1);加速探底:IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,40,0.85),COLORYELLOW;机会来临1:REF(IF(REF(C,1)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,40,0),1),COLOR9999FF;A11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1);黑马线:=EMA(A11,5); A21:=(黑马线-REF(黑马线,1))/REF(黑马线,1)*100; A31:=EMA(C,5);A41:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;趋势线:=(MA(3*SMA(A41,6,1)-2*SMA(SMA(A41,5,1),5,1),2));A51:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100;DRAWTEXT(FILTER(REF(黑马线,1)>90 AND A21<0,7),黑马线,"跑"),COLOR00FF00;DRAWTEXT(CROSS(A11,黑马线)AND 黑马线<A51,黑马线,"黑马"),COLORYELLOW; DRAWTEXT(CROSS(黑马线,A51)AND 趋势线<80,黑马线,"追涨"),COLOR688EC1;DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,5,"大黑马 "),COLORFFFF00;底部:=(A21<-10 AND A21>REF(A21,1))*25; DRAWICON(底部 AND A31>REF(A31,1),25,1);机会来临2:REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,65,0),1),COLORF00FF0;