洗盘启动(通达信公式 副图 源码 测试图)

[复制链接]
查看101 | 回复0 | 2022-6-27 14:52:29 | 显示全部楼层 |阅读模式

 洗盘启动

N1:=6;N2:=12;
Q1:=(CLOSE*VOL)/SUM(VOL,100);
A1:=MA(Q1,N1);
ZM1:=SMA(A1,N1,1);
ZM2:=SMA(A1,N2,1);
ZMF:(ZM1-ZM2)*10000,COLORSTICK,LINETHICK2;
FM:SMA(ZMF,3,1);
T1:=IF(C>MA(CLOSE,13),1,0);
T2:=IF(C<MA(CLOSE,13),1,0);
T3:=COUNT(IF(ZMF>0 AND ZMF>REF(ZMF,1),1,0),4)>=4;
T4:=COUNT(IF(ZMF<0,1,0),5)>=5;
T5:=FILTER(T1 AND T4,20);
T6:=FILTER(T2 AND T3,20);
DRAWTEXT(FILTER(T5,4),ZMF-3,'洗盘谷'),COLORGREEN;
启动线:SUM(EMA((C+L)/2,2),5)/10.158,COLORRED;
平衡线:LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),COLORFF00FF;
平台线:LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),COLORFFFFFF;
强弱线:EMA(启动线,21),COLORYELLOW;
STICKLINE(平台线<启动线,启动线,平台线,0.1,0),COLORFFCCAA;
STICKLINE(平衡线<启动线,启动线,平衡线,0.1,0),COLORRED;
VAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
VAR2:=IF((EMA((C+L)/2,3)-VAR1)*5>0,POW((EMA((C+L)/2,3)-VAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VAR1)*5,2)/10);
VAR3:=IF(VAR2>0,VAR2-0,0);
STICKLINE(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),
强弱线,强弱线+0.2,4,0),COLORFFAACC;
DRAWTEXT(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),
强弱线+0.35,'注意'),LINETHICK3,COLORFFAACC; 
DRAWICON(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),强弱线+1,1);
 

20225294183822304.png

20225294183822304.png

20225294182571845.rar

2.54 KB, 下载次数: 0

售价: 4 金钱  [记录]  [购买]

20225294182571845.rar

回复

使用道具 举报

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

本版积分规则