大智慧《黑马趋势》指标公式源码

参数一:=5;
参数二:=20;
QJ0:=(CLOSE+HIGH+LOW)/3;
QJ1:=EMA(QJ0,10);
QJ2:=REF(QJ1,1);
短均:MA(C,参数一);
长均:=MA(C,参数二);
STICKLINE(QJ1>QJ2,QJ1,QJ2,9,0),COLOR0099FF;
STICKLINE(QJ1<QJ2,QJ1,QJ2,9,0),COLORBLUE;
起点:QJ1>QJ2,LINETHICK0;
持续:LAST(QJ1>QJ2),LINETHICK0;

DRAWTEXTABS(2,6,'所属板块：'+BKNAME),COLORBLACK,LINETHICK1;
资产值:=FINANCE2(4);
毛利值:=FINANCE2(12);
收入值:=FINANCE2(11);
利润值:=FINANCE2(10);
DRAWTEXTABS(118,21,'每股净资产:'+NUMTOSTRN(资产值,2)+'元'),COLORRED;
DRAWTEXTABS(2,21,'销售毛利率：'+NUMTOSTRN(毛利值,2)+'%'),LINETHICK1,COLORBLUE;
DRAWTEXTABS(2,39,'主营收入同比：'+NUMTOSTRN(收入值,2)+'%'),LINETHICK1,COLORBLACK;
DRAWTEXTABS(2,54,'净利润同比：'+NUMTOSTRN(利润值,2)+'%'),LINETHICK1,COLOR006633;
DRAWTEXTABS(3,69,'最高价:'+HHV(HIGH,0)),COLORRED;
DRAWTEXTABS(3,84,'最低价:'+LLV(LOW,0)),COLORFF0099;

QJ3:=(100-((90*(HHV(HIGH,21)-CLOSE))/(HHV(HIGH,21)-LLV(LOW,21))));
QJ4:=EMA(QJ3,13)-EMA(QJ3,73);
QJ5:=EMA(QJ4,2);
QJ6:=(CROSS(QJ4,QJ5) AND QJ4<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(QJ4,QJ5) AND QJ4<=-0.14) OR (CROSS(QJ4,QJ5) AND QJ4<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035));
DRAWTEXT(QJ6,L*0.99,'短线'),COLORFF0099;
STICKLINE(QJ6,H,L,0.5,0),COLORRED;
STICKLINE(QJ6,O,C,10,1),LINETHICK3,COLORRED;

