【原】通达信最强K线主图指标公式（附源码）

编程思路破译

M赋值:5

N赋值:42

N1赋值:21

P赋值:8

SHORT赋值:12

LONG赋值:12

MID赋值:12

P1赋值:12

输出工作线:收盘价的50日指数移动平均,画红色,线宽为2

输出工作线2:收盘价的17日指数移动平均,线宽为2

九号线赋值:收盘价的99日指数移动平均

暴涨线赋值:收盘价的181日简单移动平均

牛赋值:收盘价的144日指数移动平均>=1日前的收盘价的144日指数移动平均

当满足条件(工作线2>=1日前的工作线2ANDL<工作线2ANDC>工作线2)时,在最低价位置书写文字,画黄色

当满足条件(九号线>=1日前的九号线AND牛ANDL<九号线ANDH>九号线)AND((收盘价<1日前的收盘价ORO>收盘价))时,在最低价*0.98位置书写文字,COLOR00FF00

当满足条件(工作线>=1日前的工作线AND牛ANDL<工作线ANDH>工作线)时,在最低价*0.96位置书写文字,画白色

当满足条件(暴涨线>=1日前的暴涨线AND牛ANDL<暴涨线ANDH>暴涨线)AND((收盘价<1日前的收盘价ORO>收盘价))时,在最低价*0.94位置书写文字,画洋红色

黄昏之星赋值:((((((2日前的收盘价 / 2日前的开盘价) > 1.03) AND (1日前的开盘价 > 2日前的收盘价)) AND (((1日前的开盘价-1日前的收盘价)的绝对值 / 1日前的收盘价) < 0.02)) AND ((收盘价 / 开盘价) < 0.97)) AND (收盘价 < 2日前的收盘价))

射击之星赋值:(((开盘价和收盘价的较小值 = 最低价) AND ((最高价 - 最低价) > (3 * (开盘价和收盘价的较大值 - 最低价)))) AND (收盘价 > 收盘价的5日简单移动平均))

锤头赋值:(((最高价 = 开盘价和收盘价的较大值) AND ((最高价 - 最低价) > (3 * (最高价 - 开盘价和收盘价的较小值)))) AND (收盘价 < 收盘价的5日简单移动平均))

吊颈赋值:(( (最高价 = 开盘价和收盘价的较大值) AND ((最高价 - 最低价) > (3 * (最高价 - 开盘价和收盘价的较小值)))))

穿头破脚赋值:((((((1日前的收盘价 / 1日前的开盘价) > 1.03) AND ((收盘价 / 开盘价) < 0.96)) AND (收盘价 < 1日前的开盘价)) AND (开盘价 > 1日前的收盘价)) OR (((((1日前的收盘价 / 1日前的开盘价) < 0.97) AND ((收盘价 / 开盘价) > 1.04)) AND (收盘价 > 1日前的开盘价)) AND (开盘价 < 1日前的收盘价)))

身怀六甲赋值:((((((1日前的收盘价-1日前的开盘价)的绝对值 / 1日前的收盘价) > 0.04) AND (((收盘价-开盘价)的绝对值 / 收盘价) < 0.005)) AND (收盘价和开盘价的较大值 < 1日前的收盘价和1日前的开盘价的较大值)) AND (收盘价和开盘价的较小值 > 1日前的收盘价和1日前的开盘价的较小值))

乌云盖顶赋值:(((((1日前的收盘价 / 1日前的开盘价) > 1.03) AND ((收盘价 / 开盘价) < 0.97)) AND (开盘价 > 1日前的收盘价)) AND (收盘价 < 1日前的收盘价))

曙光初现赋值:(((((1日前的收盘价 / 1日前的开盘价) < 0.97) AND ((收盘价 / 开盘价) > 1.03)) AND (开盘价 < 1日前的收盘价)) AND (收盘价 > 1日前的收盘价))

倾盆雨赋值:(((((1日前的收盘价 / 1日前的开盘价) >= 1.03) AND (开盘价 < 1日前的收盘价)) AND (开盘价 > 1日前的开盘价)) AND (收盘价 < 1日前的开盘价))

当满足条件倾盆雨时,在最高价*1.03位置书写文字,画青色

当满足条件黄昏之星时,在最高价*1.02位置书写文字,画青色

