霸王布林

{2  1000  20}趋势: MA(CLOSE,20),COLORYELLOW,CIRCLEDOT,LINETHICK1;
强: 趋势+STD(CLOSE,20),COLORGRAY;
弱: 趋势-STD(CLOSE,20),COLORGRAY;
天: 趋势+2*STD(CLOSE,20),COLORCYAN;
地: 趋势-2*STD(CLOSE,20),COLORCYAN;
{霸王线}
DIFF:=(EMA(C,26)-EMA(C,52));
DEA:=EMA(DIFF,52);
MACD:=(2*(DIFF-DEA));
DIF:=(EMA(C,26)-EMA(C,52));
ESS:=EMA(C,26);
EGG:=EMA(C,52);
霸王线:(((((((((52-1)*(26+1))*EGG)*1)-
((((52+1)*(26-1))*ESS)*1))+(((26+1)*(52+1))*DIF))*1)/((2*52)-(2*26)))*1)COLORGREEN,LINETHICK2;
K1:= 霸王线>=REF(霸王线,1);
K12:=BACKSET(K1,2);
DRAWLINE(K12, 霸王线,K1, 霸王线,0),COLORRED,LINETHICK2;
K2:= 霸王线<REF(霸王线,1);
K22:=BACKSET(K2,2);
DRAWLINE(K22, 霸王线,K2, 霸王线,0),COLORGREEN,LINETHICK2;
日:=M;昨前:=3;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),COLORRED;
一0.809:REFDATE(H1,DATE),COLORYELLOW;
二0.618:REFDATE(H2,DATE),COLORMAGENTA;
三0.500:REFDATE(H3,DATE),COLORRED,CIRCLEDOT,LINETHICK1;
四0.382:REFDATE(H4,DATE),COLORGREEN;
五0.191:REFDATE(H5,DATE),COLORYELLOW;
低:REFDATE(低1,DATE),COLORRED;