各位大神可以帮我编写自动交易程序吗。谢谢

没走完的棋局 · 发表于 2024-6-11 14:37

这是买入空头方向的代码，出了购买方向不同，所有条件跟购买多头一样，老师能帮我看看有那里不对吗

技术008 · 发表于 2024-6-11 14:43

代码整理下，这样堆在一起不方便查看

没走完的棋局 · 发表于 2024-6-11 14:45

这个代码在测试显示MARKETR控制符只能在交易控制语句中，应该怎么优化处理

没走完的棋局 · 发表于 2024-6-15 20:20

没走完的棋局发表于 2024-6-11 14:45
这个代码在测试显示MARKETR控制符只能在交易控制语句中，应该怎么优化处理

VARIABLE:BASE_PRICE=0,
GRID_NUM=0,
WIN_PRICE=0,
STOP_PRICE=0;
ma5:MA(LOW,5);  
IF cross(MA5,low)=1
and  holding=0
THEN BEGIN 
   SELLSHORT(1,3,LIMITR,close);  //改为卖出空头   
  BASE_PRICE:=close;     //记录当前开空时的止损价格     STOP_PRICE:=BASE_PRICE+6*MINDIFF;  //方向改变，止损价格计算也改变     WIN_PRICE:=BASE_PRICE-6*MINDIFF;  //方向改变，止盈价格计算也改变 END  //当前最新价与止损价之间的价格差
OFFSET:CLOSE-BASE_PRICE;  //相对于基准的格子数 BASE_GRID:INTPART(OFFSET/(2*MINDIFF));  
IF HOLDING<0 AND BASE_GRID-GRID_NUM>=1 
 and BASE_GRID<3 and BASE_GRID>0
THEN BEGIN    
    SELLSHORT(1,BASE_GRID-GRID_NUM,MARKETR);  //卖出空头操作         GRID_NUM:=BASE_GRID; END 
 IF HOLDING<0 AND BASE_GRID-GRID_NUM<=-1  
and BASE_GRID>-3 
 and BASE_GRID<0
THEN BEGIN    
    BUYCOVER(1,abs(BASE_GRID-GRID_NUM),MARKETR);  //改为买入平仓         GRID_NUM:=BASE_GRID;   
      if HOLDING=0 then BEGIN      
       BASE_PRICE:=0;       
     GRID_NUM:=0;          
  STOP_PRICE:=0;          
  WIN_PRICE:=0;    
    end END  //止盈止损 IF close<WIN_PRICE and  HOLDING<0
then BEGIN   
  BUYCOVER(1,HOLDING,MARKETR); 
   BASE_PRICE:=0;    
 GRID_NUM

技术008 · 发表于 2024-6-17 09:07

sellshort(1,abs(BASE_GRID-GRID_NUM),MARKETR);//改为买入平仓 GRID_NUM:=BASE_GRID;

平空是sellshort

		自动登录	找回密码
密码