布林軌:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORRED,LINETHICK2;
MA3:=MA(CLOSE,20),COLORMAGENTA,LINETHICK2;
DRAWBAND(布林軌,RGB(250,125,50),MA3,RGB(0,150,250));
MA1:MA(CLOSE,5),COLORWHITE;
MA2:MA(CLOSE,10),COLORYELLOW;
IF(布林軌 漲勢(shì)線:IF(布林軌>MA3,MA3,DRAWNULL),COLORMAGENTA,LINETHICK3;
跌勢(shì)線:IF(布林軌<=MA3,MA3,DRAWNULL),COLORLIBLUE,LINETHICK2;
MA4:MA(CLOSE,60),COLORGREEN;
HLCO:=(C+H+L+O)/4;
MAHC:=MA((CLOSE*2+H)/3,5),COLOR0000FF;
MAHO:=MA((O*2+H)/3,5),COLOR00FF00;
MALC:=MA((C+L*2)/3,5),COLORFFFFFF;
MALO:=MA((O+L*2)/3,5),COLOR00FFFF;
CO:=O+(C-O)/2;
DRAWKLINE(H,O,L,C);
STICKLINE(MAHC>=MAHO,C,O,2.9,0),COLOR000099;
STICKLINE(MAHC>=MAHO,C,O,1.5,0),COLOR0000CC;
STICKLINE(MAHC>=MAHO,C,O,0.1,0),COLOR9966FF;
STICKLINE(MAHC STICKLINE(MAHC STICKLINE(MAHC STICKLINE(MAHC>=MAHO AND C {STICKLINE(LC>MAHC,CO,MAX(C,O),2.8,0),COLORRED;
STICKLINE(LC STICKLINE(CROSS(MAHC,MAHO),C,O,2.8,0),COLORYELLOW;
STICKLINE(MAHC STICKLINE(CROSS(MAHO,MAHC),C,O,2.8,0),COLORFF3300;
{STICKLINE(REF(C,1)=LC AND CROSS(C,MAX(MAHC,MAHO)),CO,MIN(C,O),2.8,0),COLORYELLOW;}
{STICKLINE(REF(C,1)=LC AND CROSS(C,MAHC) AND MAHC>MAHO,C,O,2.8,0),COLORYELLOW;}
倍量攻擊:=V>REF(V,1)*2 AND (C>=O OR C>REF(C,1)),COLORRED,NODRAW;
STICKLINE(倍量攻擊,C,O,0.5,0),COLOR0088FF;
角線:=(ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.14115926);
角線MA:=MA(角線,5);
ANA:=PLOYLINE(CROSS(角線,角線MA),角線MA),COLORRED;
ANB:=PLOYLINE(CROSS(角線MA,角線),角線MA),COLORFF00FF ;
角買點(diǎn):=CROSS(角線,角線MA) AND ((ANB>REF(ANB,1) AND ANB>ANA AND 角線MA<=0) OR ((角線MA<=-45 OR CROSS(角線MA,-45)) AND (ANB<-60 OR LLV("KDJ.J",3)<=-49) AND ANB>0)),COLORGREEN;
角起漲:=COUNT(CROSS(角線,角線MA),ANAREF(ANB,5));
角賣點(diǎn):=(CROSS(角線MA,角線) AND (ANB>REF(ANB,1) OR ANAANA{AND ANB>0} AND 角線MA>0)*1;
角始跌:=COUNT(CROSS(角線MA,角線),ANAREF(ANB,5));
DRAWTEXT(倍量攻擊,L,’VOL’);
DRAWTEXT(CROSS(MAHO,MAHC) AND C<布林軌,H,'空倉(cāng)'),COLORFFFF00;
DRAWTEXT(角買點(diǎn),L,’角買’),COLORMAGENTA;
DRAWTEXT(角賣點(diǎn),H,’角賣’),COLORGREEN;
超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);
大宗進(jìn):=(超B)+(大B),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗進(jìn):=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
大宗進(jìn)限制:=IF((超B+大B)=0,0,大宗進(jìn));
大宗出限制:=IF((超S+大S)=0,0,大宗出);
非大宗進(jìn)限制:=IF(中B+小B=0,0,非大宗進(jìn));
非大宗出限制:=IF(中S+小S=0,0,非大宗出);
主力凈流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW;
散戶凈流入:=(中B+小B)-(中S+小S),COLORRED,NODRAW;
凈流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORRED,NODRAW;
大單流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW;
大單流入限制:=IF((超B+大B+超S+大S)=0,0,大單流入);
大單流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW;
大單流出限制:=IF((超B+大B+超S+大S)=0,0,大單流出比);
總流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;
總流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;
成交總量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW;
機(jī)構(gòu)參與度:=(超B+超S+大B+大S)/成交總量*100,COLORYELLOW,NODRAW;
大單強(qiáng)度:=(超B+大B-超S-大S)/成交總量*100,COLORYELLOW,NODRAW;
大單強(qiáng)度限制:=IF(大單強(qiáng)度=0,-100,大單強(qiáng)度);
大單強(qiáng)度比:=IF(大單強(qiáng)度>=0,(大單強(qiáng)度限制+100)/2,100-ABS((大單強(qiáng)度限制-100)/2)),NODRAW;
超單強(qiáng)度:=(超B-超S)/(超B+超S)*100,COLORYELLOW,NODRAW;
超單強(qiáng)度限制:=IF(超單強(qiáng)度=0,-100,超單強(qiáng)度);
超單強(qiáng)度比:=IF(超單強(qiáng)度>0,(超單強(qiáng)度限制+100)/2,IF(超單強(qiáng)度<0,100-ABS((超單強(qiáng)度限制-100)/2),0)),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗進(jìn)),MAX(ABS(大宗出),MAX(ABS(非大宗進(jìn)),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(0,CONST(940-(ABS(大宗進(jìn))*250/DAZHIV)),30,950,IF(CONST(大宗進(jìn)>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(32,CONST(940-(ABS(大宗出)*250/DAZHIV)),62,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(70,CONST(940-(ABS(非大宗進(jìn))*250/DAZHIV)),100,950,IF(CONST(非大宗進(jìn)>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(102,CONST(940-(ABS(非大宗出)*250/DAZHIV)),132,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(138,CONST(950-(ABS(凈流入)*250/DAZHIV))-20,175,950,IF(CONST(凈流入>0),RGB(200,0,0),RGB(0,125,50)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT(”,CON2STR(大宗進(jìn)/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.033,0.9,0,STRCAT(”,CON2STR(大宗出/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.07,0.9,0,STRCAT(”,CON2STR(非大宗進(jìn)/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.101,0.9,0,STRCAT(”,CON2STR(非大宗出/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.138,0.9,0,STRCAT(”,CON2STR(凈流入/1,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT(‘主力 ‘,CON2STR(主力凈流入,0)),’萬(wàn)’)),COLORMAGENTA;
DRAWTEXT_FIX(1,0.072,0.99,0,STRCAT(STRCAT(‘散戶 ‘,CON2STR(散戶凈流入,0)),’萬(wàn)’)),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.135,0.99,0,’凈流入:(萬(wàn))’),COLORYELLOW;
主買A:=ACTINVOL,COLORRED,NODRAW;
主賣A:=ACTOUTVOL,COLORGREEN,NODRAW;
主買:=主買A*100/(主買A+主賣A),NODRAW,COLORRED;
主賣:=主賣A*100/(主買A+主賣A),NODRAW,COLORGREEN;
大單買比:=LARGEINTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL);
大單賣比:=LARGEOUTTRDVOL*100/(LARGEINTRDVOL+LARGEOUTTRDVOL);
主力凈買量:=(LARGEINTRDVOL-LARGEOUTTRDVOL),COLORYELLOW,NODRAW;
主動(dòng)買賣差:=(ACTINVOL-ACTOUTVOL),COLORMAGENTA,NODRAW;
主力資金差:=((L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1)))/10000,COLORCYAN,NODRAW;
主力買力度:=LARGEINTRDVOL*100/VOL;
主力賣力度:=LARGEOUTTRDVOL*100/VOL;
主買力度比:=主力買力度/(主力買力度+主力賣力度)*100,NODRAW;
主賣力度比:=主力賣力度/(主力買力度+主力賣力度)*100,NODRAW;
力度比限制:=IF((LARGEINTRDVOL+LARGEOUTTRDVOL)=0,0,大單買比);
JGV:=(L2_VOL(0,0) – L2_VOL(0,1))*VOL/100000000,COLORRED;
DHV:=(L2_VOL(1,0) – L2_VOL(1,1))*VOL/100000000,COLORFF00FF;
ZHV:=(L2_VOL(2,0) – L2_VOL(2,1))*VOL/100000000,COLOR00FFFF;
SHV:=(L2_VOL(3,0) – L2_VOL(3,1))*VOL/100000000,COLORFFFFFF;
NOTEXT大量動(dòng)向:=MA((JGV+DHV),5),COLORYELLOW;
超級(jí)大量:=JGV,COLOR0000FF,NODRAW;
機(jī)構(gòu)大量:=DHV,COLORMAGENTA,NODRAW;
大量博弈:=(JGV+DHV),COLORYELLOW,NODRAW;
小量博弈:=(ZHV+SHV),COLORWHITE,NODRAW;
大量資金比:=大量博弈/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
大量資金比限制:=IF(大量資金比=0,-100,大量資金比);
大量強(qiáng)度比:=IF(大量資金比>0,(大量資金比限制+100)/2,IF(大量資金比<0,100-ABS((大量資金比限制-100)/2),0)),COLORGREEN,NODRAW;
小量資金比:=小量博弈/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
小量強(qiáng)度比:=IF(小量資金比>=0,(小量資金比+100)/2,100-ABS((小量資金比-100)/2)),COLORCYAN,NODRAW;
MVR:=REF(MA(V,5),1);
FVR:=REF(V,1);
PVR:=(MVR+FVR)/2;
量能比:=V/(V+PVR)*100/FROMOPEN*240;
{量能飽和度}
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
【量能飽和】:=IF(SAT>1,1,SAT)*100,COLORYELLOW,NODRAW;
{活躍度}
LC:=REF(CLOSE,1);
RSI5:=(SMA(MAX(CLOSE-LC,0),3,1))/(SMA(ABS(CLOSE-LC),3,1))*100;
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活躍度:=(RSI5-WR10),COLORFFFF00,LINETHICK1,NODRAW;
活躍度比:=IF(活躍度>=0,(活躍度+100)/2,100-ABS((活躍度-100)/2));
DRAWRECTREL(80,0,240,40,RGB(0,75,200));
DRAWRECTREL(80,0,160,40,RGB(0,250,50));
DRAWRECTREL(80,0,80+CONST(力度比限制*160/100),40,RGB(200,0,50));
DRAWTEXT_FIX(1,0.00,0.00,0,STRCAT(STRCAT(‘買賣力度比 ‘,CON2STR(大單買比,2)),’％買’)),COLORYELLOW;
{DRAWTEXT_FIX(1,0.33,0.00,0,STRCAT(STRCAT(”,CON2STR(大單賣比,2)),’％賣’)),COLORGREEN;}
DRAWRECTREL(80,50,240,90,RGB(0,100,0));
DRAWRECTREL(80,50,160,90,RGB(0,250,50));
DRAWRECTREL(80,50,80+CONST(大量強(qiáng)度比*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.00,0.05,0,STRCAT(STRCAT(‘大量強(qiáng)度比 ‘,CON2STR(大量強(qiáng)度比,2)),’％買’)),COLORYELLOW;
DRAWRECTREL(330,0,490,40,RGB(0,75,200));
DRAWRECTREL(330,0,410,40,RGB(0,250,50));
DRAWRECTREL(330,0,330+CONST(主買*160/100),40,RGB(175,50,250));
DRAWTEXT_FIX(1,0.25,0.00,0,STRCAT(STRCAT(‘主動(dòng)買賣比 ‘,CON2STR(主買,2)),’ ％’)),COLORYELLOW;
{DRAWTEXT_FIX(1,0.33,0.10,0,STRCAT(STRCAT(”,CON2STR(主賣,2)),’％賣’)),COLORGREEN;}
DRAWRECTREL(330,50,490,90,RGB(0,100,0));
DRAWRECTREL(330,50,410,90,RGB(0,250,50));
DRAWRECTREL(330,50,330+CONST(機(jī)構(gòu)參與度*160/100),90,RGB(200,0,50));
DRAWTEXT_FIX(1,0.25,0.05,0,STRCAT(STRCAT(‘機(jī)構(gòu)參與度 ‘,CON2STR(機(jī)構(gòu)參與度,2)),’ ％’)),COLORYELLOW;
DRAWRECTREL(580,0,740,40,RGB(0,100,0));
DRAWRECTREL(580,0,660,40,RGB(0,250,50));
DRAWRECTREL(580,0,580+CONST(大單流入限制*160/100),40,RGB(200,0,50));
DRAWTEXT_FIX(1,0.500,0.00,0,STRCAT(STRCAT(‘大單流入比 ‘,CON2STR(大單流入限制,2)),’ ％買’)),COLORYELLOW;
{DRAWTEXT_FIX(1,0.83,0.01,0,STRCAT(STRCAT(”,CON2STR(大單流出限制,2)),’ ％賣’)),COLORGREEN;}
DRAWRECTREL(580,50,740,90,RGB(0,200,250));
DRAWRECTREL(580,50,660,90,RGB(0,250,50));
DRAWRECTREL(580,50,580+CONST(大單強(qiáng)度比*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.500,0.05,0,STRCAT(STRCAT(‘大單強(qiáng)度比 ‘,CON2STR(大單強(qiáng)度比,2)),’ ％買’)),COLORYELLOW;
DRAWRECTREL(830,0,990,40,RGB(0,100,0));
DRAWRECTREL(830,0,910,40,RGB(0,250,50));
DRAWRECTREL(830,0,830+CONST(總流入比*160/100),40,RGB(175,50,250));
DRAWTEXT_FIX(1,0.75,0.00,0,STRCAT(STRCAT(‘資金流入比 ‘,CON2STR(總流入比,2)),’ ％’)),COLORYELLOW;
{DRAWTEXT_FIX(1,0.83,0.10,0,STRCAT(STRCAT(”,CON2STR(總流出比,2)),’ ％賣’)),COLORGREEN;}
DRAWRECTREL(830,50,990,90,RGB(0,200,250));
DRAWRECTREL(830,50,910,90,RGB(0,250,50));
DRAWRECTREL(830,50,830+CONST(量能比*160/100),90,RGB(200,0,50));
DRAWTEXT_FIX(1,0.75,0.05,0,STRCAT(STRCAT(‘資金量能比 ‘,CON2STR(量能比,2)),’ ％’)),COLORYELLOW;
DRAWRECTREL(365,890,655,930,RGB(0,100,0));
DRAWRECTREL(365,890,510,930,RGB(0,200,50));
DRAWRECTREL(365,890,360+CONST(活躍度比*300/100),930,RGB(150,10,250));
DRAWTEXT_FIX(1,0.318,0.89,0,STRCAT(STRCAT(‘活躍度 ‘,CON2STR(活躍度比,2)),’ ％’)),COLORYELLOW;
DRAWRECTREL(365,940,655,985,RGB(0,50,150));
DRAWRECTREL(365,940,510,985,RGB(0,200,50));
DRAWRECTREL(365,940,360+CONST(【量能飽和】*300/100),985,RGB(150,10,0));
DRAWTEXT_FIX(1,0.318,0.95,0,STRCAT(STRCAT(‘飽和度 ‘,CON2STR(【量能飽和】,2)),’ ％’)),COLORYELLOW;
TOWERC:=FORCAST(EMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),6);
DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1));
DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1));
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3.5,1),COLORLIRED;
STICKLINE(TOWERC