有关日历价差的理论基础可以参考这篇文章https://wenku.baidu.com/view/b4ea95f651e79b896902260e.html?rec_flag=default&sxts=1586769610630

//cod1表示当月合约，code2是次月合约
code1:=OPOBYPRIRCE(\'QQ510050\',2.7,0,202004,1);       
code2:=OPOBYPRIRCE(\'QQ510050\',2.7,0,202005,1);        

ss:=2;          
       

HistoryVolatility:= VOLATILITY(50 ,\'QQ510050\' );
Implied_volatility1:= OPTIONINFO2(12 , code1);//取近月合约的隐含波动率
Implied_volatility2:= OPTIONINFO2(12 , code2);;//取远月合约的隐含波动率
Cond:= Implied_volatility1 - HistoryVolatility + Implied_volatility1 - Implied_volatility2;//波动率差作为信号

If Cond > 0 and TsellHOLDINGEX(\'\' ,code1 ,1)=0 and TBUYHOLDINGEX(\'\' ,code2 ,1)=0 and OPTIONINFO2(8,code1)>8  then
begin
tbuyshort(1,ss,lmt,DYNAINFO2(7 ,code1 ));
tbuy(1,ss,lmt,DYNAINFO2(7 ,code2 ));
end

If TBUYHOLDINGEX(\'\' ,code1 ,1) > 0 and TBUYHOLDINGEX(\'\' ,code2 ,1) > 0 and OPTIONINFO2(8,code1)<= 8 then
begin
tsellshort(1,TsellHOLDINGEX(\'\' ,code1 ,1),lmt,DYNAINFO2(7 ,code1 ));
tsell(1,TBUYHOLDINGEX(\'\' ,code2 ,1),lmt,DYNAINFO2(7 ,code2 ));

End