通达信成交天机 源码

成交天机

{-------------盘中虚拟成交量,主动&主力买卖量精确计算转换-------------------}
※万股:VOL/100,COLORLIGRAY,NODRAW;
预测:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL)/100,NODRAW,COLOR00CCCC;

JE:=VOL;
 JJ:=(HIGH+LOW+CLOSE)/3;
 QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
主买:=IF((QJ0*(JJ-MIN(CLOSE,OPEN)))>0,(QJ0*(JJ-MIN(CLOSE,OPEN))),-(QJ0*(JJ-MIN(CLOSE,OPEN))));
主卖:=(QJ0*(MIN(OPEN,CLOSE)-LOW));
五档TMP:=主买-主卖;

{-【主力动向】,即原【SUPL】往事如风-QQ:105365158 经海量数据分析及精准校验--};
TMP:=LARGEINTRDVOL-LARGEOUTTRDVOL;
 DDY动因:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);
涨跌动因:=IF(DDY动因>0 OR DDY动因<0 OR TMP>0 OR TMP<0,DDY动因,DRAWNULL),NODRAW;

日线以下周期:=PERIOD=0 OR PERIOD=1 OR PERIOD=2 OR PERIOD=3 OR PERIOD=4 OR PERIOD=8;
主动买量:=IF(FINANCE(7)=DRAWNULL OR 日线以下周期!=0,主买,ACTINVOL);
主动卖量:=IF(FINANCE(7)=DRAWNULL OR 日线以下周期!=0,主卖,ACTOUTVOL);

主动率%:IF(涨跌动因=DRAWNULL,DRAWNULL,(ACTINVOL-ACTOUTVOL)/(VOL/100)),NODRAW,COLOR5000BB;
大单率%:IF(涨跌动因=DRAWNULL,DRAWNULL,(LARGEINTRDVOL-LARGEOUTTRDVOL)/(VOL/100)),NODRAW,COLORRED;
活跃度:IF(涨跌动因=DRAWNULL,DRAWNULL,(LARGEINTRDVOL+LARGEOUTTRDVOL)*10000/(2*FINANCE(7))),COLOR8080FF,NODRAW;
外盘:=SUM(IF(DYNAINFO(23)*CLOSE,DYNAINFO(23),0),0)*0.003906;
内盘:=SUM(IF(DYNAINFO(22)*CLOSE,DYNAINFO(22),0),0)*0.003906;
内外盘%:(外盘-内盘)/(内盘+外盘)*100,COLORC08080,NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预测*100,0,3.4,-1),COLOR00CCCC;

STICKLINE(C<REF(C,1),0,VOL,3.4,0),COLOR776610;
 STICKLINE(C<REF(C,1),0,VOL,2.8,0),COLOR887720;
 STICKLINE(C<REF(C,1),0,VOL,2.2,0),COLOR998830;
 STICKLINE(C<REF(C,1),0,VOL,1.6,0),COLORAA9940;
 STICKLINE(C<REF(C,1),0,VOL,0.9,0),COLORBBAA50;
 STICKLINE(C<REF(C,1),0,VOL,0.25,0),COLORCCBB60;

STICKLINE(C>=REF(C,1),0,VOL,3.4,0),COLOR332299;
 STICKLINE(C>=REF(C,1),0,VOL,2.8,0),COLOR4433AA;
 STICKLINE(C>=REF(C,1),0,VOL,2.2,0),COLOR5544BB;
 STICKLINE(C>=REF(C,1),0,VOL,1.6,0),COLOR6655CC;
 STICKLINE(C>=REF(C,1),0,VOL,0.9,0),COLOR7766DD;
 STICKLINE(C>=REF(C,1),0,VOL,0.25,0),COLOR8877EE;

STICKLINE(TMP<0,0,VOL,3.4,0),COLOR776610;
 STICKLINE(TMP<0,0,VOL,2.8,0),COLOR887720;
 STICKLINE(TMP<0,0,VOL,2.2,0),COLOR998830;
 STICKLINE(TMP<0,0,VOL,1.6,0),COLORAA9940;
 STICKLINE(TMP<0,0,VOL,0.9,0),COLORBBAA50;
 STICKLINE(TMP<0,0,VOL,0.25,0),COLORCCBB60;

STICKLINE(TMP>0,0,VOL,3.4,0),COLOR332299;
 STICKLINE(TMP>0,0,VOL,2.8,0),COLOR4433AA;
 STICKLINE(TMP>0,0,VOL,2.2,0),COLOR5544BB;
 STICKLINE(TMP>0,0,VOL,1.6,0),COLOR6655CC;
 STICKLINE(TMP>0,0,VOL,0.9,0),COLOR7766DD;
 STICKLINE(TMP>0,0,VOL,0.25,0),COLOR8877EE;

STICKLINE(FINANCE(7)!=DRAWNULL,0,主动卖量,3.4,0),COLOR004000;
 STICKLINE(1,0,主动卖量,2.8,0),COLOR005000;
 STICKLINE(1,0,主动卖量,2.2,0),COLOR006000;
 STICKLINE(1,0,主动卖量,1.6,0),COLOR007000;
 STICKLINE(1,0,主动卖量,0.9,0),COLOR008000;
 STICKLINE(1,0,主动卖量,0.25,0),COLOR009000;
 STICKLINE(FINANCE(7)!=DRAWNULL,0,主动买量,2.5,0),COLOR201077;
 STICKLINE(1,0,主动买量,2.0,0),,COLOR301188;
 STICKLINE(1,0,主动买量,1.4,0),,COLOR401299;
 STICKLINE(1,0,主动买量,0.8,0),,COLOR5013AA;
 STICKLINE(1,0,主动买量,0.2,0),,COLOR6014BB;
 STICKLINE(1,0,LARGEOUTTRDVOL,1.6,0),COLOR005900;
 STICKLINE(1,0,LARGEOUTTRDVOL,1.15,0),COLOR007700;
 STICKLINE(1,0,LARGEOUTTRDVOL,0.7,0),COLOR009900;
 STICKLINE(1,0,LARGEOUTTRDVOL,0.25,0),COLOR00BB00;
 {零轴美化}
STICKLINE(1,0,0,6,0),COLOR000816;
 STICKLINE(1,0,LARGEINTRDVOL,0,0),COLORRED;
 {--------------------量能均线启动及放量买卖参考柱形标示--------------------}
主力启动线:=MA(V,5);
主力洗盘线:=MA(V,35);
资金异动线:=MA(V,135);
启动:=主力启动线>REF(主力启动线,1) AND (CROSS(VOL,主力启动线)
AND (REF(VOL,1)<REF(资金异动线,1) OR REF(VOL,2)<REF(资金异动线,2)));
放量:=CROSS(主力启动线,资金异动线) OR ((主力洗盘线>资金异动线)
AND CROSS(主力启动线,主力洗盘线));
放量黄柱画线:=STICKLINE(放量,0,VOL,2.3,0),COLORYELLOW;
启动金柱画线:=STICKLINE(启动,0,VOL*0.9,2.3,0),COLOR45AAEE;
资金异动线补画:DRAWBAND(MA(V,135),RGB(0,0,255),MA(V,135),RGB(0,0,255));
主力洗盘线补画:DRAWBAND(MA(V,35),RGB(255,0,255),MA(V,35),RGB(255,0,255));
主力启动线补画:DRAWBAND(MA(V,5),RGB(255,255,0),MA(V,5),RGB(255,255,0));