舍不得给人的宝贝指标试金石－精品通达信指标公式源码分享

N :=21;   P :=13; 

TRR :=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));   

ATR:=MA(TRR,N);   

VAR1:=REF(CLOSE,1)-REF(ATR,1);   

生命线:HHV(VAR1,N),COLORWHITE;   

启动线:EMA(SLOPE(CLOSE,21)*20+CLOSE,55),LINETHICK2,COLORMAGENTA;   

牛熊线:EMA((2*CLOSE+LOW+HIGH)/4,55),COLORRED,LINETHICK2;   

{江恩成本线}   

成本线:(MA(CLOSE,60)+MA(CLOSE,70)+MA(CLOSE,90)+MA(CLOSE,108))/4,COLORBLUE;   

时1:=PEAKBARS(1,P,1);   

时2:=TROUGHBARS(2,P,1);   

起点:=MAX(时1,时2);   

TG:=BACKSET(ISLASTBAR,起点+1);   

高1:=IF(TG>0,PEAK(1,P,1),DRAWNULL);   

低1:=IF(TG>0,TROUGH(2,P,1),DRAWNULL);   

底1:=IF(C>=启动线,低1,DRAWNULL);   

顶1:=IF(C<启动线,高1,DRAWNULL);   

H1:=IF(C>=启动线,低1*(1+0.191),高1*(1-0.191));    

H2:=IF(C>=启动线,低1*(1+0.382),高1*(1-0.382));    

H3:=IF(C>=启动线,低1*(1+0.5),高1*(1-0.5));   

H4:=IF(C>=启动线,低1*(1+0.618),高1*(1-0.618));   

H5:=IF(C>=启动线,低1*(1+0.809),高1*(1-0.809));   

底:IF(TG>0,REFDATE(底1,DATE),DRAWNULL),COLORGREEN,LINETHICK3;   

顶:IF(TG>0,REFDATE(顶1,DATE),DRAWNULL),COLORBLUE,LINETHICK3;   

%191:IF(TG>0,REFDATE(H1,DATE),DRAWNULL),COLORYELLOW;   

%382:IF(TG>0,REFDATE(H2,DATE),DRAWNULL),COLORMAGENTA;   

%50:IF(TG>0,REFDATE(H3,DATE),DRAWNULL),COLORLIGRAY;   

%618:IF(TG>0,REFDATE(H4,DATE),DRAWNULL),COLORRED;   

%809:IF(TG>0,REFDATE(H5,DATE),DRAWNULL),COLORWHITE;