{成交量看主力}

VOLUME:VOL,VOLSTICK; 

主力启动线:MA(VOLUME,5),COLORRED,LINETHICK2;

 主力洗盘线:MA(VOLUME,35),COLORYELLOW,LINETHICK2;

 资金异动线:MA(VOLUME,135),COLORBLUE,LINETHICK2;

 出击:STICKLINE(CROSS(主力启动线,资金异动线) OR ((主力洗盘线 > 资金异动线) AND CROSS(主力启动线,主力洗盘线)),0,VOL,2,0),COLORYELLOW;

 启动:STICKLINE(主力启动线>REF(主力启动线,1) AND (CROSS(VOL,主力启动线) AND (REF(VOL,1)

 V1:=CLOSE/REF(CLOSE,3)>=1.1;

 V2:=BACKSET(V1,2);

 V3:=REF(CLOSE,3)*1.1;

 V4:=CROSS(C,V3);

 OK:STICKLINE((V2 AND COUNT(V2,2)=1),VOL,0,5,0),COLORRED;

 COND:(CROSS(主力启动线,资金异动线) OR ((主力洗盘线 > 资金异动线) AND CROSS(主力启动线,主力洗盘线)))

 OR (主力启动线>REF(主力启动线,1) AND (CROSS(VOL,主力启动线) AND (REF(VOL,1)

 OR (V2 AND COUNT(V2,2)=1),LINETHICK0;

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

 B:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));

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

 长期线:=A+100;

 短期线:=B+100;

 中期线:=D+100;

 见顶:=((REF(中期线,1)>85 AND REF(短期线,1)>85 AND REF(长期线,1)>65) AND CROSS(长期线,短期线));

 顶部区域:=(中期线80) AND (REF(短期线,1)>95 OR REF(短期线,2)>95 ) AND 长期线>60 AND 短期线<83.5

 AND 短期线<中期线 AND 短期线<长期线+4;

 顶部:=FILTER(顶部区域,4);

 STICKLINE( {见顶 OR} 顶部,VOL,VOL*1.1,20,1 ),COLORBLUE,LINETHICK2;

 VAR6:=REF(CLOSE,1);

 VAR7:=SMA(MAX(CLOSE-VAR6,0),6,1)/SMA(ABS(CLOSE-VAR6),6,1)*100;

 STICKLINE( CROSS(84,VAR7),VOL,VOL*1.05,20,1 ),COLOR0099FF,LINETHICK2;

 均势一:=(((((((((CLOSE + REF(CLOSE,1)) + REF(CLOSE,2)) + REF(CLOSE,3)) + REF(CLOSE,4)) + REF(CLOSE,5)) + REF(CLOSE,6)) + REF(CLOSE,7)) + REF(CLOSE,8)) / 9);

 均势二:=((((CLOSE + REF(CLOSE,1)) + REF(CLOSE,2)) + REF(CLOSE,3)) / 4);

 趋势一:=((((均势一 - REF(均势一,1)) / REF(均势一,1)) * 1000) + 50);

 趋势二:=((((均势二 - REF(均势二,1)) / REF(均势二,1)) * 1000) + 50);

 波段高位:=(CROSS(趋势一,趋势二) AND (COUNT((CLOSE > REF(HIGH,1)),12) > 5));

 STICKLINE(波段高位,VOL,VOL*1.08,20,1 ),COLORGREEN,LINETHICK2;

DRAWTEXT(CURRBARSCOUNT=40,HHV(V,50)*1.9,'红柱为异动,绿柱为启动,黄柱为出击');

DRAWTEXT(CURRBARSCOUNT=40,HHV(V,50)*1.5,'绿框为波段高位,蓝框为顶部区域,黄框为阶段大顶');

{黄金柱成交量}

VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,VVOL,0,-1,-1),COLOR00C0C0;

倍量:VOL>=REF(V,1)*1.90 AND C>REF(C,1),NODRAW,COLORYELLOW;

低量:VOL

地量:VOL

平量:ABS(VOL-HHV(REF(VOL,1),5))/HHV(REF(VOL,1),5)<=0.03 OR ABS(VOL-REF(VOL,1))/REF(VOL,1)<=0.03,NODRAW,COLORWHITE;

倍缩:VOL<=REF(V,1)*0.5,NODRAW,COLORRED;

梯量:COUNT(V>REF(V,1),3)=3 AND COUNT(C>O,3)=3,NODRAW,COLOR824173;

缩量涨:COUNT(C>REF(C,1),2)=2 AND COUNT(V

STICKLINE(倍量,0,V,1,0),COLORYELLOW;

STICKLINE(低量,0,V,1,0),COLORGREEN;

STICKLINE(地量,0,V,1,0),COLORMAGENTA;

STICKLINE(平量,0,V,1,0),COLORWHITE;

STICKLINE(倍缩,0,V,1,0),COLORRED;

STICKLINE(梯量,0,V,1,0),COLOR824173;

STICKLINE(缩量涨,0,V,1,0),COLORBLUE;

黄金柱:DRAWICON(LLV(L,3)>REF(L,3) AND HHV(V,3)

REF(C,3)>REF(O,3) AND REF(V,3)>2*REF(V,4),0,1);

流通〖亿〗:=STRCAT('【流通〖亿〗】',CAPITAL/1000000);

内外比:=STRCAT('【内外比】',DYNAINFO(51));

单日量比:=STRCAT('【单日量比】',V/REF(V,1));

五日量比:=STRCAT('【五日量比】',V/(REF(MA(V,5),1)/240*FROMOPEN));

换手:=STRCAT('【换手】',VOL*10000/FINANCE(7));

十日换手:=STRCAT('【十日换手】',SUM(换手,10));

量价对比:=STRCAT('【量价对比】',STRCAT(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('【当前业绩】',STRCAT(STRCAT(市盈率,市销率),市净率));

{财务分折}

现金流:=STRCAT(STRCAT('【现金流】',CON2STR(FINANCE(25)/100000000,2)),'亿');

流动比率:=STRCAT('【流动比率】',CON2STR(FINANCE(11)/FINANCE(15),2));

速动比率:=STRCAT('【速动比率】',CON2STR((FINANCE(11)-FINANCE(27))/FINANCE(15),2));

XA1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;

XA2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替};

XA3:=FINANCE(23)/FINANCE(10)*3.3;

XA4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}

XA5:=FINANCE(20)/FINANCE(15)*0.999;

Z值:=XA1+XA2+XA3+XA4+XA5;

预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'轻警','无警'));

财务预警:=STRCAT('【财务预警】',STRCAT(预警,STRCAT('-Z值: ',CON2STR(Z值,2))));

优质资产率:=STRCAT('【优质资产率】',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理论上越大越好但不同行业有不同标准};

现金负债比:=STRCAT('【现金负债比】',CON2STR(FINANCE(25)/FINANCE(15),2));{缺长期负债或负债总额，理论上越大越好但不同行业有不同标准};

流动债:=STRCAT(STRCAT('【流动债】',CON2STR(FINANCE(15)/100000000,2)),'亿');

长期债:=STRCAT(STRCAT('【长期债】',CON2STR(FINANCE(16)/100000000,2)),'亿');

财务分析:=STRCAT('【财务分析】',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(现金流,流动比率),速动比率),现金负债比),优质资产率),财务预警),流动债),长期债));

DRAWTEXT_FIX(ISLASTBAR,0,0.01,0,量价对比),COLORGREEN;

DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,财务分析),COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.00,0.11,0,当前业绩),COLORFFFFBF;