通達信MACD趨勢公式

顯示MACD趨勢；高低價位；L2主力散戶資金流入額，主圖指標
 

MACD趨勢
DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,'W20',0);
DRAWKLINE(H,O,L,C);
QWX1:=HHV(CLOSE,30);
QWX2:=LLV(CLOSE,30);
QWX3:=CONST((QWX1+QWX2)/2);
QWX4:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
QWX5:=CONST((1-7/100)*(DMA(CLOSE,QWX4)));
QWX6:=CONST((1+7/100)*(DMA(CLOSE,QWX4)));
{KDJ}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
KX:=SMA(RSV,3,1);
DX:=SMA(KX,3,1);
JX:=3*KX-2*DX;
{MACD}
DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*2+QWX3,COLORWHITE;
DEA:=EMA(DIF,9),COLORYELLOW;
MACD:(DIF-DEA)*5+QWX3,COLORYELLOW,LINETHICK2;
DRAWBAND(MACD,RGB(120,0,100),QWX3,RGB(60,100,50));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
牛熊線:=(EMA(CLOSE,30)+EMA(CLOSE,72))/2,LINETHICK2,COLORRED;
M5:MA(CLOSE,5),COLORWHITE,DOTLINE;
IF(MA(C,5)>=REF(MA(C,5),1),MA(C,5),DRAWNULL),COLORYELLOW,LINETHICK3;
M10:MA(CLOSE,10),COLORYELLOW,DOTLINE;
IF(MA(C,10)>=REF(MA(C,10),1),MA(C,10),DRAWNULL),COLOR330099,LINETHICK2;
M20:MA(CLOSE,20),COLORFF00FF;
IF(MA(C,20)>=REF(MA(C,20),1),MA(C,20),DRAWNULL),COLORLIMAGENTA,LINETHICK2;
M60:MA(CLOSE,60),COLOR6699CC;
IF(MA(C,60)>=REF(MA(C,60),1),MA(C,60),DRAWNULL),CIRCLEDOT,LINETHICK2;
M120:MA(CLOSE,120),COLORLIBLUE,DOTLINE;
M250:MA(CLOSE,250),COLORMAGENTA,DOTLINE;
VAR1:=IF(CLOSE>OPEN,CLOSE,OPEN);
VAR2:=MEMA(CLOSE,5);
VAR3:=ATAN((VAR2/REF(VAR2,1)-1)*100);
VAR4:=IF(VAR3>0,VAR3,VAR3);
VAR5:=(CLOSE/REF(CLOSE,1)-1)*100;
VAR6:=VAR5<1.5 AND VAR5>-1.5;
今日之升★:LAST(VAR6,4,1) AND VAR5>2 AND VOL>REF(VOL,1),NODRAW,COLORYELLOW;
DRAWTEXT(今日之升★,L/1.01,'★'),COLORYELLOW;
強勢:IF(VAR4>=REF(VAR4,1) AND VAR4>=0,M10,DRAWNULL),COLORRED,LINETHICK2;
整理:IF(VAR4<REF(VAR4,1) AND VAR4>0,M10,DRAWNULL),COLORGREEN,LINETHICK2;
支撐:IF(PERIOD=5,IF(BARSLAST(CURRBARSCOUNT=5),QWX5,DRAWNULL),DRAWNULL),COLORCYAN;
阻力:IF(PERIOD=5,IF(BARSLAST(CURRBARSCOUNT=5),QWX6,DRAWNULL),DRAWNULL),COLORYELLOW;

