資金MACD主圖指標(biāo) 通達(dá)信公式（附圖）

 2016-12-09 10:38:17

DRAWGBK(C>0,RGB(8,10,4),RGB(8,10,4),0,'',0);
{資金主圖顯示}
D頂:=REFDATE(HHV(H,120),DATE);
D底:=REFDATE(LLV(L,120),DATE);
JGV:=(L2_VOL(0,0) - L2_VOL(0,1))*AMOUNT;
SHV:=(L2_VOL(3,0) - L2_VOL(3,1))*AMOUNT;
機(jī)構(gòu)資金:=EMA(JGV,60)/CAPITAL,COLORMAGENTA;
散戶資金:=EMA(SHV,60)/CAPITAL,COLORGREEN;
買入:=機(jī)構(gòu)資金-散戶資金;
累計(jì):=EMA(買入,1),NODRAW;
均值:=EMA(累計(jì),MIN(10,10)),NODRAW;
STICKLINE(累計(jì)>0,D頂,D底,5,0),COLOR1B0E8B;
STICKLINE(累計(jì)<0,D頂,D底,5,0),COLOR6B6B12;
{MACD主圖顯示}
高1:=REF(HHV(H,120),3);
低1:=REF(LLV(L,120),3);
H3:=高1-(高1-低1)*0.5;
中軸:REFDATE(H3,DATE),POINTDOT,COLORLIGRAY;
B1:=EMA(C,12);
B2:=EMA(C,26);
B3:=(B1-B2)*2;
WDIF:中軸+B3;
WDEA:EMA(WDIF,9);
DRAWBAND(WDIF,RGB(110,0,0),WDEA,RGB(0,80,0));
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
MACD:=2*(WDIF-WDEA)LINETHICK2;
STICKLINE(MACD>0,中軸,中軸+MACD,0,1),COLORRED;
STICKLINE(MACD<0,中軸,中軸+MACD,0,1),COLORLIBLUE;
A1:=BARSLAST(REF(CROSS(WDIF,WDEA),1));
底背離:=REF(CLOSE,A1+1)>CLOSE AND WDIF>REF(WDIF,A1+1) AND CROSS(WDIF,WDEA);
底背:DRAWLINE(A1=0,WDEA,底背離,WDEA,0),COLORRED,LINETHICK4;
A2:=BARSLAST(REF(CROSS(WDEA,WDIF),1));
頂背離:=REF(CLOSE,A2+1)<CLOSE AND REF(WDIF,A2+1)>WDIF AND CROSS(WDEA,WDIF);
頂背:DRAWLINE(A2=0,WDEA,頂背離,WDEA,0),COLORGREEN,LINETHICK4;

A:=REF(HY_INDEXC,1);
行業(yè)漲幅:IF(A>0,(HY_INDEXC-A)*100/A,0),NODRAW,COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK),COLOR00C0C0;
{BBI牛熊均線}
BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4 COLORGREEN LINETHICK2;
BBI操作線:IF(BBI>REF(BBI,1),BBI,DRAWNULL),LINETHICK2,COLORMAGENTA;
{慢牛線}
VAR1:=(3*C+O+H+L)/6;
慢牛線:EMA(3*VAR1-2*SMA(VAR1,2,1),8),COLORBLUE,LINETHICK2;
慢牛走牛:IF(慢牛線>REF(慢牛線,1),慢牛線,DRAWNULL),LINETHICK2,COLORYELLOW;
{慢牛買點(diǎn)}
慢牛B點(diǎn):=C>=慢牛線 AND REF(C,1)<REF(慢牛線,1) AND 慢牛線>REF(慢牛線,1);
DRAWICON(C>=慢牛線 AND REF(C,1)<REF(慢牛線,1) AND 慢牛線>REF(慢牛線,1),L*0.98,7);

{【參數(shù)定義】}
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K1:=SMA(RSV,10,1);
D1:=SMA(K1,5,1);
KK:=INTPART(K1);
DD0:=INTPART(D1);
TFXXS:=KK+DD0;
TGLXS:=(TFXXS-REF(TFXXS,1))*10;
乖離系數(shù):TGLXS,COLORGREEN,NODRAW;
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
控盤系數(shù):INTPART(ZZLKP),COLORCYAN,NODRAW;
風(fēng)險(xiǎn)系數(shù):TFXXS,LINETHICK2,COLORYELLOW,NODRAW;
選股:=控盤系數(shù)>19 AND 乖離系數(shù)>39 AND 風(fēng)險(xiǎn)系數(shù)<110;
DRAWTEXT(選股>0,LOW*0.98,'☆'),COLORDD00DD;
凈流比:=(LARGEINTRDVOL/LARGEOUTTRDVOL);
大10追:=EMA(凈流比,10)*10;
買力度:=LARGEINTRDVOL*100/VOL;
強(qiáng)勢(shì)將到:=選股 AND 大10追>10 AND 凈流比>1 AND 買力度>30;
DRAWTEXT(強(qiáng)勢(shì)將到,L*0.992,'強(qiáng)勢(shì)將到'),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.92,0,' 1、乖離系數(shù)，大于40關(guān)注 小于-50堅(jiān)決不進(jìn)場(chǎng) ，大于60堅(jiān)決買入，買入時(shí)看股價(jià)運(yùn)行的情況而定。2、控盤系數(shù)大于20 可以做個(gè)小波段 準(zhǔn)確率80%。')COLOR4080FF;
{倍量}
V2V:=V/REF(V,1)>=1.9 AND (IF(C<O,C>REF(C,1),1));
{金黃色}
DRAWTEXT(V2V,(L*0.99),'倍'),COLORYELLOW;
STICKLINE(V2V,OPEN,CLOSE,0,0),COLOR000DDD;
STICKLINE(V2V,OPEN,CLOSE,3.2,0),COLOR003333;
STICKLINE(V2V,OPEN,CLOSE,2.7,0),COLOR005555;
STICKLINE(V2V,OPEN,CLOSE,2.1,0),COLOR007777;
STICKLINE(V2V,OPEN,CLOSE,1.5,0),COLOR009999;
STICKLINE(V2V,OPEN,CLOSE,0.9,0),COLOR00BBBB;
STICKLINE(V2V,OPEN,CLOSE,0.3,0 ),COLOR00DDDD;
{漲停變色}

