网友求助:
将这个(主力资金进出场)公式改成同花顺可用。先谢谢!
源码:
{主力资金进出场}
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZZLJJ:=EMA(ZZLKP,89);
ZJLRQD:=ZZLKP-ZZLJJ;
AA:=EMA(ZJLRQD,3);
BB:=EMA(AA,5);
CC:=AA-BB;
STICKLINE(CC<REF(CC,2),CC,0,1,1), COLOR00FF00;
STICKLINE(CC>REF(CC,2),CC,0,1,1), COLORRED;
主力资金进场:IF(CROSS(AA,BB),3,0),STICK,LINETHICK3,COLORFF00FF;
主力资金出场:IF(CROSS(BB,AA),-3,0),STICK,LINETHICK3,COLOR00FF00;
DRAWICON(主力资金进场>0,5,1);
DRAWICON(主力资金出场<0,-4,2);
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
VAR3:=EMA(VAR2,10);
VAR4:=LLV(LOW,33);
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),5);
主力进场:STICKLINE(VAR5>REF(VAR5,1),0,VAR5,7,0 ),COLORRED;
洗盘:STICKLINE(VAR5<REF(VAR5,1),0,VAR5,7,0),COLORGREEN;{绿}
主力进场阳:STICKLINE(VAR5>REF(VAR5,1) AND C>O,0,VAR5,7,0 ),COLORYELLOW;
洗盘阴:STICKLINE(VAR5<REF(VAR5,1) AND C<O,0,VAR5,7,0),COLORBLUE;
{主力}大资金进场黄:0,COLORYELLOW;
{主力}大资金进场红:0,COLORRED;
{主力}大资金洗盘蓝:0,COLORBLUE;
{主力}大资金洗盘绿:0,COLORGREEN;
解答如下:
//主力资金进出场
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZZLJJ:=EMA(ZZLKP,89);
ZJLRQD:=ZZLKP-ZZLJJ;
AA:=EMA(ZJLRQD,3);
BB:=EMA(AA,5);
CC:=AA-BB;
STICKLINE(CC<REF(CC,2),CC,0,7,1), COLOR00FF00;
STICKLINE(CC>REF(CC,2),CC,0,7,1), colorred;
主力资金进场:IF(CROSS(AA,BB),3,0),LINETHICK3,COLORFF00FF;
主力资金出场:IF(CROSS(BB,AA),-3,0),LINETHICK3,COLOR00FF00;
DRAWICON(主力资金进场>0,5,"BUY");
DRAWICON(主力资金出场<0,-4,"SELL");
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
VAR3:=EMA(VAR2,10);
VAR4:=LLV(LOW,33);
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),5);
//主力进场:
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,7,0 ),colorred;
//洗盘:
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,7,0),colorgreen;//{绿}
//主力进场阳:
STICKLINE(VAR5>REF(VAR5,1) AND C>O,0,VAR5,7,0 ),coloryellow;
//洗盘阴:
STICKLINE(VAR5<REF(VAR5,1) AND C<O,0,VAR5,7,0),colorblue;
大资金进场黄:0,coloryellow;
大资金进场红:0,colorred;
大资金洗盘蓝:0,colorblue;
大资金洗盘绿:0,colorgreen;