编写每周开盘第一天的收盘价向右画线的公式
编写每周开盘第一天的收盘价向右画线的公式
编写条件：
编写方法：
网友求助：
哪位大侠能帮忙编个卢卡斯数列画线,象飞狐的菲薄纳西画线一样!谢谢了
解答如下：
代码:
IF DATACOUNT<7 THEN EXIT;
hx:=c*0;Lks:=c*0;Lks[1]:=3;Lks[2]:=4;
for i=3 to 100 do begin
Lks[i]:=Lks[i-2]+Lks[i-1];
hx[Lks[i]]:=1;
if Lks[i]+Lks[i-1]>datacount then
break;
end;
vertline(hx);
drawnumber(hx,10,barpos,0);
IF DATACOUNT<7 THEN EXIT;
hx:=c*0;Lks:=c*0;Lks[1]:=3;Lks[2]:=4;
for i=3 to 100 do begin
Lks[i]:=Lks[i-2]+Lks[i-1];
hx[Lks[i]]:=1;
if Lks[i]+Lks[i-1]>datacount then
break;
end;
vertline(hx);
drawnumber(hx,10,barpos,0);
{股票资源馆:www.lixiangluntan.com专业和谐高端炒股软件--公式编写交流--加QQ751161480--}
【股票资源馆】大智慧专业版破解版,大智慧机构破解版,大智慧ACE破解版,ACE策略,AI活跃度。
从11年1月25日以来个股的涨停数
从11年1月25日以来个股的涨停数