牛股主升 主副图2个指标 源码 通达信版 贴图
牛股主图源码：
N:=89;M1:=3;M2:=3;
AA:=100*(C-REF(C,1))/REF(C,1);
BB:=100*(H-C)/REF(C,1);
HH:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
EE:=SMA(HH,M1,1);
FF:=SMA(EE,M2,1);
GG:=3*EE-2*FF;
V5:=EMA(CLOSE,1);
AE:=EMA(V5,5) ;
AB:=EMA(HHV(AE,5),1);
AJ:EMA(HHV(AB,17),1),COLORYELLOW,LINETHICK1;
WJ:EMA(HHV(AJ,17),2),COLORBLUE;
AF:EMA(HHV(WJ,17),3),COLORRED,LINETHICK1;
ER:(1+6/100)*MA(CLOSE,25),COLORGREEN,LINETHICK1;
{CC:=C
OK: C FF AND LAST(CC,22,1) AND AA 3 AND BB 3 AND GG 87 AND H!=L
AND LAST(GG 80,20,1) AND LLV(GG,32) 3 AND GG REF(GG,1)*1.25;};
ZDT:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDT 6,O,C,0.5,0),COLORYELLOW;
STICKLINE(ZDT -9.8,O,C,0.5,0),COLOR00FF00;
涨停:=ZDT
不破价:=REF(L,BARSLAST(涨停));
GP:=0;
满足返回:=TESTSKIP(PERIOD!=5);
总股本:=STRCAT(CON2STR(FINANCE(1)/100000000,2),' 亿');流通盘:=CON2STR(FINANCE(7)/100000000,2);
OUTSJ:=STRCAT(STRCAT(STRCAT(IF(DYBLOCK=DRAWNULL,' ',DYBLOCK),STRCAT(' 总股本: ',IF(STRCMP(总股本,' ')=0,总股本,' '))),STRCAT(' ',IF(STRCMP(流通盘,' ')=0,STRCAT('流通盘: ',流通盘),''))),STRCAT(' ','亿'));
DRAWTEXT_FIX(GP=0,0.01,0.02,0,OUTSJ);
牛股副图：
N:=500;
BJQD:=100*CLOSE/INDEXC;
B:=SUM(BJQD,N)/N;
XDQD1:=BJQD/B;
XDQD:XDQD1/(SUM(XDQD1,60)/60),COLORFF33FF,LINETHICK2;
B1:0.9,COLORBLUE;
B2:1.0,COLORFFAA00,LINETHICK2;
B3:1.12,COLORRED,LINETHICK2;
DRAWICON(CROSS(XDQD,B3),B3,5);
BF:=C 0.97*REF(C,BARSLAST(CROSS(B3,XDQD)+1)) AND (LONGCROSS(XDQD,B3,30));
STICKLINE(BF,B1,B3,1,0),COLORRED;
STICKLINE(LONGCROSS(B3,XDQD,20),B1,B3,1,0),COLORYELLOW;
