脚本_画两条可以移动的水平线

| 发表于 2020-7-22 19:43:31 | 显示全部楼层 |复制链接
  1. #include <Errors.mqh>
  2. int start()
  3.   {
  4.   bool fm=false;
  5.   int GLE=0;
  6.   double SvojstvoUP=10,SvojstvoDOWN=5;
  7.    fm=ObjectCreate("UP_LEVEL",OBJ_HLINE,0,Time[0],Bid+15*Point);
  8.   if(fm==0 || fm==-1){GeneralError();}
  9.   fm=ObjectSet("UP_LEVEL",OBJPROP_COLOR,Green);
  10.   if(fm==0 || fm==-1){GeneralError();}
  11.   fm=ObjectSet("UP_LEVEL",OBJPROP_WIDTH,1);
  12.   if(fm==0 || fm==-1){GeneralError();}
  13.    
  14.   SvojstvoUP=ObjectGet("UP_LEVEL",OBJPROP_PRICE1);
  15.             if(SvojstvoUP==5){GeneralError();}
  16. if(SvojstvoUP!=Bid+15*Point){
  17.    fm=ObjectSet("UP_LEVEL",OBJPROP_PRICE1,Bid+15*Point);
  18.   if(fm==0 || fm==-1){GeneralError();}
  19. }
  20.   
  21.   fm=ObjectCreate("DOWN_LEVEL",OBJ_HLINE,0,0,Bid-15*Point);
  22.   if(fm==0 || fm==-1){GeneralError();}
  23.   fm=ObjectSet("DOWN_LEVEL",OBJPROP_COLOR,Red);
  24.   if(fm==0 || fm==-1){GeneralError();}
  25.   fm=ObjectSet("DOWN_LEVEL",OBJPROP_WIDTH,1);
  26.   if(fm==0 || fm==-1){GeneralError();}
  27.   
  28.   SvojstvoDOWN=ObjectGet("DOWN_LEVEL",OBJPROP_PRICE1);
  29.             
  30.   if(SvojstvoDOWN!=Bid-15*Point){
  31.    fm=ObjectSet("DOWN_LEVEL",OBJPROP_PRICE1,Bid-15*Point);
  32.   if(fm==0 || fm==-1){GeneralError();}
  33.   }         
  34.   
  35.    return(0);
  36.   }
复制代码
最近访问 头像模式
举报

评论 使用道具

发新帖
EA交易
您需要登录后才可以评论 登录 | 立即注册