以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  求老师翻译一下这个源码，基于神经网络算法的  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=96251)
--  作者：cc315416174
--  发布时间：2016/4/14 0:23:13
--  求老师翻译一下这个源码，基于神经网络算法的
  1. //---- input parameters

  3. extern double       tp1 = 50;

  5. extern double       sl1 = 50;

  7. extern int          p1 = 10;

  9. extern int          x12 = 100;

  11. extern int          x22 = 100;

  13. extern int          x32 = 100;

  15. extern int          x42 = 100;

  17. extern double       tp2 = 50;

  19. extern double       sl2 = 50;

  21. extern int          p2 = 20;

  23. extern int          x13 = 100;

  25. extern int          x23 = 100;

  27. extern int          x33 = 100;

  29. extern int          x43 = 100;

  31. extern double       tp3 = 50;

  33. extern double       sl3 = 50;

  35. extern int          p3 = 20;

  37. extern int          x14 = 100;

  39. extern int          x24 = 100;

  41. extern int          x34 = 100;

  43. extern int          x44 = 100;

  45. extern int          p4 = 20;

  47. extern int          pass = 1;

  49. extern double       lots = 0.01;

  51. extern int          mn = 888;

  53. static int          prevtime = 0;

  55. static double       sl = 10;

  57. static double       tp = 10;







  65. //+------------------------------------------------------------------+

  67. //| expert start function                                            |

  69. //+------------------------------------------------------------------+

  71. int start()

  73.   {

  75.    if (Time[0] == prevtime) return(0);

  77.    prevtime = Time[0];

  79.   

  81.    if (! IsTradeAllowed()) {

  83.       again();

  85.       return(0);

  87.    }

  89. //----

  91.    int total = OrdersTotal();

  93.    for (int i = 0; i < total; i++) {

  95.       OrderSelect(i, SELECT_BY_POS, MODE_TRADES);

  97.       if (OrderSymbol() == Symbol() && OrderMagicNumber() == mn) {

  99.          return(0);

  101.       }

  103.    }

  105.   

  107.    sl = sl1;

  109.    tp = tp1;

  111.   

  113.    int ticket = -1;

  115.   

  117.    RefreshRates();

  119.   

  121.    if (Supervisor() > 0) {

  123.       ticket = OrderSend(Symbol(), OP_BUY, lots, Ask, 1, Bid - sl * Point, Bid + tp * Point, WindowExpertName(), mn, 0, Blue);

  125.       if (ticket < 0) {

  127.          again();     

  129.       }

  131.    } else {

  133.       ticket = OrderSend(Symbol(), OP_SELL, lots, Bid, 1, Ask + sl * Point, Ask - tp * Point, WindowExpertName(), mn, 0, Red);

  135.       if (ticket < 0) {

  137.          again();

  139.       }

  141.    }

  143. //-- Exit --

  145.    return(0);

  147. }

  149. //+--------------------------- getLots ----------------------------------+





  155. double Supervisor() {

  157.    if (pass == 4) {

  159.       if (perceptron3() > 0) {

  161.          if (perceptron2() > 0) {

  163.             sl = sl3;

  165.             tp = tp3;

  167.             return(1);

  169.          }

  171.        } else {

  173.          if (perceptron1() < 0) {

  175.             sl = sl2;

  177.             tp = tp2;

  179.             return(-1);

  181.          }

  183.       }

  185.       return(basicTradingSystem());

  187.    }



  191.  
--  作者：cc315416174
--  发布时间：2016/4/14 0:24:20
--  
 if (pass == 3) {

  •       if (perceptron2() > 0) {

  •          sl = sl3;

  •          tp = tp3;

  •          return(1);

  •        } else {

  •          return(basicTradingSystem());

  •        }

  •    }



    		•
    --  作者：cc315416174
    --  发布时间：2016/4/14 0:24:59
    --  
  •    if (pass == 2) {

  •       if (perceptron1() < 0) {

  •          sl = sl2;

  •          tp = tp2;

  •          return(-1);

  •        } else {

  •          return(basicTradingSystem());

  •        }



  •    }

  •    return(basicTradingSystem());

  • }



    		•
    --  作者：cc315416174
    --  发布时间：2016/4/14 0:25:36
    --  
  • double perceptron1()   {

  •    double       w1 = x12 - 100;

  •    double       w2 = x22 - 100;

  •    double       w3 = x32 - 100;

  •    double       w4 = x42 - 100;

  •    double a1 = Close[0] - Open[p2];

  •    double a2 = Open[p2] - Open[p2 * 2];

  •    double a3 = Open[p2 * 2] - Open[p2 * 3];

  •    double a4 = Open[p2 * 3] - Open[p2 * 4];

  •    return(w1 * a1 + w2 * a2 + w3 * a3 + w4 * a4);

  • }



    		•
    --  作者：cc315416174
    --  发布时间：2016/4/14 0:26:08
    --  
  • double perceptron2()   {

  •    double       w1 = x13 - 100;

  •    double       w2 = x23 - 100;

  •    double       w3 = x33 - 100;

  •    double       w4 = x43 - 100;

  •    double a1 = Close[0] - Open[p3];

  •    double a2 = Open[p3] - Open[p3 * 2];

  •    double a3 = Open[p3 * 2] - Open[p3 * 3];

  •    double a4 = Open[p3 * 3] - Open[p3 * 4];

  •    return(w1 * a1 + w2 * a2 + w3 * a3 + w4 * a4);

  • }



    		•
    --  作者：cc315416174
    --  发布时间：2016/4/14 0:26:21
    --  
  • double perceptron3()   {

  •    double       w1 = x14 - 100;

  •    double       w2 = x24 - 100;

  •    double       w3 = x34 - 100;

  •    double       w4 = x44 - 100;

  •    double a1 = Close[0] - Open[p4];

  •    double a2 = Open[p4] - Open[p4 * 2];

  •    double a3 = Open[p4 * 2] - Open[p4 * 3];

  •    double a4 = Open[p4 * 3] - Open[p4 * 4];

  •    return(w1 * a1 + w2 * a2 + w3 * a3 + w4 * a4);

  • }



  • double basicTradingSystem() {

  •    return(iCCI(Symbol(), 0, p1, PRICE_OPEN, 0));

  • }



  • void again() {

  •    prevtime = Time[1];

  •    Sleep(30000);

  • }
    		•
    --  作者：jinzhe
    --  发布时间：2016/4/14 11:28:41
    --  
    你发CSDN 比发这里靠谱多了