通达信公式灾后自救专用版主图及选股

[复制链接]
查看28 | 回复0 | 2022-6-27 20:21:26 | 显示全部楼层 |阅读模式

HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HH,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);
XL:=REFX(L,BARSNEXT(T1=0));
亏损:(REF(C,TT)-REF(C,T+1))/REF(C,T+1)*100 NODRAW;
ZF:=(C-REF(C,T+1))/REF(C,T+1)*100;
回本:ZF COLORMAGENTA,NODRAW;
{分析家公式网www.70822.com}
高位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,HH,ISLASTBAR,REF(HH,T),0),COLORYELLOW;
NOTEXT1:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*0.382+XL,ISLASTBAR,REF((HH-XL)*0.382+XL,T),0),DOTLINE,COLORGREEN;
NOTEXT2:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,(HH-XL)*0.618+XL,ISLASTBAR,REF((HH-XL)*0.618+XL,T),0),DOTLINE,COLORLIMAGENTA;
低位价:DRAWLINE(CURRBARSCOUNT=CONST(T)+1,XL,ISLASTBAR,REF(L,T1),0),COLORRED;
DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT1*1.04,VARCAT(VARCAT("第一阻力:",VAR2STR(NOTEXT1,2)),"元")),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=CONST(T)+1,NOTEXT2*1.04,VARCAT(VARCAT("第二阻力:",VAR2STR(NOTEXT2,2)),"元")),COLORLIMAGENTA;

{
选股公式:

HH:=IF(BETWEEN(DATE,1150601,1150630),H,-999);
T:=HHVBARS(HH,0);
TT:=BARSLAST(L=LLV(L,T+1));
T1:=BARSLAST(CURRBARSCOUNT=CONST(TT)+1);
H1:=REF(H,T);
H2:=(REF(H,T)-REF(L,T1))*0.382+REF(L,T1);
H3:=(REF(H,T)-REF(L,T1))*0.618+REF(L,T1);
XG:CROSS(C,H1) OR CROSS(C,H2) OR CROSS(C,H3);
}
 

p201961921481825267.jpg

p201961921481825267.jpg

201961921481267021.rar

2.52 KB, 下载次数: 0

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

201961921481267021.rar

回复

使用道具 举报

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

本版积分规则