参考：
AA0:=LLV(ABS(C-O),5)/4;
AA1:=C=HHV(C,20);
AA2:=BARSLAST(AA1);
AA3:=C<LV(C,AA2) AND AA2>0;
AA4:=SUM(AA3,AA2+1);
AA5:=AA4=3 AND AA3;
AA6:=BARSLAST(AA5);
AA7:=REF(L,AA6);
AA8:=C<AA7 AND SUM(C<AA7,AA6+1)=1 AND AA6<AA2;
AA9:=BARSLAST(AA8);
AA10:=REF(C,AA9);
AA11:=C<AA10 AND SUM(C<AA10,AA9+1)=1 AND AA9<AA6 AND AA9>0;
AA12:=BARSLAST(AA11);
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//求最高价减去最低价，一个周期前的收盘价减去最高价的绝对值，一个周期前的收盘价减去最低价的绝对值，这三个值中的最大值
ATR:=MA(TR,AA2+1),COLORYELLOW;//求N个周期内的TR的简单移动平均
AA13:=C-ATR;
H4:=IF(AA9<AA2,REF(AA13,AA9),NULL),RGB(0,240,0),LINETHICK2;
AA14:=BARSLAST(AA4=2 AND AA3);
PD1:=CROSS(AA9<AA2,0.5);
PD1B:=BARSLAST(PD1);
PD2:=AA1;
PD2B:=BARSLAST(AA1);
PD3:=IF(PD1,REF(C,PD2B),0);
PD5:=BACKSET(BARSTATUS=2,PD1B+1);
PD7:=IF(AA9<AA2 OR PD5,REF(PD3,PD1B),NULL),COLORGRAY;
PD6:=ABS(PD7-H4)+H4;
下:IF(AA9<AA2 OR PD5,REF(PD7-ABS(PD7-H4)*2,PD1B),NULL),COLORGRAY;
上:IF(AA9<AA2 OR PD5,REF(PD6+ABS(PD7-H4),PD1B),NULL),COLORGRAY;
DRAWNUMBER1(PD1,下,下,2),COLORGRAY;
DRAWNUMBER1(PD1,上,上,2),COLORGRAY;
//DRAWNUMBER1(PD1,H4,H4,2),COLORGRAY;
BL1:=下+0.191*(上-下);
BL2:=下+0.382*(上-下);
FILLRGN(AA9<AA2,BL1,BL2,COLORRED);
