DRAWGBKLAST(v>1,STRIP(RGB(0,0,205),RGB(60,179,113),0));
OBVf:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,1);
obve:=ema(obvf,3);
RSVd:=(obve-LLV(obve,6))/(HHV(obve,6)-LLV(obve,6))*100;
Kddd:=SMA(RSVd,2,1);
Dddd:=SMA(Kddd,2,1);
Jddd:=3*Kddd-2*Dddd;
Var1ddd:=hhv(c/ref(c,1),4)>1.05 and l>llv(c,4) and Dddd<50;
DRAWTEXT(if(cross(jddd,Dddd),50,0),-35,'obv叉'),align1,COLORRED;
DRAWTEXT(if(Var1ddd and cross(Kddd,Dddd),50,0),-55,'obv低叉'),align1,COLORRED;Var1z:=(CLOSE*2+HIGH+LOW)/4*3;
Var2z:=EMA(Var1Z,13)-EMA(Var1Z,34);
Var3Z:=EMA(Var2Z,5);
Var4Z:=2*(Var2Z-Var3Z)*5.5;
主力: var4Z*18,COLORred,linethick2 ;
drawtext(cross(主力,0),主力,'注意');
partline(主力, 主力>=ref(主力,1),rgb(255,0,0), 主力<ref(主力,1),rgb(0,250,0)),linethick3;
重心:=(2*C+H+L+O)/5;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
偏差量:=重心-BBI;
RSV:=(偏差量-LLV(偏差量,9))/(HHV(偏差量,9)-LLV(偏差量,9))*100;
K:SMA(RSV,3,1),LINETHICK1,COLORffffff;
d:SMA(K,3,1),LINETHICK1,COLORyellow;
J:3*K-2*D,LINETHICK1,COLORwhite;
买入:=ref(J,1)<ref(D ,1) and J>=D;
drawicon(买入,J*1,1);
卖出:=ref(J,1)>ref(D,1) and J<=D;
drawicon(卖出,D*1,6);
partline(J,J>=ref(J,1),rgb(255,0,0),J<ref(J,1),rgb(0,250,0)),linethick3;
RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
varj4:=SMA(RV,3,1);
varj5:=SMA(varj4,3,1);
KK:=EMA(SMA(RG,3,1),2);
DD:=SMA(KK,3,1);
DRAWICON(cross(varj4,varj5) and varj5<30,2,7);
DRAWICON(cross(varj5,varj4) and varj5>30,97,8);
DRAWTEXT(cross(varj4,varj5) and cross(KK,DD),37,'共*振'),align1,COLORred;
jhit80:=CROSS(100,j);
DRAWTEXT(jhit80,100,'卖出'),align1,ColorYELLOW;
Var2:=(2*CLOSE+HIGH+LOW)/4;
Var3:=IF(YEAR>=2099 AND MONTH>2,0,1);
Var4:=LLV(LOW,5);
Var5:=HHV(HIGH,4);
散户:=EMA((Var2-Var4)/(Var5-Var4)*100,4)*Var3;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*Var3;
DRAWTEXT(CROSS(散户,庄家) AND 散户<50 AND 29<散户,-5,'短进'),align1,COLOR00FF00;
DRAWTEXT(CROSS(庄家,散户) AND 散户>40 AND 71>散户,120,'短出'),align1,COLOR00FFFF;
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,0,'低吸'),align1,COLOR3399CC;
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,90,'高减'),align1,COLORFFFF33;
月K:="KDJ.K"(89,3,3);
月D:="KDJ.D"(89,3,3);
周K:="KDJ.K"(27,3,3);
周D:="KDJ.D"(27,3,3);
日K:="KD.K"(5,3,3);
日D:="KD.D"(5,3,3);
DRAWTEXT(IF(CROSS(日K,日D),50,0),20,'日叉'),align1,COLORFFFFFF;
DRAWTEXT(IF(CROSS(周K,周D),30,0),10,'周叉'),align1,COLORRED;
DRAWTEXT(IF(CROSS(月K,月D),20,0),30,'月叉'),align1,COLORYELLOW;
RSVh:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Kh:=SMA(RSVh,3,1);
Dh:=SMA(Kh,3,1);
A2:=BARSLAST(REF(CROSS(Kh,Dh),1));
B2:=REF(C,A2+1)>C AND REF(Kh,A2+1)<Kh AND CROSS(Kh,Dh);
KDJ底背离:STICKLINE(FILTER(B2>0,5),0,1,3,0),COLORYELLOW;
DRAWTEXT(FILTER(B2>0,5),-20,'KDJ底背'),COLORYELLOW;
C2:=BARSLAST(REF(CROSS(Dh,Kh),1));
D2:=REF(C,C2+1)<C AND REF(Kh,C2+1)>Kh AND CROSS(Dh,Kh);
DRAWTEXT(FILTER(D2>0,5),90,'KDJ顶'),COLORRED;
AAE:= WINNER(CLOSE+CLOSE*15/100)*100;
BBE:= WINNER(CLOSE+CLOSE*0/100)*100;
CCE:= AAE-BBE;
DDE:= (WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
EEE:= CCE<3 AND DDE<0.5 ;
AE1:= DYNAINFO(6);
AE2:= IF(LOW>AE1,0,IF(HIGH<AE1,1,(AE1-LOW+0.01)/(HIGH-LOW+0.01)));
AE3:= VOL/WINNER(LOW);
AE4:= REF(HHV(CLOSE,120),1);
AE5:= REF(LLV(CLOSE,120),1);
AE6:= 100*(CLOSE-AE5)/(AE4-AE5);
AE7:= AE2>0 OR AE2=1;
AE8:= AE7 AND AE3/REF(AE3,3)>=3 AND AE6<80;
AE9:= REF(AE8,1) OR REF(AE8,2) OR REF(AE8,3) OR REF(AE8,4);
AE10:= AE8 AND AE9;
AE11:= IF(FILTER(AE8,3),5,0);
AE12:= FILTER(IF(FILTER(AE10,3) OR EEE,10,0),3);
DRAWTEXT(AE12, -10,'★加'),COLORRED;
drawtext(AE11, -20,'★进'),COLORYELLOW;
ffvvz:=ref(INDEXC,1)<ref(INDEXC,2) and ref(c,2)*0.95>=ref(c,1) and ref(o,1)/ref(c,1)>=1.05
and ref(c,1)<ref(o,1) and c>o and c/o>=1.05 and c>ref(o,1)
and ref(vol,1)<ref(vol,2);
DRAWTEXT(ffvvz,-60,' #冲') ,align2,colorred;
nM:=9;
m1M:=3;
m2M:=3;
RSVM:=(CLOSE-LLV(LOW,NM))/(HHV(HIGH,NM)-LLV(LOW,NM))*100;
KM:=SMA(RSVM,M1M,1);
DM:=SMA(KM,M2M,1);
JM:=3*KM-2*DM;
bbM:=MA("KDJ.J#WEEK"(9,m1M,m2M) ,5);
DRAWTEXT(IF(CROSS(JM,ref(JM,1))and bbM-ref(bbM,1)>0.2and jM<60 and bbM<50 ,50,0), LOW*0.89,'抄'),COLORRED ;
DRAWTEXT(IF(CROSS(bbM,ref(bbM,1))and jM-ref(jM,1)>10 ,50,0),LOW*0.94,'追'),COLORRED ;
MA20:=MA(CLOSE,20);
Var1HH:=(h-l)/l*100;
Var2HH:=ref(Var1HH,1) ;
Var3HH:=ref(Var1HH,2);
Var4HH:=Var2HH-Var3HH;
var5HH:=Var2HH+Var4HH;
drawtext((c/ref(c,1)-1)>Var5HH and ma20>ref(ma20,1) and C>O,50,'波动'),ALIGN1,colorred;
爆点:=(llv(l,3)=llv(l,60) and c/ref(c,1)>=1.04);
DRAWTEXT(爆点, -35,'★爆'),Colorgreen;
VARui21:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Kui2:=SMA(VARui21,3,1) ;
Dui2:=SMA(Kui2,3,1) ;
drawtext((CROSS(Kui2,Dui2) AND Dui2<10),-40,'$B'),ALIGN1,COLOR0000FF,LINETHICK2;
Varzc1:=HHV(HIGH,21);
Varzc2:=HHV(HIGH,69);
DRAWTEXT(1*(CROSS((Varzc1/MA(C,60)*0.91-0.7), (Varzc2/MA(C,60)*0.83-0.7))),50,'*宝'),align1,COLORred ;
启动追涨:=REF(CLOSE,2)/REF(OPEN,2)<0.98 AND REF(OPEN,1)< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.04 AND CLOSE/OPEN>1.03 AND CLOSE>REF(CLOSE,2) OR Var2>80 AND CAPITAL<=1500000 AND BARSCOUNT(CLOSE)>120 AND VOL/CAPITAL>0.04 AND VOL>REF(HHV(VOL,10),5)*20;
DRAWTEXT(启动追涨,40,'起@航'),ALIGn1,colorred;
均线82:=REF(C,1)/REF(C,2)<=0.93 AND BETWEEN(C/REF(C,1),1.03,0.97)
and close/ref(close,8)<=0.8 and between(ref(c,2)/ref(c,3),1.04,0.96)
and between(ref(c,3)/ref(c,4),1.04,0.96);
均:=均线82;
DRAWTEXT(均 ,35 , '&均'),ALIGN1,COLORred;
MTM:=C-REF(C,1);
DXc:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6); |
