{60天均量線}
DRAWBAND(MA(
VOL,60),RGB(80,64,64),0,RGB(0,0,0));
{太極
成交量TJCJL}
ZZ:=IF(REF(C,1)>REF(O,1) AND O>REF(C,1)*1.014 AND C<O*1.02,1,3);
V5:=MA(V,5);
V12:=MA(V,12);
V34:=MA(V,34);
C6:=MA(C,6);
STICKLINE(CROSS(C,C6) AND V>V5*1.2 AND V>V12*1.2 AND ZZ>2 AND C>H*0.975,0,VOL*1.05,5,0),COLORC000C0;{吸貨洋紅}
STICKLINE(CROSS(C6,C) AND V>V5*1.2 AND V>V12*1.2,0,VOL*1.05,5,0),COLOR008080;{
出貨棕}
STICKLINE(VOL>MA(VOL,5)*2 AND V>V34*3 AND C<REF(C,1)*1.05,0,VOL*1.05,5,0),COLORFFC000;{天量藍色}
STICKLINE(VOL<MA(VOL,5)/2 AND V<V12/2,0,VOL*1.05,5,0),COLORBLUE;{
地量深藍}
DRAWTEXT_FIX(ISLASTBAR,0.45,0.10,0,'柱底色: 洋紅吸貨量,棕色出貨量,天藍色天量,深藍色地量;'),COLORWHITE;
{滬深_上漲_下跌_具體數(shù)據(jù)}
上漲家數(shù):=STRCAT('▇滬深上漲家數(shù):',CON2STR(DYNAINFO(60),0));
下跌家數(shù):=STRCAT('▇滬深下跌家數(shù):',CON2STR(DYNAINFO(61),0));
上漲百分比:=DYNAINFO(60)/(DYNAINFO(60)+DYNAINFO(61))*100;
下跌百分比:=DYNAINFO(61)/(DYNAINFO(60)+DYNAINFO(61))*100;
DRAWTEXT_FIX(1,0.45,0,0,上漲家數(shù)),COLORRED;
DRAWTEXT_FIX(1,0.54,0,0,STRCAT(STRCAT('(',VAR2STR(上漲百分比,2)),'%)')),COLORRED;
DRAWTEXT_FIX(1,0.60,0,0,下跌家數(shù)),COLORGREEN;
DRAWTEXT_FIX(1,0.69,0,0,STRCAT(STRCAT('(',VAR2STR(下跌百分比,2)),'%)')),COLORGREEN;
{盤中虛擬}
盤中虛擬:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),COLORWHITE,NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,盤中虛擬,0,-1,-1),COLORGRAY;
{成交量}
VOLUME:VOL,VOLSTICK,COLORYELLOW;
{主動買賣成交量}
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主動買盤:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,NODRAW;
主動賣盤:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLORGREEN,NODRAW;
STICKLINE(主動買盤>0,0,主動買盤,1.5,0),COLOR0080FF;
STICKLINE(主動賣盤<0,VOL,主動買盤,1.5,0),COLORB46E00;
{
均線}
MA5:MA(VOLUME,5)COLORWHITE;
MA10:MA(VOLUME,10)COLORYELLOW;
MA60:MA(VOLUME,60)COLORC08080,NODRAW;
{DRAWTEXT(ISLASTBAR,MA60,' ←60均線')COLORC08080;}
MA120:MA(VOLUME,120)COLORLIGREEN,NODRAW;
{
量能提示 BY 冷妞妞}
基準量:=(MA(VOL,5)+MA(VOL,10))/2;
危險量:=基準量*1.5;
破壞量:=基準量*1.15;
弱壓量:=基準量*0.8;
超大量:=基準量*1.5;
攻擊量:=基準量*1.15;
防守量:=基準量*0.8;
YL:=C>O OR (C=O AND C>=REF(C,1));
DL:=C<O OR (C=O AND C<REF(C,1));
TJ1:=DL AND VOL>=弱壓量 AND VOL<破壞量;
TJ2:=DL AND VOL>=破壞量 AND VOL<危險量;
TJ3:=DL AND VOL>=危險量;
TJA:=YL AND VOL>=防守量 AND VOL<攻擊量;
TJB:=YL AND VOL>=攻擊量 AND VOL<超大量;
TJC:=YL AND VOL>超大量;
DRAWTEXT_FIX(ISLASTBAR AND TJ1,0.998,0.0,1.0,'[ 弱壓量 ]'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR AND TJ2,0.998,0.0,1.0,'[ 破壞量 ]'),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR AND TJ3,0.998,0.0,1.0,'[ 危險量 ]'),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR AND TJA,0.998,0.0,1.0,'[ 防守量 ]'),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR AND TJB,0.998,0.0,1.0,'[ 攻擊量 ]'),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR AND TJC,0.998,0.0,1.0,'[ 超大量 ]'),COLORRED;
{
換手率}
換手率:VOL/CAPITAL*100,COLORFF80FF,NODRAW;
{DRAWTEXT_FIX(ISLASTBAR,0.86,0.01,0,STRCAT('今日換手率: ', CON2STR(DYNAINFO(37)*100,2))),COLORLIGRAY;}
DRAWTEXT_FIX(ISLASTBAR,0.88,0.0,0,STRCAT('5換手: ', CON2STR(SUM(DYNAINFO(37)*100,5),2))),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.81,0.0,0,STRCAT('10換手: ', CON2STR(SUM(DYNAINFO(37)*100,10),2))),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.74,0.0,0,STRCAT('20換手: ', CON2STR(SUM(DYNAINFO(37)*100,20),2))),COLORLIGRAY;
{
量比}
量比:DYNAINFO(17),COLORFF8000;
{----------------------------- 以 下 資 金 博 弈 -----------------------------}
{
資金博弈今日
持倉}
DRAWRECTREL(0,0,350,400,IF(120,RGB(36,36,36),0))NOFRAME;
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
總流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW,COLORWHITE;
大單流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW,COLORWHITE;
大單流入限制:=IF((超B+大B+超S+大S)=0,0,大單流入);
成交總量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW,COLORWHITE;
機構(gòu)參與度:=(超B+超S+大B+大S)/成交總量*100,NODRAW,COLORWHITE;
主買A:=ACTINVOL,COLORRED,NODRAW;
主賣A:=ACTOUTVOL,COLORGREEN,NODRAW;
主買C:=主買A*100/(主買A+主賣A),NODRAW,COLORRED;
{資金流入比}
DRAWRECTREL(100,125,340,75,RGB(51,185,84))NOFRAME;{綠色}
DRAWRECTREL(100,125,220,75,RGB(51,153,204))NOFRAME;{青色}
DRAWRECTREL(100,125,100+240*CONST(總流入比/100),75,RGB(243,83,81))NOFRAME;{紅色}
{大單流入比}
DRAWRECTREL(100,200,340,150,RGB(50,185,84))NOFRAME;{綠色}
DRAWRECTREL(100,200,220,150,RGB(51,153,204))NOFRAME;{青色}
DRAWRECTREL(100,200,100+240*CONST(大單流入限制/100),150,RGB(243,83,81))NOFRAME;{紅色}
{機構(gòu)參與度}
DRAWRECTREL(100,275,340,225,RGB(50,185,84))NOFRAME;{綠色}
DRAWRECTREL(100,275,220,225,RGB(51,153,204))NOFRAME;{青色}
DRAWRECTREL(100,275,100+240*CONST(機構(gòu)參與度/100),225,RGB(243,83,81))NOFRAME;{紅色}
{主動買賣比}
DRAWRECTREL(100,350,340,300,RGB(50,185,84))NOFRAME;{綠色}
DRAWRECTREL(100,350,220,300,RGB(51,153,204))NOFRAME;{青色}
DRAWRECTREL(100,350,100+240*CONST(主買C/100),300,RGB(243,83,81))NOFRAME;{紅色}
{文字}
{DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'資金博弈今日持倉'),COLORLIBLUE;}
DRAWTEXT_FIX(1,0.00,0.070,0,STRCAT(STRCAT('資金流入比: ',CON2STR(總流入比,2)),' ％')),COLORWHITE;
DRAWTEXT_FIX(1,0.00,0.142,0,STRCAT(STRCAT('大單流入比: ',CON2STR(大單流入限制,2)),' ％買')),COLORWHITE;
DRAWTEXT_FIX(1,0.00,0.215,0,STRCAT(STRCAT('機構(gòu)參與度: ',CON2STR(機構(gòu)參與度,2)),' ％')),COLORWHITE;
DRAWTEXT_FIX(1,0.00,0.290,0,STRCAT(STRCAT('主動買賣比: ',CON2STR(主買C,2)),' ％')),COLORWHITE;
{L2資金博弈}
DRAWRECTREL(0,400,188,999,IF(120,RGB(50,50,50),0))NOFRAME;
{超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;}
凈流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),NODRAW;
超大單:=(超B)-(超S),NODRAW;
大單:=(大B)-(大S),NODRAW;
中單:=(中B)-(中S),NODRAW;
小單:=(小B)-(小S),NODRAW;
DAZHI:=CONST(MAX(ABS(凈流入),MAX(ABS(超大單),MAX(ABS(大單),MAX(ABS(中單),ABS(小單)))))),NODRAW;
DRAWRECTREL(5,CONST(950-(ABS(凈流入)*500/DAZHI)),33,950,IF(CONST(凈流入)>0,RGB(236,48,129),RGB(51,153,204)))NOFRAME;
DRAWRECTREL(41,CONST(950-(ABS(超大單)*500/DAZHI)),69,950,IF(CONST(超大單)>0,RGB(243,83,81),RGB(50,185,84)))NOFRAME;
DRAWRECTREL(77,CONST(950-(ABS(大單)*500/DAZHI)),105,950,IF(CONST(大單)>0,RGB(243,83,81),RGB(50,185,87)))NOFRAME;
DRAWRECTREL(113,CONST(950-(ABS(中單)*500/DAZHI)),141,950,IF(CONST(中單)>0,RGB(243,83,81),RGB(50,185,87)))NOFRAME;
DRAWRECTREL(149,CONST(950-(ABS(小單)*500/DAZHI)),177,950,IF(CONST(小單)>0,RGB(243,83,81),RGB(50,185,87)))NOFRAME;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.041,0.40,0,'今日資金 單位:萬元'),COLORCYAN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.006,0.51,0,INTPART(凈流入)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.043,0.58,0,INTPART(超大單)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.078,0.65,0,INTPART(大單)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.115,0.72,0,INTPART(中單)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.152,0.79,0,INTPART(小單)),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.006,0.98,0,'凈流入'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.040,0.98,0,'超大單'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.080,0.98,0,'大單'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.116,0.98,0,'中單'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.153,0.98,0,'小單'),COLORWHITE;
{L2資金N天統(tǒng)計}
N:=5;{默認5天}
DRAWRECTREL(350,400,188,999,IF(120,RGB(50,50,0),0))NOFRAME;
{超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
凈流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
超大單:=(超B)-(超S);
大單:=(大B)-(大S);
中單:=(中B)-(中S);
小單:=(小B)-(小S);}
凈流入N天和:=SUM(凈流入,N);
超大單N天和:=SUM(超大單,N);
大單N天和:=SUM(大單,N);
中單N天和:=SUM(中單,N);
小單N天和:=SUM(小單,N);
DAZHIX:=CONST(MAX(ABS(凈流入N天和),MAX(ABS(超大單N天和),MAX(ABS(大單N天和),MAX(ABS(中單N天和),ABS(小單N天和)))))),NODRAW;
DRAWRECTREL(230,CONST(950-(ABS(凈流入N天和)*500/DAZHIX)),245,950,IF(CONST(凈流入N天和)>0,RGB(192,0,64),RGB(0,128,128)))NOFRAME;
DRAWRECTREL(255,CONST(950-(ABS(超大單N天和)*500/DAZHIX)),270,950,IF(CONST(超大單N天和)>0,RGB(180,0,0),RGB(32,128,32)))NOFRAME;
DRAWRECTREL(280,CONST(950-(ABS(大單N天和)*500/DAZHIX)),295,950,IF(CONST(大單N天和)>0,RGB(180,0,0),RGB(32,128,32)))NOFRAME;
DRAWRECTREL(305,CONST(950-(ABS(中單N天和)*500/DAZHIX)),320,950,IF(CONST(中單N天和)>0,RGB(180,0,0),RGB(32,128,32)))NOFRAME;
DRAWRECTREL(330,CONST(950-(ABS(小單N天和)*500/DAZHIX)),345,950,IF(CONST(小單N天和)>0,RGB(180,0,0),RGB(32,128,32)))NOFRAME;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.225,0.48,0,INTPART(凈流入N天和)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.250,0.56,0,INTPART(超大單N天和)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.275,0.64,0,INTPART(大單N天和)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.300,0.72,0,INTPART(中單N天和)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.325,0.80,0,INTPART(小單N天和)),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.233,0.98,0,'凈'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.257,0.98,0,'超'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.283,0.98,0,'大'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.307,0.98,0,'中'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.333,0.98,0,'小'),COLORWHITE;
DRAWTEXT_FIX(C>0,0.196,0.42,0,'近'),COLORLIBLUE;
DRAWTEXT_FIX(C>0,0.196,0.54,0,'5'),COLORLIBLUE;
DRAWTEXT_FIX(C>0,0.196,0.66,0,'天'),COLORLIBLUE;
DRAWTEXT_FIX(C>0,0.196,0.78,0,'資'),COLORLIBLUE;
DRAWTEXT_FIX(C>0,0.196,0.90,0,'金'),COLORLIBLUE;
DRAWTEXT_FIX(C>0,0.212,0.60,0,'萬'),COLORLIBLUE;
DRAWTEXT_FIX(C>0,0.212,0.75,0,'元'),COLORLIBLUE;
{最近10天和20天的資金流量}
N1:=10;{默認10天}
N2:=20;{默認20天}
DRAWRECTREL(420,0,350,999,IF(120,RGB(0,64,64),0))NOFRAME;
{超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
凈流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
超大單:=(超B)-(超S);
大單:=(大B)-(大S);
中單:=(中B)-(中S);
小單:=(小B)-(小S);}
凈流入N1天和:=SUM(凈流入,N1);
凈流入N2天和:=SUM(凈流入,N2);
DAZHIXZ:=CONST(MAX(ABS(凈流入N1天和),ABS(凈流入N2天和))),NODRAW;
DRAWRECTREL(360,CONST(950-(ABS(凈流入N1天和)*680/DAZHIXZ)),380,950,IF(CONST(凈流入N1天和)>0,RGB(192,0,64),RGB(0,128,128)))NOFRAME;
DRAWRECTREL(390,CONST(950-(ABS(凈流入N2天和)*680/DAZHIXZ)),410,950,IF(CONST(凈流入N2天和)>0,RGB(190,0,64),RGB(0,128,128)))NOFRAME;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.355,0.35,0,INTPART(凈流入N1天和)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.390,0.50,0,INTPART(凈流入N2天和)),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.350,0.05,0,'10天凈流 (萬元)'),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.385,0.20,0,'20天凈流'),COLORWHITE;
