RefStkC这样有什么问题吗？

bcsunwww

function strategy3 BEGIN limitcycle:day;
    if (IsLastBar) then
    begin
            num := StkCount(StkName);
            for i = 1 to num do
            begin
                stkcode := StkFromBlk(StkName, i);
                ppp:=RefStkC(stkcode);  
                if (ppp>20.00) then
                    begin
                    AddToBlock(stkcode, '我的池子zzt');
                    end
            end
    end

end


SetPoolSample('A股', 0);
strategy3;

易得君1号

您的公式是对的，但RefStkC函数目前只支持参数不可变，这个循环里每次StkCode都会换只股票。

此问题已修复，将在V3.2.0发布，谢谢。

易得君1号

V3.1.11 已修复

bcsunwww

谢谢高效修复。RefStkC(stkcode)已经支持动态代码了。但用在引用函数里仍然只支持静态代码，动态改变无效,如：ref(RefStkC(stkcode),1)

bcsunwww

function strategy0 BEGIN limitcycle:day;
    if (IsLastBar) then
    begin
            num := StkCount(StkName);
            for i = 1 to num do
            begin
                stkcode := StkFromBlk(StkName, i);
                ppp:=Ref(RefStkC(stkcode),1);  
                if (ppp>30.00) then
                    begin
                    AddToBlock(stkcode, '中价股');
                    end
                zzt:=(Ref(RefStkC(stkcode),1)- Ref(RefStkC(stkcode),2))/Ref(RefStkC(stkcode),1) > 1.095 and Ref(RefStkC(stkcode),1)=Ref(RefStkH(stkcode),1);  
                if zzt then
                    begin
                    AddToBlock(stkcode, '昨涨停');
                    end
            end
    end

end


SetPoolSample('A股', 0);
strategy0;