通达信波浪多空主图选股指标公式源码

通达信波浪多空主图选股指标公式源码

源码正文：

hday:=20{XG51};
lday:=20{XG51};
调点:=3{XG51};
上角度:=70{XG51};
下角度:=70{XG51};
PL5:=IF(PERIOD>=7,zig(3,1),IF(PERIOD=3,ZIG(1,2),ZIG(1,2))){XG51};
PL10:=IF(PERIOD>=7,ZIG(3,30),IF(PERIOD=3,ZIG(1,10),ZIG(1,10))){XG51};
PL20:=IF(PERIOD>=7,ZIG(1,10),IF(PERIOD=3,ZIG(1,30),ZIG(1,20))){XG51};
EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3){XG51};
EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3){XG51};
EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3){XG51};
EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3){XG51};
EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3){XG51};
EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3){XG51};
走强1:=BArslAst(PL5<REF(PL5,1)){XG51};
走弱1:=BARSLAST(PL5>REF(PL5,1)){XG51};
走强2:=BARSLAST(PL10<REF(PL10,1)){XG51};
走弱2:=BARSLAST(PL10>REF(PL10,1)){XG51};
走强3:=BARSLAST(PL20<REF(PL20,1)){XG51};
走弱3:=BARSLAST(PL20>REF(PL20,1)){XG51};
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0){XG51};
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0){XG51};
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0){XG51};
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0){XG51};
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0){XG51};
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0){XG51};
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0){XG51};
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0){XG51};
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'(A)'),COLORFFFF00{XG51};
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)'),COLORFFFF00{XG51};
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'(C)'),COLORFFFF00{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF{XG51};
DRAWTEXT(EX2 AND (PL10>REF(PL10,1) OR REF(PL10>REF(PL10,1),1) OR ZTJD10=1),H*1.08,'⑸'),,COLOR0000FF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLOR00FFFF{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'②'),LINETHICK3,COLOR00FFFF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2,H*1.06,'③'),LINETHICK3,COLOR00FFFF{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,'④'),LINETHICK3,COLOR00FFFF{XG51};
XG1:=EX2{XG51};
XG2:=PL20>REF(PL20,3){XG51};
XG3:=ZTJZ10=3{XG51};
DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.06,'⑤'),LINETHICK3,COLORRED{XG51};
DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.04,'●'),LINETHICK3,COLORFFFF00{XG51};
DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.02,'●'),LINETHICK3,COLOR00FFFF{XG51};
买线:=ema(C,2),COLORWHITE{XG51};
卖线:=Ema(SLOPE(C,21)*20+C,42),COLORBLUE{XG51};
BU:=crOSS(买线,卖线);
SEL:=CROSS(卖线,买线);
STICKLINE(买线>=卖线,CLOSE,OPEN,3,0),COLORWHITE;
STICKLINE(买线>=卖线,LOW,HIGH,0,0),COLORWHITE;
STICKLINE(买线<卖线,CLOSE,OPEN,3,0),COLORCYAN{XG51};
STICKLINE(买线<卖线,LOW,HIGH,0,0),COLORCYAN{XG51};
CURR:=CURRBARSCOUNT{XG51};
TCH:=CONST(FINDHIGH(H,0,HDAY*10,1)){XG51};
GTT:=CONST(BARSLAST(TCH=H))+1{XG51};
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1))){XG51};
BCL:=CONST(FINDLOW(L,0,LDAY*10,1)){XG51};
DTT:=CONST(BARSLAST(BCL=L))+1{XG51};
SX涨L:=CONST(IF(DTT=1,L,REF(L,DTT-1))){XG51};
涨点:=BARSSINCE(BacKSET(ISLASTBAR,BARSLAST(L=SX涨L)+1)){XG51};
跌点:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=SX跌H)+1)){XG51};
最低:=IF(调点=1,跌点,IF(调点=2,涨点,IF(调点=3,涨点,跌点))){XG51};
L斜率:=下角度/IF(C<300,1000,10){XG51};
最高:=IF(调点=1,跌点,IF(调点=2,涨点,IF(调点=3,跌点,涨点))){XG51};
H斜率:=上角度/IF(C<300,1000,10){XG51};
IM68:=((SX跌H-SX涨L)/8-(SX跌H-SX涨L)/8){XG51};
GH跌X:=SX跌H+(SX跌H-SX涨L)/8;  
DL涨X:=SX涨L-(SX跌H-SX涨L)/8{XG51};
GTHT:=IF(DTT>GTT,DTT,GTT);  
X146:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.146,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X146)*1.001,STRCAT('  0.146%%    ',CON2STR(X146,3))),COLOR889900{XG51};
X191:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.191,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X191)*1.001,STRCAT('  0.191%%    ',CON2STR(X191,3))),COLOR889900{XG51};
X236:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.236,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X236)*1.001,STRCAT('  0.236%%    ',CON2STR(X236,3))),COLOR889900{XG51};
X382:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.382,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X382)*1.001,STRCAT('  0.382%%    ',CON2STR(X382,3))),COLOR889900{XG51};
X500:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.500,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X500)*1.001,STRCAT('  0.500%%    ',CON2STR(X500,3))),COLOR889900{XG51};
X618:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.618,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X618)*1.001,STRCAT('  0.618%%    ',CON2STR(X618,3))),COLOR889900{XG51};
X764:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.764,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X764)*1.001,STRCAT('  0.764%%    ',CON2STR(X764,3))),COLOR889900{XG51};
X809:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.809,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X809)*1.001,STRCAT('  0.809%%    ',CON2STR(X809,3))),COLOR889900{XG51};
X854:IF(CURR<=GTHT,SX跌H-(SX跌H-SX涨L)*0.854,DRAWNULL),DOTLINE,COLOR556600{XG51};
DRAWTEXT(CURR=GTHT,(X854)*1.001,STRCAT('  0.854%%    ',CON2STR(X854,3))),COLOR889900{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT,SX跌H*1.02,'斐波那契下跌周期'),COLOR00FF00{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT,SX跌H*1.01,'1'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-2,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-2,SX跌H*1.01,'3'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-4,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-4,SX跌H*1.01,'5'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-7,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-7,SX跌H*1.01,'8'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-12,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-12,SX跌H*1.01,'13'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-20,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-20,SX跌H*1.01,'21'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-33,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-33,SX跌H*1.01,'34 '),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-54,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-54,SX跌H*1.01,'55'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-67,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-67,SX跌H*1.01,'68'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-88,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-88,SX跌H*1.01,'89'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-109,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-109,SX跌H*1.01,'110'),COLOR00FF00{XG51};
STICKLINE(CURRBARSCOUNT=GTT-143,SX跌H,SX涨L,0,0),COLOR556600{XG51};
DRAWTEXT(CURRBARSCOUNT=GTT-143,SX跌H*1.01,'144'),COLOR00FF00{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT,SX涨L*0.96,'斐波那契上升周期'),COLOR0000FF{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT,SX涨L*0.98,'1'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-2,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-2,SX涨L*0.98,'3'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-4,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-4,SX涨L*0.98,'5'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-7,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-7,SX涨L*0.98,'8'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-12,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-12,SX涨L*0.98,'13'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-20,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-20,SX涨L*0.98.01,'21'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-33,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-33,SX涨L*0.98,'34'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-54,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-54,SX涨L*0.98,'55'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-67,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-67,SX涨L*0.98,'68'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-88,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-88,SX涨L*0.98,'89'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-109,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-109,SX涨L*0.98,'110'),COLOR0000FF{XG51};
STICKLINE(CURRBARSCOUNT=DTT-143,SX跌H,SX涨L,0,0),COLORAA00AA{XG51};
DRAWTEXT(CURRBARSCOUNT=DTT-143,SX涨L*0.98,'144'),COLOR0000FF{X~G.5.1~C~N~{};