编程思路破译

A赋值:(3*收盘价+最低价+开盘价+最高价)/6

X赋值:(20*A+19*1日前的A+18*2日前的A+17*3日前的A+16*4日前的A+15*5日前的A+14*6日前的A+13*7日前的A+12*8日前的A+11*9日前的A+10*10日前的A+9*11日前的A+8*12日前的A+7*13日前的A+6*14日前的A+5*15日前的A+4*16日前的A+3*17日前的A+2*18日前的A+20日前的A)/210

输出主力成本:X的13日指数移动平均,COLORFF00FF,线宽为1

N10赋值:3

N20赋值:6

N3赋值:12

N4赋值:24

输出多空均线:(收盘价的N10日简单移动平均+收盘价的N20日简单移动平均+收盘价的N3日简单移动平均+收盘价的N4日简单移动平均)/4,画红色,线宽为2

BB赋值:BBI<1日前的BBI

如果BB,返回BBI,否则返回无效数画绿色,线宽为2

当满足条件1日前的BB=1ANDBBI>1日前的BBI时,在BBI*0.99位置画23号图标

K线

AH赋值:60日内最高价的最高值

AL赋值:60日内最低价的最低值

A0赋值:(AH-AL)/21

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

JJR1赋值:(2*最低价+3*均价)/5

JJR2赋值:(2*最高价+3*均价)/5

JJR3赋值:均价-(JJR1+JJR2)/2的20日简单移动平均的绝对值/(JJR1+JJR2)/2的20日简单移动平均

JJR4赋值:以JJR3为权重均价的动态移动平均

输出JJR5:(1+7/100)*JJR4,画红色,线宽为2

如果JJR5<1日前的JJR5,返回JJR5,否则返回无效数,线宽为2,画白色

C7赋值:1日前的收盘价

ZT赋值:如果(收盘价-C7)*100/C7>=(10-0.01*100/C7),返回1,否则返回0

当满足条件ZT时,在开盘价和收盘价位置之间画柱状线,宽度为2.0,0不为0则画空心柱. ,画黄色

V5赋值:成交量(手)的5日简单移动平均

V10赋值:成交量(手)的10日简单移动平均

D1赋值:成交量(手)>1日前的2日内成交量(手)的最高值 AND V5位于V10和成交量(手)之间 AND 最近2日V5连涨 AND 最近2日V10连涨

D2赋值:最高价>1日前的2日内最高价的最高值

KMAX赋值:收盘价和开盘价的较大值

D3赋值:KMAX>1日前的2日内KMAX的最高值

DA赋值:D1 AND D2 AND D3

P1赋值:上次DA=1距今天数

P2赋值:P1日前的1日前的最高价

DB赋值:如果DA,返回0,否则返回如果收盘价<P2,返回1,否则返回0

LJ赋值:上次DB距今天数日前的P1+1日内最高价的最高值

输出NOTEXT:LJ

当满足条件如果收盘价>LJ,返回如果1日前的KMAX<LJ,返回1,否则返回0,否则返回0时,在最低价位置画18号图标

X01赋值:如果收盘价的5日简单移动平均>收盘价的10日简单移动平均,返回20,否则返回0

X02赋值:如果收盘价的20日简单移动平均>收盘价的60日简单移动平均,返回10,否则返回0

X3赋值:如果KDJ的J>KDJ的K,返回10,否则返回0

X4赋值:如果平滑异同平均线的DIF>平滑异同平均线的DEA,返回10,否则返回0

X05赋值:如果平滑异同平均线的MACD>0,返回10,否则返回0

X6赋值:如果成交量(手)>成交量(手)的60日简单移动平均,返回10,否则返回0

X7赋值:如果以收盘价计算的获利盘比例>0.5,返回10,否则返回0

X8赋值:如果收盘价/1日前的收盘价>1.03,返回10,否则返回0

XX赋值:X01+X02+X3+X4+X05+X6+X7+X8

当满足条件成交量(手)>开盘价时,在横轴0.4纵轴0.05位置书写文字,画黄色

输出资金异动线:收盘价的136日简单移动平均,画绿色,线宽为2

输出主力攻击线:收盘价的5日简单移动平均,DOTLINE,画白色

输出主力控盘线:收盘价的18日简单移动平均,画黄色,线宽为2

如果主力攻击线<主力控盘线OR主力攻击线<=主力攻击线的5日简单移动平均,返回主力攻击线,否则返回无效数,画黄色

HJ_1赋值:收盘价/1日前的收盘价>=1.038 AND 收盘价=最高价

HJ_22赋值:统计2日中满足HJ_1的天数>=1 AND 取反

启赋值:HJ_22的13日过滤,COLORDDDDDD

HJ_23赋值:统计3日中满足HJ_1的天数>=2 AND 取反

升赋值:HJ_23的13日过滤,画绿色

龙头启动赋值:启 AND 统计18日中满足启的天数=1,画白色

