|
以下是通达信主力进场源码（无源码的请下载附件导入）
朋友送的指标！分享分大家。同时我希望哪位老师能改编一下。思路是想在大于前5天平均量80%时出现信号。如果指标和哪位老师的一样请原谅。
{主力}大资金进场红:0,COLORRED;
{主力}主力资金进场黄:0,COLORYELLOW;
{主力}主力金洗盘蓝: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,1.5,1),COLORGREEN;
STICKLINE(CC>REF(CC,2),CC,0,1.5,1), COLORRED;
大资金出场:IF(CROSS(AA,BB),5,0),STICK,LINETHICK4,COLORMAGENTA;
大资金洗盘:IF(CROSS(BB,AA),-5,0),STICK,LINETHICK3,COLORLIBLUE;
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,2,0 ),COLORRED;
洗盘:STICKLINE(VAR5<REF(VAR5,1),0,VAR5,2,0),COLORGREEN;{绿}
主力进场阳:STICKLINE(VAR5>REF(VAR5,1) AND C>O,0,VAR5,2,0 ),COLORYELLOW;
洗盘阴:STICKLINE(VAR5<REF(VAR5,1) AND C<O,0,VAR5,2,0),COLORBLUE;
MA3:=MA(CLOSE,M3);
MA5:=MA(CLOSE,M5);
均启:CROSS(MA3,MA5)STICK;
DRAWTEXT(均启,H*0.1,'均线启动'),COLORWHITE;
反:DRAWTEXT(CROSS(AA,BB)AND AA<-3,20,'反'),COLORRED;
40477646.jpg
}
41222797.rar
(3.45 KB, 下载次数: 0, 售价: 4 金钱)
|
