//IF(STRFIND(PERIODNAME,"分钟",1)>0); //散户数量:=1000000*(ZDMCCS[-1]+BDMCCS[-1]-(ZDMRCS[-1]+BDMRCS[-1]))/(SHGZG/(VOL/VOLAMOUNT));
//CJBS:=MAX(0,SUBSAMEDAY(&VOLAMOUNT));
//a:=SUBSAMEDAY(&MONEY);
//IF(FORMATTIME(1)<1)
//RETURN;
//b:=SUBSAMEDAY(&NEW);
//资流出:-SUM(IF(b< 0,a,0),0)*10,colorgreen;
//ZNZ_CMACD;
a:=MONEY/VOL;
a1:=MA(a,5);
a2:=MA(a,13);
cmacd:500*(a1-a2)/a2+50,colorwhite;
//VR;
JC:=AMOUNT/VOL;//MONEY;
LC:=REF(JC,1);
VR:=SUM(IF(JC>LC,AMOUNT,0),26)/SUM(IF(JC<=LC,AMOUNT,0),26)*100,colorcyan;
VRM:=EMA(VR,5),coloryellow;
VR1:=CROSS(VR,145) OR ( CROSS(VR,190) AND COUNT(CROSS(VR,145),5)>0 ) OR ( CROSS(VR,245) AND COUNT(CROSS(VR,190),5)>0 );
VR2:IF(VR1,73,DRAWNULL),colormagenta,LINETHICK1,CROSSDOT;//CIRCLEDOT,CROSSDOT;
VR3:IF(VR1,83,DRAWNULL),colormagenta,LINETHICK1,CROSSDOT;
//主力雷达;
ZL:=EMA((CLOSE-MA(CLOSE,10))/MA(CLOSE,10),4)*120;
十日主力:IF(ZL>30,30,IF(ZL<=-30,-30,ZL)),colorred,NODRAW;
DRAWBAND(十日主力,RGB(255,0,0),0,RGB(255,255,0));
STICKLINE(CROSS(ZL,1),17,0,2,1),colorred;
//主力弱:IF( (十日主力-REF(十日主力,1))<=0.1,十日主力+3,DRAWNULL ),colorgreen,LINETHICK2;
STICKLINE(ZL-REF(ZL,1)<=0 AND ZL>0,ZL+5,ZL+2,10,0),colorgreen;
//深市用aa:VOL/VOLAMOUNT; 沪市aa:VOL/CJBSL2[-1];
笔均量:=MAX(0,VOL/VOLAMOUNT);
笔均量M:=EMA(笔均量,30);
MC:=(H+O)/2;
DC:=(L+O)/2;
空心笔均差:(笔均量-笔均量M)/笔均量M*120,colorwhite,NODRAW;
BJC:=IF(空心笔均差-35>-10,25,空心笔均差);
STICKLINE(笔均量>笔均量M AND C>MC,BJC-35,-35,8,1),colorred;
STICKLINE(笔均量>笔均量M AND C<MC AND C<DC,BJC-35,-35,8,1),colorgreen;
STICKLINE(笔均量>笔均量M AND C<MC AND C>DC,BJC-35,-35,8,1),colorwhite;
//获利盘比差;
WN:=WINNER(C)*100;
WN1:=REF(WINNER(C)*100,1);
实心获利盘比差:(WN-WN1),colorwhite,NODRAW;
HLPBC:=ABS(实心获利盘比差)*3;
STICKLINE(C>REF(C,1),50-HLPBC,50,2,0),colorred;
STICKLINE(C<REF(C,1),50-HLPBC,50,2,0),colorgreen;
N:=19;
VAR1:=HHV(HIGH,N);
VAR2:=LLV(LOW,N);
//短线:EMA((CLOSE-VAR2)/(VAR1-VAR2),3)*100,colorFF80FF;
操作线:EMA((CLOSE-VAR2)/(VAR1-VAR2),5)*100,colorred,LINETHICK2;
阻力线:EMA((CLOSE-VAR2)/(VAR1-VAR2),19)*100,COLORF0F000,LINETHICK2;
冲刺:=CROSS(操作线,73) AND (操作线-阻力线)<25;//COUNT(CROSS(阻力线,51.5),5)>0;
小顶:=CROSS(操作线,73) AND (操作线-阻力线)>=25;//COUNT(CROSS(阻力线,51.5),5)<1;
反抽:=(CROSS(操作线,15) OR CROSS(操作线,20)) AND 阻力线-REF(阻力线,1)>-2.5;
STICKLINE(冲刺,93,73,2,0),colormagenta;
STICKLINE(小顶,93,73,2,0),colorgreen;
STICKLINE(反抽 AND PERIODNAME<>"日线",93,73,2,0),colormagenta;
金叉:=CROSS(操作线,阻力线) AND REF(HHV(阻力线,24),2)<63;
DRAWTEXT(金叉,70,'金叉'),colorred;
STICKLINE(金叉,93,63,2,0),colorred;
金叉区:=COUNT( CROSS(阻力线,操作线),BARSLAST(CROSS(操作线,阻力线)) )<1;
金叉洗盘:=金叉区 AND 阻力线>REF(阻力线,1) AND ZL-REF(ZL,1)>0.2 AND REF(操作线,1)=LLV(操作线,3);
XPC:=REF(C,REF(BARSLAST(金叉洗盘),1)+1);
上次洗盘收:=IF(COUNT(金叉洗盘,12)>1,XPC,0),NODRAW;
JCXP:=金叉洗盘 AND IF(阻力线>73,IF(C>上次洗盘收,1,0),1);
STICKLINE(JCXP,93,73,2,0),coloryellow;
DRAWTEXT(金叉洗盘 AND C<上次洗盘收 AND 阻力线>73,70,'顶背'),colorgreen;
//小顶信号内操盘线增幅小于3;
DRAWICON(FILTER( BARSLAST(小顶)<=4 AND 操作线-REF(操作线,1)<2.5,3 ) ,操作线,2);
//高位下80卖出;
//DRAWICON(FILTER( CROSS(83,操作线) OR CROSS(78,操作线),3 ) AND 阻力线<63 ,83,2);
H1:83,COLOR408000;
H2:73,COLOR408000;
//启动位:-25,colorwhite;
XG:IF( (金叉 OR JCXP OR 反抽 OR 冲刺) AND 笔均量>笔均量M*1.03,80,100),coloryellow,LINETHICK1;
MA18:=MA(C,18);
空仓区:C<MA18*0.996 AND MA18<=REF(MA18,1),colorgreen,NODRAW;
STICKLINE(空仓区,98,95,12,0),COLOR00CC00;
死叉区:=COUNT( CROSS(操作线,阻力线),BARSLAST(CROSS(阻力线,操作线)) )<1;
STICKLINE(死叉区,95,92,12,0),COLOR00CC00;
//10日主力上移;
STICKLINE(ZL-REF(ZL,1)>0 AND ZL<0 AND ISNULL(空仓区),ZL-5,ZL-2,10,0),colorred;
//14日线上移 同时考量个股与大盘;
GG:=REF(EMA(C,14),1),colorliblue,NODRAW;
GGX:=(EMA(C,14)-GG)/GG*100;
DP:=REF(EMA(INDEXC,14),1);
DPX:=(EMA(INDEXC,14)-DP)/DP*100;
STICKLINE(DPX>=0 AND GGX>=0,104,108,12,0 ),COLOR0000CC;
STICKLINE(DPX<0 AND GGX<0,104,108,12,0),COLOR00CC00;
STICKLINE(NOT(DPX>=0 AND GGX>=0) AND NOT(DPX<0 AND GGX<0),104,108,12,0),COLOR00CCFF;
//{45度攻击};
X1:=(3*C+L+H+O)/6;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
T1:=FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10);
|
