分享

大智慧黃金柱主图指标公式源码编程思路破译

 追梦文库 2022-09-27 发布于天津

源码编程思路破译

流通盘大小赋值:FINANCE2(37)/10000

输出DRAWTEXTABS(20,25,'流通盘大小:'+流通盘大小+'亿 '),线宽为1,COLORFFFFFF

净资产收益率赋值:FINANCE2(5)

输出DRAWTEXTABS(220,25,'净资产收益率:'+净资产收益率+'% '),线宽为1,COLORFFFFFF

上证指数赋值:大盘的收盘价

输出DRAWTEXTABS(360,25,'上证指数:'+上证指数),线宽为1,COLORFFFFFF

DRAWGBKLAST(最低价,STRIP(自定色,自定色,0))

N赋值:20

N1赋值:7

N2赋值:49

VAR1赋值:(收盘价+最高价+最低价)/3

VAR2赋值:VAR1的10日指数移动平均

VAR3赋值:1日前的VAR2

PARTLINE(VAR2,VAR2>VAR3),POINTDOT,线宽为7, 画黄色

PARTLINE(VAR3,VAR2<VAR3),POINTDOT,线宽为7 , 画蓝色

输出终极黄金: 如果VAR2>VAR3,返回VAR2,否则返回0, POINTDOT,线宽为0, 画黄色

输出一卸千里: 如果VAR2<VAR3,返回VAR3,否则返回0,POINTDOT,线宽为0 , 画蓝色

输出M1: 收盘价的5日指数移动平均

输出M2: 收盘价的8日指数移动平均

输出M3: M2的10日指数移动平均

输出M4: M2的55日指数移动平均

VAR4赋值:M3的55日指数移动平均

输出M5: M4的81日指数移动平均

输出M6: VAR4的144日指数移动平均, COLORFF00FF

VAR5赋值:(1日前的最高价+1日前的最低价)/2

VAR6赋值:收盘价的N日简单移动平均+2*收盘价的N日估算标准差

VAR7赋值:1日前的收盘价

VAR8赋值:收盘价-VAR7和0的较大值的N1日[1日权重]移动平均/收盘价-VAR7的绝对值的N1日[1日权重]移动平均*100

VAR9赋值:N2上穿VAR8

VARA赋值:VAR9的4日过滤

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

VARC赋值:34日内最低价的最低值

VARD赋值:34日内最高价的最高值

VARE赋值:(VARB-VAR4)/(VAR5-VAR4)*100的7日指数移动平均

VARF赋值:0.667*1日前的VARE+0.333*VARE的5日指数移动平均

PARTLINE(最高价*1.02,如果统计8日中满足收盘价<1日前的收盘价的天数/8>0.6ANDVOL>=1.5*成交量(手)的5日简单移动平均ANDCOUNT(VARE>=VARF,3)ANDREF(最低价,1)=120日内最低价的最低值,返回1,否则返回0) , 画黄色

PARTLINE(最高价*1.02,如果统计13日中满足收盘价<1日前的收盘价的天数/13>0.6ANDCOUNT(VARE>VARF,6)ANDREF(最低价,5)=120日内最低价的最低值ANDREF(收盘价>=开盘价,4)ANDREF(收阳线,3)ANDREF(收阳线,2)ANDREF(开盘价>CLOS,返回,1)ANDOPEN>1日前的收盘价,否则返回1), COLORF00FF0

输出买进1:如果如果统计8日中满足收盘价<1日前的收盘价的天数/8>0.6ANDVOL>=1.5*成交量(手)的5日简单移动平均ANDCOUNT(VARE>=VARF,3)ANDREF(最低价,1)=120日内最低价的最低值,返回1,否则返回0,返回最高价*1.02,否则返回0 , 画黄色,线宽为0

输出买进2:如果如果统计13日中满足收盘价<1日前的收盘价的天数/13>0.6ANDCOUNT(VARE>VARF,6)ANDREF(最低价,5)=120日内最低价的最低值ANDREF(收盘价>=开盘价,4)ANDREF(收阳线,3)ANDREF(收阳线,2)ANDREF(收阴线,返回?,否则返回?,返回OSE,1)ANDOPEN>1日前的收盘价,1,0),否则返回最高价*1.02, COLORF00FF0,线宽为0

