【原】26个技术指标源码（25-yxgt）

{YXGT-一线贯通//26-Y【引用·略有改编】}

{1.MACD-}

DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);

DEA:=EMA(DIFF,5);

DRAWICON(DIFF>DEA,1,1); DRAWICON(DIFF<DEA,1,2);

DRAWTEXT(ISLASTBAR=1,1,'★MACD☆'),COLORRED;

B1:=DIFF>DEA;  S1:=DIFF<DEA;

{2.KDJ-}

RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;

K:=SMA(RSV1,3,1); D:=SMA(K,3,1);

DRAWICON(K>D,2,1); DRAWICON(K<D,2,2);

DRAWTEXT(ISLASTBAR=1,2,'☆KDJ★'),COLORYELLOW;

B2:=K>D; S2:=K<D;

{3.RSI-}

LC:=REF(CLOSE,1);

RSI1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;

RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;

DRAWICON(RSI1>RSI2,3,1); DRAWICON(RSI1<RSI2,3,2);

DRAWTEXT(ISLASTBAR=1,3,'★RSI☆'),COLORCYAN;

B3:=RSI1>RSI2; S3:=RSI1<RSI2;

{4.LWR-}

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

LWR1:=SMA(RSV,3,1); LWR2:=SMA(LWR1,3,1);

DRAWICON(LWR1>LWR2,4,1); DRAWICON(LWR1<LWR2,4,2);

DRAWTEXT(ISLASTBAR=1,4,'☆LWR★'),COLORGREEN;

B4:=LWR1>LWR2; S4:=LWR1<LWR2;

{5.BBI-}

BBI:=(MA(CLOSE,3)+MA(CLOSE,5)+MA(CLOSE,8)+MA(CLOSE,13))/4;

DRAWICON(CLOSE>BBI,5,1); DRAWICON(CLOSE<BBI,5,2);

DRAWTEXT(ISLASTBAR=1,5,'★BBI☆'),COLORMAGENTA;

B5:=CLOSE>BBI; S5:=CLOSE<BBI;

{6.MTM-}

MTM:=CLOSE-REF(CLOSE,1);

MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);

MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);

DRAWICON(MMS>MMM,6,1); DRAWICON(MMS<MMM,6,2);

DRAWTEXT(ISLASTBAR=1,6,'☆ZLMM★'),COLORBROWN;

B6:=MMS>MMM; S6:=MMS<MMM;

PX:=(B1 AND B2 AND B3 AND B4 AND B5 AND B6),COLORFF00CC;

涨不停买入:B1 AND B2 AND B3 AND B4 AND B5 AND B6=1

AND REF(B1 AND B2 AND B3 AND B4 AND B5 AND B6,1)=0,COLORMAGENTA;

DX:=(S1 AND S2 AND S3 AND S4 AND S5 AND S6),COLOR00FFFF;

跌不停卖出:S1 AND S2 AND S3 AND S4 AND S5 AND S6=1

AND REF(S1 AND S2 AND S3 AND S4 AND S5 AND S6,1)=0,COLORGREEN;

A7:7; S7:0;

STICKLINE(涨不停买入,涨不停买入,6,0.3,0),COLORRED;

STICKLINE(跌不停卖出,跌不停卖出,6,0.3,0),COLORGREEN;

                                     {END};