人狗大战

wh999 · 发表于 2016-3-14 15:15

k37336 发表于 2016-3-14 15:10
大爷这么粗壮的大脑肯定会把它绝杀的

自己设计的弱点门清

Barrique · 发表于 2016-3-14 15:15

给大爷加加油期待小小狗的诞生 5:0 横扫高盛大摩。。。

shuaiping · 发表于 2016-3-14 15:18

这不科学! 都不知道mt4有中文的人居然会编程

百思不得其解

k37336 · 发表于 2016-3-14 15:23

wh999 发表于 2016-3-14 15:15
自己设计的弱点门清

世界的霸主是设计师

frlin2003 · 发表于 2016-3-14 15:24

shuaiping 发表于 2016-3-14 15:18
这不科学! 都不知道mt4有中文的人居然会编程
百思不得其解

在哪儿

frlin2003 · 发表于 2016-3-14 15:24

shuaiping 发表于 2016-3-14 15:18
这不科学! 都不知道mt4有中文的人居然会编程
百思不得其解

刚搞出来
macd自带的ea中文版

input double 止盈 =50;
input double 手数 =0.1;
input double 移动止损 =30;
input double 上水平线 =3;
input double 下水平线=2;
input int 均线周期 =26;
void OnTick(void)
{
double 当前MACD值,前一根MACD值;
double 当前信号线值,前一根信线值;
double 当前均线值,前一根均线值;
int 整数一,订单号,订单总数;
if(Bars<100)
{
Print("bars less than 100");
return;
}
if(止盈<10)
{
Print("止盈 less than 10");
return;
}
当前MACD值=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,0);
前一根MACD值=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_MAIN,1);
当前信号线值=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,0);
前一根信线值=iMACD(NULL,0,12,26,9,PRICE_CLOSE,MODE_SIGNAL,1);
当前均线值=iMA(NULL,0,均线周期,0,MODE_EMA,PRICE_CLOSE,0);
前一根均线值=iMA(NULL,0,均线周期,0,MODE_EMA,PRICE_CLOSE,1);
订单总数=OrdersTotal();
if(订单总数<1)
{
if(AccountFreeMargin()<(1000*手数))
{
Print("We have no money. Free Margin = ",AccountFreeMargin());
return;
}
if(当前MACD值<0 && 当前MACD值>当前信号线值 && 前一根MACD值<前一根信线值 &&
MathAbs(当前MACD值)>(上水平线*Point) && 当前均线值>前一根均线值)
{
订单号=OrderSend(Symbol(),OP_BUY,手数,Ask,3,0,Ask+止盈*Point,"macd sample",16384,0,Green);
if(订单号>0)
{
if(OrderSelect(订单号,SELECT_BY_TICKET,MODE_TRADES))
Print("BUY order opened : ",OrderOpenPrice());
}
else
Print("Error opening BUY order : ",GetLastError());
return;
}
if(当前MACD值>0 && 当前MACD值<当前信号线值 && 前一根MACD值>前一根信线值 &&
当前MACD值>(上水平线*Point) && 当前均线值<前一根均线值)
{
订单号=OrderSend(Symbol(),OP_SELL,手数,Bid,3,0,Bid-止盈*Point,"macd sample",16384,0,Red);
if(订单号>0)
{
if(OrderSelect(订单号,SELECT_BY_TICKET,MODE_TRADES))
Print("SELL order opened : ",OrderOpenPrice());
}
else
Print("Error opening SELL order : ",GetLastError());
}
return;
}
for(整数一=0;整数一<订单总数;整数一++)
{
if(!OrderSelect(整数一,SELECT_BY_POS,MODE_TRADES))
continue;
if(OrderType()<=OP_SELL && // check for opened position
OrderSymbol()==Symbol()) // check for symbol
{
if(OrderType()==OP_BUY)
{
if(当前MACD值>0 && 当前MACD值<当前信号线值 && 前一根MACD值>前一根信线值 &&
当前MACD值>(下水平线*Point))
{
if(!OrderClose(OrderTicket(),OrderLots(),Bid,3,Violet))
Print("OrderClose error ",GetLastError());
return;
}
if(移动止损>0)
{
if(Bid-OrderOpenPrice()>Point*移动止损)
{
if(OrderStopLoss()<Bid-Point*移动止损)
{
if(!OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Point*移动止损,OrderTakeProfit(),0,Green))
Print("OrderModify error ",GetLastError());
return;
}
}
}
}
else // go to short position
{
if(当前MACD值<0 && 当前MACD值>当前信号线值 &&
前一根MACD值<前一根信线值 && MathAbs(当前MACD值)>(下水平线*Point))
{
if(!OrderClose(OrderTicket(),OrderLots(),Ask,3,Violet))
Print("OrderClose error ",GetLastError());
return;
}
if(移动止损>0)
{
if((OrderOpenPrice()-Ask)>(Point*移动止损))
{
if((OrderStopLoss()>(Ask+Point*移动止损)) || (OrderStopLoss()==0))
{
if(!OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point*移动止损,OrderTakeProfit(),0,Red))
Print("OrderModify error ",GetLastError());
return;
}
}
}
}
}
}
}