VAR10赋值:收盘价的80日简单移动平均-收盘价的10日简单移动平均/3

PARTLINE(最高价*1.02,如果收盘价<VAR10ANDVOL/240>成交量(手)的5日简单移动平均/240ANDCLOSE>1日前的收盘价*1.08ANDCLOSE<收盘价的13日简单移动平均*1.3,返回1,否则返回0), 画红色

输出抄底 :如果如果收盘价<VAR10ANDVOL/240>成交量(手)的5日简单移动平均/240ANDCLOSE>1日前的收盘价*1.08ANDCLOSE<收盘价的13日简单移动平均*1.3,返回1,否则返回0,返回最高价*1.02,否则返回0, 画红色,线宽为0

程序源码

流通盘大小:=FINANCE2(37)/10000;

DRAWTEXTABS(20,25,'流通盘大小:'+流通盘大小+'亿 '),LINETHICK1,COLORFFFFFF;

净资产收益率:=FINANCE2(5);

DRAWTEXTABS(220,25,'净资产收益率:'+净资产收益率+'% '),LINETHICK1,COLORFFFFFF;

上证指数:=INDEXC;

DRAWTEXTABS(360,25,'上证指数:'+上证指数),LINETHICK1,COLORFFFFFF;

DRAWGBKLAST(L,STRIP(RGB(0,0,205),RGB(47,79,79),0));

N:=20;

N1:=7;

N2:=49;

VAR1:=(CLOSE+HIGH+LOW)/3;

VAR2:=EMA(VAR1,10);

VAR3:=REF(VAR2,1);

PARTLINE(VAR2,VAR2>VAR3),POINTDOT,LINETHICK7, COLORYELLOW;

PARTLINE(VAR3,VAR2<VAR3),POINTDOT,LINETHICK7 , COLORBLUE;

终极黄金: IF(VAR2>VAR3,VAR2,0), POINTDOT,LINETHICK0, COLORYELLOW;

一卸千里: IF(VAR2<VAR3,VAR3,0),POINTDOT,LINETHICK0 , COLORBLUE;

M1: EMA(CLOSE,5);

M2: EMA(CLOSE,8);

M3: EMA(M2,10);

M4: EMA(M2,55);

VAR4:=EMA(M3,55);

M5: EMA(M4,81);

M6: EMA(VAR4,144), COLORFF00FF;

VAR5:=(REF(HIGH,1)+REF(LOW,1))/2;

VAR6:=MA(CLOSE,N)+2*STD(CLOSE,N);

VAR7:=REF(CLOSE,1);

VAR8:=SMA(MAX(CLOSE-VAR7,0),N1,1)/SMA(ABS(CLOSE-VAR7),N1,1)*100;

VAR9:=CROSS(N2,VAR8);

VARA:=FILTER(VAR9,4);

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

VARC:=LLV(LOW,34);

VARD:=HHV(HIGH,34);

VARE:=EMA((VARB-VAR4)/(VAR5-VAR4)*100,7);

VARF:=EMA(0.667*REF(VARE,1)+0.333*VARE,5);

PARTLINE(HIGH*1.02,IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.6 AND VOL>=1.5*MA(VOL,5) AND COUNT(VARE>=VARF,3) AND REF(LOW,1)=LLV(LOW,120),1,0)) , COLORYELLOW;

PARTLINE(HIGH*1.02,IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>0.6 AND COUNT(VARE>VARF,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND OPEN>REF(CLOSE,1),1,0)), COLORF00FF0;

买进1:IF(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.6 AND VOL>=1.5*MA(VOL,5) AND COUNT(VARE>=VARF,3) AND REF(LOW,1)=LLV(LOW,120),1,0),HIGH*1.02,0) , COLORYELLOW,LINETHICK0;

买进2:IF(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>0.6 AND COUNT(VARE>VARF,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND OPEN>REF(CLOSE,1),1,0),HIGH*1.02,0), COLORF00FF0,LINETHICK0;

VAR10:=MA(CLOSE,80)-MA(CLOSE,10)/3;

PARTLINE(HIGH*1.02,IF(CLOSE<VAR10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0)), COLORRED;

抄底 :IF(IF(CLOSE<VAR10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),HIGH*1.02,0), COLORRED,LINETHICK0;

该公式包含未来函数:FINANCE

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约