以下是通达信红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;
