【通达信源码分享】精品指标公式－多空线主图源码通达信
2023-03-18 来源：未知 编辑：掌上指标
公式源码： BB线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,LINETHICK0,DOTLINE; IF(BB线REF(BB线,1),BBI,DRAWNULL),COLORWHITE,LINETHICK2,DOTLINE; IF(BB线REF
公式源码：
BB线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,LINETHICK0,DOTLINE;
IF(BB线>REF(BB线,1),BBI,DRAWNULL),COLORWHITE,LINETHICK2,DOTLINE;
IF(BB线<REF(BB线,1),BBI,DRAWNULL),COLORYELLOW,LINETHICK2,DOTLINE;
MA120:MA(CLOSE,120)COLORYELLOW,DOTLINE;
MA250:MA(CLOSE,250)COLORMAGENTA,DOTLINE;
YT:=(H<REF(H,1)) OR (H>REF(H,1));
T0:=BARSLAST(YT);
本月低:LLV(L,T0+1),LINETHICK3,COLOR006600;
称帝:(COST(99)+COST(93)+COST(85))/3,COLORYELLOW,LINETHICK2;
IF(称帝>=REF(称帝,1),称帝,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(称帝< REF(称帝,1),称帝,DRAWNULL),COLORBLUE,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0,0.02,0,STRCAT('地域: ',DYBLOCK)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.3,0.02,0,STRCAT('行 业: ',HYBLOCK)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.12,0,STRCAT('概 念: ',GNBLOCK)),COLORRED;
X:=(3*C+L+O+H)/6;
多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+
REF(X,20))/210,COLORGREEN,LINETHICK2;
IF(多空线>=REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK2;
IF(多空线< REF(多空线,1),多空线,DRAWNULL),COLORGREEN,LINETHICK2;
DRAWICON(CROSS( 本月低 ,多空线), 本月低 ,25),LINETHICK2;
DRAWTEXT(CROSS( 本月低 ,多空线),本月低-0.05,'获利买'),COLORGREEN;
DRAWICON(CROSS( C ,多空线), 多空线-0.05 ,25),LINETHICK2;
DRAWTEXT(CROSS( C ,多空线),本月低-0.05,'↖低吸'),COLORWHITE;
{跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
MA010:=MA(CLOSE,10),COLORYELLOW,LINETHICK0;
MA54:=MA(CLOSE,54),COLORFFCCCC,LINETHICK0;
PL1:=(((CLOSE - MA54) / MA54) < 0.1);
PL2:=(((CLOSE - MA010) / MA010) < 0.3);
偏离率:=(((PL1 = 1) AND (PL2 = 1)) * 0.2);
平台突破:=((((偏离率 = 0) AND (REF(偏离率,1) = 0.2)) AND (REF((COUNT((偏离率 = 0.2),10) = 10),1) = 1)) * 1);
DRAWTEXT(平台突破,L,'＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝'),COLORWHITE;
MA05:=MA(C,5);
MA5角度: ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416,NODRAW;
T01:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T01));
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
VVAR1:=EMA(CLOSE,3)-EMA(CLOSE,6)-(EMA(CLOSE,6)-EMA(CLOSE,12))*(-100);
VVAR2:=EMA(VVAR1,3);
VVAR5:=CROSS(VVAR1,VVAR2);
VVAR6:=CROSS(VVAR2,VVAR1);
AA:=IF(C>=REF(C,3),1,0);
BB:=IF(C>=REF(C,5),1,0);
CC:=IF(C>=REF(C,7),1,0);
DD:=IF(C>=REF(C,8),1,0);
EE:=IF(C>=REF(C,13),1,0);
FF:=IF(C>=REF(C,21),1,0);
GZ2:=AA+BB+CC+DD+EE+FF;
RRRSV:=SMA(下档线,3,1);
KKK:=SMA(RRRSV,3,1);
M5:= EMA(CLOSE,5);
M10:= EMA(CLOSE,10),LINETHICK0;
M30: MA(CLOSE,30),LINETHICK0;
M60: MA(CLOSE,60),LINETHICK0;
AA10:MA(CLOSE,8),COLOR00FF00,LINETHICK0;
AA12:MA(CLOSE,12),COLOR0000FF,LINETHICK0;
乖离5:=(C-M5)/M5*100;
斜率5:=ATAN((M5/REF(M5,1)-1)*100)*57.29583;
速度5:=SMA(EMA((M5-REF(M5,1))/REF(M5,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
斜率10:=ATAN((M10/REF(M10,1)-1)*100)*57.29583;
乖离30:=(C-M30)/M30*100;
斜率30:=ATAN((M30/REF(M30,1)-1)*100)*57.29583;
强势狙击:=FILTER(斜率30>30 AND 斜率10>45 AND CROSS(斜率5,60),10);
加仓:=FILTER(COUNT(CROSS(斜率5,30),5)>=1 AND M5>REF(M5,1) AND 乖离30>REF(乖离30,1) AND M10>REF(M10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
JC:=CROSS(0,乖离5) AND 乖离30<REF(乖离30,1) AND M10>REF(M10,1) ;
减仓:=FILTER(JC,10);
MR:=COUNT(CROSS(乖离5,0),3)>=1 AND 乖离30>REF(乖离30,1) AND M5>REF(M5,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<M30;
买入:=FILTER(MR,10) OR FILTER(KKK=0 AND GZ2>0 AND C>REF(C,1),10);
清仓:=FILTER(COUNT(CROSS(30,斜率5),5)>=1 AND (C>M30 OR O>M30)
AND M5<REF(M5,1) AND 乖离30<REF(乖离30,1) AND M10<REF(M10,1),10)
OR FILTER((KKK=6 AND GZ2<6),10);
DRAWICON(买入 OR 强势狙击 OR 加仓,LOW*0.995,1);
DRAWICON(减仓 OR 清仓,HIGH*1.005,2);
DRAWTEXT(减仓 OR 清仓,HIGH*1.005,'减仓'),COLORRED;
DRAWKLINE(H,O,L,C);
STICKLINE(VVAR6,OPEN,CLOSE,2.8,0), COLORBLUE;
STICKLINE(VVAR5,OPEN,CLOSE,2.8,0), COLORYELLOW;
STICKLINE(VVAR5,OPEN,CLOSE-(CLOSE-OPEN)*0.33,2.8,0), COLORAACCDD;
STICKLINE(VVAR5,OPEN,CLOSE-(CLOSE-OPEN)*0.66,2.8,0), COLORRED;
