软件名称：[B]千万要当心这种指标（软件检查不到未来函数但有信号漂移）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：解密版
软件大小：2.00 KB
官方主页：Home Page
更新时间：2009-04-24 10:38:11
软件简介:

千万要当心这种指标

使用未来函数检测软件检查不到有未来函数，但是信号会漂移

TJ:=WEEKDAY-REF(WEEKDAY,1)<>DATEDIFF(REF(DATE,1),DATE) OR BARPOS=1;
IF DATACOUNT>1 THEN
FOR I=1 TO DATACOUNT-1 DO BEGIN
TJ1[I]:=TJ[I+1];
END;
TJ1[DATACOUNT]:=1;
FC:=CLOSE;
FH:=HIGH;
FL:=LOW;
FO:=OPEN;
POS:=0*CLOSE;
FOR I=1 TO DATACOUNT DO BEGIN
IF TJ[I] THEN BEGIN
HH:=FH[I];
LL:=FL[I];
OO:=FO[I];
P:=I;
END;ELSE BEGIN
FO[I]:=OO;
HH:=MAX(HH,FH[I]);
LL:=MIN(LL,FL[I]);
END;
IF TJ1[I] THEN BEGIN
POS[(I+P)/2]:=1;
IF I>1 THEN BEGIN
FOR J=I DOWNTO 1 DO BEGIN
FC[J]:=FC[I];
FH[J]:=HH;
FL[J]:=LL;
IF TJ[J] THEN
BREAK;
END;
END;
END;
END;
HP:=FH;
LP:=FL;
CP:=FC;
LC:=REF(CP,1);
RSI1:=(SMA(MAX(CP-LC,0),6,1))/(SMA(ABS(CP-LC),6,1))*100;
RSI2:=(SMA(MAX(CP-LC,0),12,1))/(SMA(ABS(CP-LC),12,1))*100;
A:IF(CROSS(RSI1,RSI2),LOW,REF(LOW,BARSLAST(CROSS(RSI1,RSI2)))),LINETHICK2,colorFFFF;
B:IF(CROSS(RSI2,RSI1),HIGH,REF(HIGH,BARSLAST(CROSS(RSI2,RSI1)))),LINETHICK2,colorFF00FF;
买选股:IF(CROSS(RSI1,RSI2) OR CROSS(CLOSE,A),88,0),LINETHICK0,colorFF00FF;
卖选股:IF(REF(CROSS(RSI2,RSI1),1),99,0),LINETHICK0,colorFFFF;
DRAWICON(买选股=88,LOW*0.998,1);
DRAWICON(卖选股=99,HIGH*1.01,2);
 

[url=http://www.70822.com/soft/sort013/sort02/down-8621.html]千万要当心这种指标（软件检查不到未来函数但有信号漂移）[/url]