通达信四度赤水副图源码说明

[复制链接]
查看35 | 回复0 | 2022-7-24 04:19:34 | 显示全部楼层 |阅读模式

四度赤水

bc:=(IF(C>(H+L+C)/3,(H*0.618+L*0.382)*0.382,(H*0.382+L*0.618)*0.382)+(O*0.382+C*0.618)*0.618);
市价:=AMOUNT/(VOL*100);
 MX:=if(INDEXC=C,BC,市价);
M1:=EMA(MX,N),COLORWHITE;
 M2:=EMA(M1,N*2),COLORMAGENTA;
 M3:=EMA(M2,n*3),COLORGREEN;
 ZD:=MAX(MAX(M1,M2),M3);
 ZX:=MIN(MIN(M1,M2),M3);

粘合度:(ZD/ZX-1)*100,COLORWHITE;
 M1角:=ATAN((M1/REF(M1,1)-1)*100)*180/3.1416;
 M2角:=ATAN((M1/REF(M1,1)-1)*100)*180/3.1416;
 M3角:=ATAN((M1/REF(M1,1)-1)*100)*180/3.1416;
角度:-(M1角+M2角+M3角)/18,COLORMAGENTA;
赤水:IF(角度>0,角度,DRAWNULL),COLORGREEN;
 LBA:=(VOL/ref((MA(AMOUNT,5)/(MA(c,5)*100)),1));
 LBB:=(MA(VOL,5)/ref((SUM(AMOUNT,15)/(MA(c,15)*100)),1));
 V1:=MA((LBA+LBB)/2,35),COLORWHITE;
 V2:=EMA(V1,5),COLORMAGENTA;
 V3:=EMA(V2,13),COLORGREEN;
 VD:=MAX(MAX(V1,V2),V3);
 VX:=MIN(MIN(V1,V2),V3);
集中度:(VD/VX-1)*100,COLORAAAA00;
尺度:0,COLORGRAY;


 

830433779.png

830433779.png

 

回复

使用道具 举报

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

本版积分规则