最厉害的黄金分割线主图指标 源码 通达信

参数1: P1, 最小: 0, 最大: 10000, 缺省: 5
参数2: P2, 最小: 0, 最大: 10000, 缺省: 10
参数3: P3, 最小: 0, 最大: 10000, 缺省: 20
参数4: P4, 最小: 0, 最大: 10000, 缺省: 30
参数5: P5, 最小: 0, 最大: 10000, 缺省: 60


MA5:MA(CLOSE,P1);
MA10:MA(CLOSE,P2);
MA20:MA(CLOSE,P3);
MA30:MA(CLOSE,P4);
MA60:MA(CLOSE,P5);
STICKLINE(CLOSE>REF(CLOSE,1)*1.095,CLOSE,OPEN,2,0),COLORYELLOW;
HJ_1:=BARSLASTCOUNT(CLOSE<MA20);
HJ_2:=BACKSET((HJ_1>=4)*HJ_1,HJ_1);
HJ_3:=BARSLASTCOUNT(CLOSE>MA20);
HJ_4:=BACKSET((HJ_3>=4)*HJ_3,HJ_3);
HJ_5:=BARSLASTCOUNT(NOT(HJ_2 OR HJ_4));
HJ_6:=BARSLASTCOUNT(REF(HJ_2>0,HJ_5));
HJ_7:=BARSLASTCOUNT(REF(HJ_4>0,HJ_5));
HJ_8:=FILTERX(LLV(LOW,HJ_6)=LOW,HJ_6);
HJ_9:=FILTERX(HHV(HIGH,HJ_7)=HIGH,HJ_7);
HJ_10:=REF(HIGH,BARSLAST(HJ_9));
HJ_11:=REF(LOW,BARSLAST(HJ_8));
HJ_12:=BARSLAST(HJ_6=1);
HJ_13:=REF(HJ_10,BARSLAST(HJ_6));
HJ_14:=REF(HJ_11,HJ_12);
HJ_15:=(HJ_13-HJ_14)*0.236+HJ_14;
HJ_16:=(HJ_13-HJ_14)*0.382+HJ_14;
HJ_17:=(HJ_13-HJ_14)*0.5+HJ_14;
HJ_18:=(HJ_13-HJ_14)*0.618+HJ_14;
HJ_19:=(HJ_13-HJ_14)*0.809+HJ_14;
HJ_20:=(HJ_13-HJ_14)*1.382+HJ_14;
顶点:REFDATE(HJ_13,DATE),COLORRED;
低点:REFDATE(HJ_14,DATE),COLORGREEN;
HJ_21:=REFDATE(HJ_15,DATE);
HJ_22:=REFDATE(HJ_16,DATE);
HJ_23:=REFDATE(HJ_17,DATE);
%61.8:REFDATE(HJ_18,DATE),DOTLINE,COLORYELLOW;
HJ_24:=REFDATE(HJ_19,DATE);
HJ_25:=REFDATE(HJ_20,DATE);
DRAWTEXT(ISLASTBAR,顶点,1),COLORWHITE;
DRAWTEXT(ISLASTBAR,HJ_21,2),COLORYELLOW;
DRAWTEXT(ISLASTBAR,HJ_22,3),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,HJ_23,4),COLORRED;
DRAWTEXT(ISLASTBAR,%61.8,5),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,HJ_24,6),COLORYELLOW;
DRAWTEXT(ISLASTBAR,低点,7),COLORWHITE;
DRAWTEXT(ISLASTBAR,HJ_25,8),COLORMAGENTA;