通达信黄金线公式

T:=150;TT:=3;
高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
 H1:=高1-(高1-低1)*0.191;
 H2:=高1-(高1-低1)*0.382;
 H3:=高1-(高1-低1)*0.5;
 H4:=高1-(高1-低1)*0.618;
 H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),COLORLIBLUE,DOTLINE;
一:REFDATE(H1,DATE),COLORLIBLUE,DOTLINE;
二:REFDATE(H2,DATE),COLORLIBLUE,DOTLINE;
三:REFDATE(H3,DATE),COLORLIBLUE,DOTLINE;
四:REFDATE(H4,DATE),COLORLIBLUE,DOTLINE;
五:REFDATE(H5,DATE),COLORLIBLUE,DOTLINE;
低:REFDATE(低1,DATE),COLORLIBLUE,DOTLINE;
 TT3:=(CURRBARSCOUNT=5);
 TT4:=(CURRBARSCOUNT=5+3);
 DRAWNUMBER(TT3 AND 顶,顶,顶),COLOR999900;
 DRAWTEXT(TT4 AND 顶,顶,'高:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 一,一,一),COLOR999999;
 DRAWTEXT(TT4 AND 一,一,'191:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 二,二,二),COLOR999999;
 DRAWTEXT(TT4 AND 二,二,'382:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 三,三,三),COLOR999999;
 DRAWTEXT(TT4 AND 三,三,'1/2:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 四,四,四),COLOR999999;
 DRAWTEXT(TT4 AND 四,四,'618:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 五,五,五),COLOR999999;
 DRAWTEXT(TT4 AND 五,五,'809:'),COLOR208FFF;
 DRAWNUMBER(TT3 AND 低,低*1.01,低),COLOR999900;
 DRAWTEXT(TT4 AND 低,低*1.009,'低:'),COLOR208FFF;   
 NDAY1 := 5;
 DOWN:= CLOSE/LLV(LOW,60)<=1.2;
 PMA1: MA(CLOSE,5),COLORRED;
 PMA2: MA(CLOSE,10),COLORMAGENTA;
 L30:MA(C,30),COLORBLUE;
 L60:MA(C,60),COLORGREEN;

均价:=DYNAINFO(11);
明日压力:=IF(ISLASTBAR,(CLOSE+(均价-LOW)),CLOSE),CROSSDOT,LINETHICK1,COLORRED;
明日支撑:=IF(ISLASTBAR,(LOW+(CLOSE-均价)),CLOSE),CROSSDOT,LINETHICK1,COLORGREEN;

 E:=(H+L+O+2*C)/5;
次日突破价:=E+(H-L);
次日阻力价:=2*E-L,COLORBLUE;
次日支撑价:=2*E-H,COLORRED;
次日下跌反转价:=E-(H-L);
心理价:=(E+次日突破价+次日阻力价+次日支撑价+次日下跌反转价)/5,CIRCLEDOT,COLORLICYAN,LINETHICK1;

保护价:=(REF(C,1)+REF(C,2)+O)/3,POINTDOT,LINETHICK6,COLORMAGENTA;
 VMA1:= MA(VOL,5);
 VMA2:= MA(VOL,10);
 DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
 DEA:= EMA(DIFF,9);
 PPDAY:= BARSLAST(CROSS(PMA1,PMA2));
 VVDAY:= BARSLAST(CROSS(VMA1,VMA2));
 MACDDAY:= BARSLAST(CROSS(DIFF,DEA));
底部金叉:= PPDAY<=NDAY1 AND VVDAY<=NDAY1 AND MACDDAY<=NDAY1;

 HDOWN := HHV(HIGH,20)/HIGH<=1.15;
 HPPDAY := BARSLAST(CROSS(PMA2,PMA1));
 HVVDAY := BARSLAST(CROSS(VMA2,VMA1));
 HMACDDAY := BARSLAST(CROSS(DEA,DIFF));
顶部死叉:= HPPDAY<=NDAY1 AND HVVDAY<=NDAY1 AND HMACDDAY<=NDAY1;

 {DRAWTEXT(FILTER(底部金叉,5),L*0.94,'J'),COLORMAGENTA;
 DRAWTEXT(FILTER(顶部死叉,5),H*1.06,'S'),COLORBLUE;
 DRAWICON(FILTER(底部金叉,5),L*0.98,1),COLORMAGENTA;
 DRAWICON(FILTER(顶部死叉,5),H*1.02,2),COLORBLUE;
 DRAWTEXT((KDJ.J<0 OR CROSS(KDJ.J,0))AND KDJ.J>REF(KDJ.J,1) AND REF(KDJ.J,1)<REF(KDJ.J,2),L*0.98,'B'),COLORRED; }

 DRAWICON(FILTER(底部金叉,5),MA(CLOSE,5),1),COLORMAGENTA;
 DRAWICON(FILTER(顶部死叉,5),MA(CLOSE,5),2),COLORBLUE;
 { DRAWTEXT((KDJ.J<0 OR CROSS(KDJ.J,0))AND KDJ.J>REF(KDJ.J,1) AND REF(KDJ.J,1)<REF(KDJ.J,2),MA(CLOSE,5),'B'),COLORMAGENTA; }

 MTR:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),7,1);
 HD:=HIGH-REF(HIGH,1);
 LD:=REF(LOW,1)-LOW;
 DMP:=SMA(IF(HD>0 AND HD>LD,HD,0),7,1);
 DMM:=SMA(IF(LD>0 AND LD>HD,LD,0),7,1);
 PDI:=DMP*100/MTR,COLORRED;
 MDI:=DMM*100/MTR,COLORBLUE;
 { STICKLINE(PDI>46,O,C,-1,1),COLORGREEN;
 STICKLINE(PDI>46,L,MIN(O,C),0,1),COLORGREEN;
 STICKLINE(PDI>46,H,MAX(O,C),0,1),COLORGREEN;
 STICKLINE(PDI>55,O,C,-1,1),COLORBLUE;
 STICKLINE(PDI>55,L,MIN(O,C),0,1),COLORBLUE;
 STICKLINE(PDI>55,H,MAX(O,C),0,1),COLORBLUE;
 STICKLINE(MDI>46,C,O,-1,1),COLORMAGENTA;
 STICKLINE(MDI>46,L,MIN(O,C),0,1),COLORMAGENTA;
 STICKLINE(MDI>46,H,MAX(O,C),0,1),COLORMAGENTA;
 STICKLINE(MDI>55,O,C,-1,1),COLORRED;
 STICKLINE(MDI>55,L,MIN(O,C),0,1),COLORRED;
 STICKLINE(MDI>55,H,MAX(O,C),0,1),COLORRED;}

 MID:=REF(HIGH+LOW,1)/2;
 CR:=SUM(MAX(0,HIGH-MID),18)/SUM(MAX(0,MID-LOW),18)*100,COLORLIMAGENTA;
 {IF(CR>250,CR,DRAWNULL),COLORLIBLUE,LINETHICK3;
 IF(CR>400,CR,DRAWNULL),COLORRED,LINETHICK3;}

 { STICKLINE(PDI>46 AND CR>250 ,O,C,-1,0),COLORGREEN;
 STICKLINE(PDI>46 AND CR>250 ,L,MIN(O,C),0,0),COLORGREEN;
 STICKLINE(PDI>46 AND CR>250 ,H ,MAX(O,C),0,0),COLORGREEN;
 STICKLINE(PDI>55 AND CR>400 ,O,C,-1,0),COLORBLUE;
 STICKLINE(PDI>55 AND CR>400 ,L,MIN(O,C),0,0),COLORBLUE;
 STICKLINE(PDI>55 AND CR>400 ,H,MAX(O,C),0,0),COLORBLUE;
 STICKLINE(CR>250,O,C,2,0),COLORYELLOW ;
 STICKLINE(CR>400,O,C,2,0),COLORFF66FF ;}

 DRAWTEXT(CROSS(H,MA(C,5)*1.1)  AND CURRBARSCOUNT<10  ,HHV(H,3),'CS'),COLORGREEN;
 DRAWTEXT(CROSS(H,MA(C,5)*1.15)   AND CURRBARSCOUNT<10 ,HHV(H,3),'CS'),COLORBLUE;
 DRAWTEXT(CROSS(MA(C,5)*0.9,L) AND CURRBARSCOUNT<10 ,LLV(L,3),'CB'),COLORRED;

 IF(C<MA(C,5),MA(C,5),DRAWNULL),COLORLIBLUE,LINETHICK3;

 { STICKLINE(C<REF(C,1) AND REF(C,1)<REF(O,1) AND REF(C,2)<REF(O,2),O,C,-1,1),COLORCYAN;
 STICKLINE(C<REF(C,1) AND REF(C,1)<REF(O,1) AND REF(C,2)<REF(O,2),L,MIN(O,C),0,1),COLORCYAN;
 STICKLINE(C<REF(C,1) AND REF(C,1)<REF(O,1) AND REF(C,2)<REF(O,2),H,MAX(O,C),0,1),COLORCYAN;
 STICKLINE(C<REF(C,1) AND REF(C,1)<REF(O,1) AND REF(C,2)<REF(O,2),O,C,2,0),COLORLIGREEN ; };