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