三红主图中线 资金趋势 资金龙头 机构动向，配合使用基本等于吃肉。

{资金龙头}

DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'11',0); 

YM:=MA(((WINNER((CLOSE * 0.9)) * 100) * CLOSE),3);

DC:=(IF((YM > 10),YM,0) / 2);

主力资金:DC,STICK,LINETHICK4,COLORRED;

资金流入线:DC,COLORLIRED,LINETHICK2;

资金均量线:MA(DC,5),COLORMAGENTA,LINETHICK2;

VAR1:=IF(DATETODAY(DATE)<9872,1,DRAWNULL);

VAR2:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);{分析家公式网www.gspt.Com}

VAR3:=8;

VAR4:=2342.459961*500;

VAR5:=IF(DATE<VAR4,1,DRAWNULL);

VAR6:=CROSS(VAR2,VAR3);

VAR7:=CROSS(VAR2,VAR3) AND HIGH>REF(HIGH,1) AND CLOSE>REF(CLOSE,1);

VAR8:=CROSS(VAR3,VAR2);

VAR9:=LLV(LOW,21);

VAR10:=HHV(HIGH,21);

VAR11:=EMA((CLOSE-VAR9)/(VAR10-VAR9)*100,5);

VAR12:=EMA((CLOSE-VAR9)/(VAR10-VAR9)*50,13);

VAR13:=CROSS(VAR11,VAR12);

VAR14:=IF(CLOSE>REF(CLOSE,1),88,0);

VAR15:=IF(CLOSE/REF(CLOSE,1)>1.05 AND HIGH/CLOSE<1.01 AND VAR14>0,91,0);

龙头启动:DATE<1971230 AND FILTER(VAR15>90,45)=1,COLORYELLOW,LINETHICK1;

STICKLINE(龙头启动,LOW*20.93,0,3,0),COLORYELLOW,LINETHICK4;

A:=VOL*CLOSE;

B:=SUM(A,1)/SUM(VOL,1); 

B1:=EMA(B,8); 

敢死队:(B-B1)*100/B,NODRAW,COLORRED;

DRAWBAND(敢死队+35,RGB(250,0,00),35,RGB(0,255,0));

DRAWTEXT(ISLASTBAR,35.5,' 敢死队'),COLORRED;

资金趋势:3*(EMA(C,3)-EMA(C,8)-EMA(EMA(C,3)-EMA(C,8),20))*5,NODRAW,COLORMAGENTA;

{三红主图中线}

MA10:EMA(CLOSE,10),COLORGREEN,LINETHICK1;

MA20:EMA(CLOSE,20),COLORGREEN,LINETHICK1;

MA30:EMA(CLOSE,30),COLORGREEN,LINETHICK1;

IF(EMA(C,10)>=REF(EMA(C,10),1),EMA(C,10),DRAWNULL),COLORRED;

IF(EMA(C,20)>=REF(EMA(C,20),1),EMA(C,20),DRAWNULL),COLORRED;

IF(EMA(C,30)>=REF(EMA(C,30),1),EMA(C,30),DRAWNULL),COLORRED;

X3:=EMA(CLOSE,30);

STICKLINE(((C >= X3) AND (C >= O)),H,L,0,1),COLOR0000AA;

STICKLINE(((C >= X3) AND (C >= O)),O,C,3,0),COLOR0000AA;

STICKLINE(((C >= X3) AND (C >= O)),O,C,2.3,0),COLOR0000CC;

STICKLINE(((C >= X3) AND (C >= O)),O,C,1.8,0),COLOR0000FF;

STICKLINE(((C >= X3) AND (C >= O)),O,C,1,0),COLORCC66FF;

STICKLINE(((C >= X3) AND (C <= O)),H,L,0,1),COLOR0000AA;

STICKLINE(((C >= X3) AND (C <= O)),O,C,3,0),COLOR0000AA;

STICKLINE(((C >= X3) AND (C <= O)),O,C,2.3,0),COLOR0000CC;

