通达信公式锅里捞主图及选股

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

LT:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
HT:=FINDHIGHBARS(H,LT+1,60,1);
EXT1:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK2;
TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);
DRAWLINE(TT=0,H,LTT=0,L,0),COLORYELLOW,LINETHICK2;
EXT2:DRAWLINE(LTT=0,(EXT1-L)*0.618+L,ISLASTBAR,REF((EXT1-L)*0.618+L,LTT),0)DOTLINE,COLORLIMAGENTA;
V1:=IF(C>O OR (C=O AND C>=REF(C,1)),VOL,0);
V2:=IF(C<O OR (C=O AND C<REF(C,1)),VOL,0);
LJ:=SUM(V1,LTT)/SUM(V2,LTT);
{分析家公式网www.70822.com}
XG:=COUNT(CROSS(C>=EXT2,0.5),LTT+1)=1 AND CROSS(C>=EXT2,0.5) AND LJ>1.5;
DRAWICON(XG,L*0.95,25);
STICKLINE(XG,C,O,2,0),COLORYELLOW;
STICKLINE(XG,H,L,0,0),COLORYELLOW;
DRAWTEXT(LTT=0,L*0.98,"锅底"),COLORYELLOW;

{
选股公式:

LT:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
HT:=FINDHIGHBARS(H,LT+1,60,1);
TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);
HJ:=REF((REF(H,TT)-L)*0.618+L,LTT);
V1:=IF(C>O OR (C=O AND C>=REF(C,1)),VOL,0);
V2:=IF(C<O OR (C=O AND C<REF(C,1)),VOL,0);
LJ:=SUM(V1,LTT)/SUM(V2,LTT);
COUNT(CROSS(C>=HJ,0.5),LTT+1)=1 AND CROSS(C>=HJ,0.5) AND LJ>1.5;
}
 

p201961122231450695.jpg

p201961122231450695.jpg

20196112223948108.rar

2.34 KB, 下载次数: 0

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

20196112223948108.rar

回复

使用道具 举报

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

本版积分规则