|
此指标不是我原创；于2013-4-4，我帮助论坛的朋友把两个分时指标合并成一个指标（这两个分时指标合并的难度非常大）。
源码如下：
MA30:=EMA(CLOSE,30);
强弱:EMA(CLOSE,900);
STICKLINE((MA30>强弱),MA30,强弱,1,0),COLOR0000FF;
STICKLINE((MA30<强弱),MA30,强弱,1,0),COLOR00FF00;
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力棕色:L1+P1*7/8,COLORBROWN;
支撑绿色:L1+P1*0.5/8,COLOR00DD00;
现价:CLOSE,COLORWHITE,LINETHICK2;
STICKLINE(CROSS(支撑绿色,现价),支撑绿色,阻力棕色,1,0),COLORYELLOW;
BG:=IF(DATE<=1150530,1,0);
GH:=BETWEEN((DCLOSE*BG)/(SUM(AMOUNT,BARSCOUNT((DCLOSE*BG)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BG)))),1.05,0.95);
VB:=IF(GH=0,MA((DCLOSE*BG),BARSCOUNT((DCLOSE*BG))),(SUM(AMOUNT,BARSCOUNT((DCLOSE*BG)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BG)))));
快趋势线:EXPMA((DCLOSE/VB),21),COLORYELLOW,NODRAW;
慢趋势线:EXPMA((DCLOSE/VB),54),COLORGREEN,NODRAW;
A1:=C/快趋势线;
A2:=C/慢趋势线;
A:=IF(C/快趋势线=A1,快趋势线*A1,快趋势线);
B:=IF(C/慢趋势线=A2,慢趋势线*A2,慢趋势线);
顶点:=IF(CURRBARSCOUNT<=330,CONST(IF(ISLASTBAR=1,
HHV(A,BARSLAST(CURRBARSCOUNT=100)),1)),DRAWNULL),COLORCC3299,DOTLINE;
低点:=IF(CURRBARSCOUNT<=330,CONST(IF(ISLASTBAR=1,
LLV(A,BARSLAST(CURRBARSCOUNT=100)),1)),DRAWNULL),COLORLIGREEN,COLORBROWN,DOTLINE;
中线:(顶点+低点)/2,COLORBLUE;
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
趋势线:=EMA(V11,3);
V12:=(趋势线-REF(趋势线,1))/REF(趋势线,1)*100;
BB:=(趋势线<=13 AND V12>13) AND FILTER((趋势线<=13 AND V12>13),10);
CCC:=(趋势线>=90 AND V12) AND FILTER((趋势线>=90 AND V12),10);
见顶清仓:=STICKLINE(趋势线>=90 AND V12,中线,A,2,0),COLORCYAN;
STICKLINE(快趋势线>1 AND 快趋势线>REF(快趋势线,1) AND 快趋势线>慢趋势线,A,MA30,1,0),COLORMAGENTA;
B1:A,LINETHICK1;
B2:B,LINETHICK1;
B3:MA30,LINETHICK1;
DRAWICON(CCC,A,12);
DRAWICON(BB,A,23);
DRAWICON(CROSS(快趋势线,中线),A,1);
DRAWICON(CROSS(慢趋势线,中线) AND (快趋势线>中线),中线-0.002,15);
DRAWICON(CROSS(快趋势线,慢趋势线),B,13);
DRAWICON(CROSS(慢趋势线,快趋势线),B,2);
DRAWTEXT(CROSS(中线,快趋势线),中线,注意),COLORWHITE;
DRAWTEXT(CROSS(EXPMA((DCLOSE/VB),20),1),A-0.025,涨),COLORRED;
DRAWTEXT(BB,A-0.015,↑补仓),COLORLIRED;
DRAWTEXT(CROSS(快趋势线,中线),A-0.055,↑买进),COLORYELLOW;
DRAWTEXT(LONGCROSS(支撑绿色,现价,2),支撑绿色*1.001,↑B),COLORYELLOW;
DRAWTEXT(LONGCROSS(现价,阻力棕色,2),现价,↓抛),COLORGREEN;
|
