通達信指標公式源碼波浪理論指標公式源碼

N:=20;P:=8;

 GJ:=(C+H+L+O)/4;阻:=L+(GJ-L)+(C-L);支:=L+(C-GJ);

壓力:REF(阻 , 1),NODRAW,COLOR00FF00;

支撐:REF(支 , 1),NODRAW,COLORYELLOW;

 STICKLINE(ISLASTBAR,壓力,壓力,30,1),LINETHICK1,COLOR00FF00;

 STICKLINE(ISLASTBAR,支撐,支撐,30,1),LINETHICK1,COLORYELLOW;

下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);

 RRRSV:=SMA(下檔線,3,1);KKK:=SMA(RRRSV,3,1);DDD:=((3 * RRRSV) - (2 * KKK));

 JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);

 RSV24:=SMA(JJ12,3,1);K24:=SMA(RSV24,3,1);D24:=((3 * RSV24) - (2 * K24));

頂部:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),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,P),COLORWHITE;

漲天:BARSLASTCOUNT(波>REF(波,1)),NODRAW,COLORRED;

 VAR1:=(C-REF(C,漲天))/REF(C,漲天)*100;

漲幅%:IF(漲天>0,VAR1, DRAWNULL),NODRAW;

跌天:BARSLASTCOUNT(波<REF(波,1)),NODRAW,COLOR00FF00;

 VAR2:=(C-REF(C,跌天))/REF(C,跌天)*100;

跌幅%:IF(跌天>0,VAR2, DRAWNULL),NODRAW;

 {紅}

{STICKLINE(C>O,C,O,3,0),COLOR000077;

 STICKLINE(C>O,C,O,2,0),COLOR000099;

 STICKLINE(C>O,C,O,1,0),COLOR0000BB;

 STICKLINE(C>O,H,L,0,0),COLOR0000FF;}

 {綠}

{STICKLINE(C<O,C,O,3,0),COLOR007700;

 STICKLINE(C<O,C,O,2,0),COLOR009900;

 STICKLINE(C<O,C,O,1,0),COLOR00BB00;

 STICKLINE(C<O,H,L,0,0),COLOR00FF00;}

 {浪}

 {浪線6:DRAWLINE(H=HHV(H,6),H,L=LLV(L,6),L,0),LINETHICK2,COLORRED;

浪線6X:DRAWLINE(L=LLV(L,6),L,H=HHV(H,6),H,0),LINETHICK2,COLORRED;}

浪線7:DRAWLINE(H=HHV(H,7),H,L=LLV(L,7),L,0),LINETHICK1,COLORYELLOW; 

浪線7X:DRAWLINE(L=LLV(L,7),L,H=HHV(H,7),H,0),LINETHICK1,COLORYELLOW;

 {浪線21:DRAWLINE(H=HHV(H,21),H,L=LLV(L,21),L,0),LINETHICK2,COLORFF7F00;

浪線21X:DRAWLINE(L=LLV(L,21),L,H=HHV(H,21),H,0),LINETHICK2,COLORFF7F00;}

浪線35:DRAWLINE(H=HHV(H,35),H,L=LLV(L,35),L,0),LINETHICK1,COLORMAGENTA;

浪線35X:DRAWLINE(L=LLV(L,35),L,H=HHV(H,35),H,0),LINETHICK1,COLORMAGENTA;

 {浪線49:DRAWLINE(H=HHV(H,49),H,L=LLV(L,49),L,0),LINETHICK2,COLORGREEN;

浪線49X:DRAWLINE(L=LLV(L,49),L,H=HHV(H,49),H,0),LINETHICK2,COLORGREEN; };

 {趨勢}

A1:=REF(H,N)=HHV(H,2*N+1); 

 B1:=FILTER(A1,N); 

 C1:=BACKSET(B1,N+1); 

 D1:=FILTER(C1,N);

 R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);

 DRAWLINE(D1,H,S11,H,1),COLORGREEN,CROSSDOT;

 A2:=REF(L,N)=LLV(L,2*N+1); 

 B2:=FILTER(A2,N);

 C2:=BACKSET(B2,N+1); 

 D2:=FILTER(C2,N);

 T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); 

 U11:=T11>REF(T11,1);

 DRAWLINE(D2,L,U11,L,1),COLORRED,CIRCLEDOT;

 M:=INTPART(3*N/5);

 A12:=REF(H,M)=HHV(H,2*M+1); 

 B12:=FILTER(A12,M); 

 C12:=BACKSET(B12,M+1); 

 D12:=FILTER(C12,M);

 R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1);

 S112:=R112>REF(R112,1);

 DRAWLINE(D12,H,S112,H,1),COLORGREEN,POINTDOT;

 A22:=REF(L,M)=LLV(L,2*M+1); 

 B22:=FILTER(A22,M);

 C22:=BACKSET(B22,M+1); 

 D22:=FILTER(C22,M);{低點}

T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1); 

 U112:=T112>REF(T112,1);

 DRAWLINE(D22,L,U112,L,1),COLORRED,POINTDOT;

 AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0);

 AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0);

 AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0);

 BB1:=0;

 B1萬元:=DVOL*DCLOSE/100;

 B1差:=B1萬元-REF(B1萬元,1);

 B2萬元:=DVOL*DCLOSE/100;

 B2比:=B2萬元/REF(B2萬元,1);

凈流入萬元:=(AAA2-AAA3-0.5*AAA4);

 PM:=MA(凈流入萬元,1);

 PMA:=PM/REF(PM,1)>1;

 PMB:=REF(PMA,1)<1 AND PMA; 

密碼:(EMA(MA(B1萬元,2),2))/100000,COLORYELLOW,NODRAW;

二日比:=密碼/REF(密碼,1);

選股:PMB AND 密碼>REF(密碼,1) AND 二日比>1,COLORRED,NODRAW;

 {MA5:MA(C,5);MA10:MA(C,10);MA30:MA(C,30);}

 DRAWNUMBER(選股=1 ,L,密碼),COLORYELLOW;

{ DRAWICON(選股,L*0.975,1);}

DRAWTEXT_FIX(ISLASTBAR,0.25,0.99,0,STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(HYBLOCK,FGBLOCK),DYBLOCK),GNBLOCK),'股東數:'),CON2STR(FINANCE(8),0))),COLORYELLOW;

風險提示：本指標公式僅作為知識分享，不構成任何投資建議，投資有風險，交易需謹慎。