【原】大智慧马儿起飞指标公式程序源码编程思路破译

编程思路破译

输出HM:(收盘价-收盘价的42日简单移动平均)/收盘价的42日简单移动平均*100,线宽为2,画黄色

0,线宽为2,画绿色

输出马儿起飞:如果20日内收盘价的最高值/收盘价>1.15ANDHIGH/最低价>1.05ANDCROSS(-28,HM)*1/2,返回HM的绝对值,否则返回0,线宽为2,画红色

A4赋值:收盘价的20日简单移动平均

A5赋值:(收盘价 > 收盘价的5日简单移动平均)

A6赋值:(收盘价的5日简单移动平均 > 收盘价的10日简单移动平均)

A7赋值:(收盘价 > 收盘价的10日简单移动平均)

A8赋值:(收盘价的5日简单移动平均 > 收盘价的20日简单移动平均)

A9赋值:(收盘价 > 收盘价的20日简单移动平均)

A10赋值:1日前的A4

A11赋值:(A4 > A10)

AVX赋值:(((((如果A5,返回10,否则返回(0-10) + 如果A6,返回10,否则返回(0-10)) + 如果A7,返回10,否则返回(0-10)) + 如果A8,返回10,否则返回(0-10)) + 如果A9,返回10,否则返回(0-10)) + 如果A11,返回10,否则返回(0-10))

DSLX赋值:(收盘价 / 大盘的收盘价)

DSLX1赋值:DSLX的5日简单移动平均

DSLX2赋值:DSLX的10日简单移动平均

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

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

阻力位赋值:如果(收盘价>200),返回(收盘价*1.01),否则返回(收盘价*1.07)

阻力位１赋值:如果(收盘价<10),返回(收盘价*1.05),否则返回阻力位

止损位赋值:如果(收盘价>200),返回(收盘价*0.99),否则返回(收盘价*0.93)

止损位１赋值:如果(收盘价<10),返回(收盘价*0.95),否则返回止损位

TJTS1赋值:数据位置状态=2 AND 收盘价<200

TJTS2赋值:数据位置状态=2 AND 收盘价>200

K2赋值:上次DISPSTATUS=1距今天数+1日内最高价的最高值

当满足条件TJTS1ORTJTS2时,在K2*0.99位置书写文字,画黄色,ALIGN2

当满足条件TJTS1ORTJTS2时,在K2*0.99位置书写文字,画黄色 ,ALIGN2

