17评论

5收藏

跟单源码

avatar xjd853311189 | 2742 人阅读 | 17 人评论 | 2018-04-17

////////////////////////信号发送的源码:
int start()
{
if (OrdersTotal()==1 && OrderSelect(0, SELECT_BY_POS, MODE_TRADES))
{
int myHandle = FileOpen("TradeInfo.csv", FILE_CSV | FILE_WRITE, ",");
FileWrite(myHandle, OrderOpenTime(), OrderTicket(), OrderSymbol(), OrderType(),
OrderLots(), OrderOpenPrice(), OrderComment(), OrderMagicNumber());
FileClose(myHandle);
}
if (OrdersTotal()==0) FileDelete("TradeInfo.csv");
return(0);

///////////////////////信号接收的源码:
string myType, myLots, mySymobl;
int myHandle;

int start()
{
if (iReadFile() == 1 && OrdersTotal()==0)
{
int mycmd1 = StrToInteger(myType);
string mySymobl1 = mySymobl;
double mylots1 = NormalizeDouble(StrToDouble(myLots),2);
double myOpenPrice=0 ;
if (mycmd1 == 0) myOpenPrice = MarketInfo(mySymobl1, MODE_ASK);
if (mycmd1 == 1) myOpenPrice = MarketInfo(mySymobl1, MODE_BID);
OrderSend(mySymobl, mycmd1, mylots1, myOpenPrice, 0, 0, 0);
}
if (iReadFile() == 0 && OrderSelect(0, SELECT_BY_POS, MODE_TRADES))
{
double myClosePrice=0 ;
if (OrderType()==OP_BUY) myClosePrice=Bid;
if (OrderType()==OP_SELL) myClosePrice=Ask;
OrderClose(OrderTicket(), OrderLots(), myClosePrice, 0);
}
return(0);
}
int iReadFile()
{
myHandle = FileOpen("\myMT4Signal\experts\files\TradeInfo.csv", FILE_BIN | FILE_READ);
if (myHandle == -1) return(0);
string myValue;
myValue = FileReadString(myHandle, 60);
int myDatecnt = StringFind(myValue, ",", 0);
string myDate = StringSubstr(myValue, 0 ,myDatecnt);
int myTicketcnt = StringFind(myValue, ",", myDatecnt+1);
string myTicket = StringSubstr(myValue, myDatecnt+1, myTicketcnt-myDatecnt-1);
int mySymbolcnt = StringFind(myValue, ",", myTicketcnt+1);
mySymobl = StringSubstr(myValue, myTicketcnt+1, mySymbolcnt-myTicketcnt-1);
int myTypecnt = StringFind(myValue, ",", mySymbolcnt+1);
myType = StringSubstr(myValue, mySymbolcnt+1, myTypecnt-mySymbolcnt-1);
int myLotscnt = StringFind(myValue, ",", myTypecnt+1);
myLots = StringSubstr(myValue, myTypecnt+1, myLotscnt-myTypecnt-1);
int myPricecnt = StringFind(myValue, ",", myLotscnt+1);
string myPrice = StringSubstr(myValue, myLotscnt+1, myPricecnt-myLotscnt-1);
FileClose(myHandle);
return(1);
}

""
还没有人打赏,支持一下

评论|共 17 个

外汇博客

发表于 2018-9-12 20:43:14 | 显示全部楼层

谢谢分享

borloon

发表于 2019-9-6 20:18:19 | 显示全部楼层

写的不对啊,不是跨网络的跟单啊,

不爱不恨

发表于 2020-2-26 14:11:32 | 显示全部楼层

好帖,来顶下

天上下刺猬

发表于 2020-2-28 21:30:02 | 显示全部楼层

路过看一下!

qtksi

发表于 2020-6-8 17:34:02 | 显示全部楼层

前排支持下分享

越野车

发表于 2020-6-8 19:42:54 | 显示全部楼层

好好 学习了 确实不错

范伏香

发表于 2020-6-23 17:50:32 | 显示全部楼层

有竞争才有进步嘛

和讯外汇

发表于 2020-8-7 16:06:21 | 显示全部楼层

谢谢楼主分享

christmas

发表于 2020-8-17 14:50:19 | 显示全部楼层

谢谢楼主分享

12下一页
您需要登录后才可以回帖 登录 | 注册 微信登录

EA之家评论守则