STICKLINE(((C >= X3) AND (C <= O)),O,C,1.8,0),COLOR0000FF;

STICKLINE(((C >= X3) AND (C <= O)),O,C,1,0),COLORCC66FF;

STICKLINE(((C <= X3) AND (C >= O)),H,L,0,1),COLORFF6600;

STICKLINE(((C <= X3) AND (C >= O)),O,C,3,0),COLORFF6600;

STICKLINE(((C <= X3) AND (C >= O)),O,C,2.3,0),COLORFF9900;

STICKLINE(((C <= X3) AND (C >= O)),O,C,1.8,0),COLORFFCC00;

STICKLINE(((C <= X3) AND (C >= O)),O,C,1,0),COLORFFFF00;

STICKLINE(((C <= X3) AND (C <= O)),H,L,0,0),COLORFF6600;

STICKLINE(((C <= X3) AND (C <= O)),O,C,3,0),COLORFF6600;

STICKLINE(((C <= X3) AND (C <= O)),O,C,2.3,0),COLORFF9900;

STICKLINE(((C <= X3) AND (C <= O)),O,C,1.8,0),COLORFFCC00;

STICKLINE(((C <= X3) AND (C <= O)),O,C,1,0),COLORFFFF00;

Z1:=REF(H,8)=HHV(H,2*8+1);

Y1:=FILTER(Z1,8);

X1:=BACKSET(Y1,8+1);

W1:=FILTER(X1,8);{高点}

R11:=BACKSET(ISLASTBAR,BARSLAST(W1)+1); S11:=R11>REF(R11,1);

DRAWLINE(W1,H,S11,H,1),COLORBLACK,LINETHICK2;

Z2:=REF(L,8)=LLV(L,2*8+1);

Y2:=FILTER(Z2,8);

X2:=BACKSET(Y2,8+1);

W2:=FILTER(X2,8);{低点}

T11:=BACKSET(ISLASTBAR,BARSLAST(W2)+1); U11:=T11>REF(T11,1);

DRAWLINE(W2,L,U11,L,1),COLORBLACK,LINETHICK2;

M:=INTPART(3*8/5);

Z12:=REF(H,M)=HHV(H,2*M+1);

Y12:=FILTER(Z12,M);

X12:=BACKSET(Y12,M+1);

涨停:=IF(REF(C,1)*1.1-C<0.01,1,0);

STICKLINE(涨停,OPEN,CLOSE,3.5,0),COLOR871F78;

STICKLINE(涨停,OPEN,CLOSE,2.3,0),COLORYELLOW;

STICKLINE(涨停,H,L,0,0),COLORYELLOW;

{板块市值业绩}

所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT(' [行业]—',HYBLOCK),STRCAT(' [地域]—',DYBLOCK)),STRCAT(' [概念]—',GNBLOCK)));

总股本:=STRCAT(STRCAT(' 总股本:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');

流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');

全流通:=STRCAT(STRCAT(' 全流通:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'％');

市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');

股本市值:=STRCAT('【股本市值】',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));

市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));

市销率:=STRCAT(' 市销率:',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));

市净率:=STRCAT(' 市净率:',CON2STR(C/FINANCE(34),2));

净资收益率:=STRCAT(' 净资收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));

毛利率:=STRCAT(' 毛利率:',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));

净利润率:=STRCAT(' 净利率:',CON2STR(FINANCE(30)/FINANCE(20)*100,2));

主营利润率:=STRCAT(' 主营利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));

当前业绩:=STRCAT('【当前业绩】',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率));

DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.005,0.09,0,股本市值),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.005,0.16,0,当前业绩),COLORYELLOW;

现金负债比:=(FINANCE(25)/FINANCE(15));

主营业增长率:=FINANCE(44);

净利润增长率:=FINANCE(43);

每股收益:=CONST(FINANCE(38));

每股净资产:=CONST(FINANCE(34));