ZT:=C/REF(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(C,(REF(L,BH)+CZ*0.5),(REF(L,BH)+CZ*0.5),3,0),COLORRED;
STICKLINE(C,REF(L,BH),REF(L,BH),3,0),COLORBLUE;
STICKLINE(ZT,REF(O,BH),REF(C,BH),3,0),COLORYELLOW;
DRAWTEXT(ZT,L*0.97,'漲停'),COLORRED;

STICKLINE(ZT,LOW,HIGH,0.1,0),COLORRED;
STICKLINE(ZT,OPEN,CLOSE,0,0),COLORRED;

STICKLINE(ZT,CLOSE,OPEN,3,0) ,COLOR000066;
STICKLINE(ZT,CLOSE,OPEN,2.6,0) ,COLOR000088;
STICKLINE(ZT,CLOSE,OPEN,2.1,0) ,COLOR0000AA;
STICKLINE(ZT,CLOSE,OPEN,1.5,0) ,COLOR0000BB;
STICKLINE(ZT,CLOSE,OPEN,0.9,0) ,COLOR0000CC;
STICKLINE(ZT,CLOSE,OPEN,0.6,0) ,COLOR0000DD;
STICKLINE(ZT,CLOSE,OPEN,0.3,0) ,COLOR0000EE;
STICKLINE(ZT,CLOSE,OPEN,0.1,0) ,COLOR0000FF;
STICKLINE(ZT,CLOSE,OPEN,0,0) ,COLOR0000FF;{☆精確風(fēng)險(xiǎn)}
{相對(duì)低點(diǎn)K線變色，上穿寫短線}
LC:=REF(C,1),LINETHICK0;
RSI:=((SMA(MAX((C-LC),0),13,1)/SMA(ABS((C-LC)),13,1))*100);
STICKLINE((RSI<20),L,H,0.1,0),COLORFF6600;
STICKLINE((RSI<20),O,C,4,0),COLORCC5000;
DRAWTEXT(CROSS(RSI,20-0.0005),H*1.01,'短線'),COLORAA99AA;
STICKLINE(CROSS(RSI,20-0.0005),C,O,3,0),COLOR888888;
STICKLINE(CROSS(RSI,20-0.0005),C,O,2,0),COLORAAAAAA;
STICKLINE(CROSS(RSI,20-0.0005),C,O,1,0),COLORCCCCCC;
STICKLINE(CROSS(RSI,20-0.0005),C,O,0.1,0),COLORFFFFFF;
STICKLINE(CROSS(RSI,20-0.0005),L,H,0,0),COLORFFFFFF;

V字翻轉(zhuǎn):=MA(C,5)<MA(C,10) AND V=LLV(V,10) AND C>O;

DRAWTEXT(V字翻轉(zhuǎn),L*0.97,'V字翻轉(zhuǎn)'),COLORRED;

Z1:=STRCAT(DYBLOCK,' ');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,' ');
Z4:=STRCAT(Z3,GNBLOCK);
Z5:=STRCAT(Z4,' ');
Z6:=STRCAT(Z5,FGBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.01,0.012,0,STRCAT(Z6,ZHBLOCK)),COLORRED;
DRAWTEXT_FIX(1,0,0.075,0,STRCAT('',ZDBLOCK)),COLORYELLOW;

總漲幅周期:=350;
高點(diǎn)位:=REFDATE(HHV(H,總漲幅周期),DATE);
低點(diǎn)位:=REFDATE(LLV(L,總漲幅周期),DATE);
低位價(jià):=REF(L,BARSLAST(低點(diǎn)位=L)),COLORGREEN,NODRAW;
高位價(jià):=REF(H,BARSLAST(高點(diǎn)位=H)),COLORRED,NODRAW;
曾最大漲幅:=(高位價(jià)-低位價(jià))/低位價(jià)*100;
當(dāng)前漲幅:=(C-低位價(jià))/低位價(jià)*100;
ZFA:=CON2STR(CONST(曾最大漲幅),2);
ZFB:=CON2STR(CONST(當(dāng)前漲幅),2);
ZFC:=STRCAT('【曾最大漲幅】：',ZFA);
ZFD:=STRCAT(ZFC,'％');
ZFE:=STRCAT(ZFD,'【當(dāng)前總漲幅】：');
ZFF:=STRCAT(ZFE,ZFB);
ZFG:=STRCAT(ZFF,'％');
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;