【通达信免费源码】天地买卖指标 副图 买卖点 趋势

天:80,COLORBLUE,LINETHICK4,POINTDOT;

海:20,COLORFF00FF,LINETHICK4,POINTDOT;

ZKK:"KD.K#WEEK"(9,3,3),COLORRED;

ZKD:"KD.D#WEEK"(9,3,3),COLORYELLOW;

KCD:=FILTER(CROSS(ZKK,ZKD) AND REF(ZKD,1)<30,13);

KCD1:=FILTER(CROSS(ZKK,ZKD) AND REF(ZKD,1)>30,13);

DRAWICON(KCD1,ZKD,23);

XG1:=KCD;

STICKLINE(XG1,20,10,4,0),COLOR000099;

STICKLINE(XG1,20,10,2,0),COLOR0000BB;

STICKLINE(XG1,20,10,1,0),COLOR0000DD;

STICKLINE(XG1,0,20,0.3,0),COLOR0000FF;

DRAWTEXT(XG1,20,'K买'),COLOR0000FF;

SCD:=FILTER(CROSS(ZKD,ZKK) AND REF(ZKK,1)>78,13);

STICKLINE(SCD,90,80,4,0),COLOR009900;

STICKLINE(SCD,90,80,2,0),COLOR00BB00;

STICKLINE(SCD,90,80,1,0),COLOR00DD00;

STICKLINE(SCD,100,80,0.3,0),COLOR00FF00;

DRAWTEXT(SCD,95,'K卖'),COLOR00FF00;

DIFW:="MACD.DIF#WEEK"(12,26,9);

DEAW:="MACD.DEA#WEEK"(12,26,9);

FCA:=FILTER(CROSS(DIFW,DEAW) AND REF(DEAW,1)<0,13);

XG2:=FCA;

STICKLINE(XG2,10,20,4,0),COLOR990099;

STICKLINE(XG2,10,20,2,0),COLORBB00BB;

STICKLINE(XG2,10,20,1,0),COLORDD00DD;

STICKLINE(XG2,10,20,0.3,0),COLORFF00FF;

DRAWTEXT(XG2,10,'M买'),COLORFF00FF;

SCA:=FILTER(CROSS(DEAW,DIFW) AND REF(DIFW,1)>0,13);

STICKLINE(SCA,90,80,4,0),COLOR999900;

STICKLINE(SCA,90,80,2,0),COLORBBBB00;

STICKLINE(SCA,90,80,1,0),COLORDDDD00;

STICKLINE(SCA,90,80,0.3,0),COLORFFFF00;

DRAWTEXT(SCA,83,'M卖'),COLORFFFF00;

STICKLINE(XG1 AND XG2,20,80,0.1,0 ),COLORFF00FF;

DRAWTEXT(XG1 AND XG2,50,'K.M买'),COLORRED;

DRAWTEXT(XG1 AND XG2,43,'全仓'),COLORRED;

STICKLINE(SCD AND SCA,20,80,0.1,0 ),COLOR00FF00;

DRAWTEXT(SCD AND SCA,50,'K.M卖'),COLORFF0000;

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIFF,9);

TJ1:=DIFF>DEA;

SA1:=DIFF<DEA;

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

K:=SMA(RSV,3,1);

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

TJ2:=K>D;

SA2:=K<D;

LC:=REF(CLOSE,1);

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

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

TJ3:=RSI1>RSI2;

SA3:=RSI1<RSI2;

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

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

TJ4:=LWR1>LWR2;

SA4:=LWR1<LWR2;

BBI:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;

TJ5:=CLOSE>BBI;

SA5:=C<BBI;

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

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

MMM:=100*EMA(EMA(MTM,26),12)/EMA(EMA(ABS(MTM),26),12);

TJ6:=MMS>MMM;

SA6:=MMS<MMM;

TTJ:=TJ1 AND TJ2 AND TJ3 AND TJ4 AND TJ5 AND TJ6;

TTJ0:=FILTER(TTJ,13);

GOLD:=TTJ0;

STICKLINE(GOLD,20,30,4,0),COLOR009999;

STICKLINE(GOLD,20,30,2,0),COLOR00BBBB;

STICKLINE(GOLD,20,30,1,0),COLOR00DDDD;

STICKLINE(GOLD,10,30,0.3,0),COLOR00FFFF;

DRAWTEXT(GOLD,33,'金指'),COLOR00FFFF;

SAA:=SA1 AND SA2 AND SA3 AND SA4 AND SA5 AND SA6;

SAA0:=FILTER(SAA,13);

SAIL:=SAA0;

STICKLINE(SAIL,80,70,4,0),COLOR990000;

STICKLINE(SAIL,80,70,2,0),COLORBB0000;

STICKLINE(SAIL,80,70,1,0),COLORDD0000;

STICKLINE(SAIL,90,70,0.3,0),COLORFF0000;

DRAWTEXT(SAIL,75,'指卖'),COLORFF0000;