求助飞狐中如何自编公式实现Winner函数(已解决)
2013-03-25 16:14:00   来源:股票壹网   评论:0 点击:

求助飞狐中如何自编公式实现Winner函数(已解决) @飞鱼投资 飞狐大交易师和阳光股道都有winner函数啊--@飞鱼投资 我记错了,是通达信的winner好,这是任班长以前对别人帖子的回复:“WINNER不知通达信的算
  求助飞狐中如何自编公式实现Winner函数(已解决)
@飞鱼投资

飞狐大交易师和阳光股道都有winner函数啊--@飞鱼投资

我记错了,是通达信的winner好,这是任班长以前对别人帖子的回复:“WINNER不知通达信的算法,按通达信有历史换手,这个应该没有未来。其他软件部分个股有轻微的未来,WINNER等筹码分布函数倒真有轻微未来,用时空隧道功能查不出来的,主要是限售股等上市,成交量没有做除权的原因”--模仿 WINNER 函数
VARIABLE:ARR[3000]=0;  
HH:=HIGH*100;
LL:=LOW*100;
VV:=VOL/(HH-LL);
co:=0*CLOSE; a:=0*CLOSE; 总量:=0*CLOSE; 当日量:=VOL; 换手率:=VOL/CAPITAL; 收:=c;
for j=1 to DATACOUNT do BEGIN
       总量[j]:=总量[j-1]*(1-换手率[j])+当日量[j]; //累计总成交 按当天换手衰减
      
       LLL:=LLV(LOW,j)*100;                      //j点时的历史最低价
       HHH:=HHV(HIGH,j)*100;                     //j点时的历史最高价
      
       for p=LLL[j] to HHH[j] do               
           ARR[p]:=ARR[p] *(1-换手率[j]);       //ARR数组每个变量 按当天换手衰减


       for I=LL[j] TO HH[j]  do  ARR[I]:=ARR[I]+VV[j]; //累加 ARR每个变量
   
       for K=lll[j] to 收[j]*100 do        
           co[j]:=co[j]+ARR[k];
              a[j]:=co[j]/总量[j]*100;
           
           
    end ;

正:WINNER(c)*100;
fan :a;  


模仿解决了,但有新问题:大多不显示获利筹码线。
出现“指标数组下标越界和超出有效数据区间”提示
中石油不显示,中石化显示:
3.25.3.gif (12.9 KB)
--@飞鱼投资

谢谢您,我这就测试,刚才洗衣服呢-- 我的机器不成,运行这个快S机状

有的成,有的不能显示--用了你的公式,感觉画出来的跟系统的差很多啊
 飞鱼投资:   2013-3-25 16:14
   
引用:
自编公式实现Winner函数
CC := DYNAINFO(7); { 今日收盘 }
ww := IF(L>CC, 0, IF(H<CC, 1, (CC-L+0.01)/(H-L+0.01))); { 每日获利盘 }
Winner: DMA(ww, VOL/CAPITAL)*100; { 获利盘 }
感谢胡呵提供WINNER算法.
1.对照分析家WINNER和胡呵的WINNER(简称HUWIN)有以下微小区别;HUWIN中的价格加减幅度对20元以下的股票设置为0.05时与WINNER实际值接近,按0.01HUWIN的数据一般<WINNER数据.
2.由于参考动态价格,使得HUWIN无法对历史的HUWIN保留当时的真实数据,具体可对照600608等股票,只能保持当天的HUWIN.因此,选股测试是用WINNER较好,因为WINNER对历史保留.但HUWIN能在分时线中表达,WINNER则不能,这是HUWIN的优点.      
引用:
下面是模仿飞狐的cost的,改动一下就可以变为winer
不过在飞行狐里运算太慢了.
INPUT:X(50,1,100);
VARIABLE:ARR[5000]=0;  
HH:=HIGH*100;
LL:=LOW*100;
VV:=VOL/(HH-LL+1)/1000;
co:=0*CLOSE; a:=0*CLOSE; 总量:=0*CLOSE; 当日量:=VOL/1000; 换手率:=VOL/CAPITAL;
for j=1 to DATACOUNT do BEGIN
       总量[j]:=总量[j-1]*(1-换手率[j])+当日量[j]; //累计总成交 按当天换手衰减     
       LLL:=LLV(LOW,j)*100;                      //j点时的历史最低价
       HHH:=HHV(HIGH,j)*100;                     //j点时的历史最高价      
  for p=LLL[j] to HHH[j]+1 do   BEGIN              
           ARR[p]:=ARR[p] *(1-换手率[j]);       //ARR数组每个变量 按当天换手衰减
        if p>=LL[j] and p<= HH[j]+1 then  ARR[p]:=ARR[p]+VV[j]; //累加 ARR每个变量
           co[j]:=co[j]+ARR[p];           
           IF co[j]<总量[j]*x/100 then  a[j]:=p;                              
          end;
    end ;  
正:COST(x);
模仿 :a/100;      
问题:1.引用1中如何保留Winner当时的真实数据?
      2.参考引用1,引用2中如何改动,模拟真正的winner函数?
求助高手,谢谢!

[ 本帖最后由 飞鱼投资 于 2013-3-25 20:24 编辑 ]

 股票专家荐股少而精.成功率达95%免费个股咨询点这里

求助飞狐中如何自编公式实现Winner函数(已解决)..更多详情请加腾飞涨停微信:gupiao139

相关热词搜索:飞 狐 分析家 飞狐 飞狐交易师

上一篇:请老师写个KDJ选股
下一篇:请改写现价上穿红线箭头选股

本栏点击总排行
分享到: 收藏
短信荐股回顾
邮件传真荐股回顾
整网点击月排行
整网点击排行