主题：我把方案又改简单了 看怎么写 谢谢

 这前面我记得写过一个差不多的代码啊。

 你这里面日期都是固定死的？如果不是的话，那就有很多需要斟酌的地方了。

 因为很简单，如果是任意指定的几个日期。是需要考虑这几个日期是否是交易日的。

 INPUT:year1(2020,1990,2100,1),year2(2020,1990,2100,1),year3(2021,1990,2100,1);
INPUT:month1(1,1,12,1),month2(7,1,12,1),month3(1,1,12,1);
INPUT:day1(1,1,31,1),day2(1,1,31,1),day3(1,1,31,1),;

cd1:year=year1 and MONTH=month1 and day=day1;//日期1判断
cd2:year=year2 and MONTH=month2 and day=day2;//日期2判断
cd3:year=year3 and MONTH=month3 and day=day3;//日期3判断
VARIABLE:A1:=0,A2:=0,A3:=0;
temp:=ref(c,1);
IF cd1 then a1:=temp;
IF cd2 then a2:=temp;
IF cd3 then A3:=1;

showA1:VALUEWHEN(a1<>0,a1);
showA2:VALUEWHEN(a2<>0,a2);

if cd1 then //第一个日期上的开仓
begin
buy(c>A1,1,market);
buyshort(c<A1,1,market);    
end


if cross(c,A1) and A1 and A2=0  then
begin
sellshort(1,holding,market);
buy(holding=0,1,market);    
end

if  cross(A1,c) and A1 and A2=0 then
begin
sell(1,holding,market);
buyshort(holding=0,1,market);    
end


if cd2 then //日期2全平 然后重新判断开仓
begin
sell(1,holding,market);    
sellshort(1,holding,market);

buy(c>A2,1,market);
buyshort(c<A2,1,market);  
end


if cross(c,A2) and A2 and A3=0  then
begin
sellshort(1,holding,market);
buy(holding=0,1,market);    
end

if  cross(A2,c) and A2 and A3=0 then
begin
sell(1,holding,market);
buyshort(holding=0,1,market);    
end


if  cd3 then
begin
到期平仓1:sell(1,holding,market);    
到期平仓2:sellshort(1,holding,market);
end



DRAWICON(cd1,h,1);//标记下日期1
DRAWICON(cd2,h,1);//标记下日期2
DRAWICON(cd3,h,1);//标记下日期3

持仓:holding;



日期你调整下。