主升赋值:升 AND 统计18日中满足升的天数=1

输出龙头主升:主升,画黄色,NODRAW

当满足条件HJ_1ANDC>主力攻击线时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLORFF00FF

当满足条件HJ_1ANDC>主力攻击线时,在收盘价和开盘价位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLORDA70D6

当满足条件HJ_1ANDC>主力攻击线时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOREE82EE

当满足条件HJ_1ANDC>主力攻击线时,在收盘价和开盘价位置之间画柱状线,宽度为1.2,0不为0则画空心柱.,COLORD8BFD8

当满足条件HJ_1ANDC>主力攻击线时,在收盘价和开盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORF8F8FF

当满足条件HJ_1ANDC>主力攻击线时,在收盘价和开盘价位置之间画柱状线,宽度为0.05,0不为0则画空心柱.,COLORFFFFFF

当满足条件启ANDCOUNT(启,18)=1时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,画黄色

当满足条件启ANDCOUNT(启,18)=1时,在开盘价和收盘价位置之间画柱状线,宽度为0.8,0不为0则画空心柱.,COLORF8F8FF

当满足条件启ANDCOUNT(启,18)=1时,在开盘价和收盘价位置之间画柱状线,宽度为0.2,0不为0则画空心柱.,COLORFFFFFF

当满足条件龙头启动时,在最低价位置画34号图标

LC赋值:1日前的收盘价

VAR28赋值:收盘价-LC和0的较大值的5.5日[1日权重]移动平均/收盘价-LC的绝对值的6日[1日权重]移动平均*100

当满足条件84上穿RSIANDCROSS(76,VAR28)时,在最高价*1.01位置书写文字,线宽为4,画绿色

当满足条件龙头主升时,在最低价*0.99位置书写文字,画黄色,线宽为2

VAB0赋值:531

VAB1赋值:1510000

VAB2赋值:VAB0 + VAB1

VAB3赋值:如果日期>VAB2,返回0,否则返回1

VARA12赋值:最高价的10日[9日权重]移动平均*VAB3

VARA13赋值:最低价的10日[9日权重]移动平均*VAB3

输出卖价:VARA12,画红色,NODRAW

输出补仓:VARA13,画绿色,NODRAW

当满足条件1时,在横轴0.75纵轴0.05位置书写文字,画红色

当满足条件1时,在横轴1纵轴0.05位置书写文字,画绿色

竞价额赋值:开盘金额/10000

当满足条件收盘价>0时,在横轴0.59纵轴0.05位置书写文字,画洋红色

当满足条件成交量(手)>开盘价时,在横轴0纵轴0位置书写文字,画红色

程序源码

{涨家:INDEXADV,NODRAW,COLORRED;

跌家:INDEXDEC,NODRAW,COLOR00FFFF;}

A:=(3*C+L+O+H)/6;

X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+

14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)

+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+

REF(A,20))/210;

主力成本:EMA(X,13),COLORFF00FF,LINETHICK1;

N10:=3;N20:=6;N3:=12;N4:=24;

BBI:(MA(CLOSE,N10)+MA(CLOSE,N20)+MA(CLOSE,N3)+MA(CLOSE,N4))/4,COLORRED,LINETHICK2;

BB:=BBI<REF(BBI,1);

IF(BB,BBI,DRAWNULL)COLORGREEN,LINETHICK2;

DRAWICON(REF(BB,1)=1 AND BBI>REF(BBI,1),BBI*0.99,23);

DRAWKLINE(H,O,L,C);

AH:=HHV(H,60);

AL:=LLV(L,60);

A0:=(AH-AL)/21;

{JJR5}

均价:=(2*C+(C+H+L+O)/4+O)/4;

JJR1:=(2*L+3*均价)/5;

JJR2:=(2*H+3*均价)/5;

JJR3:=ABS(均价-MA((JJR1+JJR2)/2,20))/MA((JJR1+JJR2)/2,20);

JJR4:=DMA(均价,JJR3);

JJR5:(1+7/100)*JJR4,COLORRED,LINETHICK2;

IF(JJR5<REF(JJR5,1),JJR5,DRAWNULL),LINETHICK2,COLORWHITE;

C7:=REF(C,1);ZT:=IF((C-C7)*100/C7>=(10-0.01*100/C7),1,0);

STICKLINE(ZT,OPEN,CLOSE,2.0,0) ,COLORYELLOW;

{堆量}

V5:=MA(V,5);

V10:=MA(V,10);

D1:=V>REF(HHV(V,2),1) AND RANGE(V5,V10,V) AND UPNDAY(V5,2) AND UPNDAY(V10,2);

D2:=H>REF(HHV(H,2),1);

KMAX:=MAX(C,O);

D3:=KMAX>REF(HHV(KMAX,2),1);

DA:=D1 AND D2 AND D3;

P1:=BARSLAST(DA=1);

P2:=REF(REF(H,1),P1);

