本源码非本人作品，版权归鱼儿所有。

#property copyright "鱼儿编程 QQ：276687220"

#property link "http://babelfish.taobao.com/"

#import "kernel32.dll"

int CopyFileW(string a0, string a1, int a2);

input string Files完整路径 ="!!!需要自行查找和输入路径" ;

string 中转文件名 ="";

input string 中转路径 ="C:"; 

int OnInit()

{ 

if(IsDllsAllowed()==false)

Alert("请允许调用动态链接库" );

return(INIT_SUCCEEDED);

}

void OnDeinit(const int reason)

{

Comment("");

}

void OnTick()

{

if(IsDllsAllowed()==false)

return;

while (!IsStopped()&&IsExpertEnabled())

{

Comment("----------已开启跟单------------" );

中转文件名 =DoubleToStr(AccountNumber(),0); 

RefreshRates();

int handle;

handle=FileOpen(中转文件名 +".csv", FILE_CSV|FILE_WRITE, ';');

if(handle>0)

{

for(int i=0;i<OrdersTotal();i++)

if(OrderSelect(i,SELECT_BY_POS))

{

string name=OrderSymbol();

name=StringSubstr(OrderSymbol(),0,6);

if(StringFind(name,"GOLD",0)==0)

name="GOLD"; 

FileWrite(handle,OrderTicket(),name,OrderType(),OrderLots(),OrderStopLoss(),

OrderTakeProfit(),OrderComment(),OrderMagicNumber(),

OrderOpenTime()-TimeCurrent()+TimeLocal(),OrderOpenPrice(),MarketInfo(OrderSymbol(),MODE_TICKVALUE));

}

FileClose(handle); 

}

handle=FileOpen(中转文件名 +"2.csv", FILE_CSV|FILE_WRITE, ';');

if(handle>0)

{

for(i=OrdersHistoryTotal();i>=0;i--)

if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY))

if(OrderType()<6)

{

FileWrite(handle,OrderTicket(),OrderSymbol(),OrderType(),OrderLots(),OrderStopLoss(),OrderTakeProfit(),OrderComment(),OrderMagicNumber(),OrderOpenTime()-TimeCurrent()+TimeLocal(),OrderOpenPrice());

}

FileClose(handle); 

}

string 发射端发射位置 =中转路径 +"\\"+中转文件名 +".csv"; 

string 发射端保存位置 =Files完整路径 +"\\" +中转文件名 +".csv"; 

int t=CopyFileW(发射端保存位置 ,发射端发射位置 ,0); 

发射端发射位置 =中转路径 +"\\"+中转文件名 +"2.csv"; 

发射端保存位置 =Files完整路径 +"\\"+中转文件名 +"2.csv"; 

t=CopyFileW(发射端保存位置 ,发射端发射位置 ,0); 

Sleep(300);

} 

return;

}

//+------------------------------------------------------------------+