-
来自论坛
-------------------------------------------------------------------------------
MA5:EMA(C,5);
MA10:EMA(C,10);
MA30:EMA(C,30);
NN:=150;
高11:=REFDATE(HHV(H,NN),DATE);
低11:=REFDATE(LLV(L,NN),DATE);
H11:=高11-(高11-低11)*0.191;
H12:=高11-(高11-低11)*0.382;
H13:=高11-(高11-低11)*0.5;
H14:=高11-(高11-低11)*0.618;
H15:=高11-(高11-低11)*0.809;
DRAWTEXT(CURRBARSCOUNT=1,高11,'高'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H11,'809'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H12,'618'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H13,'中'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H14,'382'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,H15,'191'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1,低11,'低'),COLORGREEN;
STICKLINE(CURRBARSCOUNT=13,高11,高11,100,-2),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H11,H11,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H12,H12,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H13,H13,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H14,H14,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,H15,H15,100,-1),COLORGREEN,LINETHICK2;
STICKLINE(CURRBARSCOUNT=13,低11,低11,100,-1),COLORGREEN,LINETHICK2;
N33:=10;
T1:=CONST(HHVBARS(V,N33));
T0:IF(CURRBARSCOUNT<=N33+7,CONST(IF(T1=0,C,REF(C,T1))),DRAWNULL);
IF(CURRBARSCOUNT=T1+1,T0,DRAWNULL),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,T0,' 平台');
A:=(3*C+L+O+H)/6;
VAR4:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
MA18:=MA(CLOSE,18);
CB:=EMA(VAR4,13);
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLOR33FFCC;