DB:=IF(DA,0,IF(C<P2,1,0));{堆量确定};

LJ:=REF(HHV(H,P1+1),BARSLAST(DB));

NOTEXT:LJ;

DRAWICON(IF(C>LJ,IF(REF(KMAX<LJ,1),1,0),0),L,18);

{趋势评分}

X01:=IF(MA(C,5)>MA(C,10),20,0);

X02:=IF(MA(C,20)>MA(C,60),10,0);

X3:=IF(KDJ.J>KDJ.K,10,0);

X4:=IF(MACD.DIF>MACD.DEA,10,0);

X05:=IF(MACD.MACD>0,10,0);

X6:=IF(V>MA(V,60),10,0);

X7:=IF(WINNER(C)>0.5,10,0);

X8:=IF(C/REF(C,1)>1.03,10,0);

XX:=X01+X02+X3+X4+X05+X6+X7+X8;

DRAWTEXT_FIX(V>O,0.4,0.05,0,STRCAT('趋势评分： ',STRCAT(CON2STR(XX,0),' '))),COLORYELLOW;

{主力洗盘线:MA(C,170),LINETHICK2;}

资金异动线:MA(C,136),COLORGREEN,LINETHICK2;

{擒龙跟庄}

主力攻击线:MA(C,5),DOTLINE,COLORWHITE;

主力控盘线:MA(CLOSE,18),COLORYELLOW,LINETHICK2;

IF(主力攻击线<主力控盘线 OR 主力攻击线<=MA(主力攻击线,5),主力攻击线,DRAWNULL),COLORYELLOW;

HJ_1:=C/REF(C,1)>=1.038 AND C=H;

HJ_22:=COUNT(HJ_1,2)>=1 AND NOT(COUNT(HJ_1,3)>=2);

启:=FILTER(HJ_22,13),COLORDDDDDD;

HJ_23:=COUNT(HJ_1,3)>=2 AND NOT(COUNT(HJ_1,4)>=3);

升:=FILTER(HJ_23,13),COLORGREEN;

龙头启动:=启 AND COUNT(启,18)=1,COLORWHITE;

主升:=升 AND COUNT(升,18)=1;

龙头主升:主升,COLORYELLOW,NODRAW;

STICKLINE(HJ_1 AND C>主力攻击线,C,O,2,0),COLORFF00FF;

STICKLINE(HJ_1 AND C>主力攻击线,C,O,2.5,0),COLORDA70D6;

STICKLINE(HJ_1 AND C>主力攻击线,C,O,2,0),COLOREE82EE;

STICKLINE(HJ_1 AND C>主力攻击线,C,O,1.2,0),COLORD8BFD8;

STICKLINE(HJ_1 AND C>主力攻击线,C,O,0.5,0),COLORF8F8FF;

STICKLINE(HJ_1 AND C>主力攻击线,C,O,0.05,0),COLORFFFFFF;

STICKLINE(启 AND COUNT(启,18)=1,O,C,2,0),COLORYELLOW;

STICKLINE(启 AND COUNT(启,18)=1,O,C,0.8,0),COLORF8F8FF;

STICKLINE(启 AND COUNT(启,18)=1,O,C,0.2,0),COLORFFFFFF;

DRAWICON(龙头启动,L,34);

LC:=REF(CLOSE,1);

VAR28:=SMA(MAX(CLOSE-LC,0),5.5,1)/SMA(ABS(CLOSE-LC),6,1)*100;

DRAWTEXT(CROSS(84,RSI) AND CROSS(76,VAR28),H*1.01,'卖出'),LINETHICK4,COLORGREEN;

DRAWTEXT(龙头主升,L*0.99,'★'),COLORYELLOW,LINETHICK2;

{补仓卖}

VAB0:=531;

VAB1:=1510000;

VAB2:=VAB0 + VAB1;

VAB3:=IF(DATE > VAB2,0,1);

VARA12:=SMA(H,10,9)*VAB3;

VARA13:=SMA(L,10,9)*VAB3;

卖价:VARA12,COLORRED,NODRAW;

补仓:VARA13,COLORGREEN,NODRAW;

DRAWTEXT_FIX(1,0.75,0.05,0,STRCAT('补仓:',STRCAT(CON2STR(补仓,2),' '))),COLORRED;

DRAWTEXT_FIX(1,1,0.05,0,STRCAT('卖价:',STRCAT(CON2STR(卖价,2),' '))),COLORGREEN;

竞价额:=DYNAINFO(15)/10000;{万元}

DRAWTEXT_FIX(C>0,0.59,0.05,0,VARCAT(VARCAT('竞价: ',VAR2STR(竞价额,0)),' 万')),

COLORMAGENTA;

DRAWTEXT_FIX(V>O,0,0,0,STRCAT('属概念板块： ',GNBLOCK)),COLORRED;

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

注：

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

       发文不易，如获益，欢迎赞赏，赞赏必复！

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