当满足条件射击之星时,在最高价*1.03位置书写文字,画青色

当满足条件锤头时,在最低价-最低价*0.02位置书写文字,画绿色

当满足条件吊颈时,在最高价*1.03位置书写文字,画青色

当满足条件穿头破脚时,在最高价*1.05位置书写文字,画青色

当满足条件乌云盖顶时,在最高价*1.03位置书写文字,画青色

当满足条件曙光初现时,在最低价-最低价*0.02位置书写文字,画绿色

当满足条件身怀六甲时,在最低价-最低价*0.02位置书写文字,画绿色

程序源码

M:=5;

N:=42;

N1:=21;

P:=8;

SHORT:=12;

LONG:=12;

MID:=12;

P1:=12;

工作线:EMA(CLOSE,50),COLORRED,LINETHICK2;

工作线2:EMA(CLOSE,17),LINETHICK2;

九号线:=EMA(CLOSE,99);

暴涨线:=MA(CLOSE,181);

牛:=EMA(CLOSE,144)>=REF(EMA(CLOSE,144),1);

DRAWTEXT((工作线2>=REF(工作线2,1) AND L< 工作线2 AND C>工作线2) ,L, '买'),COLORYELLOW;

DRAWTEXT((九号线>=REF(九号线,1) AND 牛 AND L< 九号线 AND H>九号线)  AND ((CLOSE< REF(CLOSE,1) OR O>C)),L*0.98 , '●九号'),COLOR00FF00;

DRAWTEXT((工作线>=REF(工作线,1) AND 牛 AND L< 工作线 AND H>工作线)  ,L*0.96 , '◆工作'),COLORWHITE;

DRAWTEXT( (暴涨线>=REF(暴涨线,1) AND 牛 AND L< 暴涨线 AND H>暴涨线) AND ((CLOSE< REF(CLOSE,1) OR O>C)),L*0.94 , '★暴涨'),COLORMAGENTA;

黄昏之星:=((((((REF(CLOSE,2) / REF(OPEN,2)) > 1.03) AND (REF(OPEN,1) >  REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) /  REF(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE < REF(CLOSE,2)));

射击之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *  (MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));

锤头:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -  MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));

吊颈:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -  MIN(OPEN,CLOSE))))));

穿头破脚:=((((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)  < 0.96)) AND (CLOSE < REF(OPEN,1))) AND (OPEN > REF(CLOSE,1))) OR  (((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >  1.04)) AND (CLOSE > REF(OPEN,1))) AND (OPEN < REF(CLOSE,1))));

身怀六甲:=(((((ABS((REF(CLOSE,1) - REF(OPEN,1))) / REF(CLOSE,1)) > 0.04)  AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <  MAX(REF(CLOSE,1),REF(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1))));

乌云盖顶:=(((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <  0.97)) AND (OPEN > REF(CLOSE,1))) AND (CLOSE < REF(CLOSE,1)));

曙光初现:=(((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >  1.03)) AND (OPEN < REF(CLOSE,1))) AND (CLOSE > REF(CLOSE,1)));

倾盆雨:=(((((REF(CLOSE,1) / REF(OPEN,1)) >= 1.03) AND (OPEN <  REF(CLOSE,1))) AND (OPEN > REF(OPEN,1))) AND (CLOSE < REF(OPEN,1)));

DRAWTEXT(倾盆雨,H*1.03,'倾盆大雨'),COLORCYAN;

DRAWTEXT(黄昏之星,H*1.02,'黄昏之星'),COLORCYAN;

DRAWTEXT(射击之星,H*1.03,'射击之星可能见顶'),COLORCYAN;

DRAWTEXT(锤头,L-L*0.02,'锤头可能见底'),COLORGREEN;

DRAWTEXT(吊颈,H*1.03,'吊颈'),COLORCYAN;

DRAWTEXT(穿头破脚,H*1.05,'穿头破脚'),COLORCYAN;

DRAWTEXT(乌云盖顶,H*1.03,'乌云盖顶'),COLORCYAN;

DRAWTEXT(曙光初现,L-L*0.02,'曙光初现(放量)'),COLORGREEN;

DRAWTEXT(身怀六甲,L-L*0.02,'身怀六甲,底升顶落'),COLORGREEN;

注：

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

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