通达信【双龙之翼】优化版 主副图指标 源码
{双龙之翼主图源码如下}
上轨:EMA(H,25),COLORGREEN;
下轨:EMA(L,25),COLORGREEN;
ABC111:=PLOYLINE(C>上轨,上轨);
A222:IF(C>上轨,ABC111,DRAWNULL),COLORRED;
B111:=PLOYLINE(C>下轨,下轨);
B222:IF(C>下轨,B111,DRAWNULL),COLORRED;
ZT_1:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
ZT_2:=ZT_1>=0.099 AND CLOSE=HIGH AND LOW!=HIGH;
STICKLINE(ZT_2,OPEN,CLOSE,2.4,0),COLORYELLOW;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;
STICKLINE(CROSS(100,J),O,C,2,0),COLORGREEN;
DRAWICON(CROSS(100,J),H*1.004,6);
DRAWICON(CROSS(J,0)AND B222,L*0.996,5);
STICKLINE(CROSS(J,0),O,C,2,0),COLORMAGENTA;
ABC1:=C>REF(C,4);A2:=C<REF(C,4);
ABC2:=A2 AND REF(ABC1,1);T2:=A2 AND REF(ABC2,1);
ABC3:=A2 AND REF(T2,1);ABC4:=A2 AND REF(ABC3,1);
ABC5:=A2 AND REF(ABC4,1);ABC6:=A2 AND REF(ABC5,1);
ABC7:=A2 AND REF(ABC6,1);ABC8:=A2 AND REF(ABC7,1);
ABC9:=A2 AND REF(ABC8,1);
DRAWTEXT(ABC6,L*0.994,'6'),COLORGREEN;
DRAWTEXT(ABC7,L*0.994,'7'),COLORGREEN;
DRAWTEXT(ABC8,L*0.994,'8'),COLORGREEN;
DRAWTEXT(ABC9,L*0.994,'9'),COLORYELLOW;
B1:=C<REF(C,4);B2:=C>REF(C,4);
D1:=B2 AND REF(B1,1);D2:=B2 AND REF(D1,1);
D3:=B2 AND REF(D2,1);D4:=B2 AND REF(D3,1);
D5:=B2 AND REF(D4,1);D6:=B2 AND REF(D5,1);
D7:=B2 AND REF(D6,1);D8:=B2 AND REF(D7,1);
D9:=B2 AND REF(D8,1);
DRAWTEXT(D6,H*1.006,'6'),COLORYELLOW;
DRAWTEXT(D7,H*1.006,'7'),COLORYELLOW;
DRAWTEXT(D8,H*1.006,'8'),COLORYELLOW;
DRAWTEXT(D9,H*1.006,'9'),COLORGREEN;
双龙红:=BARSLASTCOUNT(C>上轨 AND C>下轨)=1;
STICKLINE(双龙红,O,C,2,0),COLORYELLOW;
DRAWICON(双龙红,L,9);
{双龙之翼副图源码如下}
上轨:=EMA(H,25),COLORGREEN;
下轨:=EMA(L,25),COLORGREEN;
ABC111:=PLOYLINE(C>上轨,上轨);
A222:=IF(C>上轨,ABC111,DRAWNULL),COLORRED;
B111:=PLOYLINE(C>下轨,下轨);
B222:=IF(C>下轨,B111,DRAWNULL),COLORRED;
双龙红:=BARSLASTCOUNT(C>上轨 AND C>下轨)=1;
STICKLINE(双龙红,0,1,2,0),COLORMAGENTA;
STICKLINE(双龙红,0,1,0.1,0),COLORRED;
DRAWICON(双龙红,1,9);