以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  金字塔软件问题提交  (http://weistock.com/bbs/list.asp?boardid=2)
----  [求助]这句循环语句通不过检测~  (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=59809)

--  作者:bbking
--  发布时间:2013/12/11 14:12:58
--  [求助]这句循环语句通不过检测~
tsl:=0;
for i=barpos downto 1 do
if time=CLOSETIME(0) then begin
tsl:=tsl+1;
end
if tsl>=p1 then begin
break;
end
end

帮忙看一下哪里有错?
我要算出前面p1个交易日离目前有多少个周期~
如何算?

--  作者:lichenghu
--  发布时间:2013/12/11 14:55:48
--  

p1个交易日是指什么?


--  作者:lichenghu
--  发布时间:2013/12/11 15:02:56
--  
tsl:=0;
for i=barpos downto 1 do
if time=CLOSETIME(0) then begin
tsl:=tsl+1;
end
if tsl>=p1 then begin
break;
end
//
 
tsl:=0;
for i=barpos downto 1 do
if time=CLOSETIME(0) ANDF TSL=< P1 then begin
tsl:=tsl+1;
end
 
你这样算出来,tsl不就等于Pl么?
[此贴子已经被作者于2013/12/11 15:04:09编辑过]

--  作者:bbking
--  发布时间:2013/12/11 16:27:08
--  
比如p1=10
就是我要计算前面10次换日距离现在的周期数

--  作者:bbking
--  发布时间:2013/12/11 16:28:32
--  
那句循环语句通不过检测
提示break只能在循环中使用~
你帮我看看应该怎么改吧

--  作者:yukizzc
--  发布时间:2013/12/11 16:39:49
--  
for 后面没有begine,加上试试
--  作者:bbking
--  发布时间:2013/12/12 13:21:36
--  
以下是引用yukizzc在2013/12/11 16:39:49的发言:
for 后面没有begine,加上试试
你说的是哪句啊?能具体详细点不?
代码也只有这么长~你copy一下能够通过检验的写法

[此贴子已经被作者于2013/12/12 13:22:03编辑过]

--  作者:yukizzc
--  发布时间:2013/12/12 13:22:41
--  
for i=barpos downto 1 do
begin
if time=CLOSETIME(0) then begin
tsl:=tsl+1;
end
if tsl>=p1 then begin
break;
end
end

--  作者:bbking
--  发布时间:2013/12/12 13:45:41
--  
计算前面10次换日距离现在的周期数

看样子还是没法正常算出结果啊~


--  作者:fly
--  发布时间:2013/12/12 15:23:03
--  

这样看看

tsl:=0;
p1:=10;


for i=barpos downto 1 do
begin
if time=CLOSETIME(0) then tsl:=tsl+1;
if tsl>=p1 then break;
end