Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共4 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:请老师帮忙改成金字塔,谢谢

1楼
3526566588 发表于:2017/6/1 11:32:46

这个是TB的,请老师帮忙改成金字塔,谢谢

Params
Numeric shares(1);
Numeric Params3(2);
Numeric Params4(3);
Numeric Params2(0.70);
Numeric Params1(1.30);
Numeric Params5(9.15);
Vars
Numeric i(0);
Numeric n(0);
Numeric var1(0);
Numeric var2(0);
Numeric var3(0);
Numeric var4(0);
Numeric var5(0);
Numeric var6(0);
NumericSeries var7(0);
NumericSeries var8(0);
NumericSeries var9(0);
NumericSeries var10(0);
Numeric var11(0);
Numeric var12(0);
Numeric var13(0);
Numeric var14(0);

 
Begin
 If(CurrentBar == 0 || Date != Date[1])
 {
  var7 = 1;
  var8 = High;
  var9 = Low;
 }Else
 {
  var7 = var7 + 1;
  If(High > var8)
   var8 = High;
  If(Low < var9)
   var9 = Low;
 }
 var10 = Close;
 
 For i = 1 to Params3
 {
  If(i == 1)
  {
   n = var7;
   var11 = var8[n];
   var12 = var9[n];
   var13 = var10[n];
   var14 = var10[n];
  }Else
  {
   n = n + var7[n];
  }
  If(var8[n] > var11) var11 = var8[n];
  If(var9[n] < var12)  var12 = var9[n];
  If(var10[n] > var13) var13 = var10[n];
  If(var10[n] < var14) var14 = var10[n];
 }
 
 var1 = Max(var11 - var14, var13 - var12);
 
 For i = 1 to Params4
 {
  If(i == 1)
  {
   n = var7;
   var11 = var8[n];
   var12 = var9[n];
   var13 = var10[n];
   var14 = var10[n];
  }Else
  {
   n = n + var7[n];
  }
  If(var8[n] > var11) var11 = var8[n];
  If(var9[n] < var12)  var12 = var9[n];
  If(var10[n] > var13) var13 = var10[n];
  If(var10[n] < var14) var14 = var10[n];
 }
 
 var2 = Max(var11 - var14, var13 - var12);
 var3 = OpenD(0) + var1 * Params1;
 var4 = OpenD(0) - var2 * Params2;
 var5 = PriceScale * MinMove;

 If(Time < Params5 / 100) Return; 
 If(MarketPosition  != 1)
 {
  If(High >= var3)
  {
   Buy(shares, Max(Open, var3));
   Return;
  }
 }
 If(MarketPosition != -1)
 {
  If(Low <= var4)
  {
   SellShort(shares, Min(Open, var4));
  }
 }
End

2楼
wenarm 发表于:2017/6/1 12:41:53

请详细表述你代码的逻辑需求

 

3楼
3526566588 发表于:2017/6/1 13:14:27
别人给的,也不知道逻辑啊,就是想翻译成金字塔,看看是什么意思,求老师帮忙翻译一下
4楼
pyd 发表于:2017/6/1 14:26:00

没有其他解释,只给这些代码没法翻译的

共4 条记录, 每页显示 10 条, 页签: [1]


Powered By Dvbbs Version 8.3.0
Processed in 0.03125 s, 3 queries.