以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  飞狐软件中截取一截指标代码,求金字塔编辑通过  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=166539)

--  作者:citscwb
--  发布时间:2018/11/17 13:49:59
--  飞狐软件中截取一截指标代码,求金字塔编辑通过
<% 
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 
%>

--  作者:FireScript
--  发布时间:2018/11/19 8:57:36
--  
 抱歉,这个无法做到。这段代码我这边没有办法去追溯它的原始的含义。