清空板块的代码如下，如何改写金字塔公式？
if getglobalvar(FormulaName+'清理')<>CurrentDate and IsLastBar Then
begin
SetGlobalVar(FormulaName+'清理',CurrentDate);
for $i=1 to STKCOUNT(FormulaName) Do
Begin
DELETEFROMBLOCK (STKFROMBLK(FormulaName,1) ,FormulaName);
end;
end;
以下是引用jinzhe在2016-6-12 9:43:14的发言：
这段要表达什么意思？
这个函数是什么意思？
这个来从金字塔下面连接。请老师改写下
http://www.weistock.com/bbs/dispbbs.asp?boardid=10&id=75696
改成
if extgbdata(FormulaName+'清理')<>CurrentDate and IsLastBar Then
begin
extgbdataset(FormulaName+'清理',CurrentDate);
for i=1 to STKCOUNT(FormulaName) Do
Begin
DELETEFROMBLOCK (STKFROMBLK(FormulaName,i) ,FormulaName);
end;
end;
DELETEFROMBLOCK (STKFROMBLK(FormulaName,i) ,FormulaName);