| 以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (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=6965) |
| -- 作者：javenyao -- 发布时间：2011/6/23 13:23:32 -- 个人瓶颈了 variable:total1=0,bar1=0; var1:=c; var2:=o; var3:=h; if not(islastbar) then exit; for N=1 to 100 do begin if var1[N]>var2[N] then begin bar1=bar1+1; total1=total1+((var3[N]-var2[N])/var2[N]); 100avg:total1/bar1; end; end; 结果居然100avg是一条0的直线，具体不知道错在哪里，希望经验丰富的朋友解答一下，谢谢。 |
| -- 作者：javenyao -- 发布时间：2011/6/23 13:24:20 -- variable:temp1=1,temp2=1,total1=0,total2=0,bar1=0,bar2=0; var1:=c; var2:=o; var3:=h; if not(islastbar) then exit; for N=1 to 100 do begin if var1[N]>var2[N] then begin bar1=bar1+1; total1=total1+((var3[N]-var2[N])/var2[N]); 100avg:total1/bar1; end; end; |
| -- 作者：javenyao -- 发布时间：2011/6/23 13:24:48 -- 奇怪，怎么不会按软件里的格式显示呢 |
| -- 作者：jinzhe -- 发布时间：2011/6/23 13:41:44 -- 请使用IE浏览器 |
| -- 作者：javenyao -- 发布时间：2011/6/23 13:47:04 -- variable:temp1=1,temp2=1,total1=0,total2=0,bar1=0,bar2=0; var1:=c; var2:=o; var3:=h; if not(islastbar) then exit; for N=1 to 100 do begin if var1[N]>var2[N] then begin bar1=bar1+1; total1=total1+((var3[N]-var2[N])/var2[N]); 100avg:total1/bar1; end; end; |
| -- 作者：javenyao -- 发布时间：2011/6/23 13:50:21 -- 谢谢4楼，果然有效，代码在5楼 |
| -- 作者：fly -- 发布时间：2011/6/23 14:06:08 -- 估计是手误 bar1=bar1+1; total1=total1+((var3[N]-var2[N])/var2[N]); bar1:=bar1+1; total1:=total1+((var3[N]-var2[N])/var2[N]); [此贴子已经被作者于2011-6-23 14:07:15编辑过]
|
| -- 作者：javenyao -- 发布时间：2011/6/23 14:12:33 -- 谢谢7楼的，慧眼，我大意了。 |