623战法主副图指标公式(附源码破译和源码)

编程思路破译

输出MA5:收盘价的5日简单移动平均,画白色,线宽为2

输出MA7:收盘价的7日简单移动平均,画黄色,线宽为2

输出MA10:收盘价的10日简单移动平均,画洋红色,线宽为3

HIGHN赋值:10

AA赋值:HIGHN日前的收盘价=2*HIGHN+1日内收盘价的最高值

QY赋值:若AA则将最近HIGHN+1周期置为1

CC赋值:QY的HIGHN日过滤 AND 收盘价=HIGHN+1日内收盘价的最高值

DDD赋值:上次CC距今天数

GDTS赋值:如果CC,返回到最后交易的周期,否则返回0

DINGBU赋值:如果DDD,返回DDD日前的收盘价,否则返回收盘价

DINGBU1赋值:DDD+1日前的DINGBU

DINGBUTS赋值:如果DDD,返回DDD日前的GDTS,否则返回GDTS

GDCS1赋值:DINGBUTS的最后一日取值设为常数

DINGBUTS1赋值:DDD+10日前的DINGBUTS

LOWN赋值:10

AA1赋值:LOWN日前的最低价=2*LOWN+1日内最低价的最低值

QY1赋值:若AA1则将最近LOWN+1周期置为1

CC1赋值:QY1的LOWN日过滤 AND 最低价=LOWN+1日内最低价的最低值

DDTS赋值:如果CC1,返回到最后交易的周期,否则返回0

DD1赋值:上次CC1距今天数

DDTS1赋值:如果DD1,返回DD1日前的DDTS,否则返回DDTS

DDCS1赋值:DDTS1的最后一日取值设为常数

GDCS2赋值:DINGBUTS1的最后一日取值设为常数

DINGBU2赋值:DDD+1日前的DINGBU1

DDTS2赋值:DD1+1日前的DDTS1

DDCS2赋值:DDTS2的最后一日取值设为常数

ZZ赋值:5

AC赋值:ZZ日前的收盘价=2*ZZ+1日内收盘价的最高值

AD赋值:若AC则将最近ZZ+1周期置为1

AE赋值:AD的ZZ日过滤 AND 收盘价=ZZ+1日内收盘价的最高值

AF赋值:上次AE距今天数

AG赋值:如果AE,返回到最后交易的周期,否则返回0

AH赋值:如果AF,返回AF日前的收盘价,否则返回收盘价

AI赋值:如果AF,返回AF日前的AG,否则返回AG

AL赋值:AI的最后一日取值设为常数

输出短T:当满足条件到最后交易的周期=AL时,在收盘价位置画直线起点,当满足条件是否最后一个周期时,在AL-1日前的收盘价位置画直线终点,1表示是否延长.,DOTLINE,画黄色 线宽为3

输出T线:当满足条件到最后交易的周期=GDCS1时,在收盘价位置画直线起点,当满足条件是否最后一个周期时,在GDCS1-1日前的收盘价位置画直线终点,1表示是否延长.,DOTLINE,画绿色

ZT赋值: 收盘价>=计算涨停价 AND 收盘价=最高价

冲击涨停赋值:最高价>=计算涨停价 AND 收盘价 < 最高价 AND 收阳线ANDSE (周期类型=5)

输出开盘%:(开盘价 - 1日前的收盘价)/1日前的收盘价*100,NODRAW,画淡洋红色

KBTB赋值:(收盘价>=计算涨停价) AND 平盘

KB_CNT赋值:统计135日中满足KBTB的天数

当满足条件ZTAND开盘%>5AND(周期类型=5)时,在最高价*0.96位置书写文字,COLOR00D7FF

当满足条件ZTANDNOT(KBTB)AND(周期类型=5)时,在收盘价*0.9985和开盘价*1.0015位置之间画柱状线,宽度为1.286,0不为0则画空心柱.,COLOR00D7FF

当满足条件冲击涨停AND(周期类型=5)时,在收盘价*0.9985和开盘价+(收盘价-开盘价)*0.4位置之间画柱状线,宽度为1.286,0不为0则画空心柱.,COLOR00D7FF

BOLL轨赋值:收盘价的20日指数移动平均 画蓝色 线宽为1 DOTLINE

BOLL翘赋值:如果BOLL轨>1日前的BOLL轨,返回BOLL轨,否则返回无效数,画红色,线宽为1 POINTDOT

输出UB:BOLL+2*收盘价的20日估算标准差画红色 线宽为2 DOTLINE

LB赋值:BOLL-2*收盘价的20日估算标准差画红色 线宽为1 DOTLINE

SS1赋值:收阳线AND 收盘价/开盘价<1.02

SS2赋值:收盘价>收盘价的13日简单移动平均 AND 收盘价/收盘价的13日简单移动平均<1.03

