金字塔程序語句注釋，求助！！　[金字塔]

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

IF T2 THEN//T2條件滿足時(shí)

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

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

請問以下指令是“平當(dāng)前的多單或空單，市價(jià)委托下月合約嗎”

BEGIN

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