QJ7:=6;
QJ8:=5;
QJ9:=1;
QJA:=0;
QJB:=3;
QJC:=IF(((QJA=0) OR (VOL=0)),MA(CLOSE,参数一),((SUM(AMOUNT,参数一)/SUM(VOL,参数一))/100));
QJD:=REF(QJC,1);
低吸:=IF(CROSS(CLOSE,QJD),QJD,0);
高抛:=IF(CROSS(QJD,CLOSE),QJD,0);
QJE:=BARSLAST((高抛>0));
QJF:=HHV((低吸>0),(QJE+1));
QJG:=IF((QJF>REF(QJF,1)),低吸,0);
QJH:=IF((QJF<REF(QJF,1)),高抛,0);
STICKLINE(QJG>0 AND QJ9=1,OPEN,(CLOSE+OPEN)/2,5.28,0),COLOR0044FF;
STICKLINE(QJG>0 AND QJ9=1,OPEN,(CLOSE+OPEN)/2,2.6,0),COLOR0077FF;
STICKLINE(QJG>0 AND QJ9=1,OPEN,(CLOSE+OPEN)/2,2.2,0),COLOR1199FF;
STICKLINE(QJG>0 AND QJ9=1,OPEN,(CLOSE+OPEN)/2,1.8,0),COLOR22BBFF;
STICKLINE(QJG>0 AND QJ9=1,OPEN,(CLOSE+OPEN)/2,1.4,0),COLOR33DDFF;
STICKLINE(QJG>0 AND QJ9=1,OPEN,(CLOSE+OPEN)/2,1,0),COLOR33FFFF;
STICKLINE(QJG>0 AND QJ9=1,CLOSE,(CLOSE+OPEN)/2,3,0),COLOR000055;
STICKLINE(QJG>0 AND QJ9=1,CLOSE,(CLOSE+OPEN)/2,2.6,0),COLOR000077;
STICKLINE(QJG>0 AND QJ9=1,CLOSE,(CLOSE+OPEN)/2,2.2,0),COLOR000099;
STICKLINE(QJG>0 AND QJ9=1,CLOSE,(CLOSE+OPEN)/2,1.8,0),COLOR0000BB;
STICKLINE(QJG>0 AND QJ9=1,CLOSE,(CLOSE+OPEN)/2,1.4,0),COLOR0000DD;
STICKLINE(QJG>0 AND QJ9=1,CLOSE,(CLOSE+OPEN)/2,1,0),COLOR0033FF;
STICKLINE(((QJH>0) AND (QJ9=1)),CLOSE,(CLOSE+OPEN)/2,5.580,0),COLORFF4400;
STICKLINE(((QJH>0) AND (QJ9=1)),CLOSE,(CLOSE+OPEN)/2,2.6,0),COLORFF7700;
STICKLINE(((QJH>0) AND (QJ9=1)),CLOSE,(CLOSE+OPEN)/2,2.2,0),COLORFF9911;
STICKLINE(((QJH>0) AND (QJ9=1)),CLOSE,(CLOSE+OPEN)/2,1.8,0),COLORFFBB22;
STICKLINE(((QJH>0) AND (QJ9=1)),CLOSE,(CLOSE+OPEN)/2,1.4,0),COLORFFDD33;
STICKLINE(((QJH>0) AND (QJ9=1)),CLOSE,(CLOSE+OPEN)/2,1,0),COLORFFFF33;
STICKLINE(((QJH>0) AND (QJ9=1)),OPEN,(CLOSE+OPEN)/2,3.0,0),COLOR550000;
STICKLINE(((QJH>0) AND (QJ9=1)),OPEN,(CLOSE+OPEN)/2,2.6,0),COLOR770000;
STICKLINE(((QJH>0) AND (QJ9=1)),OPEN,(CLOSE+OPEN)/2,2.2,0),COLOR990000;
STICKLINE(((QJH>0) AND (QJ9=1)),OPEN,(CLOSE+OPEN)/2,1.8,0),COLORBB0000;
STICKLINE(((QJH>0) AND (QJ9=1)),OPEN,(CLOSE+OPEN)/2,1.4,0),COLORDD0000;
STICKLINE(((QJH>0) AND (QJ9=1)),OPEN,(CLOSE+OPEN)/2,1,0),COLORFF0000;

QJI:=(IF(DATE>1341231,0,1));
QJJ:=(QJI*(BARSLAST(DISPSTATUS=1)+1));
QJK:=(LLVALL(LLV(L,QJJ)));
QJL:=(TROUGHBARS(3,15,1)<4);
QJM:=(EMA((C-MA((2*C+H+L)/4,30))/MA((2*C+H+L)/4,30)*100,3));
QJN:=(FILTER(QJL=1,5));
QJO:=(FILTER(QJL=1,5) AND QJM<-10);
QJP:=(FILTER(QJL=1,3));
DRAWTEXT(REF(QJP,1)=0 AND REF(QJP,2)=1,QJK*0.99,'★'),LINETHICK5,VALIGN2,ALIGN1,COLORFF9900;

QJQ:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
DRAWTEXT(QJQ,C*0.958,'●'),COLORRED;
QJR:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
DRAWTEXT(QJR,C*0.958,' 发现黑马'),COLORBROWN;

QJS:=EMA(CLOSE,12)-EMA(CLOSE,26);
QJT:=EMA(QJS,9);
QJU:=(QJS<-0.1 AND QJS>QJT);
龙王:IF(QJU,LLV(L,21),长均),POINTDOT,COLORRED,LINETHICK3;
PARTLINE(长均,长均>REF(长均,1),RGB(255,0,0),长均<REF(长均,1),RGB(0,255,0)),LINETHICK2;

