使用第三方程序辅助实现 [旗舰版] 的无人值守

TB20140603

自动换月解决了吗，如果不解决换月，无人值守的还不彻底啊！

superwin

TB20140603 发表于 2016-9-17 06:51
自动换月解决了吗，如果不解决换月，无人值守的还不彻底啊！

先看完帖子内容再说吧，自动换月功能几年前就完善了。

luochaoju

楼主，感谢，请几天提出的针对外盘使用这个辅助工具的要求，这么快就更新了。
大侠就是大侠。

superwin

luochaoju 发表于 2016-9-22 21:30
楼主，感谢，请几天提出的针对外盘使用这个辅助工具的要求，这么快就更新了。
大侠就是大侠。
...

这个工具自从今年4月份在论坛公开下载以来，得到很多网友提出了宝贵的建议及修改意见，还有不少网友帮忙找出了程序的BUG，有几个BUG是我自己使用了几年都没有发现的，足以证明群众的力量是巨大的，在这里要感谢那些提出意见建议及帮忙找出问题的网友。

鉴于Au3是属于单线程的脚本程序，要保证执行效率就不能无限增加扩展功能，有些网友建议的功能可能会导致执行效率变差（本人水平有限），所以就没有添加进去。而本人非程序猿，能力有限，本工具放出只是起个抛砖引玉的作用吧，更强大的功能只能看看有哪位编程高手用别的更有效率的程序语言给开发出来了。

yl369cn

烦请发个注册码：机器码为：6BBC8C-1C4ED8-41D343-18C12A-F052EC-56

superwin

yl369cn 发表于 2016-9-23 22:04
烦请发个注册码：机器码为：6BBC8C-1C4ED8-41D343-18C12A-F052EC-56

B7DF578290B4BE591E922385819983E8

luochaoju

  楼主有时间看下，我也在论坛发帖问林总了


这个是测试用的策略，每个bar 都会开平仓。  我选择在每个bar 的第二个tick   报警。    因为tb报警 会在这个bar 不停报警，我想这个bar 只报警一次。所以用了全局变量，记录新生成的bar 的tick  ,计数到tickcounter==2时 ,报警。
      我认为逻辑上没有问题，不知道为什么，启动报警后，还是一样，不会发出报警，。




代码如下  Vars
        NumericSeries AvgValue1;
        NumericSeries AvgValue2;
       
        Numeric  LastBarTime;
        Numeric  TickCounter;
       
       
Begin
    SetGlobalVar(0,LastBarTime);//将图表最新时间 用0号全局变量记录
        SetGlobalVar(1,TickCounter); //tick计数器，用1号全局变量记录
       
        LastBarTime=GetGlobalVar(0);   //图表最新时间    由 0号全局变量 赋值
        TickCounter=GetGlobalVar(1);    //tick计数器，  由1号全局变量赋值
        If (BarStatus==2 and LastBarTime!=Time)   //当最新bar生成，图表记录的最新时间 和 真实时间不一致
        {LastBarTime=Time;                        //将真实时间赋值给 图表记录的最新时间
        TickCounter=0;}                           //tick计数器  初始化为0
        if (LastBarTime==Time and TickCounter==0 ) {TickCounter=TickCounter+1;}  //
   
    AvgValue1 = AverageFC(Close,FastLength);
        AvgValue2 = AverageFC(Close,SlowLength);
       
If( MarketPosition==0 and Open[1] > open[2])

{
                buy(1,Open);
                If(TickCounter==2)      //当为这个bar  第二个tick 时 报警   把这行删掉，这个bar 会不停报警
               
                 {Alert("开多   "+"价格为:"+Text(open));}
        }
if (MarketPosition==1)
{sell(1,open);}

       
       
If( MarketPosition==0 and Open[2] > open[1])

{
                SellShort(1,Open);
                If(TickCounter==2)    //当为这个bar  第二个tick 时 报警
               
                { Alert("开空   "+"价格为:"+Text(open));}
        }
