以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  当月次月的行情引用--分享  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=160506)

--  作者:yin8jun
--  发布时间:2017/12/18 18:08:38
--  当月次月的行情引用--分享
//在主图为连续合约的时使用

thismon:=NUMTOSTR(MONTH,0);
nextmon:=if(month=12,NUMTOSTR(1,0),NUMTOSTR(MONTH+1,0));
IF MONTH<9 THEN BEGIN
PZ:=STRLEFT(STKLABEL,3);
PD:=STRLEFT(STKLABEL,3);
END
IF MONTH=9 THEN BEGIN
PZ:=STRLEFT(STKLABEL,3);
PD:=STRLEFT(STKLABEL,2);
END
IF MONTH>9 and MONTH<12 THEN BEGIN
PZ:=STRLEFT(STKLABEL,2);
PD:=STRLEFT(STKLABEL,2);
END 
IF MONTH=12 THEN BEGIN
PZ:=STRLEFT(STKLABEL,2);
PD:=STRLEFT(STKLABEL,3);
END

DY:=STRCAT(PZ,thismon); //当月
CY:=STRCAT(PD,nextmon);//次月

DYMIN1:CALLSTOCK(DY,VTCLOSE,1,0);//当月合约1分钟收盘价的引用
CYMIN1:CALLSTOCK(CY,VTCLOSE,1,0);//次月合约1分钟收盘价的引用

--  作者:plsf99
--  发布时间:2019/12/10 22:15:43
--  
从第三周五合约切换开始,次月的连续数据就没有了,有高手能帮忙解决吗?