通达信主升起爆主图指标公式源码

X间隔值:=0.15;

Y间隔值:=0.15;

起点位X值:=X间隔值/10;

起点位Y值:=Y间隔值/10;

概念:=STRCAT('概念: ',GNBLOCK);

DRAWTEXT_FIX(C>0,0*起点位X值,0.5*起点位Y值,0,概念),COLORYELLOW;

地域:=STRCAT(DYBLOCK,'');

DRAWTEXT_FIX(C>0,0*起点位X值,3.5*起点位Y值,0,地域),COLORWHITE;

行业:=STRCAT(HYBLOCK,'');

DRAWTEXT_FIX(C>0,4*起点位X值,3.5*起点位Y值,0,行业),COLORWHITE;

LTSZ:=STRCAT(STRCAT('总市值: ',CON2STR(FINANCE(41)/100000000,2)),' 亿元');

DRAWTEXT_FIX(C>0,8*起点位X值,3.5*起点位Y值,0,LTSZ),COLORWHITE;

涨停板1:=C=H&&C/REF(C,1)>1.0975&&C/REF(C,1)<1.11&&FINANCE(3)=1;

涨停板2:=C=H&&C/REF(C,1)>1.1985&&C/REF(C,1)<1.21&&FINANCE(3)=3;

涨停板:=涨停板1 OR 涨停板2;

k线实体:=Abs(C-O)/REF(C,1);

双倍量:=(V/REF(MA(V,5),1)>=2) OR (V/REF(V,1)>=3);

倍量0:=C>O&&双倍量&&C>EMA(C,13)&&V=HHV(V,6);

倍量:=TFILTER(倍量0,C<O&&H<REF(H,1),1);

位置要求:=L/EMA(C,13)<1.05;

SPX0:=H/REF(C,1)>=1.06&&H=HHV(H,6)&&倍量0&&H/C>1.005&&C/REF(C,1)>1.015&&位置要求&&K线实体>0.01

&&FINANCE(3)=1;

SPX1:=H/REF(C,1)>=1.11&&H=HHV(H,6)&&倍量0&&H/C>1.005&&C/REF(C,1)>1.015&&位置要求&&K线实体>0.02

&&FINANCE(3)=3;

SPX2:=SPX0 OR SPX1;

SPX3:=SPX2&&NOT(EXISTR(SPX2,6,1));

试盘K线:=FILTER(SPX3,5);

STICKLINE(试盘K线,H,L,0,0),COLORFF55FF;

STICKLINE(试盘K线,C,O,3.1,0),COLOR880088;

STICKLINE(试盘K线,C,O,2.6,0),COLORAA00AA;

STICKLINE(试盘K线,C,O,1.9,0),COLORCC00CC;

STICKLINE(试盘K线,C,O,1.1,0),COLOREE00EE;

STICKLINE(试盘K线,C,O,0.2,0),COLORFF44FF;

SPZQ:=BARSLAST(试盘K线);

试盘最高不破:=LAST(H<=REF(H,SPZQ),2,1);

洗盘不破:=COUNT(EMA(C,13)<REF(EMA(C,13),1),SPZQ)<2;

洗盘K00:=C<O&&H<REF(H,1);

洗盘K0:=EXIST(试盘K线,10)&&H<HHV(H,SPZQ+1)&&C>=EMA(C,13)&&L<=REF(C,SPZQ)&&C<O&&COUNT(洗盘K00,SPZQ)<2;

洗盘K:=TFILTER(洗盘K0,试盘K线,1);

XPZQ:=BARSLAST(洗盘K);

起爆K0:=EXISTR(试盘K线,10,3)&&C>REF(H,XPZQ)&&L<REF(H,XPZQ)&&EXISTR(洗盘K,SPZQ,1)&&C>O

&&洗盘不破&&(H-C)/(C-O)<1&&COUNT(C>REF(H,XPZQ),XPZQ)=1;

起爆K1:=EXISTR(试盘K线,10,2)&&EVERY(C>=EMA(C,13),SPZQ)&&C>REF(H,XPZQ)&&O<REF(H,XPZQ)

