%>
HIGHN:=15;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H),NODRAW;{顶部}
高点:DRAWLINE(DINGBU!=REF(DINGBU,1),DINGBU,DINGBU=REF(DINGBU,1),DINGBU,1);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
GDCS1:=CONST(DINGBUTS),NODRAW;
DINGBUX:=DRAWLINE(DINGBU!=REF(DINGBU,1),DINGBU,DINGBU=REF(DINGBU,1),DINGBU,1);
L0:IF(DDD,REF(L,DDD),L),NODRAW;
L1T:=FILTER(L<L0 AND CURRBARSCOUNT-GDCS1<0,GDCS1),NODRAW;
L11:=IF(REF(L1T,1)!=L1T AND L1T,L,0);
L1:REF(L,BARSLAST(L=L11)),NODRAW;
L2T:=FILTER(L<L1,GDCS1),NODRAW;
L21:=IF(L2T,L,0),NODRAW;
L2:REF(L,BARSLAST(L21)),NODRAW;
L3T:=FILTER(L<L2,GDCS1),NODRAW;
L31:=IF(L3T,L,0),NODRAW;
L3:REF(L,BARSLAST(L31)),NODRAW;
L4T:=FILTER(L<L3,GDCS1),NODRAW;
L41:=IF(L4T,L,0),NODRAW;
L4:REF(L,BARSLAST(L41)),NODRAW;
L5T:=FILTER(L<L4,GDCS1),NODRAW;
L51:=IF(L5T,L,0),NODRAW;
L5:REF(L,BARSLAST(L51)),NODRAW;
L6T:=FILTER(L<L5,GDCS1),NODRAW;
L61:=IF(L6T,L,0),NODRAW;
L6:REF(L,BARSLAST(L61)),NODRAW;
L7T:=FILTER(L<L6,GDCS1),NODRAW;
L71:=IF(L7T,L,0),NODRAW;
L7:REF(L,BARSLAST(L71)),NODRAW;
L8T:=FILTER(L<L7,GDCS1),NODRAW;
L81:=IF(L8T,L,0),NODRAW;
L8:REF(L,BARSLAST(L81)),NODRAW;
DRAWTEXT(REF(L1T,1)!=L1T AND L1T,L-0.1,'1');
DRAWTEXT(L2T,L-0.1,'2');
DRAWTEXT(L3T,L-0.1,'3');
DRAWTEXT(L4T,L-0.1,'4');
DRAWTEXT(L5T,L-0.1,'5');
DRAWTEXT(L6T,L-0.1,'6');
DRAWTEXT(L7T,L-0.1,'7');
DRAWTEXT(L8T,L-0.1,'8');
UPQK:=LOW-REF(HIGH,1);
STICKLINE(CLOSE>REF(CLOSE,1) AND UPQK>0,REF(HIGH,1),LOW,20,1),COLORFF00FF;
{DRAWTEXT(CLOSE>REF(CLOSE,1) AND UPQK>0,UPQK/2+REF(HIGH,1),' 向上跳空'),COLORFF00FF;}
DOWNQK:=REF(LOW,1)-HIGH;
STICKLINE(CLOSE<REF(CLOSE,1) AND DOWNQK>0,REF(LOW,1),HIGH,20,1),COLORBLUE;
{DRAWTEXT(CLOSE<REF(CLOSE,1) AND DOWNQK>0,DOWNQK/2+HIGH,' 向下跳空'),COLORBLUE;};
LF:(HHV(H,0)-LLV(L,0))/HHV(H,0)*100,NODRAW;
DF:(HHV(H,0)-C)/HHV(H,0)*100,NODRAW;
{股票教程网-http://bkqg.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}