牛熊博弈(飞狐)
<p>WL:(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100,LINETHICK2,COLOR0000FF;<br />WLT:MA(WL,89),COLOR00FFFF,LINETHICK2;<br />
WLT1:=CROSS(WL,WLT);<br />
WLT11:=CROSS(WL,-10);<br />
WLT2:=FILTER(WLT1,8);<br />
SKY:10,POINTDOT,COLORFF0000,LINETHICK1;<br />
SEA:-10,POINTDOT,COLORFF00FF,LINETHICK1;<br />
DRAWICON(WLT2,WLT,1);<br />
DRAWICON(WLT11,SEA,3);<br />
WLT3:=COUNT(WL>10,5)>=3;<br />
WLT33:=CROSS(10,WL);<br />
SEL:=WLT3 AND WLT33;<br />
DRAWICON(SEL,10,5);<br />
STICKLINE(WL>10,WL,10,0.001,0),COLOR00FF00;<br />
STICKLINE(WL<-10,WL,-10,0.001,0),COLORFF00FF;<br />
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);<br />
DEA:=EMA(DIF,9);<br />
MACD:=(DIF-DEA)*2,COLORSTICK;<br />
DIF底:=LLV(DIF,120);<br />
最底价:=LLV(L,120);<br />
距今:=BARSLAST(最底价);<br />
偏离:=IF((距今=0 AND DIF>DIF底),1,0);<br />
DDD:=EXIST(偏离,20) AND SLOPE(DEA,2)>=0;<br />
HRY:=FILTER(DDD,10);<br />
STICKLINE(HRY,-5,-10,3,0),COLOR00FFFF;<br />
DRAWTEXT(HRY,-5,'M背'),COLOR00FFFF;<br />
{YYY:COUNT(偏离,5);}<br />
DIF顶:=HHV(DIF,120);<br />
H1:=HHV(H,120);<br />
距今高:=BARSLAST(h1);<br />
偏离高:=IF((距今高=0 AND DIF<DIF顶),1,0);<br />
GGG:=EXIST(偏离高,20) AND SLOPE(DEA,2)<0;<br />
HRY1:=FILTER(GGG,10);<br />
STICKLINE(HRY1,10,5,3,0),COLORFF0000;<br />
DRAWTEXT(HRY1,5,'M背'),COLORFF0000;<br />
A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));<br />
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));<br />
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));<br />
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));<br />
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));<br />
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));<br />
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));<br />
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));<br />
KDJ底背:FILTER(IF(B2>0,-1,0),13),linethick0;<br />
STICKLINE(KDJ底背,-10,-5,3,0),COLORFF00FF;<br />
DRAWTEXT(KDJ底背,-5,'K背'),COLORFF00FF;<br />
RSI底背:FILTER(IF(B3>0,-1,0),13),linethick0;<br />
STICKLINE(RSI底背,-10,-5,3,0),COLOR0000FF;<br />
DRAWTEXT(RSI底背,-5,'R背'),COLOR0000FF;<br />
KDJ顶背:FILTER(IF(D2>0,1,0),13),linethick0;<br />
STICKLINE(KDJ顶背,10,5,3,0),COLORFFFF00;<br />
DRAWTEXT(KDJ顶背,5,'K背'),COLORFFFF00;<br />
RSI顶背:FILTER(IF(D3>0,1,0),13),linethick0;<br />
STICKLINE(RSI顶背,10,5,3,0),COLOR00FF00;<br />
DRAWTEXT(RSI顶背,5,'R背'),COLOR00FF00;<br />
DRAWTEXT(REF("KDJ.J",1)<0 AND "KDJ.J">0,-4,'短'),COLORRED ;<br />
STICKLINE(REF("KDJ.J",1)<0 AND "KDJ.J">0,-10,-5,3,0),COLOR00FFFF;<br />
AA1:=HHV(H,55);<br />
BB1:=REF(H,13);<br />
TJ1:=AA1=BB1;<br />
XX:=LLV(L,55);<br />
YY:=REF(L,13);<br />
YY1:=REF(L,21);<br />
TJ2:=XX=YY;<br />
TJ3:=XX=YY1;<br />
XG:=TJ1 OR TJ2;<br />
DRAWTEXT(TJ2,-6,'离底13'),COLOR00FF00;<br />
STICKLINE(TJ2 ,-10,-6,2,0),COLOR00FF00;<br />
DRAWTEXT(TJ3,-4,'离底21'),COLOR00FFFF;<br />
STICKLINE(TJ3 ,-10,-4,2,0),COLOR00FFFF;<br />
DRAWTEXT(TJ1,-6,'离高13'),COLOR0000FF;<br />
STICKLINE(TJ1 ,-10,-6,2,0),COLOR0000FF;<br />
LV:=MA(C,24);<br />
HR0:=HHV(HIGH,N);<br />
HRY0:=LLV(LOW,N);<br />
HRY110:=HR0*HRY0;<br />
HRY330:=SQRT(HRY110);<br />
NS1:=C>HRY330 AND HRY330 >=REF(HRY330,1) AND C>LV;<br />
STICKLINE(C>0,-10,-11.5,8,0),COLORFF0000;<br />
STICKLINE(WLT2 OR WL>WLT,-10,-11.5,8,0),COLOR00FFFF;<br />
STICKLINE(NS1,-10,-11.5,8,0),COLOR0000FF;<br />
DRAWTEXT(FILTER(NS1,21),-11,'持股'),COLORFFFFFF;<br />
DRAWTEXT(FILTER(WLT2 OR WL>WLT,13),-11,'买入'),COLOR0000FF;</p>
<p></p>
<p> </p>
页:
[1]