文华财经BS买卖幅图二
图片
SETEXPIREDATE('20990626');
有效天数:=210626-DATE,PRECIS0,COLORRED,NODRAW;
EXPDATE:=IFELSE(990626-DATE>=0,1,0);
提示:=IF(210626-DATE<=3,1,NULL);
NN:=IF(PERIOD<=1,24,IF(PERIOD=2,24,IF(PERIOD=3,24,IF(PERIOD=4,24,IF(PERIOD=5,24,IF(PERIOD=6,24,IF(PERIOD=7,24,IF(PERIOD=8,24,24)))))))),NODRAW;
RSV:= (CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*100;//收盘价与N周期最高值做差，N周期最高值与N周期最低值做差，两差之间做比值。
FASTK:=SMA(RSV,5,1);//RSV的移动平均值
K:IF(EXPDATE=1,SMA(FASTK,4,1),NULL),NODRAW;//FASTK的移动平均值
D:=IF(EXPDATE=1,SMA(K,4,2),NULL),NODRAW;//K的移动平均值
DRAWCOLORLINE(K>=REF(K,1)&&EXPDATE=1,K,COLORMAGENTA,COLORBLUE),LINETHICK2;//变色线
DRAWCOLORLINE(D>=REF(D,1)&&EXPDATE=1,D,COLORRED,COLORGREEN),LINETHICK2;//变色线
STICKLINE(K>D&&EXPDATE=1,K-1,D+1,COLORRED,1);//填充柱状线并涂色
STICKLINE(K<=D&&EXPDATE=1,K+1,D-1,COLORGREEN,1);//填充柱状线并涂色
KDJ:=IF(PERIOD<=5,D,K);
DRAWTEXT(KDJ<=REF(KDJ,1)&&REF(EVERY(KDJ>REF(KDJ,1),1),1)&&EXPDATE=1,KDJ-2,'S'),COLORGREEN;
DRAWTEXT(KDJ>=REF(KDJ,1)&&REF(EVERY(KDJ<REF(KDJ,1),1),1)&&EXPDATE=1,KDJ+12,'B'),COLORMAGENTA;
ZZQ:=IF(PERIOD=1,1,IF(PERIOD=2,1,IF(PERIOD=3,1,IF(PERIOD=4,1,IF(PERIOD=5,1,IF(PERIOD=6,1,IF(PERIOD=7,1,IF(PERIOD=8,1,IF(PERIOD=9,1,IF(PERIOD=10,1,IF(PERIOD=11,1,IF(PERIOD=12,1,IF(PERIOD=13,1,IF(PERIOD=14,1,0)))))))))))))),NODRAW;
M:=IF(PERIOD<1&&EXPDATE=1,3,NULL);
RSV1:= (CLOSE-LLV(LOW,24*M))/(HHV(HIGH,24*M)-LLV(LOW,24*M))*100;//收盘价与N周期最高值做差，N周期最高值与N周期最低值做差，两差之间做比值。FASTK1:=SMA(RSV1,5*M,1);//RSV的移动平均值
KH:SMA(FASTK1,4*M,1),COLORYELLOW,NODRAW;//FASTK的移动平均值
DH:=SMA(KH,4*M,2),NODRAW;//K的移动平均值
DRAWTEXT(DH<=REF(DH,1)&&REF(EVERY(DH>REF(DH,1),1),1),DH+10,'卖'),COLORBLUE;
DRAWTEXT(DH>=REF(DH,1)&&REF(EVERY(DH<REF(DH,1),1),1),KH-2,'买'),COLORYELLOW;
DRAWCOLORLINE(KH>=REF(KH,1),KH,COLORMAGENTA,COLORBLUE),LINETHICK2;//变色线
DRAWCOLORLINE(DH>=REF(DH,1),DH,COLORRED,COLORGREEN),LINETHICK2;//变色线
//STICKLINE(KH>DH,KH-1,DH+1,COLORYELLOW,1);//填充柱状线并涂色
//STICKLINE(KH<=DH,KH+1,DH-1,COLORCYAN,1);//填充柱状线并涂色
FILLRGN(KH>DH,KH,DH,COLORYELLOW);//填充柱状线并涂色
FILLRGN(KH<=DH,KH,DH,COLORCYAN);//填充柱状线并涂色
KD:=EMA2((K+D)/2,2),NODRAW;
//DRAWCOLORLINE(KD>=REF(KD,1),KD,COLORMAGENTA,COLORBLUE),LINETHICK2;//变色线
//DRAWICON(K<=REF(K,1)&&REF(EVERY(K>REF(K,1),1),1),K+8,'IC05');
//DRAWICON(K>=REF(K,1)&&REF(EVERY(K<REF(K,1),1),1),K,'IC04');
//DRAWICON(KD<=REF(KD,1)&&REF(EVERY(KD>REF(KD,1),1),1),KD+8,'IC05');
//DRAWICON(KD>=REF(KD,1)&&REF(EVERY(KD<REF(KD,1),1),1),KD,'IC04');
//MA3:=EMA(C,60);
K30:=30,COLORCYAN,DOT,NODRAW;
K50:=50,COLORWHITE,DASHDOTDOT;
K80:=80,COLORGREEN,DOT,NODRAW;
DRAWCOLORLINE(K30=30,K30,COLORMAGENTA,COLORMAGENTA),DOT;//变色线
DRAWCOLORLINE(K80=80,K80,COLORGREEN,COLORGREEN),DOT;//变色线
UP:BARSLASTCOUNT((PERIOD<5 && D>REF(D,1) )