通达信黄金线公式
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 ; };
1020533373.jpg
|