打印

[飞狐] 请老师帮忙修改成飞狐的公式

大路

理想小五级同学

Rank: 3 Rank: 3 Rank: 3

理想币: 165 个
注册时间: 2004-10-20

楼主大中小发表于 2008-9-5 13:58 只看该作者

请老师帮忙修改成飞狐的公式

本文来自：理想论坛 www.55188.com 作者：大路点击164次

原文：http://www.55188.com/viewthread.php?tid=2248134

线上买
FO:=IF(CHECKUSER(1),OPEN,0);
FH:=IF(CHECKUSER(1),HIGH,0);
FL:=IF(CHECKUSER(1),LOW,0);
FC:=IF(CHECKUSER(1),CLOSE,0);
<%
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)
vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
  vo(i)=(vo(i-1)+vc(i-1))/2
  if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
  if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
  vc(i)=(2*vc(i)+vh(i)+vl(i))/4
next
ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc

%>
KKl:=IF(FC>=FO AND (FC>=REF(FC,1) OR REF(FC,1)>=REF(FO,1)),1,IF(FC<FO AND (FC<REF(FO,1) OR REF(FC,1)<REF(FO,1)),-1,0));
明FO+FC)/2,SHIFT1,colorFF00;
转:=IF(KK=1,MIN(FC,FO),IF(KK=-1,MAX(FC,FO),IF(REF(KK,1)=1,MIN(FC,FO),IF(REF(KK,1)=-1,MAX(FC,FO),(FC+FO)/2))));
中:=MA(CLOSE,N);
天:=中+2*STDP(CLOSE,N);
罗:=中+STDP(CLOSE,N);
地:=中-STDP(CLOSE,N);
网:=中-2*STDP(CLOSE,N);
MK:=IF(KK=1,HIGH,IF(KK=-1,CLOSE,IF(REF(KK,1)=1,HIGH,CLOSE)));
CIR1:=IF(MAX(CLOSE,OPEN)>中 AND LOW>地 AND 明>地,明+0.2*SQRT(MA((MK+中)*(MK-中),3)),明);
CIR2:=IF(MAX(CLOSE,OPEN)>中 AND LOW>地 AND 明>地,明-0.2*SQRT(MA((MK+中)*(MK-中),3)),明);
STICKLINE(FC>FO,FH,FL,0.1,0),colorFFFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),8,0),colorFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),7.3,0),color15FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6.7,0),color2AFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6,0),color3FFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),5.3,0),color54FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.7,0),color69FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.1,0),color7EFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3.5,0),color93FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3,0),colorA8FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),2.3,0),colorBDFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.6,0),colorD2FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.2,0),colorE7FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),0.9,0),colorEFFFFF;
STICKLINE(FO>FC,FH,FL,0.1,0),colorFFFF;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),8,0),colorFF0000;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),7.3,0),colorFF1500;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6,7),colorFF2A00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6,0),colorFF3F00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),5.3,0),colorFF5400;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.7,0),colorFF6900;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.1,0),colorFF7E00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3.5,0),colorFF9300;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3,0),colorFFA800;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),2.3,0),colorFFBD00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.6,0),colorFFD200;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.2,0),colorFFE700;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),0.8,1),colorFFFF00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),0.8,1),LINETHICK1,colorFFFFFF;
STICKLINE(KK=0 AND FC>=FO,FO,FC,8,1),colorFF00FF;
STICKLINE(KK=0 AND FC<FO,FO,FC,8,0),colorFF00FF;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),N,1))/(SMA(ABS(CLOSE-LC),N,1))*100;
DD:=BARSLAST(CROSS(RSI1,50));
SS:=BARSLAST(CROSS(50,RSI1));
HH1:=REF(HIGH,DD);
HH2:=REF(HIGH,DD-1);
LL1:=REF(LOW,SS);
LL2:=REF(LOW,SS-1);
压力线:MAX(HH1,HH2),LINETHICK2,colorFF;
支撑线:MIN(LL1,LL2),LINETHICK2,colorFF0000;

TOP

听雪寻股

公式技术指导团

Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7

理想币: 7455 个
注册时间: 2007-8-2

原创先锋论坛之星

2楼大中小发表于 2008-9-5 14:22 只看该作者

试着改动如下---------------这应该是个破解的指标,但不知破解者为什么会出些小错误


{线上买}
FO:=OPEN;
FH:=HIGH;
FL:=LOW;
FC:=CLOSE;
<%
vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)
vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
  vo(i)=(vo(i-1)+vc(i-1))/2
  if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
  if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
  vc(i)=(2*vc(i)+vh(i)+vl(i))/4
