地心引力线

参数
 p1[1--100--3]
 
MA1:EXPMEMA(CLOSE,3);
 MA2:EXPMEMA(CLOSE,5);
 MA3:EXPMEMA(CLOSE,8);
 MA4:EXPMEMA(CLOSE,10);
 MA5:EXPMEMA(CLOSE,12);
 MA6:EXPMEMA(CLOSE,35);
 MA7:EXPMEMA(CLOSE,40);
 MA8:EXPMEMA(CLOSE,45);
 MA9:EXPMEMA(CLOSE,50);
 MA10:EXPMEMA(CLOSE,60);
 PH:=TROUGHBARS(2,P1,1);
 LL:=HHV(H,PH);
 TJ1:= LL=HIGH AND LL<REF(LL,1);{//=1}
 TS:=SUMBARS(TJ1,2);
 TJ:=PEAKBARS(2,P1,1)=1 AND TS>=PH;
 DRAWICON(TJ,HIGH*1.01+0.02,2);
 ___警告灯:IF(TJ,HIGH*1.008,DRAWNULL),CROSSDOT,LINETHICK2,COLORYELLOW;
 PL:=BARSLAST(TJ);
 ___支撑:IF(BARSLAST(TJ1),
 REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLOREA91B5;
 ___压力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORYELLOW;
 TJ_2:=LOW>REF(REF(LOW,TS),PL);
 DRAWICON(COUNT(TJ_2,PL+1)=1,HIGH*1.005,2);{//向下的箭头表示出局点};
 DRAWICON(BARSLAST(TJ1),REF(LOW*0.995,BARSLAST(TJ1)),1);
 
 

注意：发现未来函数PEAKBARS！
 注意：发现未来函数TROUGHBARS！