每股现金流:=CONST((FINANCE(25)/FINANCE(1)));

每股未分配:=CONST(FINANCE(32));

每股公积金:=CONST(FINANCE(18));

流通市值:=ROUND(FINANCE(40)/100000000);

A股流通:=FINANCE(7)/100000000;

内外比:=DYNAINFO(51);

量比:=DYNAINFO(17);

成交方向:=DYNAINFO(40);

主动买单:=ISBUYORDER;

PEG指标:=DYNAINFO(39)/FINANCE(43);

现价:=DYNAINFO(7);

振幅:=DYNAINFO(13)*100;

区间成本:=COSTEX(CLOSE,REF(CLOSE,BARSCOUNT(C)-1));

昨收盘价:=DYNAINFO(3);

今开盘价:=DYNAINFO(4);

ER1:=净资收益率>3;

ER12:=净资收益率>0.01 AND 净资收益率<=3;

ER2:=主营利润率>2;

ER22:=主营利润率>0;

ER4:=主营业增长率>1;

ER42:=主营业增长率>0;

ER5:=净利润增长率>2;

ER52:=净利润增长率>0.2;

SAX1:=每股收益>0.01;

SAX12:= 每股收益>0.001;

SAX2:=每股净资产>2;

SAX22:=每股净资产>0.01;

SAX4:=每股未分配>0.5;

SAX42:=每股未分配>0.001;

SAX5:=每股公积金>0.5;

SAX52:=每股公积金>0.002;

优秀:=ER1 AND ER2 AND ER4 AND ER5 AND SAX1 AND SAX2

  AND SAX4 AND SAX5,COLORRED;

较好:=ER12 AND ER22 AND ER42 AND ER52 AND SAX12 AND SAX22

  AND SAX42 AND SAX52,COLORMAGENTA;

DRAWTEXT_FIX(优秀 AND 较好=0,0.620,0.05,0,'基本面：优秀！'),COLORRED;

DRAWTEXT_FIX(较好,0.620,0.05,0,'基本面：较好！'),COLORMAGENTA;

{

VAR27:=REF(CLOSE,1);

VAR28:=SMA(MAX(CLOSE-VAR27,0),5,1)/SMA(ABS(CLOSE-VAR27),6,1)*100;

VARA:=((AMOUNT)/(VOL))/(100);

VARB:=((3)*(HIGH)+LOW+OPEN+(2)*(CLOSE))/(7);

VARC:=((SUM(AMOUNT,7))/(VARA))/(100);

VARD:=DMA(VARB,(VOL)/(VARC));

VARE:=((CLOSE-VARD)/(VARD))*(100);

VARF:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*(100);

VARJ:=MA(VARE,20)+STD(VARE,20);

VARH:=(C+L+H)/3;

VARL:=EMA(VARH,6);

VARG:=EMA(VARL,5);

BIAS18:=((CLOSE-MA(CLOSE,18))/(MA(CLOSE,18)))*(100);

AA:=SMA(VARF,3,1);

};

{机构动向}

VAR1:=EMA(EMA(CLOSE,9),9);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

STICKLINE(控盘<0,控盘,0,3,0),COLORGREEN;

A10:=CROSS(控盘,0);

STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLORRED;

机构控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;

VAR2:=100*WINNER(CLOSE*0.95);

STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,3,0),COLORFF00FF;

机构高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;

STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLORYELLOW,NODRAW;

机构出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORYELLOW;

机构撤退:IF(控盘<0,控盘,0),COLORGREEN,NODRAW;

机构试盘:IF(A10,5,0),LINETHICK1,COLOR00FFFF,NODRAW;

STICKLINE(机构试盘>0,0,5,3,0),COLOR00FFFF;

散户活跃:(   机构控盘=0 AND  机构撤退=0 AND 机构高度控盘=0),NODRAW;

STICKLINE(散户活跃=1 ,-0.3,0.3,3,0),COLORWHITE;