通达信强劲强势副图指标公式（附源码破译和源码）

发布日期：2024-03-15 11:14    点击次数：131

编程思路破译

A1赋值:1日前的收盘价

A2赋值:不定周期收盘价

A3赋值:(A2-A1)/A1*100

AA1赋值:(A3-1日前的A3)

AA2赋值:9.8

选股1赋值:AA1上穿AA2

A11赋值:1日前的成交量(手)

A12赋值:不定周期成交量

A13赋值:A12/A11

AA3赋值:(A13-1日前的A13)

AA4赋值:500

选股2赋值:AA3上穿AA4

输出   抢劫:选股1AND选股2

M30赋值:收盘价的30日简单移动平均

M60赋值:收盘价的60日简单移动平均

   画带状线

   K线

T1赋值:上次M30上穿M60距今天数

T2赋值:T1+1日前的T1+T1+1

输出   D1:当满足条件到最后交易的周期=T1的最后一日取值设为常数+1时,在M30位置画直线起点，当满足条件1日前的到最后交易的周期=T1的最后一日取值设为常数+1时,在1日前的M30位置画直线终点,1表示是否延长.,DOTLINE,画绿色

输出   D2:当满足条件到最后交易的周期=T2的最后一日取值设为常数+1时,在M30位置画直线起点，当满足条件1日前的到最后交易的周期=T2的最后一日取值设为常数+1时,在1日前的M30位置画直线终点,1表示是否延长.,DOTLINE,画绿色

   当满足条件到最后交易的周期=T1的最后一日取值设为常数+1时,在M30*1.02位置书写文字画黄色,显示在位置之上

   当满足条件到最后交易的周期=T2的最后一日取值设为常数+1时,在M30*1.02位置书写文字画黄色,显示在位置之上

A1赋值:M30上穿M60累加至0的天数日前的T1+1日内最低价的最低值

A2赋值:M30上穿M60累加至1的天数日前的T1+1日内最低价的最低值

V1赋值:M30上穿M60累加至0的天数日前的T1+1日内成交量(手)的最高值

V2赋值:M30上穿M60累加至1的天数日前的T1+1日内成交量(手)的最高值

A3赋值:A1>A2ANDV1>V2

A4赋值:A3上穿0.5ANDD1>D2ANDC/D1<1.3

A5赋值:上次A4距今天数

XG赋值:统计A5日中满足收盘价>A5日前的收盘价的天数=1ANDC>A5日前的收盘价

   当满足条件XG时,在最低价位置画1号图标

   当满足条件A4时,在收盘价位置画直线起点，当满足条件1日前的A4时,在1日前的收盘价位置画直线终点,1表示是否延长.,画黄色,线宽为2

   当满足条件A4时,在收盘价位置书写文字,显示在位置之上,画黄色

XA1赋值:如果日期<99999999,返回1,否则返回无效数

输出   牛熊线:以成交量(手)为权重收盘价+5日前的收盘价*XA1/收盘价*0.098的90日简单移动平均的动态移动平均,线宽为1,CIRCLEDOT,画黄色

小牛赋值:收盘价上穿牛熊线

   当满足条件小牛时,在最低价位置书写文字*XA1,画红色,线宽为4

   当满足条件是否最后一个周期时,在牛熊线位置书写文字,画黄色

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

MXD赋值:如果(日期对应的转换天数)<99999999,返回1,否则返回无效数

输出   操盘线:(20*MID+19*1日前的MID+18*2日前的MID+17*3日前的MID+16*4日前的MID+15*5日前的MID+14*6日前的MID+13*7日前的MID+12*8日前的MID+11*9日前的MID+10*10日前的MID+9*11日前的MID+8*12日前的MID+7*13日前的MID+6*14日前的MID+5*15日前的MID+4*16日前的MID+3*17日前的MID+2*18日前的MID+20日前的MID)*MXD/210,NODRAW

输出   安全线:操盘线的11日简单移动平均*XA1*MXD,画深灰色,LINESTICK,线宽为1

输出   趋势线:收盘价的6日简单移动平均*XA1COLORGREEN,线宽为2

   当满足条件趋势线>=MA20时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.*MXD,COLOR0000FF

   当满足条件趋势线>=MA20时,在收盘价和开盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.*MXD,COLORCC66FF

   当满足条件MA20>趋势线时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.*MXD,COLORFF9900

   当满足条件MA20>趋势线时,在收盘价和开盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.*MXD,COLORFFCC00

大牛赋值:趋势线上穿MA20*XA1

死牛赋值:MA20上穿趋势线*XA1

   当满足条件大牛时,在最低价位置书写文字*XA1,画黄色,线宽为4

   当满足条件死牛时,在最高价位置书写文字*XA1,画白色 ,线宽为4

   当满足条件趋势线上穿MA20*MXD时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00FFFF 

   当满足条件MA20上穿趋势线*MXD时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00DD00

VAR2赋值:开盘价>收盘价的安全线日简单移动平均*MXDANDC<收盘价的安全线日简单移动平均*XA1

   当满足条件安全线上穿收盘价时,在开盘价和收盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.*MXD,COLORFF0000

