|
{EM-操盘线2016}
DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0);
DRAWGBK(C>0,RGB(0,0,0),RGB(00,0,0),0,'EM',0);DRAWKLINE(H,O,L,C);
STICKLINE(C>=O,C,O,3,0),COLOR000045;
STICKLINE(C>=O,C,O,2.5,0),COLOR000065;
STICKLINE(C>=O,C,O,2,0),COLOR000085;
STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;
STICKLINE(C>=O,C,O,1,0),COLOR0000C5;
STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;
STICKLINE(C>=O,H,L,0,0),COLOR0000F5;
STICKLINE(C<O,C,O,3,0),COLOR656500;
STICKLINE(C<O,C,O,2.5,0),COLOR757500;
STICKLINE(C<O,C,O,2,0),COLOR858500;
STICKLINE(C<O,C,O,1.5,0),COLOR959500;
STICKLINE(C<O,C,O,1,0),COLORA5A500;
STICKLINE(C<O,C,O,0.5,0),COLORB5B500;
STICKLINE(C<O,H,L,0,0),COLORC5C500;
F111:=ZIG(3,15);{WWW.70822.com}
F211:=IF((F111> REF(F111,1)),100,80);
昨:REF(C,1),NODRAW,COLORGREEN;
上涨家数:=INDEXADV;
下跌家数:=INDEXDEC;
人气:上涨家数/下跌家数,NODRAW;
M5:=MA(C,5),COLORFFFFFF;
M10:=MA(C,10)COLOR00FFFF;
M20:=MA(C,20),COLOR888800;
M30:=MA(C,30),COLORRED;
M60:=MA(C,60),COLORGREEN;
T01:=CONST(LLVBARS(LOW,10));
T11HIGH:=CONST(REF(HIGH,T01));
CC1:=CONST(CURRBARSCOUNT);
T02:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T01)) AND (HIGH>T11HIGH)));
T12HIGH:=CONST(REF(HIGH,T02));
T03:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T02)) AND (HIGH>T12HIGH)));
T13HIGH:=CONST(REF(HIGH,T03));
洗:DRAWLINE(CURRBARSCOUNT=T03+1, T13HIGH, ISLASTBAR, T13HIGH, 1),DOTLINE,COLORFFFFFF;
AY:=REF(H,10)=HHV(H,2*10+1);
QYY:=BACKSET(AY,10+1);
CC:=FILTER(QYY,10) AND H=HHV(H,10+1);
DDD:=BARSLAST(CC);{WWW.70822.com}
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
压:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORFFFF00,LINETHICK1,DOTLINE;
A2:=REF(L,5)=LLV(L,2*5+1);
B2:=FILTER(A2,5);
C2:=BACKSET(B2,5+1);
D2:=FILTER(C2,5);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
支:DRAWLINE(D2,L,F2,L,1),COLORLIRED,DOTLINE;
高1:=REF(HHV(H,150),3);
低1:=REF(LLV(L,150),3);
HH1:=高1-(高1-低1)*0.191;
冲:REFDATE(HH1,DATE),COLORLIGREEN;
LTG:=LLVBARS(L,60);
LT1:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LTG)+1);
HTG:=FINDHIGHBARS(H,LTG+1,60,1);
锅顶:=DRAWLINE(CURRBARSCOUNT=CONST(HTG)+1,H,ISLASTBAR,REF(H,HTG),0),COLORYELLOW,LINETHICK2;
TT:=BARSLAST(CURRBARSCOUNT=CONST(HTG)+1);
AAG:=CROSS(C,CONST(锅顶));
{分析家公式网WWW.70822.com}
BB:DRAWLINE(TT=0,H,LTT=0,L,0),COLORRED,LINETHICK2;
锅底:DRAWLINE(CURRBARSCOUNT>CONST(LT1)+0,L,ISLASTBAR,REF(L,LT1),0),COLORWHITE;
ZF1:=(C-REF(C,1))/REF(C,1)*100;
AZ:=IF(C>O,ZF1,1);
TJZ:=EVERY(RANGE(AZ,0,4),3);
TZ:=BARSLAST(COUNT(CROSS(C,MA(C,5)),3)=2 AND CROSS(C,MA(C,5)) AND TJZ);
XGZ:=REF(EVERY(H<REF(H,TZ),TZ),1) AND CROSS(C,REF(H,TZ));
突破价:REF(H,TZ) NODRAW,COLORLIMAGENTA;
LTS:=LLVBARS(L,100);
HTS:=HHVBARS(H,60);
LT1S:=FINDLOWBARS(L,HTS+1,30,1);
LTTS:=BARSLAST(CURRBARSCOUNT=CONST(LTS)+1);
LTT1:=BARSLAST(CURRBARSCOUNT=CONST(LT1S)+1);
HT1:=FINDHIGHBARS(H,LTT1,LTTS+1,1);
HT1T:=BARSLAST(CURRBARSCOUNT=CONST(HT1)+1);
HT2T:=BARSLAST(CURRBARSCOUNT=CONST(HTS)+1);
TJS:=L>REF(L,LTTS);
TJ1S:=H>REF(H,HT1T);
升下轨:DRAWLINE(LTTS=0,L,LTT1=0 AND TJS,L,1),COLORYELLOW,DOTLINE;
升上轨:DRAWLINE(HT1T=0,H,HT2T=0 AND TJ1S,H,1),COLORYELLOW,DOTLINE;
XLT:=FINDLOWBARS(H,0,HT2T+1,1);
XLT1:=BARSLAST(CURRBARSCOUNT=CONST(XLT)+1);
XH1T:=FINDHIGHBARS(H,XLT1,10,1);
XH1TT:=BARSLAST(CURRBARSCOUNT=CONST(XH1T)+1);
DF:=(C-REF(C,HT2T+1))/REF(C,HT2T+1)*100;
XL2TT:=BARSSINCEN(DF<-15,HT2T+1);
TJ2S:=H<REF(H,HT2T);
TJ3S:=L<REF(L,XL2TT);
降上轨:DRAWLINE(HT2T=0,H,XH1TT=0 AND TJ2S,H,1),COLORGREEN,DOTLINE;
降下轨:DRAWLINE(XL2TT=0,L,XLT1=0 AND TJ3S,L,1),COLORGREEN,DOTLINE;
STICKLINE(TZ>=0,REF(H,TZ),REF(H,TZ),4,-1),COLORGREEN;
STICKLINE(CROSS(XGZ=1,0.5),C,O,2,0),COLORBROWN;
STICKLINE(CROSS(XGZ=1,0.5),H,L,0,0),COLORBROWN;
DRAWICON(CROSS(XGZ=1,0.5),L*0.95,11);
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;{WWW.70822.com}
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买１:=F211=100 AND VAR10;
买２:=F211=100 AND (VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
F1:=ZIG(3,15);{WWW.70822.com}
F21:=IF((F1> REF(F1,1)),100,80);
VARE1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR1A:=IF(VARE1>0,VARE1,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
大顶0:=VAR1C AND COUNT(VAR1C,30)=1;
DRAWTEXT(大顶0=1,H*1.03,'大顶!'),COLORWHITE;
MA5:=EMA(C,5);
MA13:=EMA(C,6);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0);
AAAL:=(3*C+H+L+O)/6;
VAR1L:=(8*AAAL+7*REF(AAAL,1)+6*REF(AAAL,2)+5*REF(AAAL,3)+4*REF(AAAL,4)
+3*REF(AAAL,5)+2*REF(AAAL,6)+REF(AAAL,8))/36;
VAR6L:=(LLV(VAR1L,2)+LLV(VAR1L,4)+LLV(VAR1L,6))/3;
DRAWTEXT(C>M5 AND O<一0.809 AND C>M10 AND C>M30 AND M30>=REF(M30,1) AND CROSS(C,VAR6L) AND C/REF(C,1)>1.03 AND C>O AND F21=100 AND UP,O,'牛'),COLORFFFFFF; &
p20183922414664539.jpg
|
