通达信红R买-绿M卖30分钟【源码配图】

以下是红R买-绿M卖（30分钟）（无源码的请下载附件导入）

CYC13:=0.01*EXPMA(AMOUNT,13)/EXPMA(VOL,13);

CYS:(CLOSE-CYC13)/CYC13*100;

DRAWTEXT( ZXNH.ZXNH =1 AND CYS =-2,CYS,'R'),COLORRED;

DRAWTEXT( ZXNH.ZXNH =1 AND CYS 2,CYS,'M'),COLORGREEN;

布林：

ZD_MA:=MA(C,18);

ZD_EMA:=EMA(C,3);

STICKLINE(ZD_EMA ZD_MA,ZD_EMA,ZD_MA,1,-1),COLOR1188FF;

STICKLINE(ZD_EMA ZD_MA,ZD_EMA,ZD_MA,1,-1),COLORLIGREEN;

DRAWKLINE(HIGH,OPEN,LOW,CLOSE);{K线}

RD_4P:=(-REF(C,3)-0.382*REF(C,2)+0.382*REF(C,1)+2*C);

BD:=STD(C,33);

RD:=STD(RD_4P,33);

BZC:=POW(BD*BD+RD*RD,1/2);

A1:ZD_MA+(1.618)*BZC,CROSSDOT,COLORLIGRAY;

A2:ZD_MA+(1.000)*BZC,CIRCLEDOT,COLORBROWN;

A3:ZD_MA+(0.618)*BZC,COLORMAGENTA;

中道:ZD_MA,CIRCLEDOT,COLORYELLOW;

快道:ZD_EMA,COLORLIBLUE;

B3:ZD_MA-(0.618)*BZC,COLORLIGRAY;

B2:ZD_MA-(1.000)*BZC,CIRCLEDOT,COLORFF7755;

B1:ZD_MA-(1.618)*BZC,CROSSDOT,COLORLIGREEN;

道宽3K平均:MA(快道-中道,3),COLORLIBLUE,NODRAW;

IF(快道 REF(快道,1) AND 快道 =0,快道,DRAWNULL),COLORRED,LINETHICK3;