当满足条件TJTS1AND((AVX上穿1AND(V1>=V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLORDC143C

当满足条件TJTS1AND((AVX上穿1AND(V1<V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLORDC143C

当满足条件TJTS1AND((AVX上穿1AND(V1>V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLORDC143C

当满足条件TJTS1AND((AVX上穿1AND(V1<=V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR0000FF

当满足条件TJTS1AND((1上穿AVXAND(V1>=V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FF00

当满足条件TJTS1AND((1上穿AVXAND(V1<V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FF00

当满足条件TJTS1AND((1上穿AVXAND(V1>=V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FF00

当满足条件TJTS1AND((1上穿AVXAND(V1<V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FF00

当满足条件TJTS1AND((((AVX>=1)AND(1日前的AVX>0))AND(V1>=V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FFFF

当满足条件TJTS1AND((((AVX>=1)AND(1日前的AVX>0))AND(V1<V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FFFF

当满足条件TJTS1AND((((AVX>=1)AND(1日前的AVX>0))AND(V1>=V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FFFF

当满足条件TJTS1AND((((AVX>=1)AND(1日前的AVX>0))AND(V1<V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FFFF

当满足条件TJTS1AND((((AVX<1)AND(1日前的AVX<0))AND(V1>=V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2

当满足条件TJTS1AND((((AVX<1)AND(1日前的AVX<0))AND(V1<V2))AND(DSLX>=DSLX1))时,在K2*0.99位置书写文字,ALIGN2

当满足条件TJTS1AND((((AVX<1)AND(1日前的AVX<0))AND(V1>=V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2

当满足条件TJTS1AND((((AVX<1)AND(1日前的AVX<0))AND(V1<V2))AND(DSLX<DSLX1))时,在K2*0.99位置书写文字,ALIGN2

当满足条件TJTS2AND(AVX上穿1AND(V1>=V2))时,在K2*0.99位置书写文字,ALIGN2,COLOR0000FF

当满足条件TJTS2AND(AVX上穿1AND(V1>=V2))时,在K2*0.98位置书写文字,ALIGN2,COLOR0000FF

当满足条件TJTS2AND(AVX上穿1AND(V1<V2))时,在K2*0.99位置书写文字,ALIGN2,COLOR0000FF

当满足条件TJTS2AND(AVX上穿1AND(V1<V2))时,在K2*0.98位置书写文字,ALIGN2,COLOR0000FF

当满足条件TJTS2AND(1上穿AVXAND(V1>=V2))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FF00

当满足条件TJTS2AND(1上穿AVXAND(V1<V2))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FF00

当满足条件TJTS2AND(((AVX>=1)AND(1日前的AVX>0))AND(V1>=V2))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FFFF

当满足条件TJTS2AND(((AVX>=1)AND(1日前的AVX>0))AND(V1<V2))时,在K2*0.99位置书写文字,ALIGN2,COLOR00FFFF

当满足条件TJTS2AND(((AVX<1)AND(1日前的AVX<0))AND(V1>=V2))时,在K2*0.99位置书写文字,ALIGN2

当满足条件TJTS2AND(((AVX<1)AND(1日前的AVX<0))AND(V1<V2))时,在K2*0.99位置书写文字,ALIGN2

程序源码

HM:(CLOSE-MA(CLOSE,42))/MA(CLOSE,42)*100,LINETHICK2,COLORYELLOW;

0,LINETHICK2,COLORGREEN;

马儿起飞:IF(HHV(CLOSE,20)/CLOSE>1.15 AND HIGH/LOW>1.05 AND CROSS(-28,HM)*1/2,ABS(HM),0),LINETHICK2,COLORRED;

A4:=MA(CLOSE,20);

A5:=(CLOSE > MA(CLOSE,5));

A6:=(MA(CLOSE,5) > MA(CLOSE,10));

A7:=(CLOSE > MA(CLOSE,10));

A8:=(MA(CLOSE,5) > MA(CLOSE,20));

A9:=(CLOSE > MA(CLOSE,20));

A10:=REF(A4,1);

A11:=(A4 > A10);

AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));

DSLX:=(CLOSE / INDEXC);

DSLX1:=MA(DSLX,5);

DSLX2:=MA(DSLX,10);

V1:=MA(VOL,5);

V2:=MA(VOL,10);

阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07));

阻力位１:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);

止损位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));

止损位１:=IF((CLOSE < 10),(CLOSE * 0.95),止损位);

TJTS1:=BARSTATUS=2 AND C<200;

TJTS2:=BARSTATUS=2 AND C>200;

K2:=HHV(H,BARSLAST(DISPSTATUS=1)+1);

DRAWTEXT(TJTS1 OR TJTS2 ,K2*0.99,'阻力位:'+NUMTOSTRN(阻力位１,2)+' '),COLORYELLOW,ALIGN2;

DRAWTEXT(TJTS1 OR TJTS2 ,K2*0.99,'止损位:'+NUMTOSTRN(止损位１,2)+' '),COLORYELLOW ,ALIGN2;

DRAWTEXT(TJTS1 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。 '),ALIGN2,COLORDC143C;

DRAWTEXT(TJTS1 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。 '),ALIGN2,COLORDC143C;

DRAWTEXT(TJTS1 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。 '),ALIGN2,COLORDC143C;

DRAWTEXT(TJTS1 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。 '),ALIGN2,COLOR0000FF;

DRAWTEXT(TJTS1 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。 '),ALIGN2,COLOR00FF00;

DRAWTEXT(TJTS1 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。 '),ALIGN2,COLOR00FF00;

DRAWTEXT(TJTS1 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股放量下跌，走势明显偏弱，离场观望。 '),ALIGN2,COLOR00FF00;

DRAWTEXT(TJTS1 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股缩量下跌，走势偏弱，离场观望。 '),ALIGN2,COLOR00FF00;

DRAWTEXT(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股形态良好，强势明显，量能充足，可以继续持有。 '),ALIGN2,COLOR00FFFF;

DRAWTEXT(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。 '),ALIGN2,COLOR00FFFF;

DRAWTEXT(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。 '),ALIGN2,COLOR00FFFF;

DRAWTEXT(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股走势趋弱，量能不足，减持大部分筹码。 '),ALIGN2,COLOR00FFFF;

DRAWTEXT(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股形态不佳，注意成交量的变化，但目前不适合参与。 '),ALIGN2;

DRAWTEXT(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,K2*0.99,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。 '),ALIGN2;

DRAWTEXT(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股有走强迹象，但量能不足，趋势不明，不适合操作。 '),ALIGN2;

DRAWTEXT(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,K2*0.99,'该股走势太弱，没有参与价值。 '),ALIGN2;

DRAWTEXT(TJTS2 AND (CROSS(AVX,1) AND (V1 >= V2)) ,K2*0.99,'大盘量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右， '),ALIGN2,COLOR0000FF;

DRAWTEXT(TJTS2 AND (CROSS(AVX,1) AND (V1 >= V2)) ,K2*0.98,' 如前期经过一轮下跌，此时为最佳买点，但如果前期有过一段涨幅则介入需谨慎。 '),ALIGN2,COLOR0000FF;

DRAWTEXT(TJTS2 AND (CROSS(AVX,1) AND (V1 < V2)) ,K2*0.99,'大盘虽然走势趋强，但量能还显不足，如果前期经过一轮下跌， '),ALIGN2,COLOR0000FF;

DRAWTEXT(TJTS2 AND (CROSS(AVX,1) AND (V1 < V2)) ,K2*0.98,' 可以考虑短线进场，仓位在1/2左右，一旦量能放大可以加仓买入。 '),ALIGN2,COLOR0000FF;

DRAWTEXT(TJTS2 AND (CROSS(1,AVX) AND (V1 >= V2)) ,K2*0.99,'大盘形态走坏，重仓者可以减去大部分仓位。 '),ALIGN2,COLOR00FF00;

DRAWTEXT(TJTS2 AND (CROSS(1,AVX) AND (V1 < V2)) ,K2*0.99,'大盘缩量调整，注意风险，短线清仓观望。 '),ALIGN2,COLOR00FF00;

DRAWTEXT(TJTS2 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) ,K2*0.99,'大盘走势良好，量能理想，可以继续持有强势股。 '),ALIGN2,COLOR00FFFF;

DRAWTEXT(TJTS2 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) ,K2*0.99,'大盘形态良好，但量能稍显不足，随时准备减仓。 '),ALIGN2,COLOR00FFFF;

DRAWTEXT(TJTS2 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) ,K2*0.99,'大盘趋势不明，注意成交量变化，目前不适宜进场。 '),ALIGN2;

DRAWTEXT(TJTS2 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) ,K2*0.99,'大盘趋势向下，量能萎缩，不适合进场。 '),ALIGN2;