SS3赋值:收盘价的13日简单移动平均>2日前的收盘价的13日简单移动平均

Z1赋值:字符串相加

Z2赋值:字符串相加

Z3赋值:字符串相加

当满足条件是否最后一个周期时,在横轴0.4纵轴0位置书写文字,画黄色

程序源码

{623主图四线}

MA5:MA(CLOSE,5),COLORWHITE,LINETHICK2;

MA7:MA(CLOSE,7),COLORYELLOW,LINETHICK2;

MA10:MA(CLOSE,10),COLORMAGENTA,LINETHICK3;

HIGHN:=10;

AA:=REF(C,HIGHN)=HHV(C,2*HIGHN+1);

QY:=BACKSET(AA,HIGHN+1);

CC:=FILTER(QY,HIGHN) AND C=HHV(C,HIGHN+1);

DDD:=BARSLAST(CC);

GDTS:=IF(CC,CURRBARSCOUNT,0);

DINGBU:=IF(DDD,REF(C,DDD),C);

DINGBU1:=REF(DINGBU,DDD+1);

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);

GDCS1:=CONST(DINGBUTS);DINGBUTS1:=REF(DINGBUTS,DDD+10);

LOWN:=10;

AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);

QY1:=BACKSET(AA1,LOWN+1);

CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);

DDTS:=IF(CC1,CURRBARSCOUNT,0);

DD1:=BARSLAST(CC1);

DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);

DDCS1:=CONST(DDTS1);

GDCS2:=CONST(DINGBUTS1);

DINGBU2:=REF(DINGBU1,DDD+1);

DDTS2:=REF(DDTS1,DD1+1);

DDCS2:=CONST(DDTS2);

ZZ:=5;

AC:=REF(C,ZZ)=HHV(C,2*ZZ+1);

AD:=BACKSET(AC,ZZ+1);

AE:=FILTER(AD,ZZ) AND C=HHV(C,ZZ+1);

AF:=BARSLAST(AE);

AG:=IF(AE,CURRBARSCOUNT,0);

AH:=IF(AF,REF(C,AF),C);

AI:=IF(AF,REF(AG,AF),AG);

AL:=CONST(AI);短T:DRAWLINE(CURRBARSCOUNT=AL,C,ISLASTBAR,REF(C,AL-1),1),DOTLINE,COLORYELLOW LINETHICK3;T线:DRAWLINE(CURRBARSCOUNT=GDCS1,C,ISLASTBAR,REF(C,GDCS1-1),1),DOTLINE,COLORGREEN;ZT:= CLOSE>=ZTPRICE(REF(CLOSE,1),0.1) AND CLOSE=HIGH;

冲击涨停:=HIGH>=ZTPRICE(REF(CLOSE,1),0.1) AND CLOSE < HIGH AND CLOSE > OPEN AND (PERIOD=5);

开盘%:(OPEN - REF(CLOSE,1))/REF(CLOSE,1)*100,NODRAW,COLORLIMAGENTA;KBTB:=(CLOSE>=ZTPRICE(REF(CLOSE,1),0.1)) AND OPEN = CLOSE;

KB_CNT:=COUNT(KBTB,135);

DRAWTEXT(ZT AND 开盘%>5 AND (PERIOD=5),HIGH*0.96,''),COLOR00D7FF;

STICKLINE(ZT AND NOT(KBTB) AND (PERIOD=5),CLOSE*0.9985,OPEN*1.0015,1.286,0),COLOR00D7FF;

STICKLINE(冲击涨停 AND (PERIOD=5),CLOSE*0.9985,OPEN+(C-O)*0.4,1.286,0),COLOR00D7FF;

{布中:EMA(CLOSE,20) COLORYELLOW LINETHICK2;}

BOLL轨:=EMA(CLOSE,20) COLORBLUE LINETHICK1 DOTLINE;

BOLL翘:=IF(BOLL轨>REF(BOLL轨,1),BOLL轨,DRAWNULL),COLORRED,LINETHICK1 POINTDOT{ DOTLINE};

UB:BOLL+2*STD(CLOSE,20)COLORRED LINETHICK2 DOTLINE;

LB:=BOLL-2*STD(CLOSE,20)COLORRED LINETHICK1 DOTLINE;

SS1:=C>O AND C/O<1.02 ;

SS2:=C>MA(C,13) AND C/MA(C,13)<1.03;

SS3:=MA(C,13)>REF(MA(C,13),2);

Z1:=STRCAT(DYBLOCK,' ');

Z2:=STRCAT(Z1,HYBLOCK);

Z3:=STRCAT(Z2,' ');

DRAWTEXT_FIX(ISLASTBAR,0.4,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;

注:

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

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

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。