 成交量指标(通达信)
 来源网络
 {DRAWTEXT_FIX(1,0.0,0.0,0,'白色烛，红芯长，庄家找底在振荡，俺也伺机建点仓'),COLORFFFFFF,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.06,0,'黄色烛，红芯长；庄家进货强，俺也进货等起航'),COLORFFFFFF,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.12,0,'粉色烛，红芯长，庄家高抛低吸操作忙，俺也去逐浪'),COLORFFFFFF,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.18,0,'蓝色烛，红芯短，巨量绿尾长，庄家撤退，俺也清仓'),COLORFFFFFF,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.24,0,'巨量绿，蓝烛长，趋势破，急离场；等着跌，莫手痒'),COLORFFFFFF,LINETHICK1;};
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
虚:=IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0
|| SETCODE=1),虚,0,3,-1),COLOR00C0C0;
VAR1:=(VOL /
(((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
买盘:=IF((CLOSE
> OPEN),(VAR1 * (HIGH - LOW)),IF((CLOSE < OPEN),(VAR1 *
((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2)));
卖盘:=IF((CLOSE
> OPEN),(0 - (VAR1 * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE
< OPEN),(0 - (VAR1 * (HIGH - LOW))),(0 - (VOL /
2))));
买卖差:=(买盘 +
卖盘);
STICKLINE((买卖差
< 0),0,买卖差,3.0,0),COLOR33FF33,NODRAW;
JX1:=BARSSINCE(买盘);
JY1:=IF(((121
> JX1) AND (JX1 > 0)),JX1,120);
JY2:=IF(((4 >
JX1) AND (JX1 > 0)),JX1,3);
VAR30:=MA(VOL,JY2);
神比:=(买盘 /
VAR30);
鬼比:=(卖盘 /
VAR30);
VAR2:=(HIGH -
LOW);
VAR3:=ABS((OPEN -
CLOSE));
VAR4:=(HIGH -
IF((CLOSE > OPEN),CLOSE,OPEN));
VAR5:=(IF((CLOSE
> OPEN),OPEN,CLOSE) - LOW);
VAR6:=((VAR3 /
VAR2) * VOL);
VAR7:=((VAR4 /
VAR2) * VOL);
VAR8:=((VAR5 /
VAR2) * VOL);
VAR9:=IF(((VOL /
CAPITAL) > 0.001),1,EXP(ABS(LOG(((VOL / CAPITAL) *
100)))));
VARA:=(((CLOSE -
MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
VARB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND
(MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) >
MA(CLOSE,60)));
VARC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND
(MA(CLOSE,10) < MA(CLOSE,30)));
VARD:=REF(CLOSE,1);
VARE:=((SMA(MAX((CLOSE - VARD),0),6,1) /
SMA(ABS((CLOSE - VARD)),6,1)) * 100);
DRAWTEXT(((DATE
> 700101) AND
CROSS(84,VARE)),VOL*(1.2),'■卖出'),COLORF2A3A4;
VAR40:=((IF((((VAR6 >= VAR7) AND (VAR6 >=
VAR8)) AND (CLOSE > OPEN)),VAR6,买盘) + 买盘) / 2);
VAR41:=((IF(((VAR7 > VAR6) AND (VAR7 >
VAR8)),VAR7,买盘) + 买盘) / 2);
VAR42:=((IF(((VAR8 > VAR6) AND (VAR8 >
VAR7)),VAR8,买盘) + 买盘) / 2);
VAR50:=((IF((((VAR6 >= VAR7) AND (VAR6 >=
VAR8)) AND (CLOSE < OPEN)),VAR6,卖盘) + 卖盘) / 2);
多头:STICKLINE((CLOSE >
MA(CLOSE,30)),0,VOL,3.0,1),COLOR0000FF;
空头:STICKLINE((CLOSE <
MA(CLOSE,30)),0,VOL,3,1),COLOR00FF00;
进:=(VAR8 >
VAR6) AND (VAR8 > VAR7)=1,COLORWHITE,NODRAW;
攻:=(((VAR6 >=
VAR7) AND (VAR6 >= VAR8)) AND (CLOSE >
OPEN))=1,COLORYELLOW,NODRAW;
击:=((VAR7 >
VAR6) AND (VAR7 > VAR8))=1,COLORMAGENTA,NODRAW;
STICKLINE((VOL
> (MA(VOL,5) * 2.5)),0,VOL,3,0),NODRAW;
STICKLINE(((VAR8
> VAR6) AND (VAR8 >
VAR7)),0,VAR8,3,0),COLORWHITE;
STICKLINE((((VAR6
>= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE >
OPEN)),0,VAR6,3,0),COLORYELLOW;
STICKLINE(((VAR7
> VAR6) AND (VAR7 >
VAR8)),0,VAR7,3,0),COLORMAGENTA;
STICKLINE((((VAR6
>= VAR7) AND (VAR6 >= VAR8)) AND (CLOSE <
OPEN)),0,VAR6,3,0),COLORBLUE;
STICKLINE((买盘
> 0),买盘,0,0,0),COLORRED;
DRAWTEXT(((((((((VAR7 > VAR6) AND (VARA >
2)) AND (VAR9 > VAR8)) AND (CLOSE >
MA(CLOSE,5)))
DRAWTEXT(((((((VAR8 > VAR6) AND (VAR8 >
VAR7)) AND (VARA < (0 - 2))) AND (CLOSE <
MA(CLOSE,
30))) AND (VAR8
< (MA(VOL,5) / 2))) AND (MA(VOL,5) <
MA(VOL,10))),(VOL*(1.5)),'低进●');
DRAWTEXT((((((VAR6 > (MA(VOL,5) * 2)) AND
(VAR6 >= VAR7)) AND (VAR6 >= VAR8)) AND (CLOSE
>
HSL:=DYNAINFO(37);
量:VOL,NODRAW;
均量5日线:=MA(量,5),COLORWHITE;
均量50日线:=MA(量,50),COLORGREEN;
均量135日线:=MA(量,135),COLORYELLOW;
出击:STICKLINE(CROSS(均量5日线,均量135日线) OR ((均量50日线
> 均量135日线) AND
CROSS(均量5日线,均量50日线)),0,VOL,2,0),COLORYELLOW,NODRAW;
启动:STICKLINE(均量5日线>REF(均量5日线,1) AND
(CROSS(VOL,均量5日线) AND (REF(VOL,1)?REF(均量135日线,1) OR
REF(VOL,2)?REF(均量135日线,2))),0,VOL,3,0),COLORGREEN,NODRAW;
V1:=CLOSE/REF(CLOSE,3)>=1.1;
V2:=BACKSET(V1,1);
V3:=REF(CLOSE,3)*1.1;
V4:=CROSS(C,V3);
COND:=(CROSS(均量5日线,均量135日线) OR ((均量50日线 >
均量135日线) AND CROSS(均量5日线,均量50日线)))
OR (均量5日线>REF(均量5日线,1) AND
(CROSS(VOL,均量5日线) AND (REF(VOL,1)?REF(均量135日线,1) OR
REF(VOL,2)?REF(均量135日线,2))))
OR (V2 AND COUNT(V2,2)=1)
COLORWHITE,NODRAW;
OK:STICKLINE((COND AND
COUNT(COND,2)=1),VOL,0,5,0),COLORYELLOW,NODRAW;
OK1:STICKLINE((V2
AND COUNT(V2,2)=1),VOL,0,5,0),COLORRED;
AR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:IF(CLOSE>OPEN,AR1*(HIGH-LOW),IF(CLOSE?OPEN,AR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;
主卖:IF(CLOSE>OPEN,AR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE?OPEN,AR1*(HIGH-LOW),VOL/2)),COLOR00FF00,POINTDOT;
STICKLINE(OPEN>CLOSE,0,(VOL)-15,2.5,0),COLORCYAN;
STICKLINE(主卖>0,0,主卖,1,0),COLORBLUE;
STICKLINE(主买>0,0,主买,0,0),COLORRED;
差%:主买/VOL*100,COLORWHITE,NODRAW;
量5日线:=MA(量,5),COLORWHITE;
量25日线:=MA(量,25),COLORYELLOW;
量50日线:=MA(量,50),COLORGREEN;
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替};
X3:=FINANCE(23)/FINANCE(10)*3.3;
X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}
X5:=FINANCE(20)/FINANCE(15)*0.999;
Z值:=X1+X2+X3+X4+X5;
预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND
Z值<2.6,'轻警','无警'));
财务预警:=STRCAT('财务预警: ',STRCAT(预警,STRCAT('-Z值:
',CON2STR(Z值,3))));
优质资产率:=STRCAT('
优质资产率:
',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理论上越大越好但不同行业有不同标准};
现金负债比:=STRCAT('
现金负债比:
',CON2STR(FINANCE(25)/FINANCE(15),3));{缺长期负债或负债总额，理论上越大越好但不同行业有不同标准};
财务系数:=STRCAT('风险系数:
',STRCAT(STRCAT(财务预警,优质资产率),现金负债比));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.01,0,财务系数),COLORWHITE;
市盈率:=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.09,0,当前业绩),COLORYELLOW;
DRAWTEXT_FIX(1,0.75,0,0,'所属板块:'),COLORLIGRAY;
DRAWTEXT_FIX(1,0.802,0,0,HYBLOCK),COLORRED;
DRAWTEXT_FIX(1,0.85,0,0,DYBLOCK),COLORRED;
成交额亿:AMOUNT/100000000,NODRAW;
总量:VOL,VOLSTICK,COLORRED,NODRAW;
虚量:IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW;
可能因新浪审查问题,公式中的"<"号后面内容缺失.请将红字语句中的"?"换成"<",在通达信就能过了.
以下为截图
 |
|
|