QJV:=(SMA(HIGH,21,2)*1.05);
下轨道:=(SMA(LOW,21,2)*0.969);
QJW:=(((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13)))*100);
QJX:=SMA(QJW,3,1);
QJY:=SMA(QJX,3,1);
QJZ:=((3*QJX)-(2*QJY));
QK0:=(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*100);
QK1:=SMA(QK0,3,1);
QK2:=SMA(QK1,3,1);
QK3:=((3*QK1)-(2*QK2));
支撑位:=IF(CROSS(QJZ,QK3),LOW,REF(LOW,BARSLAST(CROSS(QJZ,QK3))));
压力位:=IF(CROSS(QK3,QJZ),HIGH,REF(HIGH,BARSLAST(CROSS(QK3,QJZ))));
QK4:=IF((CLOSE>=MA(CLOSE,20)),50,20);
QK5:=IF(((QJZ>QK4) AND (REF(QJZ,1)<=QK4)),LLV(REF(LOW,1),(BARSLAST(((QJZ<=QK4) AND (REF(QJZ,1)>QK4)))-1)),REF(LLV(REF(LOW,1),(BARSLAST(((QJZ<=QK4) AND (REF(QJZ,1)>QK4)))-1)),BARSLAST(((QJZ>QK4) AND REF(QJZ,1)))));
QK6:=IF((LOW<QK5),HIGH,REF(HIGH,BARSLAST((LOW<QK5))));
QK7:=IF((LOW<QK5),QJZ,REF(QJZ,BARSLAST((LOW<QK5))));
QK8:=IF((((LOW<QK6) AND (QJZ>QK7)) AND (QJZ>QK3)),LOW,REF(LOW,BARSLAST((((LOW<QK6) AND (QJZ>QK7)) AND (QJZ>QK3)))));
QK9:=((AMOUNT/VOL)/100);
QKA:=((QK9>HIGH) OR (QK9<LOW));
黑马趋势:=MA(CLOSE,3);
QKB:=MA(CLOSE,8);
DRAWTEXT(FILTER(((((((CLOSE/OPEN)>1.04) AND ((CLOSE-REF(CLOSE,1))>0)) AND (CLOSE>下轨道)) AND ((QKB-REF(QKB,1))>0)) AND (CLOSE<QJV)),3),(LOW-0.05),'▲追'),COLOR00FF00;
短期底部:=LLV(OPEN,30);
DRAWTEXT(((((((CROSS(黑马趋势,短期底部) AND ((QK8-REF(QK8,1))>0)) AND ((黑马趋势-REF(黑马趋势,1))>0)) AND (黑马趋势>1)) AND (LOW<=支撑位)) AND (CLOSE>支撑位)) AND (HIGH<压力位)),(LOW-0.15),'←黑马发现'),COLORFF00FF;
DRAWTEXT((((((((CROSS(黑马趋势,QK8) AND ((黑马趋势-REF(黑马趋势,1))>0)) AND (HIGH<压力位)) AND (LOW<=短期底部)) AND (CLOSE>支撑位)) AND (QKA<1)) AND (CLOSE>OPEN)) AND (CLOSE>QK8)),LOW,'←短买'),COLORBLUE;
QKC:=(((HHV(HIGH,36)-CLOSE)/(HHV(HIGH,36)-LLV(LOW,36)))*100);
QKD:=SMA(QKC,5,1);
QKE:=SMA(QKD,8,1);
QKF:=(CROSS(QKD,QKE) AND (QKE<16));
QKG:=((CLOSE>(LLV(CLOSE,60)+(0.3*LLV(CLOSE,60)))) AND QKF);
QKH:=IF((CLOSE>1000),QKF,QKG);
逃遁:=QKH;
DRAWTEXT(QKH,HIGH+0.06,'▼逃遁'),COLOR006633;
趋势线:=3*SMA((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
底部:=LLV(CLOSE,30);
QKI:=MA(底部,2);
QKJ:=MA(CLOSE,26);
压力:=HHV(HIGH,30);
DRAWTEXT(FILTER(LOW<=QKJ AND CLOSE>=QKJ AND QKI>=REF(QKI,1) AND CLOSE/OPEN>1.02 AND WINNER(CLOSE)<0.4,20),C*0.9285,'看多'),COLOR993399;
DRAWTEXT(FILTER(HIGH>=压力 AND CLOSE<HIGH AND CLOSE<OPEN AND OPEN/CLOSE>1.03 AND WINNER(CLOSE)>0.6,5),HIGH+0.06,'压力'),COLORGREEN;
短期乖离率:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
DRAWTEXT(FILTER(IF(CROSS(趋势线,10) AND CLOSE/LOW>1.04 AND 短期乖离率<0.35,1,0) AND CLOSE>OPEN,5),LOW-0.07,'底'),COLORRED;
历史大底:DRAWTEXT(FILTER((((((LLV(LOW,0) AND (WINNER(CLOSE)<0.08)) AND (LOW<=短期底部)) AND (CLOSE>短期底部)) AND (QJZ<80)) AND ((CLOSE/OPEN)>1.08)),20),(LOW-0.288),'★★历史大底');

QKK:=DMA(EMA(CLOSE,12),SUM(VOL,5)/3/CAPITAL);
QKL:=(CLOSE-QKK)/QKK*100;
QKM:=REF(QKL,1)<-40 AND QKL>REF(QKL,1) AND REF(QKL,1)<REF(QKL,2) AND QKL-REF(QKL,1)>2.5;
QKN:=(CLOSE-OPEN)/OPEN*100;
QKO:=REF(CLOSE,1);
QKP:=SMA(MAX(CLOSE-QKO,0),6,1)/SMA(ABS(CLOSE-QKO),6,1)*100;
QKQ:=COUNT(QKP<20,20)>=1;
QKR:=QKN>9 AND QKQ;
QKS:=100*WINNER(OPEN);
QKT:=100*WINNER(CLOSE);
QKU:=QKT-QKS;
QKV:=QKU>=30;
QKW:=CLOSE/MA(CLOSE,3)>=1.07 AND CLOSE=HHV(CLOSE,3) AND MA(VOL,2)/MA(VOL,40)>=3 AND MA(VOL,2)=HHV(MA(VOL,2),3) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
QKX:=REF(CLOSE,1);
QKY:=SMA(MAX(CLOSE-QKX,0),5,1)/SMA(ABS(CLOSE-QKX),5,1)*100;
QKZ:=COUNT(QKY<20,20)>=1;
QL0:=QKW AND QKZ;
QL1:=MA(CLOSE,4);
QL2:=MA(CLOSE,10);
QL3:=MA(CLOSE,20);
QL4:=MA(CLOSE,25);
QL5:=COUNT(CROSS(QL2,QL3),2)=1;
QL6:=COUNT(CROSS(QL1,QL4),2)=1;
QL7:=QL5 AND QL6;
QL8:=QL0 AND QKV AND QL7;
QL9:=MA(CLOSE,80)-MA(CLOSE,10)/3;
QLA:=CLOSE<QL9 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3;
短底反弹:=QKM OR QKR OR QL8 OR QLA;
QLB:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12));
拉升:=FILTER(QLB,28)*100;
DRAWTEXT(短底反弹,LOW*0.978,'●短底'),LINETHICK1,COLORFF00FF;

QLC:=(EMA(C,5));
QLD:=((20*H+19*(REF(H,1))+18*(REF(H,2))+17*(REF(H,3))+16*(REF(H,4))+15*(REF(H,5))+14*(REF(H,6))+13*(REF(H,7))+12*(REF(H,8))+11*(REF(H,9))+10*(REF(H,10))+9*(REF(H,11))+8*(REF(H,12))+7*(REF(H,13))+6*(REF(H,14))+5*(REF(H,15))+4*(REF(H,16))+3*(REF(H,17))+2*(REF(H,18))+REF(H,20))/210);
QLE:=(EMA(QLD,90));
妖股线:(QLE+(((C-(QLE))*C)-(QLE))/(QLE)),LINETHICK2,COLORFF00FF;
QLF:=(CROSS(妖股线,QLC));
DRAWTEXT((QLF),L,'↖超级主升'),LINETHICK3,COLORRED;