软件名称:[B]连续涨停前的神奇梯型指标(源码)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:解密版
软件大小:0 Bytes
官方主页:Home Page
更新时间:2009-07-28 08:13:01
软件简介:
原码如下:
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=(SMA(RSV,3,1));
D:=(SMA(K,3,1));
J:=(3*K-2*D);
KK:=INTPART(SMA(RSV,3,1));
DD:=INTPART(SMA(K,3,1));
JJ:=INTPART(3*K-2*D);
JJ1:=REF(jj,1);
A:=KK-DD;
A1:=REF(KK-DD,1);
B:=A1-A;
B1:=REF(A1-A,1);
B2:=REF(A1-A,2);
B3:=REF(A1-A,3);DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA : EMA(DIFF,M);
MACD : 2*(DIFF-DEA), COLORSTICK;
jc := dea-diff;
绿柱面积:IF (MACD<0,SUM(MACD,BARSLAST(jc<0)),0),linethick0,colorblue;
红柱面积:IF (MACD>0,SUM(MACD,BARSLAST(jc>0)),0),linethick0,colorred;
本次最低价:LLV(L,BARSLAST(jc<0)),linethick0;
本次最高价:HHV(H,BARSLAST(jc>0)),linethick0;
x1:=IF (MACD<0,BARSLAST(CROSS(diff,dea)),0);
前次绿柱面积:=REF(绿柱面积,x1+1);
前次最低价:=REF(本次最低价,x1+1);
y1:=IF((绿柱面积<0 AND ABS(绿柱面积)<ABS(前次绿柱面积) AND 本次最低价<前次最低价 ),1,0);
RS1:= MACD<0 AND REF(MACD,1)<0 AND C<前次最低价 AND ABS(绿柱面积)<ABS(前次绿柱面积) AND ABS(MACD)<ABS(REF(MACD,1));
底背驰:= IF (CROSS(diff,dea),REF(y1,1),0);
DRAWICON(底背驰,0,7),coloryellow;
FILLRGN(diff,dea,rs1),colorred;
x2:=IF (MACD>0,BARSLAST(CROSS(dea,diff)),0);
前次红柱面积:=REF(红柱面积,x2+1);
前次最高价:=REF(本次最高价,x2+1);
y2:=IF((红柱面积>0 AND 红柱面积<前次红柱面积 AND 本次最高价>前次最高价 ),1,0);
RS2:= MACD>0 AND REF(MACD,1)>0 AND C>前次最高价 AND ABS(红柱面积)<ABS(前次红柱面积) AND ABS(MACD)<ABS(REF(MACD,1));
顶背驰:= IF (CROSS(dea,diff),REF(y2,1),0);
DRAWICON(顶背驰,0,8),coloryellow;
FILLRGN(dea,diff,rs2),colorgreen;
CC:=B+B1+B2;
CC1:=REF(B+B1+B2,1);
CC2:=REF(B+B1+B2,2);
AD:=CC-B2;
AD1:=REF(CC-B2,1);
AD2:=REF(CC-B2,2);
b3=b and cc1=cc;
【本文仅仅提供源码,请参照下面编辑公式录像自己做成公式】
[url=http://www.70822.com/soft/sort013/sort03/down-11192.html]连续涨停前的神奇梯型指标(源码)[/url]