通达信直观又美观的黄金分割指标公式 通达信公式黄金分割指标主图

    以下是通达信直观又美观的黄金分割指标公式

    C/C++Code复制内容到剪贴板

    {N(1,999,80)}{M(1,15,3)}{P(1,100,5)}{K(1,100,13)}

    高:=REF(HHV(H,N),M);

    低:=REF(LLV(L,N),M);

    H19:=高-(高-低)*0.191,COLORMAGENTA;

    H38:=高-(高-低)*0.382,COLORCYAN;

    H中:=高-(高-低)*0.5,COLORGREEN;

    H61:=高-(高-低)*0.618,COLORYELLOW;

    H80:=高-(高-低)*0.809,COLORYELLOW;

    顶点:REFDATE(高,DATE),COLORGREEN,LINETHICK3;

    %19.8:REFDATE(H19,DATE),COLORYELLOW,LINETHICK2;

    %38.2:REFDATE(H38,DATE),COLORCYAN,LINETHICK2;

    %50:REFDATE(H中,DATE),COLORBLUE,LINETHICK2;

    %61.8:REFDATE(H61,DATE),COLORMAGENTA,LINETHICK2;

    %80.9:REFDATE(H80,DATE),COLORYELLOW,LINETHICK2;

    低点:REFDATE(低,DATE),COLORRED,LINETHICK2;

    DRAWTEXT(ISLASTBAR,顶点,'顶'),COLORGREEN;

    DRAWTEXT(ISLASTBAR,低点,'底'),COLORRED;

    MA5:MA(C,P),COLORWHITE;

    MA18:=MA(CLOSE,18);

    MA13:MA(C,K),COLORGREEN,LINETHICK2;

    VAR1:=C=HHV(C,4)ANDREF(C,1)=LLV(C,4);

    VAR2:=C=LLV(C,4)AND(REF(C,1)<REF(C,2)ORREF(C,1)<REF(C,3))ORREF(C,1)=LLV(C,4)ANDC<REF(C,2)ORREF(C,2)=LLV(C,4)ANDREF(C,1)=HHV(C,4)ANDC<REF(C,1)ORREF(C,3)=LLV(C,4)ANDC<REF(C,1)ANDC<REF(C,2);

    VAR3:=REF(C,1)=LLV(C,4)ANDC>=REF(C,2)ORREF(C,2)=LLV(C,4)ANDREF(C,1)<=REF(C,3)ANDREF(C,2)

    =REF(C,1);

    A:=(3*C+L+O+H)/6;

    VAR4:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+

    14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)

    +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;

    MTM:=C-REF(C,1);

    DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

    CB:=EMA(VAR4,13);

    {红}

    STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,3,0),COLOR0000FF;

    STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,0.5,0),COLORCC66FF;

    {蓝}

    STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,0),COLORFF9900;

    STICKLINE(CLOSE<OPEN,CLOSE,OPEN,0.5,0),COLORFFCC00;

    {粉}

    STICKLINE(VAR1,C,(O+C)/2,3,0),COLORFF11FF;

    STICKLINE(VAR1,C,(O+C)/2,0.5,0),COLORFFDDFF;

    {灰}

    STICKLINE(VAR2,C,(O+C)/2,3,0),COLOR999999;

    STICKLINE(VAR2,C,(O+C)/2,0.5,0),COLORFFBBFF;

    {绿}

    STICKLINE(VAR3,O,(O+C)/2,3,0),COLOR00BB00;

    STICKLINE(VAR3,O,(O+C)/2,0.5,0),COLOR00FF00;

    卖:=HHV(DX,2)=HHV(DX,7)ANDCOUNT(DX>50,2)ANDCROSS(MA(DX,2),DX);

    DRAWTEXT(FILTER(卖=1,1),HIGH*1.02,'卖'),COLORGREEN;

    买:=LLV(DX,2)=LLV(DX,7)ANDCOUNT(DX<0,2)ANDCROSS(DX,MA(DX,2));

    DRAWTEXT(FILTER(买=1,5),LOW-0.03,'买'),COLORRED;

    加仓:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;

    DRAWTEXT(FILTER((CROSS(加仓,0)ORCROSS(CLOSE,CB))AND买=1,3),LOW-0.03,'加'),COLORWHITE;

    跟:=MA18>=REF(MA18,3)ANDCROSS(CLOSE,MA18);

    DRAWTEXT(跟,LOW*0.96,'跟'),COLORCC66FF;

    通达信公式黄金分割指标主图

    大盘点位到了一个很重要的阻力点了

    1、从5178.19--2850.71==目前是32.8%附近

    2、从4184.45--2850.71==目前是61.8%；

    历史上在这个点位经常会回复原来趋势

    {黄金分割}

    N:=34;{你随意调整N的参数，看看效果如何：你可以发现更多级别的阻力和支撑点}

    高:IF(HIGH>PEAK(1,N,1),HHV(HIGH,N),PEAK(1,N,1)),COLORGREEN;{最高价}

    低:IF(LOW<TROUGH(2,N,1),LLV(LOW,N),TROUGH(2,N,1)),COLORMAGENTA;{最低价}

    F0.191:(高-低)*0.191+低,DOTLINE,COLORMAGENTA;

    F0.382:(高-低)*0.382+低,DOTLINE,COLORCYAN;

    F0.500:(高-低)*0.500+低,DOTLINE,COLORWHITE;

    F0.618:(高-低)*0.618+低,DOTLINE,COLORCYAN;

    F0.809:(高-低)*0.809+低,DOTLINE,COLORYELLOW;

    {黄金分割点位}

    波谷↑:=TROUGHBARS(2,N,1);{波谷起涨位}

    波峰↓:=PEAKBARS(1,N,1);{波峰起跌位}

    ZHSJ:=IF(波峰↓<波谷↑,BACKSET(ISLASTBAR,波峰↓),IF(波谷↑<波峰

    ↓,BACKSET(ISLASTBAR,波谷↑),0));

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),高*1.003,'重要阻力')COLORGREEN;

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.191*1.003,'

    80.9%'),COLORYELLOW;

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.382*1.003,'61.8%'),COLORCYAN;

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.500*1.003,'

    50.0%'),COLORWHITE;

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.618*1.003,'

    38.2%'),COLORGREEN;

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.809*1.003,'19.1%'),COLORRED;

    DRAWTEXT(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),低*1.003,'近期低点')COLORRED;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),高,高)COLORGREEN;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.809,F0.809)COLORMAGENTA;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.618,F0.618)COLORCYAN;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.500,F0.500)COLORWHITE;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.382,F0.382)COLORCYAN;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),F0.191,F0.191)COLORYELLOW;

    DRAWNUMBER(波峰↓<波谷↑ANDCROSS(ZHSJ,0.1),低,低)COLORRED;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),高*1.003,'重要阻力')COLORGREEN;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.191*1.003,'19.1%'),COLORRED;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.382*1.003,'

    38.2%'),COLORGREEN;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.500*1.003,'

    50.0%'),COLORWHITE;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.618*1.003,'61.8%'),COLORCYAN;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.809*1.003,'

    80.9%'),COLORYELLOW;

    DRAWTEXT(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),低*1.003,'近期低点')COLORRED;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),高,高)COLORGREEN;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.809,F0.809)COLORYELLOW;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.618,F0.618)COLORCYAN;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.500,F0.500)COLORWHITE;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.382,F0.382)COLORCYAN;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),F0.191,F0.191)COLORMAGENTA;

    DRAWNUMBER(波峰↓>波谷↑ANDCROSS(ZHSJ,0.1),低,低)COLORRED;

    MA21:MA(CLOSE,21)COLORLIMAGENTA,CROSSDOT;{布林中轨}

    {UB:MA21+2*STD(CLOSE,21)COLORLIMAGENTALINETHICK2;{布林上轨}

    {LB:MA21-2*STD(CLOSE,21)COLORLIMAGENTALINETHICK2;}{布林下轨}

    IF(MA21<REF(MA21,5),MA21,DRAWNULL)COLORCYAN,CROSSDOT;