输出   AMA3:如果趋势线/安全线日前的趋势线>0.997,返回趋势线,否则返回无效数*XA1,画蓝色,线宽为3

输出   AMA4:如果趋势线/安全线日前的趋势线>1.001,返回趋势线,否则返回无效数*XA1,画红色,线宽为3

WH1赋值:如果最低价=9日内最低价的最低值,返回最低价,否则返回0*MXD

WH2赋值:上次WH1不等于0距今天数的最后一日取值设为常数*MXD

WH3赋值:如果WH2=0,返回最高价,否则返回WH2日前的最高价的最后一日取值设为常数*MXD

WH4赋值:WH2+1日前的上次最高价>WH3距今天数+WH2+1的最后一日取值设为常数*MXD

WH5赋值:如果WH4=0,返回最高价,否则返回WH4日前的最高价的最后一日取值设为常数*MXD

WH6赋值:WH4+1日前的上次最高价>WH5距今天数+WH4+1的最后一日取值设为常数*MXD

输出   WH7:如果到最后交易的周期<=WH2+10,返回如果WH6=0,返回最高价,否则返回WH6日前的最高价的最后一日取值设为常数,否则返回无效数*MXD,画黄色,DOTLINE

   当满足条件是否最后一个周期时,在WH7位置书写文字*XA1,画黄色

DP赋值:如果收盘价=大盘的收盘价,返回0,否则返回1*MXD

GJ赋值:成交额(元)/成交量(手)/100

明日阻力赋值:最低价+(GJ-最低价)+(收盘价-最低价)*MXD

明日支撑赋值:最低价+(收盘价-GJ)*MXD

输出   今日阻力:1日前的明日阻力NODRAW

输出   今日支撑:1日前的明日支撑NODRAW

输出   GOODGUPIAO:收盘价-收盘价和0的较大值的7日[1日权重]移动平均/收盘价-收盘价的绝对值的7日[1日权重]移动平均*100,NODRAW

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

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

   当满足条件1时,在横轴0纵轴0.15位置书写文字*XA1,画洋红色

   当满足条件1时,在横轴0纵轴0.2位置书写文字*XA1,画红色

   当满足条件1时,在横轴0纵轴0.25位置书写文字*XA1,画青色

