B:ZIG(3,10),coloryellow;
G:=MA(B,2),colorred;
D:=EMA(B,34),colorgreen;
J:=EMA(B,144),colorligreen;
DRAWICON(CROSS(B,G),B-0.1,1);
DRAWICON(CROSS(G,B),G+0.1,2);
//DRAWTEXT(CROSS(B,G),B*0.85,"建"),coloryellow;
//DRAWTEXT(CROSS(G,B),G,"清"),colorgreen;
F:=100*(C-REF(C,1))/REF(C,1);
JD:=IF(CS1:=JD;
MR:=IF(CS2:=MR;
A1:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,3) ,REF(ZIG(3 ,3),1));
A2:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,5) ,REF(ZIG(3 ,5),1));
//DRAWTEXT(A1 AND A2 OR D<0,B,'加仓'),coloryellow;//加仓买
//DRAWICON(A1 AND A2,B-0.2,1);
VAR3:=PEAKBARS(3,5,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:=IF(顶>REF(顶,1),1,0),STICK,colorcyan, LINETHICK2;//
//DRAWTEXT(顶A=1,B*1.1,'减仓'),colorgreen;
DRAWICON(顶A=1,B,2);
A11:LLV(LOW,144),colormagenta;
//DRAWICON(A11==REF(A11,1) AND REF(A11,1)//DRAWICON(A11//DRAWICON(A11>REF(A11,1) AND REF(A11,1)==REF(A11,2),A11,1);
MID:=MA(CLOSE,26);
UPPER:=MID + 2*STD(CLOSE,26),colorwhite;//上轨
UPPER1:=MID + 1.618*STD(CLOSE,26),colorred;//上轨
LOWER:=MID - 2*STD(CLOSE,26),coloryellow;//下轨
LOWER1:=MID - 1.618*STD(CLOSE,26),colorgreen;//下轨
//DRAWTEXT(CROSS(CLOSE,LOWER),J*1.05,"L"),coloryellow;;
//DRAWTEXT(CROSS(CLOSE,UPPER),J*1.05,"L"),colorgreen;
DRAWICON(CROSS(B,A11),B,1);
DRAWICON(CROSS(A11,B),B,2);
VERLINE(CROSS(B,G) AND (A1 AND A2 OR D<0),1),colorlimagenta;//画加仓建仓垂线
VERLINE(CROSS(G,B),1),colorcyan;//画清仓垂线
STICKLINE(A11REF(B,1),B,A11,0.8,0),colorred;
STICKLINE(A11DRAWTEXT((CROSS(B,G) AND (A1 AND A2 OR D<0)) OR CROSS(B,G),A11*0.95,'B'),coloryellow;//建仓加仓买
STICKLINE(A11>B AND B>REF(B,1),B,A11,0.8,0),colorred;
STICKLINE(A11>B AND BA34:=LLV(B,34),coloryellow;
A55:=LLV(B,55),coloryellow;
A144:=LLV(B,144),coloryellow;
AA:=(CROSS(B,G) AND (A1 AND A2 OR D<0)) OR CROSS(B,G);
POLYLINE(AA==1,REF(B,1)),coloryellow;
CC:=CLOSE,colorwhite;
DD7:DYNAINFO(7),nodraw;
DD1:=DYNAINFO(1),nodraw;
DD2:=DYNAINFO(2),nodraw;
DD3:=DYNAINFO(3),nodraw;
DD4:=DYNAINFO(4),nodraw;
DD5:=DYNAINFO(5),nodraw;
DD6:=DYNAINFO(6),nodraw;
DD7:=DYNAINFO(7),nodraw;
DD9:=DYNAINFO(9),nodraw;
DD11:=DYNAINFO(11),nodraw;
DD20:=DYNAINFO(20),nodraw;
DD21:=DYNAINFO(21),nodraw;
DD28:=DYNAINFO(28),nodraw;
DD29:=DYNAINFO(29),nodraw;
DD30:=DYNAINFO(30),nodraw;
E:=TFILT(CLOSE,DATE+19000000,0,DATE+19000000,0),nodraw;
E1:=DLOW,nodraw;
E2:=IF(CODELIKE('600'),6,3),nodraw;
E3:=BARSLAST(CLOSE/REF(CLOSE,1)>=1.095),nodraw;//上一条件成立位置 上一次条件成立到当前的周期数
E4:=TFILT(CLOSE,DATE+19000000-E3,0,DATE+19000000-E3,0),nodraw;
E5:=BARSSINCE(CLOSE/REF(CLOSE,1)>=1.095,E3),nodraw;
E6:=CONST(CLOSE),nodraw;
E7:=REFDATE(CLOSE,DATE-1),nodraw;
THEYEAR := 1900*10000;
DATE1:= 20180703 - THEYEAR ;
DATE2:= 20180702 - THEYEAR ;
收盘0703:=REFDATE(CLOSE,DATE1),nodraw;
收盘0702:=REFDATE(CLOSE,DATE2),nodraw;
E8:=REF(C,BARSLAST(DATE=20180702)),nodraw;
指定日期:=YEAR==2016 AND MONTH==7 AND DAY==3,NODRAW;
当日收盘:=REF(CLOSE,BARSLAST(指定日期));
昨日收盘:=REF(CLOSE,BARSLAST(YEAR==2018 AND MONTH==7 AND DAY==2));
//MACD
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
DRAWTEXT(CROSS(DIFF,DEA),A11,"M"),coloryellow;
DRAWTEXT(CROSS(DEA,DIFF),A11,"M"),colorgreen;
H1:HOD(H,144),nodraw;
L1:LOD(L,144),nodraw;
DRAWTEXT(H1=144 AND L1=1 AND B>A11,A11*0.95,"HL"),colorred;
LLV1:LLVBARS(L,21),nodraw;
DRAWNUMBER(REF((CROSS(B,G) AND (A1 AND A2 OR D<0)) OR CROSS(B,G),1),A11*0.95,TOSTRING(A11,2));
能量资金谱:
结合能量潮,分析大资金进出,明确标注主力筹码状况。(副图公式)( 顶尖财经 股票学院: )
OBV:=MA(SUM(IF(C>REF(C,1),VOL,IF(COBVE:=EMA(OBV,2);
OBVDIFF := EMA(OBVE,3) - EMA(OBVE,8);//
ZLCM:=EMA(WINNER(CLOSE)*70,3);//主力筹码估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);//散户筹码估算
ZSHTL:=SHCM/(ZLCM+SHCM)*100;//散户套牢筹码比率
SH8:=EMA(ZSHTL,8);
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;//主力控盘筹码比率
zzlkp5:=MA(zzlkp,5);
zzlkpDiff:=EMA(EMA(EMA(zzlkp-zzlkp5,2),2),2);
ZCMZL:=MA(ZLCM+SHCM,13);//市场筹码总量
ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);//走牛天数
ZSHJJ:=EMA(ZSHTL,89);//散户警戒}
ZZLJJ:=EMA(ZZLKP,89);//主力警戒}
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);//资金流入强度
ZJLRqd3:=MA(ZJLRqd,3);
STICKLINE(zzljj>REF(zzljj,1) AND zzlkp>zzlkp5 AND OBVDIFF>0 AND EMA(OBVE,3) >REF(EMA(OBVE,3) ,1),110,114,8,0),coloryellow;
STICKLINE( (SH8>zshtl OR SH80,100,104,8,0),colormagenta;
主力持仓:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3);
指数趋势:=EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3);
主力筹码集中度:=WINNER(C)*100;//分析家公式网
STICKLINE(C>0,20,20,5,1),coloryellow;
STICKLINE(C>0,80,80,8,1),colorblue;
STICKLINE(主力筹码集中度>主力持仓 AND ZZLKP>ZZLKP5 AND ZJLRQD>0 ,80,80,8,1),colormagenta;
FILLRGN(zzlkp,zzlkp5,zzlkp>zzlkp5,colorred,zzlkp
zjlUp:=ZJLRqd-MA(ZJLRqd,5)+ZJLRqd;
FILLRGN(ZJLUP,ZJLRqd,ZJLUP>ZJLRqd,coloryellow,ZJLUP
DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);//散户套牢筹码}
DRAWTEXT(ZCMZL>REF(ZCMZL,1) AND SH8DRAWTEXT(DKB ,95,'拉'),colorwhite;
DRAWTEXT(ZJLRqd>0 AND ZJLRqd<10 AND ZJLRqd>ZJLRqd3 ,90,'主'),colorwhite;
DRAWTEXT(ZJLRqd>=10 AND ZJLRqd>ZJLRqd3 ,90,'超'),colorwhite;
STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,4,0),colorgreen; //主力控盘筹码}
ZJLRqddiff:=EMA(EMA(EMA(ZJLRqd-ZJLRqd3,2),2),2);
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,4,0),colorlired; //筑底散兵坑}
STICKLINE(ZZLJJ>REF(ZZLJJ,1) AND ZJLRqd>ZJLRqd3,ZZLKP,ZZLJJ,4,0),colorred; //筑底散兵坑}
STICKLINE(ZSHTL>=90,ZZLKP,0,5,0),COLOR66FFCC; //底部:(ZSHTL>=90),COLOR66FFCC;} {筹码总量上升} IF(ZCMZL,ZCMZL>REF(ZCMZL,1),DRAWNULL),COLOR0066FF,LINETHICK1; {增量资金}; {//------【数值显示】}
散户套牢系数:INTPART(ZSHTL),colorgreen,Linethick2;
主力控盘系数:INTPART(ZZLKP),colorred,Linethick2;
资金流入强度:ZJLRQD,LINETHICK2,colorgray;
主力资金:IF(资金流入强度>0,资金流入强度,DRAWNULL),colorred,Linethick2;
市场筹码总量:INTPART(ZCMZL),colorwhite,NODRAW;
轴:50,colorgreen,DOTLINE,LINETHICK1;
DRAWTEXT(CROSS(主力控盘系数,轴),轴+10,'高度控盘'),coloryellow;
锁仓OK:= ZJLRQD>ZJLRQD3 AND ZJLRQD>0;
//STICKLINE(zjlrqd>0 AND zzlkpDiff>0,107,107+zzlkpDiff,8,0),colorlired;
//STICKLINE(zjlrqd>0 AND zzlkpDiff>0 AND (zzlkpDiff>REF(zzlkpDiff,1) OR ZJLRqd>ZJLRqd3),107,107+zzlkpDiff,8,0),colorred;
STICKLINE(zzlkp>30 AND zzlkp>MA(zzlkp,5) AND zzljj>REF(zzljj,1) AND ZJLRqd>0 AND C>EMA(C,12),109,105,8,0),colorred;
STICKLINE( 锁仓OK AND zzlkp>30 AND zzlkp>MA(zzlkp,5) AND zzljj>REF(zzljj,1) AND ZJLRqd>0 AND C>EMA(C,12),109,105,8,0),colormagenta;
DRAWTEXT(DKB ,95,'拉'),colorwhite;
DRAWTEXT(ZJLRqd>0 AND ZJLRqd<10 AND ZJLRqd>ZJLRqd3 ,90,'主'),colorwhite;
DRAWTEXT(ZJLRqd>=10 AND ZJLRqd>ZJLRqd3 ,90,'超'),colorwhite;
鱼头鱼肚:IF(DKB AND ZJLRqd>0 AND ZJLRqd>ZJLRqd3, 50,0),colorwhite,Linethick2;
整个鱼:IF(zzlkp>zzlkp5 AND ZJLUP>ZJLRqd, 80,0),colorwyellow,Linethick2;
波动副图:
TR1:=MAX(HIGH-LOW,HIGH-REF(CLOSE,1));
xt:=MAX(TR1,REF(CLOSE,1)-LOW);
yt:MA((EMA(xt,39)/CLOSE)*100,10),coloryellow;
yn:MA((TMA(xt,19/20,1/20)/CLOSE)*100,5),colorgreen;//与上同
DRAWICON(yt>REF(yt,1) AND REF(yt,1)DRAWICON(ytREF(yt,2),yt,2);
////////////////////////////////////////////////////////
N:=21;
M:=21;
VPT:=SUM(VOL/EMA(VOL,N)*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1),0);
MAVPT:=EMA(VPT,M);
A:=(VPT-MAVPT)*50,colorwhite;
AA:=(EMA(A,3))*2,coloryellow;//
BB:=EMA(AA,3),colorred;//
CC:=0,colorcyan;
//DRAWICON(CROSS(yt,0),0-0.02,1);
//DRAWICON(CROSS(0,yt),0+0.02,2);
////////////////////////////////////////////////////////
B:=ZIG(3,10),colorred;
G:=MA(B,2),coloryellow;
D:=EMA(B,34),colorgreen;
J:=EMA(B,144),colorligreen;
//DRAWICON(CROSS(B,G),B-0.1,1);
//DRAWICON(CROSS(G,B),G+0.1,2);
DRAWTEXT(CROSS(B,G),yt,"建仓"),coloryellow;
DRAWTEXT(CROSS(G,B),yt,"清仓"),colorgreen;
F:=100*(C-REF(C,1))/REF(C,1);
JD:=IF(CS1:=JD;
MR:=IF(CS2:=MR;
A1:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,3) ,REF(ZIG(3 ,3),1));
A2:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,5) ,REF(ZIG(3 ,5),1));
DRAWTEXT(A1 AND A2 OR D<0,yt,'加仓'),coloryellow;
DRAWICON(A1 AND A2,yt,1);
VAR3:=PEAKBARS(3,5,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:=IF(顶>REF(顶,1),1,0),STICK,colorcyan, LINETHICK2;//
DRAWTEXT(顶A=1,yt,'减仓'),colorgreen;
DRAWICON(顶A=1,yt,2);
////////////////////////////////////////////////////////////////
DRAWTEXT(A>REF(A,1) AND REF(A,1)DRAWTEXT(CROSS(G,B) ,yt,"Sell"),colorgreen;