【通达信源码分享】精品决策 本人珍藏成功率极高的金牛自动射线通达信
2022-10-20 来源：未知 编辑：掌上指标
公式源码: {MACD} DIF:EMA(CLOSE,12) - EMA(CLOSE,26),COLOR00FFFF; DEA:EMA(DIF,9),COLORWHITE,NODRAW,LINETHICK2; MACD:2*(DIF-DEA),COLORRED,NODRAW; {乖离率} 乖离率:(CLOS
公式源码:
{MACD}
DIF:EMA(CLOSE,12) - EMA(CLOSE,26),COLOR00FFFF;
DEA:EMA(DIF,9),COLORWHITE,NODRAW,LINETHICK2;
MACD:2*(DIF-DEA),COLORRED,NODRAW;
{乖离率}
乖离率:(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100,COLORGREEN,NODRAW,LINETHICK1;
{自动射线}
OBV:=DIF;
P:=12;
A1:=REF(OBV,P)=HHV(OBV,2*P+1);
B1:=FILTER(A1,P);
C1:=BACKSET(B1,P+1);
D1:=FILTER(C1,P);{高点1}
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1);
S11:=R11>REF(R11,1);
压:DRAWLINE(D1,OBV,S11,OBV,1),COLORFF7F00,DOTLINE;
AA:=REF(OBV,3)=HHV(OBV,2*3+1);
QY:=BACKSET(AA,3+1);
CC:=FILTER(QY,3) AND OBV=HHV(OBV,3+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
GDCS1:=CONST(DINGBUTS);
力:DRAWLINE(CURRBARSCOUNT=GDCS1,OBV,ISLASTBAR,REF(OBV,GDCS1-1),1),COLORCYAN,DOTLINE;
A2:=REF(OBV,P)=LLV(OBV,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);{低点1}
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
U11:=T11>REF(T11,1);
支:DRAWLINE(D2,OBV,U11,OBV,1),COLORLIRED,DOTLINE;
Q:=5;
AAA:=REF(OBV,Q)=LLV(OBV,2*Q+1);
BBB:=FILTER(AAA,Q);
CCC:=BACKSET(BBB,Q+1);
DDD1:=FILTER(CCC,Q);
T12:=BACKSET(ISLASTBAR,BARSLAST(DDD1)+1);
U12:=T12>REF(T12,1);
撑:DRAWLINE(DDD1,OBV,U12,OBV,1),COLORWHITE,DOTLINE;
{红绿箭头}
DRAWICON(CROSS(DIF,DEA),DEA,1);
DRAWICON(CROSS(DEA,DIF),DEA,2);
{DIF变色线没有未来函数}
DEA1:EMA(DIF,9),COLORWHITE,LINETHICK2;
DIF,IF(DEA1,DIF,DRAWNULL),COLOR00FFFF,LINETHICK2;
IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORGREEN,LINETHICK2;
IF(DIF>REF(DIF,1),DIF,DRAWNULL),COLORRED,LINETHICK2;
强弱:0,COLORRED;
{金牛启动}
年:=MA(CLOSE,240);
涨幅%:=(C-REF(C,1))/REF(C,1)*100;
RSVV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
VARB2:=(RSVV/2+22)*1;
量:=EMA(VOL,13);
资金:=EMA(AMOUNT,13);
过滤:=((资金 /量) / 100);
提纯:=(((CLOSE -过滤) / 过滤) * 100);
黄金:=((提纯 < (0)) AND ZXNH);
买:=IF(黄金 AND RSVV<VARB2-2,180,0) AND 涨幅%>0 AND C<年;
DRAWTEXT(买>0,0.0001,' 买'),COLORFFFFFF;
DRAWTEXT(买>0,0.0001,'▲'),COLORFF00FF;
