请将解盘源码中间隔天数由谷谷天数改为峰谷天数
[飞 狐] 9364
fc:=l; pstart:=lbound(tj); psum:=count(tj,0); variable:a[psum[datacount]]=0,a[psum[datacount]]=0; j:=1; for i=pstart to datacount do begin if tj[i] then begin a[j]:=fc[i]; b[j]:=i; j:=j+1; end; end; explain(1,'共有转折点:'+numtostr(j-1,0)+'个'); fd:=b[1]; str1:=''; for i=1 to j-1 do begin str1:=str1+numtostr(i,0)+'.最低价='+numtostr(a[i],2)+ ' 间隔天数='+numtostr((b[i]-fd)+1,0)+'\n'; fd:=b[i]; end; explain(1,str1);//解盘输出 drawicon(tj,l,5);//标记转折点 [[i] 本帖最后由 子龙2012 于 2012-11-17 10:08 编辑 [/i]] |
楼主 | 19楼 |
2楼 | 20楼 |
3楼 | 21楼 |
4楼 | 22楼 |
5楼 | 23楼 |
6楼 | 24楼 |
7楼 | |
8楼 | |
9楼 | |
10楼 | |
11楼 | |
12楼 | |
13楼 | |
14楼 | |
15楼 | |
16楼 | |
17楼 | |
18楼 |