上红下绿指标 通达信公式(附图)

[复制链接]
查看137 | 回复0 | 2021-8-20 15:30:06 | 显示全部楼层 |阅读模式

M1:=5;
SHORT:=12;
LONG:=26;
MID:=9;
V100:MA(V,100),LINETHICK3,COLOR000000;
DRAWBAND(V,RGB(255,255,255),V100,RGB(255,255,168));
TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<0.5,TOTAL,MTIME);
VVOL:IF((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VOL*TOTAL/CTIME,DRAWNULL),NODRAW;
STICKLINE((CURRBARSCOUNT=1 AND DYNAINFO(8)>1),VVOL,0,-1,-1),COLOR00C0C0;
虚拟倍量:=VVOL/REF(V,1);
DRAWNUMBER(虚拟倍量>1,VVOL,ROUND(虚拟倍量));
VOLUME:VOL,VOLSTICK;
MAVOL1:MA(VOLUME,M1);
倍量:=VOL/REF(VOL,1)>=1.5;
缩量:=REF(VOL,1)/VOL>=1.5;
DRAWNUMBER(倍量,V,ROUND(V/REF(V,1))),COLORRED;
DRAWNUMBER(缩量,V,ROUND(REF(V,1)/V)),COLORBLUE;
{MACD}
DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:EMA(DIF,MID);
MACD:(DIF-DEA)*2,COLORSTICK;
{上绿下红};
{BARSLAST(C<=O);上个阴线位置}
上个阴:BARSLAST(C<=O);
大于顶:C>REF(O,上个阴);
大于量:V>REF(V,上个阴);
上绿下红:MACD<=0 AND C>O AND C>REF(O,上个阴) AND V>REF(V,上个阴);
DRAWICON(FILTER(上绿下红,4),V,1);

154151W41160-31102.jpg

154151W41160-31102.jpg

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则