买线:=EMA(C,4);{计算4日指数移动平均线,作为买入参考线}
卖线:=EMA(SLOPE(C,20)*10+C,35);{计算20日收盘价斜率修正后的35日EMA,作为卖出参考线}
DRAWTEXT(CROSS(买线,卖线),LOW*1.00,'←买'),COLORRED,LINETHICK2;{买线上穿卖线时,在最低价位置标注红色买入信号}
DRAWTEXT(CROSS(卖线,买线),HIGH*1.01,'←卖'),COLORGREEN;{卖线上穿买线时,在最高价位置标注绿色卖出信号}
LC:=REF(CLOSE,1);{定义前一日收盘价}
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;{计算6日相对强弱指标RSI}
DRAWTEXT(CROSS(90,RSI) , HIGH*1.01,'←逢高出局!'),COLOR00FF00 ;{RSI下穿90(超买区)时,标注逢高出局信号}
A:=(3*C+L+O+H)/6;{计算加权平均价,用于主力成本计算}
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;{加权计算20周期平均价}
主力成本:EMA(X,13),COLORFF00FF,LINETHICK0;{输出13日EMA主力成本线,品红色显示}
ZZ:=(O+H+L)/3;{计算开盘、最高、最低的均价}
YC:=(H+L)/2;{计算最高、最低的均价}
YCHJX:=(EMA(ZZ,4))+(YC-REF(ZZ,3))/4;{计算预测买点核心线}
今日买点:EMA(ZZ,3),COLORYELLOW,LINETHICK0;{输出今日参考买点,黄色显示}
明日买点:YCHJX,LINETHICK0;{输出明日预测买点}
昨测今日买点:REF(YCHJX,1),LINETHICK0;{输出昨日预测的今日买点}
FF:=EMA(CLOSE,3);{计算3日指数移动平均线}
MA15:=EMA(CLOSE,21);{计算21日指数移动平均线}
DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'←拐点卖'),COLOR00FF00;{21日均线上穿3日均线,标注拐点卖出信号}
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'←拐点买'),COLOR00FFFF;{3日均线上穿21日均线,标注拐点买入信号}
MA8:IF(MA(C,8) >MA(C,89),MA(C,8),MA(C,89));{8日均线与89日均线取大值输出}
MA21:IF(MA(C,21) >MA(C,89),MA(C,21),MA(C,89));{21日均线与89日均线取大值输出}
MA89:MA(C,89);{输出89日均线}
RSV:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100;{计算30日未成熟随机值}
K:=SMA(RSV,3,1);{计算KDJ指标K值}
D:=SMA(K,3,1);{计算KDJ指标D值}
TJ:=D< 10;{D值小于10,定义为超卖条件}
TJ1:=D>90;{D值大于90,定义为超买条件}
上边线:IF(BARSLAST(TJ),REF(HIGH,BARSLAST(TJ)),DRAWNULL),COLORWHITE;{超卖后最高价画白色上边线}
下边线:IF(BARSLAST(TJ),REF(LOW,BARSLAST(TJ)),DRAWNULL),COLORMAGENTA;{超卖后最低价画品红下边线}
安全带:STICKLINE(D,上边线*0.996,下边线*1.005,8,0),COLORBROWN;{绘制棕色安全支撑压力带}
STICKLINE(C>O,O,C,3,1),COLORRED;{收阳线时,画红色实心K线实体}
STICKLINE(C>O,H,C,0,0),COLORRED;{收阳线时,画红色上影线}
STICKLINE(C>O,L,O,0,0),COLORRED;{收阳线时,画红色下影线}
STICKLINE(C< O,O,C,3,0),COLORCYAN;{收阴线时,画青色实心K线实体}
STICKLINE(C< O,H,L,0,1),COLORCYAN;{收阴线时,画青色影线}
STICKLINE(TJ,O,C,2,0),COLORFF00FF;{超卖时,画品红色特殊K线}
STICKLINE(TJ1,O,C,2,0),COLORGREEN;{超买时,画绿色特殊K线};