程序源码

   A1:=REF(C,1);

   A2:=DCLOSE;

   A3:=(A2-A1)/A1*100;

   AA1:=(A3-REF(A3,1));

   AA2:=9.8;

   选股1:=CROSS(AA1,AA2);

   A11:=REF(V,1);

   A12:=DVOL;

   A13:=A12/A11;

   AA3:=(A13-REF(A13,1));

   AA4:=500;

   选股2:=CROSS(AA3,AA4);

   抢劫:选股1AND选股2;

   M30:=MA(C,30);

   M60:=MA(C,60);

   DRAWBAND(M30,RGB(233,0,18),M60,RGB(21,174,103));

   DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

   T1:=BARSLAST(CROSS(M30,M60));

   T2:=REF(T1,T1+1)+T1+1;

   D1:DRAWLINE(CURRBARSCOUNT=CONST(T1)+1,M30,REF(CURRBARSCOUNT=CONST(T1)+1,1),REF(M30,1),1),DOTLINE,COLORGREEN;

   D2:DRAWLINE(CURRBARSCOUNT=CONST(T2)+1,M30,REF(CURRBARSCOUNT=CONST(T2)+1,1),REF(M30,1),1),DOTLINE,COLORGREEN;

   DRAWTEXT(CURRBARSCOUNT=CONST(T1)+1,M30*1.02,VARCAT(VARCAT('金叉价:',VAR2STR(C,2)),'元'))COLORYELLOW,DRAWABOVE;

   DRAWTEXT(CURRBARSCOUNT=CONST(T2)+1,M30*1.02,VARCAT(VARCAT('金叉价:',VAR2STR(C,2)),'元'))COLORYELLOW,DRAWABOVE;

   A1:=REF(LLV(L,T1+1),SUMBARS(CROSS(M30,M60),0));

   A2:=REF(LLV(L,T1+1),SUMBARS(CROSS(M30,M60),1));

   V1:=REF(HHV(V,T1+1),SUMBARS(CROSS(M30,M60),0));

   V2:=REF(HHV(V,T1+1),SUMBARS(CROSS(M30,M60),1));

   A3:=A1>A2ANDV1>V2;

   A4:=CROSS(A3,0.5)ANDD1>D2ANDC/D1<1.3;

   A5:=BARSLAST(A4);

   XG:=COUNT(C>REF(C,A5),A5)=1ANDC>REF(C,A5);

   DRAWICON(XG,LOW,1);

   DRAWLINE(A4,C,REF(A4,1),REF(C,1),1),COLORYELLOW,LINETHICK2;

   DRAWTEXT(A4,C,'双金叉上移'),DRAWABOVE,COLORYELLOW;

   XA1:=IF(DATE<99999999,1,DRAWNULL);

   牛熊线:DMA(MA(CLOSE+REF(CLOSE,5)*XA1/CLOSE*0.098,90),VOL),LINETHICK1,CIRCLEDOT,COLORYELLOW;

   小牛:=CROSS(C,牛熊线);

   DRAWTEXT(小牛,L,'↖走强区')*XA1,COLORRED,LINETHICK4;

   DRAWTEXT(ISLASTBAR,牛熊线,'牛熊线'),COLORYELLOW;

   MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;

   MXD:=IF((DATETODAY(DATE))<99999999,1,DRAWNULL);

   操盘线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))*MXD/210,NODRAW;

   安全线:MA(操盘线,11)*XA1*MXD,COLORGRAY,LINESTICK,LINETHICK1;

   趋势线:MA(C,6)*XA1COLORGREEN,LINETHICK2;

   STICKLINE(趋势线>=MA20,CLOSE,OPEN,3,0)*MXD,COLOR0000FF;

   STICKLINE(趋势线>=MA20,CLOSE,OPEN,0.5,0)*MXD,COLORCC66FF;

   STICKLINE(MA20>趋势线,CLOSE,OPEN,3,0)*MXD,COLORFF9900;

   STICKLINE(MA20>趋势线,CLOSE,OPEN,0.5,0)*MXD,COLORFFCC00;

   大牛:=CROSS(趋势线,MA20)*XA1;

   死牛:=CROSS(MA20,趋势线)*XA1;

   DRAWTEXT(大牛,L,'↖行情开始')*XA1,COLORYELLOW,LINETHICK4;

   DRAWTEXT(死牛,H,'↖行情结束')*XA1,COLORWHITE ,LINETHICK4;

   STICKLINE(CROSS(趋势线,MA20)*MXD,OPEN,CLOSE,2,0),COLOR00FFFF ;

   STICKLINE(CROSS(MA20,趋势线)*MXD,OPEN,CLOSE,2,0),COLOR00DD00;

   VAR2:=O>MA(C,安全线)*MXDANDC<MA(C,安全线)*XA1;

   STICKLINE(CROSS(安全线,C),OPEN,CLOSE,2,0)*MXD,COLORFF0000;

   AMA3:IF(趋势线/REF(趋势线,安全线)>0.997,趋势线,DRAWNULL)*XA1,COLORBLUE,LINETHICK3;

   AMA4:IF(趋势线/REF(趋势线,安全线)>1.001,趋势线,DRAWNULL)*XA1,COLORRED,LINETHICK3;

   WH1:=IF(L=LLV(L,9),L,0)*MXD;

   WH2:=CONST(BARSLAST(WH1!=0))*MXD;

   WH3:=CONST(IF(WH2=0,H,REF(H,WH2)))*MXD;

   WH4:=CONST(REF(BARSLAST(H>WH3),WH2+1)+WH2+1)*MXD;

   WH5:=CONST(IF(WH4=0,H,REF(H,WH4)))*MXD;

   WH6:=CONST(REF(BARSLAST(H>WH5),WH4+1)+WH4+1)*MXD;

   WH7:IF(CURRBARSCOUNT<=WH2+10,CONST(IF(WH6=0,H,REF(H,WH6))),DRAWNULL)*MXD,COLORYELLOW,DOTLINE;

   DRAWTEXT(ISLASTBAR,WH7,'进场线')*XA1,COLORYELLOW;

   DP:=IF(C=INDEXC,0,1)*MXD;

   GJ:=AMOUNT/V/100;

   明日阻力:=L+(GJ-L)+(C-L)*MXD;

   明日支撑:=L+(C-GJ)*MXD;

   今日阻力:REF(明日阻力,1)NODRAW;

   今日支撑:REF(明日支撑,1)NODRAW;

   {止盈价是股价盘中破掉了三十分钟不再站上来，立即止盈出局};

   GOODGUPIAO:SMA(MAX(CLOSE-C,0),7,1)/SMA(ABS(CLOSE-C),7,1)*100,NODRAW;

   DRAWTEXT_FIX(1,0,0.05,0,'金【趋势线上穿安全线是鱼身行情出现的信号】')*XA1,COLORYELLOW;

   DRAWTEXT_FIX(1,0,0.1,0,'木【趋势线下穿安全线是行情完全结束的信号】')*XA1,COLORGREEN;

   DRAWTEXT_FIX(1,0,0.15,0,'水【K线变蓝色下穿安全线是行情提前结束的信号】')*XA1,COLORMAGENTA;

   DRAWTEXT_FIX(1,0,0.2,0,'火【安全线上的红色K线就持股，灰蓝色K线就持币】')*XA1,COLORRED;

   DRAWTEXT_FIX(1,0,0.25,0,'土【K线上穿牛熊线为强势区，跟着行情死盯一只股买】')*XA1,COLORCYAN;

该公式包含未来函数:DCLOSE该公式包含未来函数:DVOL未发现:BARSNEXT...未发现:REFX...未发现:REFXV...该公式包含未来函数:DRAWLINE

注：

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

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

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