主题：模型编写01

公式1：

aa:MINUTE;

 

 

 

公式2

time59:STKINDI('','公式1.aa',0,1);

close1:CALLSTOCK('',vtCLOSE,1);
if close1>open then begin
 SELLSHORT(HOLDING<0,HOLDING,MARKET);
 buy(1,1,MARKET); 
  
end

if close1<open then begin
 SELL(HOLDING>0,HOLDING,MARKET);
 buySHORT(1,1,MARKET); 
  
end

if time59=59 then BEGIN
 sell(HOLDING>0,HOLDING,MARKET);
 SELLSHORT(HOLDING<0,HOLDING,MARKET);
end

if OPENPROFIT>20*MINDIFF then begin
 sell(HOLDING>0,HOLDING,MARKET);
 SELLSHORT(HOLDING<0,HOLDING,MARKET);
end