「翔博精选指标」机构操盘线V61(通达信公式 主图 源码 测试图)
2021-11-21原创 编 辑:翔博软件
XSR:=221053199;
XS:=IF(DATE<XSR,1,1);
短趋势:FORCAST(EMA(C,16),7)*XS,COLOR00FF00,LINETHICK3;
中趋势:FORCAST(EMA(C,55),7)*XS,DOTLINE,COLORFFFF00;
NOTEXT短:IF(MA(C,5)>短趋势 OR C>短趋势,短趋势,DRAWNULL)*XS,COLORRED,LINETHICK3;
NOTEXT中:IF(短趋势>=中趋势,中趋势,DRAWNULL)*XS,DOTLINE,COLOR0000FF;
MA55:=MA(CLOSE,55);
MA89:=MA(CLOSE,89);
MA144:=MA(CLOSE,144);
MA233:=MA(CLOSE,233);
MA377:=MA(CLOSE,377);
最大:=MAX(MAX(MAX(MA377,MA89),MA144),MA233);
最小:=MIN(MIN(MIN(MA377,MA89),MA144),MA233);
最大55:=MAX(MAX(MAX(MA55,MA89),MA144),MA233);
比值:=(最大/最小-1)*100;
{起爆}
A0:=C/REF(C,1)-1>7/100;
A1:=C>最大 AND O<最大;
A2:=比值<10;
起爆:(A0 AND A1 AND A2)*XS,COLORWHITE,NODRAW;
STICKLINE(起爆,O,C,2.5,0),COLORWHITE;
DRAWTEXT(起爆,L*0.985,'起爆'),COLORWHITE;
{抓板}
B0:=C>最大55;
B1:=ABS(L-短趋势)/MIN(L,短趋势)<0.05;
B2:=ABS(L-中趋势)/MIN(L,中趋势)<0.10;
B3:=C/REF(C,1)-1>0.05;
B5:=MA144>MA233 AND MA233>MA377 AND 短趋势>中趋势;
抓板:(B1 AND B2 AND B3 AND B5)*XS,COLORYELLOW,NODRAW;
B4:=FILTER(抓板,5);
STICKLINE(抓板 AND B4,REF(C,1)*1.025,C,1.2,0),COLORYELLOW;
STICKLINE(抓板 AND B4,O,REF(C,1)*1.025,1.2,0),COLORRED;
DRAWTEXT(抓板 AND B4,L,'抓板'),COLORYELLOW;
C0:=C>REF(C,1) AND C/REF(C,1)-1>=0.05;
C1:=(REF(C,2)-REF(C,1))/REF(C,2)>=0.05 OR (REF(H,1)/REF(C,2)-1>=0.07 AND REF(C,1)/REF(C,2)-1<0.03);
C2:=REF(C,2)/REF(C,7)-1>=0.35;
C3:=C0 AND C1 AND C2 AND BARSCOUNT(C)>20;
飞龙在天:C3*XS,NODRAW,COLORLIRED;
STICKLINE(飞龙在天,O,C,3.5,0),COLORLIRED;
DRAWTEXT(飞龙在天,H*1.02,'飞龙在天'),COLORLIRED;
{黄金坑}
CC:=C#WEEK;
MAA55:=MA(CC,55);
MAA89:=MA(CC,89);
MAA144:=MA(CC,144);
MAA233:=MA(CC,233);
最大A:=MAX(MAX(MAX(MAA55,MAA89),MAA144),MAA233);
最小A:=MIN(MIN(MIN(MAA55,MAA89),MAA144),MAA233);
比值A:=(最大A/最小A-1)*100;
X1:=CC/REF(CC,急涨周期)-1>=急涨幅度/100 ;
X2:=REF(CC,急涨周期+急跌周期)/REF(CC,急涨周期)-1<=急跌幅度/100 AND BARSCOUNT(C)>60;
X3:=COUNT(CC>REF(CC,1),10)>=7;
粘合黄:=比值A<粘合度;
黄金坑:(X1 AND X2 AND 粘合黄)*XS,COLORMAGENTA,NODRAW;
X4:=FILTER(黄金坑,10);
STICKLINE(黄金坑 AND X4,O,C,3.5,1),COLORMAGENTA;
XS:=IF(DATE<XSR,1,1);
短趋势:FORCAST(EMA(C,16),7)*XS,COLOR00FF00,LINETHICK3;
中趋势:FORCAST(EMA(C,55),7)*XS,DOTLINE,COLORFFFF00;
NOTEXT短:IF(MA(C,5)>短趋势 OR C>短趋势,短趋势,DRAWNULL)*XS,COLORRED,LINETHICK3;
NOTEXT中:IF(短趋势>=中趋势,中趋势,DRAWNULL)*XS,DOTLINE,COLOR0000FF;
MA55:=MA(CLOSE,55);
MA89:=MA(CLOSE,89);
MA144:=MA(CLOSE,144);
MA233:=MA(CLOSE,233);
MA377:=MA(CLOSE,377);
最大:=MAX(MAX(MAX(MA377,MA89),MA144),MA233);
最小:=MIN(MIN(MIN(MA377,MA89),MA144),MA233);
最大55:=MAX(MAX(MAX(MA55,MA89),MA144),MA233);
比值:=(最大/最小-1)*100;
{起爆}
A0:=C/REF(C,1)-1>7/100;
A1:=C>最大 AND O<最大;
A2:=比值<10;
起爆:(A0 AND A1 AND A2)*XS,COLORWHITE,NODRAW;
STICKLINE(起爆,O,C,2.5,0),COLORWHITE;
DRAWTEXT(起爆,L*0.985,'起爆'),COLORWHITE;
{抓板}
B0:=C>最大55;
B1:=ABS(L-短趋势)/MIN(L,短趋势)<0.05;
B2:=ABS(L-中趋势)/MIN(L,中趋势)<0.10;
B3:=C/REF(C,1)-1>0.05;
B5:=MA144>MA233 AND MA233>MA377 AND 短趋势>中趋势;
抓板:(B1 AND B2 AND B3 AND B5)*XS,COLORYELLOW,NODRAW;
B4:=FILTER(抓板,5);
STICKLINE(抓板 AND B4,REF(C,1)*1.025,C,1.2,0),COLORYELLOW;
STICKLINE(抓板 AND B4,O,REF(C,1)*1.025,1.2,0),COLORRED;
DRAWTEXT(抓板 AND B4,L,'抓板'),COLORYELLOW;
C0:=C>REF(C,1) AND C/REF(C,1)-1>=0.05;
C1:=(REF(C,2)-REF(C,1))/REF(C,2)>=0.05 OR (REF(H,1)/REF(C,2)-1>=0.07 AND REF(C,1)/REF(C,2)-1<0.03);
C2:=REF(C,2)/REF(C,7)-1>=0.35;
C3:=C0 AND C1 AND C2 AND BARSCOUNT(C)>20;
飞龙在天:C3*XS,NODRAW,COLORLIRED;
STICKLINE(飞龙在天,O,C,3.5,0),COLORLIRED;
DRAWTEXT(飞龙在天,H*1.02,'飞龙在天'),COLORLIRED;
{黄金坑}
CC:=C#WEEK;
MAA55:=MA(CC,55);
MAA89:=MA(CC,89);
MAA144:=MA(CC,144);
MAA233:=MA(CC,233);
最大A:=MAX(MAX(MAX(MAA55,MAA89),MAA144),MAA233);
最小A:=MIN(MIN(MIN(MAA55,MAA89),MAA144),MAA233);
比值A:=(最大A/最小A-1)*100;
X1:=CC/REF(CC,急涨周期)-1>=急涨幅度/100 ;
X2:=REF(CC,急涨周期+急跌周期)/REF(CC,急涨周期)-1<=急跌幅度/100 AND BARSCOUNT(C)>60;
X3:=COUNT(CC>REF(CC,1),10)>=7;
粘合黄:=比值A<粘合度;
黄金坑:(X1 AND X2 AND 粘合黄)*XS,COLORMAGENTA,NODRAW;
X4:=FILTER(黄金坑,10);
STICKLINE(黄金坑 AND X4,O,C,3.5,1),COLORMAGENTA;
DRAWTEXT(黄金坑 AND X4,L*0.98,'黄金坑'),COLORMAGENTA;