T2:=(TIME > 150500);//t2 判斷時間是否大于150500

IF T2 THEN//T2條件滿足時

BEGIN
 M1:=MONTH;//m1賦值為當前月份
 
 HY1:="IF";//hy1賦值為字符if,這里出現(xiàn)的明顯的編寫錯誤，要寫成單引號，既'IF'
 IF (M1 < 10) THEN
 BEGIN
  HY1:='IF00'+NUMTOSTR(M1,0);//當m1小于10時，把字符型數(shù)據(jù)IF00和字符型數(shù)據(jù)M1相加的值賦值給HY1，這里同樣也有一個明顯的編寫錯誤，字符相加是用函數(shù)strcat
 END
 IF ((M1 > 9) AND (M1 < 13)) THEN
 BEGIN
  HY1:='IF'+NUMTOSTR(M1,0);//當m1大于9小于13時,把字符型數(shù)據(jù)IF和字符型數(shù)據(jù)M1相加的值賦值給HY1，這里同樣也有一個明顯的編寫錯誤，字符相加是用函數(shù)strcat
 END
end
M2:=(M1 + 1);//把m1+1的值賦值給m2
HY2:="IF";//hy2賦值為字符if,這里出現(xiàn)的明顯的編寫錯誤，要寫成單引號，既'IF'
IF (M2 < 10) THEN
 BEGIN
  HY2:='IF00'+NUMTOSTR(M2,0);//當m2小于10時，把字符型數(shù)據(jù)IF00和字符型數(shù)據(jù)M1相加的值賦值給HY2，這里同樣也有一個明顯的編寫錯誤，字符相加是用函數(shù)strcat
 END
IF ((M2 > 9) AND (M2 < 13)) THEN
 BEGIN
  HY2:='IF'+NUMTOSTR(M2,0);//當M2大于9小于13時，把字符型數(shù)據(jù)IF和字符型數(shù)據(jù)M1相加的值賦值給HY2，這里同樣也有一個明顯的編寫錯誤，字符相加是用函數(shù)strcat
 END
IF (M2 = 13) THEN
 BEGIN
  HY2:='IF01';//當m2=13時，把字符型數(shù)據(jù)IF01賦值給HY2
 END
VHY0:=CALLSTOCK('IF00',vtVOL,6,0);//引用IF00日線成交量，賦值給VHY0
VHY1:=CALLSTOCK(HY1,vtVOL,6,0);//引用HY1日線成交量，賦值給VHY1
VHY2:=CALLSTOCK(HY2,vtVOL,6,0);//引用HY2日線成交量，賦值給VHY2
IF (VHY2 > (VHY0 + 600)) THEN//當VHY2大于（VHY0+600）時
BEGIN

換月平空倉:SELLSHORT((HOLDING < 0),N1,market),ignorecheckprice,ignorecheckprice;//平空，忽略掉下單價格平倉
換月平多倉:SELL((HOLDING > 0),N1,market),ignorecheckprice,ignorecheckprice;//平多，忽略掉下單價格平倉
END

請問以下指令是“平當前的多單或空單，市價委托下月合約嗎”

BEGIN

換月平空倉:SELLSHORT((HOLDING < 0),N1,market),ignorecheckprice,ignorecheckprice;//平空，忽略掉下單價格平倉
換月平多倉:SELL((HOLDING > 0),N1,market),ignorecheckprice,ignorecheckprice;//平多，忽略掉下單價格平倉
END