通达信分时心理指标公式

[复制链接]
查看220 | 回复0 | 2022-7-24 07:07:38 | 显示全部楼层 |阅读模式

通达信分时心理指标公式

N:=13;M:=3;P:=34;
 PSY:COUNT(CLOSE>REF(CLOSE,1),N)/N*100,COLOR00FFFF;
 PA:MA(PSY,M),COLOR0000FF;
 PAP:MA(PSY,P),COLOR00FFFF,LINETHICK1;
 DRAWBAND(PSY,RGB(200,0,0),PA,RGB(0,100,50));
 TJ11:=CROSS(PSY,PA) AND PA<16;
 TJ12:=CROSS(PSY,PA) AND PA<10;
 TJ1:=TJ11 OR TJ12;
 TJ10:=FILTER(TJ1,8);
 TJ2:=LONGCROSS(PA,PAP,21);
 DRAWICON(TJ10,PA,25);
 DRAWICON(TJ2,PAP,23);
 SL1:=CROSS(PA,PSY) AND PA>70;
 SL2:=CROSS(80,PA);
 SL:=FILTER(SL1 OR SL2,5);
 DRAWICON(SL,PA,19);
 V1:=(C+H+L)/3;
 MA3:=MA(V1,5);
 MA5:=MA(V1,13);
 N1:=BARSLAST(CROSS(MA3,MA5));
 N2:=BARSLAST(CROSS(MA5,MA3));
 N8:=IF(N1<N2,N1+1,0-N2-1);
 STICKLINE(N8>0,0,2,3,0),COLOR0000FF;
 STICKLINE(N8<0,0,2,3,0),COLOR00FF00;
 JJ:=DYNAINFO(11) ;
 TJ4:=FILTER((C-JJ)/JJ<-0.02 AND PA<16,13);
 STICKLINE(TJ4,20,0,6,0),COLOR00FFFF;
 TJ5:=FILTER((C-JJ)/JJ<-0.04 AND PA<16,13);
 STICKLINE(TJ5,20,0,6,0),COLOR0000FF;
 TJ6:=FILTER((C-JJ)/JJ>0.02 AND PA>60,13);
 STICKLINE(TJ6,80,60,6,0),COLORFF0000;
 TJ7:=FILTER((C-JJ)/JJ>0.05 AND PA>60,13);
 STICKLINE(TJ7,80,60,6,0),COLOR00FF00;
 DRAWTEXT(TJ4 OR TJ5 ,20,'买'),COLORFF00FF;
 DRAWTEXT(TJ6 OR TJ7 ,60,'卖'),COLOR00FF00;
 

72688693.jpg

72688693.jpg

回复

使用道具 举报

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

本版积分规则