原帖由 大话李白 于 2010-9-7 03:05 发表 ![]()
1.效果图如下:
经调试,请将原码改为下面的,在博易大师内,起始的三、四个交易日的H3输出是0。改后虽输出也是0,但不显示了,不会产生主图画面的扭曲。下面是修改前后效果对照图:
1.修改前效果图:
![]()
2.修改后效果图:
![]()
{RSI五彩K线}
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
STICKLINE(RSI<LL AND C<=REF(C,1),O,C,4,0),COLORGREEN;
STICKLINE(RSI<LL AND C>REF(C,1),O,C,4,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,O,L,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,O,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C>O,C,H,0,1),COLORGREEN;
STICKLINE(RSI<LL AND C<=O,C,L,0,1),COLORGREEN;
STICKLINE(RSI>HH AND C<=REF(C,1),O,C,4,0),COLORRED;
STICKLINE(RSI>HH AND C>REF(C,1),O,C,4,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,C,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C<=O,O,H,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,O,L,0,1),COLORRED;
STICKLINE(RSI>HH AND C>O,C,H,0,1),COLORRED;
STICKLINE(RSI>LL AND RSI<HH AND C<=REF(C,1),O,C,4,0),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>REF(C,1),O,C,4,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,C,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C<=O,O,H,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,O,L,0,1),COLORFFFF00;
STICKLINE(RSI>LL AND RSI<HH AND C>O,C,H,0,1),COLORFFFF00;
{顾比倒线底部确认线}
A:=ZIG(4,10),PRECIS2;
H1:=IF(A<REF(A,1),REF(H,1),REF(H,BARSLAST(A>REF(A,1) AND REF(A,1)<REF(A,2))+1)),PRECIS2;
H2:=IF(H1<REF(H1,1),REF(H1,1),REF(H1,BARSLAST(H1<REF(H1,1))+1)),PRECIS2;
H3:REF(H2,BARSLAST(H2<REF(H2,1))+1),PRECIS2,COLORC0C0C0,LINETHICK0;
PARTLINE(REF(H3,1)>0,H3),COLORWHITE,LINETHICK1;
VAR1:=(HIGH+LOW+5*CLOSE)/7;
VL1:=LLV(LOW,21);
VH2:=HHV(HIGH,21);
SK:=EMA((VAR1-VL1)/(VH2-VL1)*100,8);
SD:=EMA(0.667*REF(SK,1)+0.333*SK,1);
SJ:=3*SK-2*SD;
PARTLINE(SJ<20 AND REF(H3,1)>0,H3),COLORBLUE,LINETHICK3;
 |