当前位置:分析家公式网 → 股票公式 → 开拓者公式 → 一键转帖:国外成熟策略R-Breaker分享,提供翻译后的TB源码,日内系统
软件名称:[B]国外成熟策略R-Breaker分享,提供翻译后的TB源码,日内系统[/B]
软件类型:国产软件
运行环境:Win2000/WinXP/Win2003/WinVista
软件语言:简体中文
授权方式:共享软件
软件大小:0 Bytes
官方主页:Home Page
更新时间:2013-03-16 02:13:10
软件简介:
- 内容: R-Breaker这个系统,可能很多人比我熟悉,也更为了解,有错误处还请谅解
另外我并没实盘验证,在信号那加入了一个逻辑锁,用于控制实盘时有信号,但又不会多次满足反复开仓,这个逻辑锁我很多系统都会有,实站很好用。
这个系统本身是用在SP上,多次出现在实盘赛的前列。
我觉得这个系统的构架和思维非常好,直接拿着套国内商品可能表现很差,不过大家能看到这个系统的核心思想就足够了,可以借鉴。忘了说了,得用TB V4,要不V3的系列值传递那还得接力一下 - TB源码:
- //------------------------------------------------------------------------
- // 简称: R_Breaker
- // 名称:
- // 类别: 公式应用
- // 类型: 用户应用
- // 输出: 穿堂风分享(评台 )
- //------------------------------------------------------------------------
-
- /*R-Breaker*/
-
-
- Params
- Numeric notbef(9.00);
- Numeric notaft(14.55);
- Numeric f1(0.35);
- Numeric f2(0.07);
- Numeric f3(0.25);
- Numeric reverse(1.00);
- Numeric rangemin(0.2);
- Numeric xdiv(3);
-
- Vars
- NumericSeries ssetup(0);
- NumericSeries bsetup(0);
- NumericSeries senter(0);
- NumericSeries benter(0);
- NumericSeries bbreak(0);
- NumericSeries sbreak(0);
- NumericSeries ltoday(0);
- NumericSeries hitoday(9999);
- NumericSeries startnow(0);
- NumericSeries div(0);
- BoolSeries rfilter(false);
- Numeric i_reverse;
- Numeric i_rangemin;
- Numeric i_vB;
- Numeric i_vS;
-
- Begin
- i_reverse = reverse*(OpenD(0)/100);
- i_rangemin = rangemin*(OpenD(0)/100);
- if(BarStatus==0)
- {
- startnow=0;
- div=max(xdiv,1);
- }
-
- if(Date != Date[1])
- {
- SetGlobalVar(0,0);
- SetGlobalVar(1,0);
- startnow=startnow+1;
- ssetup=hitoday[1]+f1*(Close[1]-ltoday[1]);
- senter=((1+f2)/2)*(hitoday[1]+Close[1])-(f2)*ltoday[1];
- benter=((1+f2)/2)*(ltoday[1]+Close[1])-(f2)*hitoday[1];
- bsetup=ltoday[1]-f1*(hitoday[1]-Close[1]);
- bbreak=ssetup+f3*(ssetup-bsetup);
- sbreak=bsetup-f3*(ssetup-bsetup);
-
- hitoday=High;
- ltoday=Low;
-
- rfilter=(hitoday[1]-ltoday[1])>=i_rangemin;
- }
-
- if(High>hitoday)
- {
- hitoday=High;
- }
- if(Low<ltoday)
- {
- ltoday=Low;
- }
- if(Time*100>=notbef and Time*100<notaft and startnow>=2 and rfilter)
- {
-
- if(Time != GetGlobalVar(1) and GetGlobalVar(1) != 0)
- {
- SetGlobalVar(1,10000);
- }
- if(hitoday>=ssetup and marketposition>-1 and GetGlobalVar(1)<1)
- {
- If(Low<=(senter+(hitoday-ssetup)/div))
- {
- SellShort(1,senter+(hitoday-ssetup)/div);
- SetGlobalVar(1,Time);
- Return;
- }
- }
- if(ltoday<=bsetup and marketposition<1 and GetGlobalVar(1)<1)
- {
- If(High>=(benter-(bsetup-ltoday)/div))
- {
- Buy(1,benter-(bsetup-ltoday)/div);
- SetGlobalVar(1,Time);
-
[url=http://www.70822.com/soft/sort013/sort083/down-59397.html]国外成熟策略R-Breaker分享,提供翻译后的TB源码,日内系统[/url]
- //------------------------------------------------------------------------