T2:=(TIME > 150500);//t2 判断时间是否大于150500
IF T2 THEN//T2条件满足时
BEGIN
M1:=MONTH;//m1赋值为当前月份
HY1:="IF";//hy1赋值为字符if,这里出现的明显的编写错误,要写成单引号,既'IF'
IF (M1 < 10) THEN
BEGIN
HY1:='IF00'+NUMTOSTR(M1,0);//当m1小于10时,把字符型数据IF00和字符型数据M1相加的值赋值给HY1,这里同样也有一个明显的编写错误,字符相加是用函数strcat
END
IF ((M1 > 9) AND (M1 < 13)) THEN
BEGIN
HY1:='IF'+NUMTOSTR(M1,0);//当m1大于9小于13时,把字符型数据IF和字符型数据M1相加的值赋值给HY1,这里同样也有一个明显的编写错误,字符相加是用函数strcat
END
end
M2:=(M1 + 1);//把m1+1的值赋值给m2
HY2:="IF";//hy2赋值为字符if,这里出现的明显的编写错误,要写成单引号,既'IF'
IF (M2 < 10) THEN
BEGIN
HY2:='IF00'+NUMTOSTR(M2,0);//当m2小于10时,把字符型数据IF00和字符型数据M1相加的值赋值给HY2,这里同样也有一个明显的编写错误,字符相加是用函数strcat
END
IF ((M2 > 9) AND (M2 < 13)) THEN
BEGIN
HY2:='IF'+NUMTOSTR(M2,0);//当M2大于9小于13时,把字符型数据IF和字符型数据M1相加的值赋值给HY2,这里同样也有一个明显的编写错误,字符相加是用函数strcat
END
IF (M2 = 13) THEN
BEGIN
HY2:='IF01';//当m2=13时,把字符型数据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