[文华财经指标] 改编的黄金分割公式

T:=180;

T1:=10;

CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS;

HH:=REF(HHV(H,T),T1);

LL:=REF(LLV(L,T),T1);

H1:=HH-(HH-LL)*0.191;

H2:=HH-(HH-LL)*0.382;

H3:=HH-(HH-LL)*0.5;

H4:=HH-(HH-LL)*0.618;

H5:=HH-(HH-LL)*0.764;

H6:=HH-(HH-LL)*0.809;

H7:=HH-(HH-LL)*0.236;

顶1:=HH+(HH-LL)*0.191;

顶2:=HH+(HH-LL)*0.382;

顶3:=HH+(HH-LL)*0.618;

底1:=IF((HH-LL)<LL,LL-(HH-LL)*0.191,LL-LL*0.191);

底2:=IF((HH-LL)<LL,LL-(HH-LL)*0.382,LL-LL*0.382);

底3:=IF((HH-LL)<LL,LL-(HH-LL)*0.618,LL-LL*0.618);

高:=IF(CURRBARSCOUNT<=T+T1 AND CURRBARSCOUNT>T1,REFX1(HH,10000),NULL);

一:=IF(CURRBARSCOUNT<=T+T1,REFX1(H1,10000),NULL);

二:=IF(CURRBARSCOUNT<=T+T1,REFX1(H2,10000),NULL);

三:=IF(CURRBARSCOUNT<=T+T1,REFX1(H3,10000),NULL);

四:=IF(CURRBARSCOUNT<=T+T1,REFX1(H4,10000),NULL);

五:=IF(CURRBARSCOUNT<=T+T1,REFX1(H5,10000),NULL);

六:=IF(CURRBARSCOUNT<=T+T1,REFX1(H6,10000),NULL);

七:=IF(CURRBARSCOUNT<=T+T1,REFX1(H7,10000),NULL);

低:=IF(CURRBARSCOUNT<=T+T1 AND CURRBARSCOUNT>T1,REFX1(LL,10000),NULL);

NOTEXT1:高,COLOR007799;

AA:REFX1(一,10000),DOT,COLOR555555,NOTEXT;

BB:REFX1(二,10000),DOT,COLOR585800,NOTEXT;

CC:REFX1(三,10000),DOT,COLOR777777,NOTEXT;

DD:REFX1(四,10000),DOT,COLOR585800,NOTEXT;

EE:REFX1(五,10000),DOT,COLOR555555,NOTEXT;

FF:REFX1(六,10000),DOT,COLOR555555,NOTEXT;

GG:REFX1(七,10000),DOT,COLOR555555,NOTEXT;

AA1:REFX1(一,10000),COLORYELLOW,NODRAW;

BB1:REFX1(二,10000),COLORGREEN,NODRAW;

CC1:REFX1(三,10000),COLORYELLOW,NODRAW;

DD1:REFX1(四,10000),COLORYELLOW,NODRAW;

EE1:REFX1(五,10000),COLORGREEN,NODRAW;

FF1:REFX1(六,10000),COLORYELLOW,NODRAW;

GG1:REFX1(七,10000),COLORYELLOW,NODRAW;

NOTEXT8:低,COLOR668800;

TT:=INTPART(T*0.5)+T1;

TT1:=(CURRBARSCOUNT=TT);

TT2:=(CURRBARSCOUNT=TT-32);

TT3:=(CURRBARSCOUNT=TT-40);

DRAWTEXT(TT1 ,高-(高-低)*0.025,’【高点】:                               　’),COLOR997700;

DRAWTEXT(TT1 ,一+(高-低)*0.020,’191 (809):                               　’),COLOR888888;

DRAWTEXT(TT1 ,二+(高-低)*0.020,’382 (618):                               　’),COLOR888800;

DRAWTEXT(TT1 ,三+(高-低)*0.020,’【中点】:                               　’),COLOR880000;

DRAWTEXT(TT1 ,四+(高-低)*0.020,’618 (382):                               　’),COLOR888800;

DRAWTEXT(TT1 ,五+(高-低)*0.020,’764 (236):                               　’),COLOR888888;

DRAWTEXT(TT1 ,六+(高-低)*0,’809 (191):                               　’),COLOR888888;

DRAWTEXT(TT1 ,七+(高-低)*0,’236 (764):                               　’),COLOR888888;

DRAWTEXT(TT1 ,低+(高-低)*0.020,’【低点】:                               　’),COLOR008866;

DRAWNUMBER1(TT1 ,高-(高-低)*0.025,HH,2),COLOR997700;

DRAWNUMBER1(TT1 ,一+(高-低)*0.020,H1,2),COLOR888888;

DRAWNUMBER1(TT1 ,二+(高-低)*0.020,H2,2),COLOR888800;

DRAWNUMBER1(TT1 ,三+(高-低)*0.020,H3,2),COLOR880000;

DRAWNUMBER1(TT1 ,四+(高-低)*0.020,H4,2),COLOR888800;

DRAWNUMBER1(TT1 ,五+(高-低)*0.020,H5,2),COLOR888888;

DRAWNUMBER1(TT1 ,六+(高-低)*0,H6,2),COLOR888888;

DRAWNUMBER1(TT1 ,七+(高-低)*0,H7,2),COLOR888888;

DRAWNUMBER1(TT1 ,低+(高-低)*0.020,LL,2),COLOR668866;

DRAWTEXT(ISLASTBAR,HH,’注意：高低点的位置是否找对？不对一定要调整参数找准！                                                                                                                 ‘),COLORYELLOW;