next
ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc

%>

KK:=IF(FC>=FO AND (FC>=REF(FC,1) OR REF(FC,1)>=REF(FO,1)),1,IF(FC<FO AND (FC<REF(FO,1) OR REF(FC,1)<REF(FO,1)),-1,0));
明:=(FO+FC)/2,SHIFT1,colorFF00;

转:=IF(KK=1,MIN(FC,FO),IF(KK=-1,MAX(FC,FO),IF(REF(KK,1)=1,MIN(FC,FO),IF(REF(KK,1)=-1,MAX(FC,FO),(FC+FO)/2))));

中:=MA(CLOSE,N);
天:=中+2*STDP(CLOSE,N);
罗:=中+STDP(CLOSE,N);
地:=中-STDP(CLOSE,N);
网:=中-2*STDP(CLOSE,N);
MK:=IF(KK=1,HIGH,IF(KK=-1,CLOSE,IF(REF(KK,1)=1,HIGH,CLOSE)));
CIR1:=IF(MAX(CLOSE,OPEN)>中 AND LOW>地 AND 明>地,明+0.2*SQRT(MA((MK+中)*(MK-中),3)),明);
CIR2:=IF(MAX(CLOSE,OPEN)>中 AND LOW>地 AND 明>地,明-0.2*SQRT(MA((MK+中)*(MK-中),3)),明);
STICKLINE(FC>FO,FH,FL,0.1,0),colorFFFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),8,0),colorFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),7.3,0),color15FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6.7,0),color2AFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6,0),color3FFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),5.3,0),color54FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.7,0),color69FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.1,0),color7EFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3.5,0),color93FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3,0),colorA8FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),2.3,0),colorBDFF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.6,0),colorD2FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.2,0),colorE7FF;
STICKLINE(KK=1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),0.9,0),colorEFFFFF;
STICKLINE(FO>FC,FH,FL,0.1,0),colorFFFF;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),8,0),colorFF0000;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),7.3,0),colorFF1500;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6,7),colorFF2A00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),6,0),colorFF3F00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),5.3,0),colorFF5400;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.7,0),colorFF6900;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),4.1,0),colorFF7E00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3.5,0),colorFF9300;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),3,0),colorFFA800;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),2.3,0),colorFFBD00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.6,0),colorFFD200;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),1.2,0),colorFFE700;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),0.8,1),colorFFFF00;
STICKLINE(KK=-1,MIN(FO,FC),MIN(FO,FC)+ABS(FC-FO),0.8,1),LINETHICK1,colorFFFFFF;
STICKLINE(KK=0 AND FC>=FO,FO,FC,8,1),colorFF00FF;
STICKLINE(KK=0 AND FC<FO,FO,FC,8,0),colorFF00FF;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),N,1))/(SMA(ABS(CLOSE-LC),N,1))*100;
DD:=BARSLAST(CROSS(RSI1,50));
SS:=BARSLAST(CROSS(50,RSI1));
HH1:=REF(HIGH,DD);
HH2:=REF(HIGH,DD-1);
LL1:=REF(LOW,SS);
LL2:=REF(LOW,SS-1);
压力线:MAX(HH1,HH2),LINETHICK2,colorFF;
支撑线:MIN(LL1,LL2),LINETHICK2,colorFF0000;

TOP

大路

理想小五级同学

Rank: 3 Rank: 3 Rank: 3

理想币: 165 个
注册时间: 2004-10-20

3楼大中小发表于 2008-9-5 14:52 只看该作者

谢谢!听雪寻股老师.

TOP

飞爱2008

理想小三级同学

Rank: 2 Rank: 2

理想币: 101 个
注册时间: 2008-6-11

4楼大中小发表于 2008-9-5 15:40 只看该作者

中:=MA(CLOSE,N);

老师看看，这句4.9通不过！

TOP

听雪寻股

公式技术指导团

Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7

理想币: 7455 个
注册时间: 2007-8-2

原创先锋论坛之星

5楼大中小发表于 2008-9-5 17:24 只看该作者

引用:

原帖由 飞爱2008 于 2008-9-5 15:40 发表
中:=MA(CLOSE,N);

老师看看，这句4.9通不过！

N是参数,楼主没说应该取多少,就取个20吧 N:=20;

TOP

免费开户权证万三	四川成都权证+期货低佣	理想论坛:降佣节省佣金	最具实战能力QQ群
全国办理权万一股万三		权证低佣无五元	全国权最低万一股万三实盘
北京最低权证开户免五实扣	股票权证降佣仅限上海	港股开户指南	大券商:权万1.5没5元