&&EXISTR(洗盘K,SPZQ,1)&&涨停板&&COUNT(涨停板,10)=1;

起爆K3:=起爆K0 OR 起爆K1;

起爆K:=FILTER(起爆K3,5);

{金柱}

STICKLINE(起爆K,O,C,3.1,0),COLOR00AAFF;

STICKLINE(起爆K,O,C,2.1,0),COLOR00BBFF;

STICKLINE(起爆K,O,C,1.5,0),COLOR00CCFF;

STICKLINE(起爆K,O,C,1,0),COLOR00DDFF;

STICKLINE(起爆K,O,C,0.6,0),COLOR00EEFF;

STICKLINE(起爆K,O,C,0.2,0),COLOR00FFFF;

STICKLINE(起爆K,H,L,0,0),COLOR00FFFF;

{银柱}

STICKLINE(FILTER(起爆K,5),O,L,0,0),COLORFFFFFF;

STICKLINE(FILTER(起爆K,5),O,MAX(O,REF(H,XPZQ)),3.1,0),COLOR555555;

STICKLINE(FILTER(起爆K,5),O,MAX(O,REF(H,XPZQ)),2.6,0),COLOR777777;

STICKLINE(FILTER(起爆K,5),O,MAX(O,REF(H,XPZQ)),1.9,0),COLOR999999;

STICKLINE(FILTER(起爆K,5),O,MAX(O,REF(H,XPZQ)),1.1,0),COLORCCCCCC;

STICKLINE(FILTER(起爆K,5),O,MAX(O,REF(H,XPZQ)),0.2,0),COLORFFFFFF;

起涨K0:=H>REF(H,XPZQ)&&H/REF(C,1)>1.03&&C>O&&EXIST(试盘K线,10)

&&EXIST(洗盘K,SPZQ)&&C<REF(H,XPZQ)&&NOT(EXIST(起爆K,SPZQ));

起涨K1:=EXISTR(试盘K线,1,1)&&C>O&&C<REF(H,1)&&C>REF(C,1)&&H<REF(H,1);

起涨K2:=起涨K0 OR 起涨K1;

起涨K:=FILTER(起涨K2,5);

STICKLINE(起涨K,H,L,0,0),COLOR0000FF;

STICKLINE(起涨K,C,O,3.1,0),COLOR000099;

STICKLINE(起涨K,C,O,2,0),COLOR0000BB;

STICKLINE(起涨K,C,O,1,0),COLOR0000DD;

STICKLINE(起涨K,C,O,0.2,0),COLOR0000FF;

生命线:EMA(C,13),COLORRED,LINETHICK2;

 

 源码未粘贴完..........
下载附件源码...............

