P1:=5;
A1:=C>REF(C,4);
NT:=BArslASTCOUNT(A1);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BacKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;
DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;
B1:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B1);
TJ21:=NT0=9 ;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;
DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN;
地心引力线:(MA(CLOSE,30)+MA(CLOSE,72))/2;
D1:地心引力线*1.1;
D2:地心引力线*0.9;
D3:地心引力线*1.2;
D4:地心引力线*0.8;
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;
警告灯:IF(TJ,HIGH*1.008,DRAWNULL),crOSSDOT,LINETHICK2,COLORYELLOW;
{//最后1根参考k线，用信号灯表示}
PL:=BARSLAST(TJ);
支撑:IF(BARSLAST(TJ1),
REF(LOW,BARSLAST(TJ1)),DRAWNULL),COLOREA91B5;
压力:IF(BARSLAST(TJ),REF(HIGH,PL),DRAWNULL),COLORYELLOW;