复制代码

frlin2003 · 发表于 2016-3-14 15:25

shuaiping 发表于 2016-3-14 15:18
这不科学! 都不知道mt4有中文的人居然会编程
百思不得其解

wo you tian fu e

shuaiping · 发表于 2016-3-14 15:26

frlin2003 发表于 2016-3-14 15:24
刚搞出来
macd自带的ea中文版

你看的懂吗

frlin2003 · 发表于 2016-3-14 15:34

shuaiping 发表于 2016-3-14 15:26
你看的懂吗

快了:-D

frlin2003 · 发表于 2016-3-14 15:35

shuaiping 发表于 2016-3-14 15:18
这不科学! 都不知道mt4有中文的人居然会编程
百思不得其解

原来是那事，额

frlin2003 · 发表于 2016-3-14 16:21

谁来测测看还能不能用

frlin2003 · 发表于 2016-3-14 16:25

很迷糊的地方：
1.在处理单子的过程中，要么是多单，要么是空单，那挂单怎么整

2.macd的条件是对称的，处理中，要么，否则。如果条件不是对称性的，起步一地鸡毛。

frlin2003 · 发表于 2016-3-14 16:28

本帖最后由 frlin2003 于 2016-3-14 16:35 编辑

突然想到，小a曾经被谁问过，for里面的数，不能大于100，好像此刻有了感觉。订单基本不会大于100，so for妥妥的

input，可在显示器上输入。
double，带小数的数
int，整数
void OnTick(void)，初始化，好像就跟证明，求解中的证明差不多。到处都有这个玩意。
if，条件。
print，屏幕上显示的内容
return，程序结束。
orderstotal，订单总数。
accountfreemargin，净值。
mathabs，绝对值。
ordersend，执行买卖
symbol，品种
orderselect，找订单。
else，否则。
for，循环处理。
ordertype，是多单还是空，还是挂单。
orderclose，平仓。
orderopenprice，订单开仓价；
orderstoploss，订单止损价
ordermodify，修改订单

frlin2003 · 发表于 2016-3-14 17:17

本帖最后由 frlin2003 于 2016-3-14 17:23 编辑

准备去咬狗，人狗站准备工作序
1.要不要分势，这无法实现。要么利用现成的指标，要么自定义指标，

硬伤。
2.要不要找形态？比定义势更难。放弃。果断。
3.只剩下2个简单大门，时间和个数。

时间和个数 = ？

a；找到合理波动百分比
取月图60均线作为价格中枢。
价格在上，实际波幅放大，实际百分比保持一致。
价格在下，实际波幅缩小，实际百分比保持一致。
对待（美日美加貌似有效）
对待其他品种，实际波幅虽然价格降低，但一点也没缩小。
似乎这条没用。额。

十二号收尸队 · 发表于 2016-3-14 17:26

F大爷 VS F大爷的ea

frlin2003 · 发表于 2016-3-14 17:27

十二号收尸队发表于 2016-3-14 17:26
F大爷 VS F大爷的ea

还没开始，就准备投降

frlin2003 · 发表于 2016-3-14 17:36

十二号收尸队发表于 2016-3-14 17:26
F大爷 VS F大爷的ea

找个人先练练手

loodnew · 发表于 2016-3-14 17:39

阿尔法狗开局用蒙特卡洛搜索，到某层的“叶子”节点，改用一个“快速走子策略”一直下完，不再分支。快速走子策略会用一个7*7之类的小窗口，对这里进行穷举搜索。

跟外汇不沾边，肿么写？

刘小备 · 发表于 2016-3-14 17:41

frlin2003 发表于 2016-3-14 17:17
准备去咬狗，人狗站准备工作序
1.要不要分势，这无法实现。要么利用现成的指标，要么自定义指标，硬 ...

应该是神经网络算法而不是这种列举条件的算法你这种是需要完全严谨的逻辑化根本是不可能的因为完全的逻辑化会导致行情变化的这工作量逆天
神经网络算法是不需要这些的比如普通的加法运算输入数据 1 1 2 1 3 4 2 4 6 大量的这些数据模拟其内在规律大量数据训练算法规律的灵敏度然后给出大量测试数据比如 1 1 如果第三位数据是错的话就进行自动修正对算法进行反馈修改比正确的值大了就反馈正小了就反馈负慢慢的就会让计算机计算加法运算的正确率提高这个过程需要相应的训练算法让正确率进行快速的提升
复杂吧

frlin2003 · 发表于 2016-3-14 17:42

刘小备发表于 2016-3-14 17:41
应该是神经网络算法而不是这种列举条件的算法你这种是需要完全严谨的逻辑化根本是不可能的 ...

好像很先进

		自动登录	找回密码
密码			快捷注册(禁q号)

[代码] 人狗大战