N:=120;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));{高點}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));{低點}
KJ:=GD-DD;{高低點差值=分區(qū)高度}
GD4:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL);
底:IF(CURRBARSCOUNT<=N/30,DD,DRAWNULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL),COLOR00FFFF;
撐:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;
強: IF(CURRBARSCOUNT<=N/30,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/30,DD+KJ/2,DRAWNULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
壓力:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.809,DRAWNULL),COLOR00FF00;
低漲:IF(CURRBARSCOUNT<=N/30,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天數(shù):BARSLAST(L=DD),COLORCYAN,NODRAW;
今日保護價:(REF(C,2)+REF(C,1)+O)/3 ,COLORCC3299,NODRAW;
頂點:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV(H, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORRED,DOTLINE;
低點:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,LLV(L, BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORYELLOW,DOTLINE;
STICKLINE(CCI>=200 AND H>=頂點,O,C,3,0),COLORBLUE;
STICKLINE(CCI<=100 AND L<=低點,O,C,3,0),COLORYELLOW;
DRAWBAND(高,RGB(200,200,0),壓力,RGB(0,0,0));
DRAWBAND(壓力,RGB(0,190,0),警示,RGB(0,0,0));
DRAWBAND(警示,RGB(220,120,0),突破,RGB(0,0,0));
DRAWBAND(突破,RGB(120,0,120),強勢,RGB(0,0,0));
DRAWBAND(強勢,RGB(120, 0,0),支撐,RGB(0,0,0));
DRAWBAND(支撐,RGB(80,80,80),底,RGB(0,0,0));
STICKLINE(CURRBARSCOUNT=N/30,GD,DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT<=N/30,支撐,支撐,4,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,強勢,強勢,4,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,突破,突破,4,0),COLORABABAB;
STICKLINE(CURRBARSCOUNT<=N/30,警示,警示,4,0),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT<=N/30,壓力,壓力,4,0),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,壓力,'0.809'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,警示,'0.618'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,突破,'0.500'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=1,強勢,'0.382'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=1,支撐,'0.191'),COLOR00FFFF;
{柱型顯示}
STICKLINE(CLOSE>REF(CLOSE,1)*1.0985 AND CLOSE=HIGH,CLOSE,OPEN,4,-1),COLOR00FFFF;
STICKLINE(CLOSE<REF(CLOSE,1)*0.9015 AND CLOSE=LOW,CLOSE,OPEN,4,-1),COLORGREEN;
{藍}
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3,0),COLORFF7700;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.2,0),COLORFF9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.5,0),COLORFFBB00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.5,0),COLORCYAN;
{紅}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;
{綠}
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,3,0),COLOR009900;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,2.2,0),COLOR00BB00;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,1.5,0),COLOR00DD00;
STICKLINE(CROSS(M5,EMA(C,3)),VAR1,(OPEN+CLOSE)/2,0.5,0),COLOR00FF00;
{灰}
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,3,0),COLOR999999;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,2.2,0),COLORBBBBBB;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,1.5,0),COLORDDDDDD;
STICKLINE(CROSS(EMA(C,3),M5),OPEN,(OPEN+CLOSE)/2,0.5,0),COLORFFFFFF;
STICKLINE(CROSS(JX,DX),OPEN,CLOSE,0.5,0),COLORYELLOW;
STICKLINE(CROSS(DX,JX),OPEN,CLOSE,0.5,0),{COLOR000099}COLORBLACK;
 
超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),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗進:=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
大宗進限制:=IF((超B+大B)=0,0,大宗進);
大宗出限制:=IF((超S+大S)=0,0,大宗出);
非大宗進限制:=IF(中B+小B=0,0,非大宗進);
非大宗出限制:=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;
機構(gòu)參與度:=(超B+超S+大B+大S)/成交總量*100,COLORYELLOW,NODRAW;
大單強度:=(超B+大B-超S-大S)/成交總量*100,COLORYELLOW,NODRAW;
大單強度限制:=IF(大單強度=0,-100,大單強度);
大單強度比:=IF(大單強度>=0,(大單強度限制+100)/2,100-ABS((大單強度限制-100)/2)),NODRAW;
超單強度:=(超B-超S)/(超B+超S)*100,COLORYELLOW,NODRAW;
超單強度限制:=IF(超單強度=0,-100,超單強度);
超單強度比:=IF(超單強度>0,(超單強度限制+100)/2,IF(超單強度<0,100-ABS((超單強度限制-100)/2),0)),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗進),MAX(ABS(大宗出),MAX(ABS(非大宗進),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(0,CONST(950-(ABS(大宗進)*250/DAZHIV))-20,30,950,IF(CONST(大宗進>0),RGB(250,125,0),RGB(25,150,250)));
DRAWRECTREL(32,CONST(950-(ABS(大宗出)*250/DAZHIV))-20,62,950,IF(CONST(大宗出>0),RGB(25,150,250),RGB(250,125,0)));
DRAWRECTREL(102,CONST(950-(ABS(非大宗進)*250/DAZHIV))-20,132,950,IF(CONST(非大宗進>0),RGB(250,125,0),RGB(25,150,250)));
DRAWRECTREL(134,CONST(950-(ABS(非大宗出)*250/DAZHIV))-20,164,950,IF(CONST(非大宗出>0),RGB(25,150,250),RGB(250,125,0)));
DRAWRECTREL(204,CONST(950-(ABS(凈流入)*250/DAZHIV))-20,234,950,IF(CONST(凈流入>0),RGB(200,0,0),RGB(0,125,50)));
DRAWTEXT_FIX(1,0.00,0.95,0,STRCAT(STRCAT('主力 ',CON2STR(主力凈流入,0)),'萬')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.10,0.95,0,STRCAT(STRCAT('散戶 ',CON2STR(散戶凈流入,0)),'萬')),COLORCYAN;
DRAWTEXT_FIX(1,0.20,0.95,0,STRCAT(STRCAT('凈流入 ',CON2STR(凈流入,0)),'萬')),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;
主動買賣差:=(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大量動向:=MA((JGV+DHV),5),COLORYELLOW;
超級大量:=JGV,COLOR0000FF,NODRAW;
機構(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,大量資金比);
大量強度比:=IF(大量資金比>0,(大量資金比限制+100)/2,IF(大量資金比<0,100-ABS((大量資金比限制-100)/2),0)),COLORGREEN,NODRAW;
小量資金比:=小量博弈/(ABS(JGV)+ABS(DHV)+ABS(ZHV)+ABS(SHV))*100,COLORYELLOW,NODRAW;
小量強度比:=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(大量強度比*160/100),90,RGB(175,50,250));
DRAWTEXT_FIX(1,0.00,0.05,0,STRCAT(STRCAT('大量強度比 ',CON2STR(大量強度比,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('主動買賣比 ',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));