原理解析：
X间隔值赋值:0.15
Y间隔值赋值:0.15
起点位X值赋值:X间隔值/10
起点位Y值赋值:Y间隔值/10
概念:=STRCAT('概念: ',GNBLOCK)
当满足条件C>0时,在横轴0*起点位X值纵轴0.5*起点位Y值位置书写文字
地域赋值:STRCAT(DYBLOCK,'')
当满足条件C>0时,在横轴0*起点位X值纵轴3.5*起点位Y值位置书写文字
行业赋值:STRCAT(HYBLOCK,'')
当满足条件C>0时,在横轴4*起点位X值纵轴3.5*起点位Y值位置书写文字
LTSZ:=STRCAT(STRCAT('总市值: ',CON2STR(FINANCE(41)/100000000,2)),' 亿元')
当满足条件C>0时,在横轴8*起点位X值纵轴3.5*起点位Y值位置书写文字
涨停板1赋值:C=H&&C/1日前的C>1.0975&&C/1日前的C<1.11&&FINANCE(3)=1
涨停板2赋值:C=H&&C/1日前的C>1.1985&&C/1日前的C<1.21&&FINANCE(3)=3
涨停板赋值:涨停板1 OR 涨停板2
K线实体赋值:C-O的绝对值/1日前的C
双倍量赋值:(V/REF(V的5日简单移动平均,1)>=2) OR (V/REF(V,1)>=3)
倍量0赋值:C>O&&双倍量&&C>C的13日指数移动平均&&V=6日内V最高值
倍量赋值:TFILTER(倍量0,C 位置要求赋值:L/C的13日指数移动平均<1.05
SPX0赋值:H/1日前的C>=1.06&&H=6日内H最高值&&倍量0&&H/C>1.005&&C/1日前的C>1.015&&位置要求&&K线实体>0.01
&&FINANCE(3)=1
SPX1赋值:H/1日前的C>=1.11&&H=6日内H最高值&&倍量0&&H/C>1.005&&C/1日前的C>1.015&&位置要求&&K线实体>0.02
&&FINANCE(3)=3
SPX2赋值:SPX0 OR SPX1
SPX3赋值:SPX2&&NOT(EXISTR(SPX2,6,1))
试盘K线赋值:SPX3的5过滤
当满足条件试盘K线时,在H和L之间画柱状线
当满足条件试盘K线时,在C和O之间画柱状线
当满足条件试盘K线时,在C和O之间画柱状线
当满足条件试盘K线时,在C和O之间画柱状线
当满足条件试盘K线时,在C和O之间画柱状线
当满足条件试盘K线时,在C和O之间画柱状线
SPZQ赋值:上次试盘K线距今天数
试盘最高不破赋值:LAST(H<=SPZQ日前的H,2,1)
洗盘不破赋值:COUNT(C的13日指数移动平均<1日前的C的13日指数移动平均,SPZQ)<2
洗盘K00赋值:C 洗盘K0赋值:最近10日存在试盘K线&&H=C的13日指数移动平均&&L<=SPZQ日前的C&&C 洗盘K赋值:TFILTER(洗盘K0,试盘K线,1)
XPZQ赋值:上次洗盘K距今天数
起爆K0赋值:EXISTR(试盘K线,10,3)&&C>XPZQ日前的H&&LO
&&洗盘不破&&(H-C)/(C-O)<1&&COUNT(C>XPZQ日前的H,XPZQ)=1
起爆K1赋值:EXISTR(试盘K线,10,2)&&EVERY(C>=C的13日指数移动平均,SPZQ)&&C>XPZQ日前的H&&O 起爆K3赋值:起爆K0 OR 起爆K1
起爆K赋值:起爆K3的5过滤
当满足条件起爆K时,在O和C之间画柱状线
当满足条件起爆K时,在O和C之间画柱状线
当满足条件起爆K时,在O和C之间画柱状线
当满足条件起爆K时,在O和C之间画柱状线
当满足条件起爆K时,在O和C之间画柱状线
当满足条件起爆K时,在O和C之间画柱状线
当满足条件起爆K时,在H和L之间画柱状线
{银柱}
STICKLINE(起爆K的5过滤,O,L,0,0),COLORFFFFFF
STICKLINE(起爆K的5过滤,O,O和XPZQ日前的H较大值,3.1,0),COLOR555555
STICKLINE(起爆K的5过滤,O,O和XPZQ日前的H较大值,2.6,0),COLOR777777
STICKLINE(起爆K的5过滤,O,O和XPZQ日前的H较大值,1.9,0),COLOR999999
STICKLINE(起爆K的5过滤,O,O和XPZQ日前的H较大值,1.1,0),COLORCCCCCC
STICKLINE(起爆K的5过滤,O,O和XPZQ日前的H较大值,0.2,0),COLORFFFFFF
起涨K0赋值:H>XPZQ日前的H&&H/1日前的C>1.03&&C>O&&最近10日存在试盘K线
&&最近SPZQ日存在洗盘K&&C 起涨K1赋值:EXISTR(试盘K线,1,1)&&C>O&&C<1日前的H&&C>1日前的C&&H<1日前的H
起涨K2赋值:起涨K0 OR 起涨K1
起涨K赋值:起涨K2的5过滤
当满足条件起涨K时,在H和L之间画柱状线
当满足条件起涨K时,在C和O之间画柱状线
当满足条件起涨K时,在C和O之间画柱状线
当满足条件起涨K时,在C和O之间画柱状线
当满足条件起涨K时,在C和O之间画柱状线
输出生命线:C的13日指数移动平均,画红色, 线宽为2
 

 源码未粘贴完..........