if (MarketPosition==-1)
{BuyToCover(1,open);}
End

superwin

luochaoju 发表于 2016-9-26 10:42
楼主有时间看下，我也在论坛发帖问林总了

初步看了下，逻辑肯定是有问题的，你并没有更新最新的LastBarTime到全局变量0里面，所以If(BarStatus==2 and LastBarTime!=Time)这个条件一直会满足，也就是说TickCounter一直被重新归零，后面就不可能会有等于2的时候触发报警了。

superwin

luochaoju 发表于 2016-9-26 10:42
楼主有时间看下，我也在论坛发帖问林总了

1. Begin
   
2.         If(BarStatus==0)
   
3.         {
   
4.                 SetGlobalVar(0,0);
   
5.                 SetGlobalVar(1,0);
   
6.         }Else
   
7.         {
   
8.                 LastBarTime=GetGlobalVar(0);
   
9.                 TickCounter=GetGlobalVar(1);
   
10.         }
    
11.         If(BarStatus==2 And LastBarTime<>Time)
    
12.         {
    
13.                 LastBarTime=Time;
    
14.                 TickCounter=0;
    
15.                 SetGlobalVar(0,LastBarTime);
    
16.         }
    
17.         If(LastBarTime==Time)
    
18.         {
    
19.                 TickCounter=TickCounter+1;
    
20.                 SetGlobalVar(1,TickCounter);
    
21.         }
    
22.        
    
23.         // ……
    
24.        
    
25. End

复制代码

luochaoju

//------------------------------------------------------------------------
// 简称: 测试程序
// 名称: ceshi
// 类别: 公式应用
// 类型: 用户应用
// 输出:
//------------------------------------------------------------------------
Params
        Numeric FastLength(5);
        Numeric SlowLength(200);

Vars
        NumericSeries AvgValue1;
        NumericSeries AvgValue2;
       
        Numeric  LastBarTime;
        Numeric  TickCounter;
       
       
Begin
        TickCounter=GetGlobalVar(0);    //tick计数器，  由0号全局变量赋值
        LastBarTime=GetGlobalVar(1);   //图表最新时间    由 1号全局变量 赋值
       
        If (BarStatus==2 and LastBarTime!=Time)   //当最新bar生成，图表记录的最新时间 和 真实时间不一致
        {LastBarTime=Time;                        //将真实时间赋值给 图表记录的最新时间
        TickCounter=0;}                           //tick计数器  初始化为0
        If (TickCounter <5) TickCounter=TickCounter+1;        //计数到5（随便都可以），封顶，不必继续计数了
        FileAppend("C:\\新建文件夹\\新建文本文档.txt","TickCounter = "+Text(TickCounter));
        FileAppend("C:\\新建文件夹\\新建文本文档.txt","LastBarTime = "+Text(LastBarTime));
    AvgValue1 = AverageFC(Close,FastLength);
        AvgValue2 = AverageFC(Close,SlowLength);
       
If( MarketPosition==0 and Open[1] > open[2])

{
                buy(1,Open);
                  if(getglobalvar(0)== 2)
     {
         Alert("开多   "+"价格为:"+Text(open));
        
     }      //当为这个bar  第二个tick 时 报警
               
               
        }
if (MarketPosition==1)
{sell(1,open);}

       
       
If( MarketPosition==0 and Open[2] > open[1])

{
                SellShort(1,Open);
                if(getglobalvar(0)== 2)//当为这个bar  第二个tick 时 报警
               
                { Alert("开空   "+"价格为:"+Text(open));}
        }
if (MarketPosition==-1)
{BuyToCover(1,open);}

        SetGlobalVar(0,TickCounter); //tick计数器，用0号全局变量记录
    SetGlobalVar(1,LastBarTime);//将图表最新时间 用1号全局变量记录

End



//------------------------------------------------------------------------