标题：股指期货连续的下月、下季、隔季合约

IF00是连续当月合约，如何在程序中获得连续的下月、下季、隔季合约的数值？

定义“下季”“隔季”是离连续合约差多少个周期多少天多少月

时间间隔是不一定的啊，比如：

如果没有规律那你把1月-12月都枚举一遍

再发一遍，上面发的没显示出来

1月份：下月2月，下季3月，隔季6月 2月份：下月3月，下季6月，隔季9月 3月份：下月4月，下季6月，隔季9月 4月份：下月5月，下季6月，隔季9月 5月份：下月6月，下季9月，隔季12月 6月份：下月6月，下季9月，隔季12月 7月份：下月8月，下季9月，隔季12月 8月份：下月9月，下季12月，隔季来年3月 9月份：下月10月，下季12月，隔季来年3月 10月份：下月11月，下季12月，隔季来年3月 11月份：下月12月，下季来年3月，隔季来年6月 12月份：下月来年1月，下季来年3月，隔季来年6月

runmode:0;
v0:=callstock('if00',vtvol,6);
v1:=callstock('if01',vtvol,6);
v2:=callstock('if02',vtvol,6);
v3:=callstock('if03',vtvol,6);
v4:=callstock('if04',vtvol,6);
v5:=callstock('if05',vtvol,6);
v6:=callstock('if06',vtvol,6);
v7:=callstock('if07',vtvol,6);
v8:=callstock('if08',vtvol,6);
v9:=callstock('if09',vtvol,6);
v10:=callstock('if10',vtvol,6);
v11:=callstock('if11',vtvol,6);
v12:=callstock('if12',vtvol,6);
if v0=v1 then dq:=1;
if v0=v2 then dq:=2;
if v0=v3 then dq:=3;
if v0=v4 then dq:=4;
if v0=v5 then dq:=5;
if v0=v6 then dq:=6;
if v0=v7 then dq:=7;
if v0=v8 then dq:=8;
if v0=v9 then dq:=9;
if v0=v10 then dq:=10;
if v0=v11 then dq:=11;
if v0=v12 then dq:=12;

xy:=if(dq<>12,dq+1,1);

if dq=2 or dq=3 or dq=4 then xj:=6;
if dq=5 or dq=6 or dq=7 then xj:=9;
if dq=8 or dq=9 or dq=10 then xj:=12;
if dq=11 or dq=12 or dq=1 then xj:=3;

if dq=2 or dq=3 or dq=4 then gj:=9;
if dq=5 or dq=6 or dq=7 then gj:=12;
if dq=8 or dq=9 or dq=10 then gj:=3;
if dq=11 or dq=12 or dq=1 then gj:=6;

下月:xy;
下季:xj;
隔季:gj;

感谢！我研究一下