通達(dá)信四合一主圖指標(biāo)公式
2020/5/13 18:11:29
{及時(shí)雨}
{可見(jiàn)K線 N=75條}; N:=75;
{可見(jiàn)K線 最高價(jià)}; HH:=CONST(HHV(H,N));
{可見(jiàn)K線 最低價(jià)}; LL:=CONST(LLV(L,N));
{可見(jiàn)K線 中間價(jià)}; MM:=CONST(HH/2+LL/2);
{最后 收盤價(jià)}; CC:=CONST(C),CROSSDOT;
{浮動(dòng)線&0.2差值}; YY:=CONST(IF(CC>=MM,LL-(HH-LL)*0.2,HH+(HH-LL)*0.2)),POINTDOT;
{MACD:-----------------------------------------------------------------};
{MACD 原參數(shù)}; DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
{MACD 原參數(shù)}; DEA:=EMA(DIF,9);
{MACD 原參數(shù)}; MACD:=(DIF-DEA)*2,COLORSTICK;
{MACD N內(nèi)最高線}; MHH:=CONST(HHV(MACD,N));
{MACD N內(nèi)最低線}; MLL:=CONST(LLV(MACD,N));
{MACD N內(nèi)均頂?shù)讅; MMM0:=MHH/2-MLL/2; MMM:=IF(MMM0<(HH-LL)*0.1,(HH-LL)*0.1,MMM0);
{浮動(dòng)線 灰襯底}; STICKLINE(0=0,YY+MMM,YY-MMM,5,0),COLOR444444;
{浮動(dòng)線上紅MACD}; STICKLINE(MACD>=0,YY,YY-MACD,2,0),COLORRED; {顛倒圖};
{浮動(dòng)線下藍(lán)MACD}; STICKLINE(MACD<0, YY,YY-MACD,2,0),COLORCYAN; {顛倒圖};
{KDJ3------------------------------------------------------------------};
{KDJ3 原參數(shù)}; RSV:=((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))-0.5)/100;
{KDJ3 原參數(shù)}; K:=SMA(RSV,4,1);
{KDJ3 原參數(shù)}; D:=SMA(K,4,1);
{KDJ3 原參數(shù)}; J:=3*K-2*D;
{浮動(dòng)線上 取J值}; JJ:=(J/0.005)*MMM;{放在MACD后面};
{浮動(dòng)線上 畫(huà)J線}; STICKLINE(J>REF(J,1),YY+REF(JJ,1),YY+JJ,2.0,0),COLORMAGENTA;
{浮動(dòng)線上 畫(huà)J線}; STICKLINE(J<REF(J,1),YY+REF(JJ,1),YY+JJ,2.0,0),COLORGREEN;
{SAR-------------------------------------------------------------------};
{SAR 快下拋物線}; SAR1:=IF(CLOSE<SAR(2,3,10),SAR(2,3,10),0);
{SAR 下行拋物線}; SAR2:=IF(CLOSE<SAR(4,2,20),SAR(4,2,20),0);
{SAR 快上拋物線}; SARE:=IF(CLOSE>SAR(3,3,20),SAR(3,3,20),0);
{SAR 上行拋物線}; SARA:=IF(CLOSE>SAR(4,2,10),SAR(4,2,10),0);
{SAR 合畫(huà)拋物線}; 空倉(cāng):IF(MIN(SAR1,SAR2)>0,(SAR1+SAR2)/2,IF(SAR1+SAR2=0,DRAWNULL,SAR1+SAR2)),CIRCLEDOT,COLORGREEN;
{SAR 合畫(huà)拋物線}; 持股:IF(MIN(SARE,SARA)>0,(SARE+SARA)/2,IF(SARE+SARA=0,DRAWNULL,SARE+SARA)),CIRCLEDOT,COLORMAGENTA;
{MA--------------------------------------------------------------------};
{MA1 收盤價(jià)線}; MA1:C,COLORYELLOW,NODRAW;
{MA3天均線:4K價(jià)}; MA3:MA(((3*C+L+O+H)/6),3),COLORYELLOW,NODRAW;
{MA3上穿SAR提示}; {DRAWICON(CROSS(MA3,SAR(4,2,20))=1,SAR(4,2,20),7);};
{MA3下穿SAR提示}; {DRAWICON(CROSS(SAR(4,2,20),MA3)=1,SAR(4,2,20),8);};
{BBI-------------------------------------------------------------------};
{BBI 1天線}; BBI:(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4,COLORWHITE;
{BB5 5天線}; BB5:(MA(C,15)+MA(C,30)+MA(C,60)+MA(C,120))/4,COLORWHITE;
{看股吧 bankruptcyebook.com}
{BB5 上行變紅}; IF(C>BB5,BB5,DRAWNULL),COLORRED;
{BB5 下行變藍(lán)}; IF(C<BB5,BB5,DRAWNULL),COLORCYAN;
{重影指示--------------------------------------------------------------};
{MACD 取高點(diǎn)}; MH:=IF(MACD<0,-MACD,0);
{MACD 取低點(diǎn)}; ML:=IF(MACD>0,-MACD,0);
{JJ 取高點(diǎn)}; JJH:=IF(REF(JJ,1)>JJ,REF(JJ,1),JJ);
{JJ 取低點(diǎn)}; JJL:=IF(REF(JJ,1)<JJ,REF(JJ,1),JJ);
{重疊區(qū) 取高點(diǎn)}; Z1:=IF(JJH>ML AND JJH<MH,JJH,IF(JJH>=MH,MH,DRAWNULL));
{重疊區(qū) 取低點(diǎn)}; Z2:=IF(JJL>ML AND JJL<MH,JJL,IF(JJL<=ML,ML,DRAWNULL));
{重疊區(qū) 畫(huà)藍(lán)條}; STICKLINE(0=0,YY+Z1,YY+Z2,0.1,0),COLORBLUE;
{
DRAWTEXT(BACKSET(C>BB5,CURRBARSCOUNT)=1 AND CURRBARSCOUNT=16,IF(CC>MM,LL,HH),'收BB5上,還有好市'),COLORRED;
DRAWTEXT(BACKSET(C<BB5,CURRBARSCOUNT)=1 AND CURRBARSCOUNT=16,IF(CC>MM,LL,HH),'收BB5下,保本要緊'),COLORLIBLUE;
}
DRAWTEXT(CURRBARSCOUNT=16 AND BACKSET(C>BB5,CURRBARSCOUNT)=1 AND BACKSET(CROSS(MA1,BBI)=1,CURRBARSCOUNT)=1,IF(CC>MM,LL,HH),'收BB5上,上穿BBI'),COLORRED;
DRAWICON(CROSS(DIF,DEA), YY-MMM,1);
DRAWICON(CROSS(DEA,DIF), YY+MMM,2);
看股 吧公式 www.kang uba.com
其它股票公式列表
