通达信《波浪顶底》画线指标公式源码

Qa:=20;
Kb:=8;
Rc:=(C+H+L+O)/4;
Wd:=L+(Rc-L)+(C-L);
Ye:=L+(C-Rc);
压力位:REF(Wd,1),NODRAW,COLOR00FF00;
支撑位:REF(Ye,1),NODRAW,COLORYELLOW;
STICKLINE(ISLASTBAR,压力位,压力位,30,1),LINETHICK1,COLOR00FF00;
STICKLINE(ISLASTBAR,支撑位,支撑位,30,1),LINETHICK1,COLORYELLOW;
Pf:=(((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13)))*100);
Qg:=SMA(Pf,3,1);
Zh:=SMA(Qg,3,1);
Xi:=((3*Qg)-(2*Zh));
Vj:=(((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55)))*100);
Mk:=SMA(Vj,3,1);
Nl:=SMA(Mk,3,1);
Ao:=((3*Mk)-(2*Nl));
顶部区:=IF(CROSS(Ao,Xi),HIGH,REF(HIGH,BARSLAST(CROSS(Ao,Xi)))),COLORFFFFFF;
决策线:IF(ISLASTBAR,顶部区,DRAWNULL),COLORMAGENTA;
STICKLINE(ISLASTBAR,决策线,决策线,60,1),LINETHICK2,COLORMAGENTA;
底部区:=LLV(HIGH,30),COLOR00FF00;
超跌线:IF(ISLASTBAR,底部区,DRAWNULL),COLORRED;
STICKLINE(ISLASTBAR,超跌线,超跌线,60,1),LINETHICK2,COLORRED;
风险值:MA((MA(C,13)-MA(C,55))/MA(C,13)*100,1),NODRAW,COLORFFFF00;
波:=ZIG(3,Kb),COLORWHITE;
涨天:BARSLASTCOUNT(波>REF(波,1)),NODRAW,COLORRED;
Bp:=(C-REF(C,涨天))/REF(C,涨天)*100;
涨幅%:IF(涨天>0,Bp,DRAWNULL),NODRAW;
跌天:BARSLASTCOUNT(波<REF(波,1)),NODRAW,COLOR00FF00;
Cq:=(C-REF(C,跌天))/REF(C,跌天)*100;
跌幅%:IF(跌天>0,Cq,DRAWNULL),NODRAW;
短浪线:DRAWLINE(H=HHV(H,7),H,L=LLV(L,7),L,0),LINETHICK1,COLORYELLOW;
短浪线X:DRAWLINE(L=LLV(L,7),L,H=HHV(H,7),H,0),LINETHICK1,COLORYELLOW;
长浪线:DRAWLINE(H=HHV(H,35),H,L=LLV(L,35),L,0),LINETHICK1,COLORMAGENTA;
长浪线X:DRAWLINE(L=LLV(L,35),L,H=HHV(H,35),H,0),LINETHICK1,COLORMAGENTA;
Dr:=REF(H,Qa)=HHV(H,2*Qa+1);
Es:=FILTER(Dr,Qa);
Ft:=BACKSET(Es,Qa+1);
Gu:=FILTER(Ft,Qa);
Hv:=BACKSET(ISLASTBAR,BARSLAST(Gu)+1);
Iw:=Hv>REF(Hv,1);
DRAWLINE(Gu,H,Iw,H,1),COLORGREEN,CROSSDOT;
Jx:=REF(L,Qa)=LLV(L,2*Qa+1);
Ky:=FILTER(Jx,Qa);
Lz:=BACKSET(Ky,Qa+1);
Mz:=FILTER(Lz,Qa);
Nz:=BACKSET(ISLASTBAR,BARSLAST(Mz)+1);
Oq:=Nz>REF(Nz,1);
DRAWLINE(Mz,L,Oq,L,1),COLORRED,CIRCLEDOT;
Pw:=INTPART(3*Qa/5);
Qz:=REF(H,Pw)=HHV(H,2*Pw+1);
Ry:=FILTER(Qz,Pw);
Sz:=BACKSET(Ry,Pw+1);
Ta:=FILTER(Sz,Pw);
Ub:=BACKSET(ISLASTBAR,BARSLAST(Ta)+1);
Vc:=Ub>REF(Ub,1);
DRAWLINE(Ta,H,Vc,H,1),COLORGREEN,POINTDOT;
Wd2:=REF(L,Pw)=LLV(L,2*Pw+1);
Xf:=FILTER(Wd2,Pw);
Yg:=BACKSET(Xf,Pw+1);
Zh2:=FILTER(Yg,Pw);
Ai:=BACKSET(ISLASTBAR,BARSLAST(Zh2)+1);
Bj:=Ai>REF(Ai,1);
DRAWLINE(Zh2,L,Bj,L,1),COLORRED,POINTDOT;
Ck:=SUM(IF(CLOSE>REF(CLOSE,1),VOL*C,0),0);
Dl:=SUM(IF(CLOSE<REF(CLOSE,1),VOL*C,0),0);
Em:=SUM(IF(CLOSE=REF(CLOSE,1),VOL*C,0),0);
Fn:=0;
Go:=DVOL*DCLOSE/100;
Hp:=Go-REF(Go,1);
Iq:=DVOL*DCLOSE/100;
Jr:=Iq/REF(Iq,1);
净入值:=(Ck-Dl-0.5*Em);
Ks:=MA(净入值,1);
Lt:=Ks/REF(Ks,1)>1;
Mu:=REF(Lt,1)<1 AND Lt;
动能值:(EMA(MA(Go,2),2))/100000,COLORYELLOW,NODRAW;
两日比:=动能值/REF(动能值,1);
关注:Mu AND 动能值>REF(动能值,1) AND 两日比>1,COLORRED,NODRAW;
DRAWNUMBER(关注=1,L,动能值),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.25,0.99,0,STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(HYBLOCK,FGBLOCK),DYBLOCK),GNBLOCK),'股东数:'),CON2STR(FINANCE(8),0))),COLORYELLOW;