最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 变色macd指标公式(自编变色macd指标)

    正文概述    2024-05-04 04:31:03  

    通达信指标公式源码概况:


    指标类别: 通达信指标公式


    授权方式: 免费版


    指标评级: ★★★★★


    指标分类: 策略


    画线方法: 副图



    一、变色指标公式


     

    {BBD动能操盘} 

    AL:=(C+L+H)/3; 

    AO:=SMA(AL,5,1)-SMA(AL,13,1); 

    BBD:(AO-SMA(AO,3,1))*100,COLORFFCCFF,NODRAW; 

    {动能线定义} 

    动能线:AO*10,COLORRED; 

    动能辅线:EMA(AO,5)*10,COLOR00FF00; 

    {动能线强弱分界带} 

    DRAWBAND(动能辅线,RGB(115,95,95),0,RGB(95,95,115)); 

    {动能彩带} 

    DRAWBAND(动能线,RGB(175,0,55),动能辅线,RGB(55,175,0)); 

    {BBD支撑线定义} 

    BBD支撑线:SMA(BBD,5,2),COLOR0033FF,LINETHICK2; 

    RSV1:=BBD; 

    RSV2:=BBD支撑线; 

    弱:IF(BACKSET(RSV2 REF(RSV2,1),1),RSV2,DRAWNULL),LINETHICK2,COLORFF3300; 

    {BBD彩色柱体} 

    {BBD1:=IF(BBD =REF(BBD,1),BBD,DRAWNULL); 

    BBD2:=IF(BBD REF(BBD,1),BBD,DRAWNULL); 

    STICKLINE(BBD1,0,BBD,1.5,0),COLOR885588; 

    STICKLINE(BBD1,0,BBD,1,0),COLORAA77AA; 

    STICKLINE(BBD1,0,BBD,0.5,0),COLORBB99BB; 

    STICKLINE(BBD1,0,BBD,0.1,0),COLORDDAADD; 

    STICKLINE(BBD2,0,BBD,1.5,0),COLOR757500; 

    STICKLINE(BBD2,0,BBD,1,0),COLORAAAA00; 

    STICKLINE(BBD2,0,BBD,0.5,0),COLORBBBB00; 

    STICKLINE(BBD2,0,BBD,0.1,0),COLORDDDD00;} 

    {BBD支撑线死叉} 

    BBD金叉:IF(CROSS(RSV1,RSV2),RSV2,DRAWNULL),CIRCLEDOT,COLORFF33FF; 

    BBD死叉:IF(CROSS(RSV2,RSV1),RSV2,DRAWNULL),CIRCLEDOT,COLORFFFF00; 

    SV1:=BARSLAST(REF(CROSS(RSV1,RSV2),1)); 

    SV1A:=REF(CLOSE,SV1+1) CLOSEANDRSV1 REF(RSV1,SV1+1)AND 

    CROSS(RSV1,RSV2); 

    B底背:IF(SV1A,RSV2,DRAWNULL),COLOR3366FF; 

    DRAWTEXT(SV1A,RSV2, ─B底背 ),COLOR0033FF; 

    SV2:=BARSLAST(REF(CROSS(RSV2,RSV1),1)); 

    SV2A:=REF(CLOSE,SV2+1) CLOSEANDREF(RSV1,SV2+1) RSV1ANDCROSS(RSV2,RSV1); 

    B顶背:IF(SV2A,RSV2,DRAWNULL),COLORFFFF00; 

    DRAWTEXT(SV2A,RSV2, ─B顶背 ),COLORFFFF00; 

    {动能线金叉死叉顶底背离} 

    RSV3:=动能线; 

    RSV4:=动能辅线; 

    动能金叉:IF(CROSS(RSV3,RSV4),RSV3,DRAWNULL),CIRCLEDOT,COLOR0000FF; 

    动能死叉:IF(CROSS(RSV4,RSV3),RSV3,DRAWNULL),CIRCLEDOT,COLOR00FF00; 

    SV3:=BARSLAST(REF(CROSS(RSV3,RSV4),1)); 

    SV3A:=REF(CLOSE,SV3+1) CLOSEANDRSV3 REF(RSV3,SV3+1)AND 

    CROSS(RSV3,RSV4); 

    动底背:IF(SV3A,RSV3,DRAWNULL),COLOR0000FF; 

    DRAWTEXT(SV3A,RSV3, ─动底背 ),COLOR0000FF; 

    SV4:=BARSLAST(REF(CROSS(RSV4,RSV3),1)); 

    SV4A:=REF(CLOSE,SV4+1) CLOSEANDREF(RSV3,SV4+1) RSV3ANDCROSS(RSV4,RSV3); 

    动顶背:IF(SV4A,RSV3,DRAWNULL),COLOR00FF00; 

    DRAWTEXT(SV4A,RSV3, ─动顶背 ),COLOR00FF00; 

    市场:DMA(AMOUNT/V/100,V/CAPITAL),COLORRED,LINETHICK2; 

    上升:IF(市场成本 REF(市场成本,1),市场成本,DRAWNULL),COLORRED,LINETHICK3; 

    下降:IF(市场成本 REF(市场成本,1),市场成本,DRAWNULL),COLORLIBLUE,LINETHICK2; 

    DRAWICON(CROSS(C,市场成本)AND市场成本 REF(市场成本,1),L-0.20,1);{1号图标显示红脸} 

    DRAWICON(CROSS(市场成本,C),H+0.20,2); 

    {PARTLINE(市场成本,市场成本 REF(市场成本,1),RGB(255,0,0),NOT(市场成本 REF(市场成本,1)),RGB(0,0,255),1,RGB(0,0,255)),LINETHICK2;} 

    MA13:MA(C,13),COLORWHITE; 

    MA34:MA(C,34),COLORYELLOW; 

    DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26); 

    DEA:=EMA(DIFF,9); 

    A1:=BARSLAST(REF(CROSS(DIFF,DEA),1)); 

    B1:=REF(C,A1+1) CANDREF(DIFF,A1+1) DIFFANDCROSS(DIFF,DEA); 

    A2:=BARSLAST(REF(CROSS( KDJ.K (9,3,3), KDJ.D (9,3,3)),1)); 

    B2:=REF(C,A2+1) CANDREF( KDJ.K (9,3,3),A2+1) KDJ.K (9,3,3)ANDCROSS( KDJ.K (9,3,3), KDJ.D (9,3,3)); 

    A3:=BARSLAST(REF(CROSS( RSI.RSI1 (6,12,24), RSI.RSI2 (6,12,24)),1)); 

    B3:=REF(C,A3+1) CANDREF( RSI.RSI1 (6,12,24),A3+1) RSI.RSI1 (6,12,24)ANDCROSS( RSI.RSI1 (6,12,24), RSI.RSI2 (6,12,24)); 

    DRAWICON(B1 0,L-0.20,5); 

    DRAWTEXT(B1,L-0.30, MACD底背 ),COLORWHITE; 

    DRAWICON(B2 0,L-0.20,4); 

    DRAWTEXT(B2,L-0.30, KDJ底背 ),COLORFF00FF; 

    DRAWICON(B3 0,L-0.20,3); 

    DRAWTEXT(B3,L-0.30, RSI底背 ),COLORYELLOW; 

    DRAWICON(CROSS(DIFF,DEA)ANDCROSS( KDJ.K (9,3,3), KDJ.D (9,3,3)),L-0.20,6); 

    DRAWTEXT(CROSS(DIFF,DEA)ANDCROSS( KDJ.K (9,3,3), KDJ.D (9,3,3)),L-0.30, 金叉 ),COLOR0099FF; 

    吸筹线1:=COST(50)*COST(50)/COST(80); 

    吸筹线2:=COST(40)*COST(40)/COST(60); 

    差:吸筹线2-吸筹线1,NODRAW; 

    STICKLINE(差 0ANDC 吸筹线2,0,差,2,0),COLORRED; 

    STICKLINE(差 0ANDC 吸筹线2ANDC MA(C,10),0,差*0.2,2,0),COLORYELLOW; 

    STICKLINE(差 0ANDC 吸筹线2,0,差,2,0),COLORCYAN; 

    STICKLINE(差 0ANDC 吸筹线2ANDC 吸筹线1,0,差*0.5,2,0),COLORBLUE; 

    STICKLINE(差 0ANDC 吸筹线2ANDC 吸筹线1,差*0.5,差,2,0),COLORYELLOW; 

    STICKLINE(差 0,0,差,2,0),COLORCYAN; 

    STICKLINE(差 0ANDC 吸筹线1,0,差,2,0),COLORMAGENTA; 

    STICKLINE(差 0ANDC 吸筹线1ANDC MA(C,5),0,差*0.2,2,0),COLORYELLOW;


    image.png



    二、自编变色macd指标


     

    N:=9;N1:=9;M1:=3;M2:=3; 

    RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100; 

    K:SMA(RSV,M1,1),LINETHICK2; 

    D:SMA(K,M2,1),LINETHICK2; 

    J:3*K-2*D,LINETHICK2; 

    WR1:100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)),LINETHICK2; 

    50,DOTLINE; 

    DIFL:=EMA(V,12)-EMA(V,26); 

    DIF:=EMA(C,12)-EMA(C,26); 

    LOWV:=LLV(LOW,10); 

    HIGHV:=HHV(HIGH,10); 

    RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,3); 

    K:=EMA(RSV,3); 

    D:=MA(K,3); 

    底:DIFL REF(DIFL,1)ANDDIF REF(DIF,1)ANDK 20,COLORRED,LINETHICK2; 

    顶:DIFL REF(DIFL,1)ANDDIF REF(DIF,1)ANDK 80,COLORGREEN,LINETHICK2; 

    DRAWGBK(C=C,COLORRGB(130,130,130),COLORRGB(30,30,30),1); 

    BIAS1:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100; 

    BIAS2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100; 

    BIAS3:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100; 

    BIASAA:=(BIAS1+BIAS2+BIAS3)/3; 

    dif:=(ema(BIASAA,5)-ema(BIASAA,34)); 

    de:=ema(dif,9); 

    macd:3*(dif-de); 

    ////////////// 

    {红柱} 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,3,0),COLOR0000AA; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.7,0),COLOR0000BB; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.3,0),COLOR0000CC; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2,0),COLOR0000CC; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.6,0),COLOR0000DD; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.2,0),COLOR0000EE; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.8,0),COLOR0000FF; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.5,0),COLORRED; 

    {黄柱} 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,3,0),color0090FF; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.7,0),color009FFF; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.3,0),color00a6FF; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2,0),color00b5FF; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.6,0),color00c4FF;; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.2,0),Color00d3ff; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.8,0),color00e2FF; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.5,0),color00FFFF; 

    {蓝柱} 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,3,0),COLORFF0000; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.7,0),COLORFF3300; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.3,0),COLORFF5500; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2,0),COLORFF7700; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.6,0),COLORFF9900; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.2,0),COLORFFBB00; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.8,0),COLORFFDD00; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.5,0),COLORFFFF00; 

    {粉柱} 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,3,0),ColorFF00a9; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.7,0),ColorFF00a1; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2.3,0),ColorFF00aa; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,2,0),ColorFF00bb; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.6,0),ColorFF00cc; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,1.2,0),ColorFF00dd; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.8,0),ColorFF00ee; 

    STICKLINE(macd 0andmacd ref(macd,1),macd,0,0.5,0),ColorFF00ff; 

    ///////// 

    b5:=sMA(BIAS1,2,1),COLORGREEN,LINETHICK1,LINEDOT; 

    b13:=sma(BIAS2,2,1),LINETHICK0,COLORRED; 

    b34:=sMA(BIAS3,5,1),COLORWHITE,LINETHICK1; 

    m13_5:ema(b13,5),COLORWHITE,LINETHICK1; 

    m13_10:ema(b13,10),COLORCYAN,LINETHICK1; 

    m34_5:=ema(b34,5),COLORGREEN,,LINEDOT; 

    m34_10:=ema(b34,10),COLORMAGENTA,LINEDOT; 

    PARTLINE(B13 REF(B13,1),B13),COLORRED,LINETHICK3; 

    PARTLINE(B13 REF(B13,1),B13),ColorFF0F80,LINETHICK3; 

    cysm13:b13,LINETHICK0,COLORBROWN; 

    :m34_5,COLORGREEN,,LINEDOT; 

    游资:m34_10,COLORMAGENTA,LINEDOT; 

    DRAWICON(CROSS(b13,m13_5),m13_5,12),ALIGN; 

    DRAWICON(CROSS(m13_5,b13),m13_5,11),ALIGN; 

    DRAWICON(cross(m13_5,m13_10)andb13 ref(b13,1),0,3),ALIGN; 

    DRAWICON(cross(m34_5,m13_10)andb13 ref(b13,1),0,1),ALIGN; 

    VERTLINE(cross(主力,游资)),LINEDOT,COLORRED; 

    AAA:=REF(CLOSE,1); 

    BBB:=SMA(MAX(CLOSE-AAA,0),5,1)/SMA(ABS(CLOSE-AAA),5,1)*1000; 

    HHH:=BBB-LLV(BBB,10); 

    SS:=(MA(HHH,2)*3+HHH*13)/16; 

    买点:=IF(SS 13,MA(SS,2),SS)/6; 

    短线出击:IF(CROSS(短线买点,1)AND(短线买点 30),10,0),COLORWHITE,LINETHICK2; 

    持仓:IF(CLOSE =SAR(4,2,20),SAR(4,2,20), 

    DRAWNULL),CIRCLEDOT,COLORRED; 

    空仓:IF(CLOSE =SAR(4,2,20),SAR(4,2,20), 

    DRAWNULL),CIRCLEDOT,COLORGREEN; 

    获利%:WINNER(CLOSE)*100,NODRAW,COLORWHITE; 

    V1:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); 

    V2:=(1-7/100)*(DMA(CLOSE,V1)); 

    V3:=(1+7/100)*(DMA(CLOSE,V1)); 

    V5:=MA((LOW+HIGH+CLOSE)/3,5); 

    支撑:REFDATE(V2,DATE),POINTDOT,LINETHICK4,COLORCC66FF; 

    阻力:REFDATE(V3,DATE),POINTDOT,LINETHICK4,COLORFF0033; 

    DRAWKLINE(H,O,L,C); 

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

    STICKLINE(涨停,OPEN,CLOSE,2,0),COLORMAGENTA; 

    STICKLINE(涨停,H,L,0,0),COLORMAGENTA; 

    跌停:=IF((REF(C,1)-C)*100/REF(C,1) =(10-0.01*100/REF(C,1)),1,0); 

    STICKLINE(跌停,OPEN,CLOSE,2,0),COLORBLUE; 

    STICKLINE(跌停,H,L,0,1),COLORBLUE;



    image.png

    [源码注释]通达信公式动态公式解读


    N赋值:60

    K1赋值:如果收盘价 =1日前的收盘价,返回最高价-开盘价+收盘价-最低价+收盘价-1日前的收盘价,否则返回最高价-开盘价+收盘价-最低价

    K2赋值:如果收盘价 =1日前的收盘价,返回开盘价-最低价+最高价-收盘价+1日前的收盘价-收盘价,否则返回开盘价-最低价+最高价-收盘价

    DT赋值:(手)*K1/(K1+K2)

    KT赋值:成交量(手)-DT

    输出买量:DT的N日累和,画红色

    输出卖量:KT的N日累和,画青色


    推荐阅读:macd变红公式

    DC:=(2*C+H+L+O)/5;

    EMDC:=EMA(EMA(EMA(DC,4),4),4);

    BB:=(EMDC-REF(EMDC,1))/REF(EMDC,1)*100,;

    BA:=MA(BB,6);

    :(BB-BA)*100,NODRAW,COLORRED;

    DRAWBAND(私募资金,RGB(255,1,0),0,RGB(51,255,255));

    OBV:=MA(SUM(IF(CLOSE REF(CLOSE,1),VOL,IF(CLOSE REF(CLOSE,1),-VOL,0))/25000,0),1);

    OBVE:=EMA(OBV,3);

    DIFF : EMA(OBVE,12) - EMA(OBVE,26),LINETHICK2;

    BBDIFF:=DIFF-REF(DIFF,1);

    DEA  : EMA(DIFF,9),LINETHICK2;

    BBDEA:=DEA-REF(DEA,1);

    MACD : 2*(DIFF-DEA), COLORSTICK;

    STICKLINE(MACD REF(MACD,1)AND MACD 0,0,MACD,2.5,0),COLORGREEN;

    STICKLINE(MACD REF(MACD,1)AND MACD 0,0,MACD,3,1),COLORFFCC33;

    STICKLINE(MACD REF(MACD,1)AND MACD 0,0,MACD,3,1),COLOR0099FF;

    STICKLINE(MACD REF(MACD,1)AND MACD 0,0,MACD,3,1),COLORYELLOW;

    IF(BBDEA 0,DEA,DRAWNULL),COLOR9966CC,LINETHICK2;

    IF(BBDEA 0,DEA,DRAWNULL),COLOR00FF33,LINETHICK2;

    IF(BBDIFF 0,DIFF,DRAWNULL),COLORRED,LINETHICK2;

    IF(BBDIFF 0,DIFF,DRAWNULL),COLORCYAN,LINETHICK2;

    VA:=IF(CLOSE REF(CLOSE,1),VOL,-VOL);

    OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0),COLORWHITE;

    MAOBV:=MA(OBV,30);

    零点:(CONST(LLV(OBV,90))+CONST(HHV(OBV,90)))/2,CIRCLEDOT,COLORWHITE;

    DI:=EMA(CLOSE,12)-EMA(CLOSE,26);

    F分:=CONST(LLV(DI,90));

    F百:=CONST(HHV(DI,90))-F分;

    点:=CONST(LLV(OBV,90));

    基:=CONST(HHV(OBV,90))-点;

    F比:=(DI-F分)/F百;

    XFX:=F比*基+点;

    DIF:=XFX,LINETHICK2;

    DEA:=EMA(DIF,9),LINETHICK2;

    MACD:(DIF-DEA)*2+零点;

    STICKLINE(MACD 零点,零点,MACD,0,0),COLORRED;

    STICKLINE(MACD 零点,零点,MACD,0,0),COLORCYAN;

    MAV:=MA(VOL,30);

    DRAWICON(VOL MA(VOL,30)*3 AND CLOSE REF(CLOSE,1),零点,1);

    DRAWICON(VOL MA(VOL,30)*3 AND CLOSE REF(CLOSE,1) AND REF(VOL,1) MA(VOL,30)*3,零点+10,11);

    主力:= 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1), ,LINETHICK2, ;

    底部信号:10, ,LINETHICK2,colorred ;

    个股参考: IF(CROSS(主力,底部信号),20,10), ,LINETHICK2,coloryellow;

    DRAWTEXT(个股参考=20,21, ←买 ),colorwhite;

    V1:=(C*2+H+L)/4*10;

    V2:=EMA(V1,13)-EMA(V1,34);

    V3:=EMA(V2,5);

    V4:=2*(V2-V3)*5.5;

    V5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;

    V6:=EMA(3*V5-2*SMA(V5,18,1),5);

    V7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;

    V8:=(INDEXC*2+INDEXH+INDEXL)/4;

    V9:=EMA(V8,13)-EMA(V8,34);

    VA:=EMA(V9,3); VB:=(V9-VA)/2;

    V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);

    撤: IF(V4 =0,V4,0),colorgreen;

    庄家进: IF(V4 =0,V4,0),colorred;


    image.png


    每日公式解答:

     

    股票公式编写要求: 

    MACD前1-3天小绿柱后2次翻红的公式。 

    股票公式编写结果: 

    MACD:=MACD.MACD; 

    T:=BARSLAST(CROSS(0,MACD)); 

    XG:COUNT(CROSS(MACD,0),T)=1ANDT


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 变色macd指标公式(自编变色macd指标) 加入收藏