书中指标源码

来源:互联网 发布:10.2越狱后抹掉数据 编辑:程序博客网 时间:2024/05/17 10:43
A/D    SUM((CLOSE-OPEN)/(HIGH-LOW)*VOL,0);

ROC   ROC:(CLOSE-REF(CLOSE,N))/REF(CLOSE,N)*100;
ROCMA:MA(ROC,M);

S-ROC   em13:=EMA(CLOSE,13);
SROC:(em13-REF(em13,21))/REF(em13,21)*100;

劲道指数  JDZS2:EMA(VOL*(C-REF(C,2)),2);
JDZS13:EMA(VOL*(C-REF(C,2)),13);
0;

透视指标: A:=EMA(CLOSE,13);
多头力道:H-A,LINETHICK0;
STICKLINE(多头力道>0,0,多头力道,1,0),COLORRED;
STICKLINE(多头力道<0,多头力道,0,1,0),COLORGREEN;
空头力道:L-A,LINETHICK0;
H1:=MAX(HHV(空头力道,0),HHV(多头力道,0));
STICKLINE(空头力道>0,-2*H1,-2*H1+空头力道,1,0),COLORRED;
STICKLINE(空头力道<0,-2*H1+空头力道,-2*H1,1,0),COLORGREEN;

TRIN   trin:(ADVANCE/DECLINE)/((SUM(v,ADVANCE ))/SUM(v,DECLINE));

ema(trin,n);

http://www.58188.com/gpgs/news/2012/10-25/19234.html


http://chuansong.me/n/918816
改写的威廉指标:

WR1:100-100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N));
WR2:100-100*(HHV(HIGH,N1)-CLOSE)/(HHV(HIGH,N1)-LLV(LOW,N1));
杀跌线:20,COLORGREEN,COLORRED;
多空线: 50,COLORGREEN,COLORBLUE;
疯狂线: 80,COLORGREEN,COLORGREEN;


S_MACD

=====================================================

P:=26;S:=12;M:=9;
DIFF:EMA(C,S) - EMA(C,P);
DEA:EMA(DIFF,M);
MACDB:2*(DIFF-DEA),COLORSTICK;
BV:=SUM(MACDB,0);
BA:=IF(MAX(BV,REF(BV,2))<REF(BV,1) OR MIN(BV,REF(BV,2))>REF(BV,1),1,0);
BC:=BARSLAST(BA)+1;
SMACD:=BV-REF(BV,BC);
VAR3:=IF(MACDB>0,HHV(ABS(MACDB),BC),LLV(MACDB,BC));
VAR4:=(MACDB)/20;{图形比例缩小1/20,可修改}
面积:SMACD,NODRAW;
DRAWNUMBER(REF(VAR4,1)>0 AND VAR4<=0 ,REF(VAR3,1),REF(面积,1)),COLORGREEN;
DRAWNUMBER(REF(VAR4,1)<0 AND VAR4>=0 ,REF(VAR3,1),REF(ABS(面积),1)),COLORFF00FF;
DRAWNUMBER(ISLASTBAR AND VAR4<0,REF(VAR3,1),ABS(面积)),COLORFF00FF;
DRAWNUMBER(ISLASTBAR AND VAR4>0,REF(VAR3,1),面积),COLORGREEN;

=====================================================


atff

=====================================================

均线1:=MA(CLOSE,5);
均线2:=MA(CLOSE,13);
均线差:均线1-均线2,COLORSTICK;
STICKLINE(((均线差<REF(均线差,1)) AND (均线差>0)),0,均线差,1,0),COLOR00cfff,LINETHICK2;
STICKLINE(((均线差>REF(均线差,1)) AND (均线差<0)),0,均线差,1,0),COLORFF00FF,LINETHICK2;
穿越:=BARSLAST(Cross(均线1,均线2) Or Cross(均线2,均线1));
平均趋势力度:Sum(均线差,穿越)/穿越;

=====================================================


atff2

=====================================================

MA5:=MA(C,M1);
MA10:=MA(C,M2);
均线差:MA5-MA10,COLORSTICK,COLORWHITE;
操盘:STICKLINE(2*(均线差)>=0 AND 2*(均线差)>=REF(2*(均线差),1),0,2*(均线差),2,0),COLORRED;
反弹:STICKLINE(2*(均线差)<0 AND 2*(均线差)>=REF(2*(均线差),1),0,2*(均线差),2,0),COLORYELLOW,LINETHICK1;
减仓:STICKLINE(2*(均线差)>=0 AND 2*(均线差)< REF(2*(均线差),1),0,2*(均线差),2,0),COLORFF9900,LINETHICK1;
寻底:STICKLINE(2*(均线差)<0 AND 2*(均线差)< REF(2*(均线差),1),0,2*(均线差),2,0),COLORGREEN,LINETHICK1;
JC:=MA10-MA5;
绿柱面积:IF (均线差<0,SUM(均线差*0.1,BARSLAST(JC<0)),0),LINETHICK0,COLORWHITE;
红柱面积:IF (均线差>0,SUM(均线差*0.1,BARSLAST(JC>0)),0),LINETHICK0,COLORWHITE;
A1:=IF(均线差>0,1,-1);
A2:=REF(A1,1);
A3:=A1*A2;
A4:=BARSLAST(A3<0);
A5:=A4+1;
趋势平均力度:(SUM(均线差,0)-REF(SUM(均线差,0),A5))/A5,LINETHICK0;
时间:(A4+1)/100,LINETHICK0;

=====================================================

0 0
原创粉丝点击