公式模型编写问题提交-求将以下代码改成日内金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  求将以下代码改成日内  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=30700)

--  作者：manbutianya
--  发布时间：2012/11/17 2:54:33
--  求将以下代码改成日内
cC:=C;
vV:=V;
CP:=cC;
VP:=V;
Nz:=datacount;
x:=SORT(cC,0,1,Nz);
x:=SORTPos(CP,0,1,Nz);
for i=1 to Nz do begin
if Nz>1 then vV[i]:=VP[CP[i]];
end;
StP1:=barpos=1 or ref(cC,1)<cC;
SVV:=sum(VV,barslast(StP1)+1);
HVP:=hhvbars(SVV,0);
HVP:=Nz-HVP[Nz];
大量价:cC[HVP],LINEDASHDOT;小量价:cC[1],LINEDASHDOT;
最大量:=SVV[HVP];
最大换手:=最大量/CAPITAL*100;
//DRAWTEXT(SYSPARAM(2)=BARPOS,1,\'最大换手% : \'+NUMTOSTR(最大换手,2)),COLOR00FFFF,ALIGN4;
DRAWTEXT(SYSPARAM(3)=BARPOS,大量价,\'大量价: \'+NUMTOSTR(大量价,2)),COLOR66FFFF,ALIGN2,PXUP25;
DRAWTEXT(SYSPARAM(3)=BARPOS,小量价,\'小量价 : \'+NUMTOSTR(小量价,2)),COLOR66FFFF,ALIGN2,PXUP25;

--  作者：manbutianya
--  发布时间：2012/11/17 3:17:13
--
不用了，解决了，设置存储数据1天就行了，谢谢大家!