分享

通达信首板捉妖器副图选股指标公式(附源码破译和源码)

 追梦文库 2024-01-15 发布于天津

编程思路破译

VAR1赋值:(收盘价*2+最高价+最低价)/4

VAR2赋值:VAR1的13日指数移动平均-VAR1的34日指数移动平均

VAR3赋值:VAR2的5日指数移动平均

VARA赋值:(-2)*(VAR2-VAR3)*3.8

VARB赋值:2*(VAR2-VAR3)*150

VAR4赋值:收盘价的9日指数移动平均的9日指数移动平均

主力控盘赋值:(VAR1-1日前的VAR4)/1日前的VAR4*33

A101赋值:主力控盘上穿0

无庄控盘赋值:如果主力控盘<0,返回主力控盘,否则返回0

开始控盘赋值:如果A101,返回15,否则返回0

有庄控盘赋值:如果主力控盘>1日前的主力控盘AND主力控盘>0,返回主力控盘,否则返回0

VAR5赋值:100*以收盘价*0.95计算的获利盘比例

高度控盘赋值:如果获利盘为30%的成本分布<CLOSEAND主力控盘>0,返回主力控盘,否则返回0

散户线1赋值:VARA

主力线1赋值:VARB

百万操作线赋值:收盘价的24日简单移动平均

上趋势赋值:最低价的20日简单移动平均*1.13

次上趋势赋值:最低价的20日简单移动平均*1.05

次下趋势赋值:最高价的20日简单移动平均*0.9

下趋势赋值:最高价的20日简单移动平均*0.8

ZD赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100

HDZF赋值:(20日内最高价的最高值-收盘价)/(20日内最高价的最高值-20日内最低价的最低值)

趋势强度赋值:如果收盘价>次上趋势,返回如果收盘价>上趋势,返回4,否则返回3,否则返回如果收盘价>次下趋势ANDC<次上趋势,返回2,否则返回如果收盘价<下趋势,返回0,否则返回1

BU赋值:上次收盘价=60日内收盘价的最高值距今天数

SE赋值:上次收盘价=60日内收盘价的最低值距今天数

KK1赋值:SE

KK2赋值:BU

XG赋值: KK2<=1日前的KK2 AND 趋势强度>=4 AND VARB>=1日前的VARB*2

输出选股:取反AND XG


程序源码

VAR1:=(CLOSE*2+HIGH+LOW)/4;

VAR2:=EMA(VAR1,13)-EMA(VAR1,34);

VAR3:=EMA(VAR2,5);

VARA:=(-2)*(VAR2-VAR3)*3.8;

VARB:=2*(VAR2-VAR3)*150;

VAR4:=EMA(EMA(CLOSE,9),9);

主力控盘:=(VAR1-REF(VAR4,1))/REF(VAR4,1)*33;

A101:=CROSS(主力控盘,0);

无庄控盘:=IF(主力控盘< 0,主力控盘,0);

开始控盘:=IF(A101,15,0);

有庄控盘:=IF(主力控盘>REF(主力控盘,1) AND 主力控盘>0,主力控盘,0);

VAR5:=100*WINNER(CLOSE*0.95);

高度控盘:=IF(COST(30)< CLOSE AND 主力控盘>0,主力控盘,0);

散户线1:=VARA;

主力线1:=VARB;

百万操作线:=MA(C,24);

上趋势:=MA(LOW,20)*1.13;

次上趋势:=MA(LOW,20)*1.05;

次下趋势:=MA(HIGH,20)*0.9;

下趋势:=MA(HIGH,20)*0.8;

ZD:=(C-REF(C,1))/REF(C,1)*100;

HDZF:=(HHV(H,20)-C)/(HHV(H,20)-LLV(L,20));

趋势强度:=IF(C>次上趋势,IF(C>上趋势,4,3),IF(C>次下趋势 AND C< 次上趋势,2,IF(C< 下趋势,0,1)));

BU:=BARSLAST(CLOSE=HHV(CLOSE,60));

SE:=BARSLAST(CLOSE=LLV(CLOSE,60));

KK1:=SE;

KK2:=BU;

XG:= KK2<=REF(KK2,1) AND 趋势强度>=4 AND VARB>=REF(VARB,1)*2;

选股:NOT(REF(XG,1))AND XG;

该公式包含未来函数:WINNER
未发现:LWINNER...
未发现:PWINNER...
该公式包含未来函数:COST

注:

       馆内各种公式为学习编而保存,实战使用前一定要看其中是否有未来函数并自己亲自测试成功率决不能依据公式名称的描述和形容去投资,据此入市造成投资损失由投资者自己承担

       发文不易,如获益,欢迎赞赏,赞赏必复!

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约