extern string 商品一="EURUSD";
extern string 商品二="GBPUSD";
extern string 商品三="EURGBP";
extern string 商品四="USDCHF";
extern string 商品五="USDCAD";
extern string 商品六="AUDUSD";
extern string 商品七="NZDUSD";
extern string 商品八="EURCHF";
extern string 商品九="GBPCHF";
extern string 商品十="EURAUD";
extern string 商品十一="EURCAD";
extern string 商品十二="EURNZD";
extern string 商品十三="GBPAUD";
extern string 商品十四="GBPCAD";
extern string 商品十五="AUDNZD";
extern string 商品十六="AUDCAD";
extern string 商品十七="AUDCHF";
extern string 商品十八="CADCHF";
extern string 商品十九="USDJPY";
extern string 商品二十="EURJPY";
extern string 商品二十一="GBPJPY";
extern string 商品二十二="CADJPY";
extern string 商品二十三="AUDJPY";
extern string 商品二十四="NZDJPY";
extern string 商品二十五="CHFJPY";

string gs_2001;
int init() 
{
	int l_file_0 = FileOpen("点差记录.CSV", FILE_CSV|FILE_WRITE);
	if (l_file_0 > 0) {

		FileClose(l_file_0);

	} else Print("打不开文件点差记录.CSV");
	return (0);
}

int deinit() 
{
	return (0);
}

int start() 
{
	gs_2001="货币对"+","+商品一+","+商品二+","+商品三+","+商品四+","+商品五+","+商品六+","+商品七+","+商品八+","+商品九+","+商品十+","+商品十一+","+商品十二+","+商品十三+","+商品十四+","+商品十五+","+商品十六+","+商品十七+","+商品十八+","+商品十九+","+商品二十+","+商品二十一+","+商品二十二+","+商品二十三+","+商品二十四+","+商品二十五+"\n";

while(true)
{
   Sleep(5000);
   int  l_file_1 = FileOpen("点差记录.CSV", FILE_CSV|FILE_WRITE);
   if (l_file_1 > 0) 
   {
       gs_2001=gs_2001+TimeToStr(TimeLocal(),TIME_MINUTES)+","
       +MathAbs(MarketInfo( 商品一,MODE_BID)-MarketInfo( 商品一,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品二,MODE_BID)-MarketInfo( 商品二,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品三,MODE_BID)-MarketInfo( 商品三,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品四,MODE_BID)-MarketInfo( 商品四,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品五,MODE_BID)-MarketInfo( 商品五,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品六,MODE_BID)-MarketInfo( 商品六,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品七,MODE_BID)-MarketInfo( 商品七,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品八,MODE_BID)-MarketInfo( 商品八,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品九,MODE_BID)-MarketInfo( 商品九,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十,MODE_BID)-MarketInfo( 商品十,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十一,MODE_BID)-MarketInfo( 商品十一,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十二,MODE_BID)-MarketInfo( 商品十二,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十三,MODE_BID)-MarketInfo( 商品十三,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十四,MODE_BID)-MarketInfo( 商品十四,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十五,MODE_BID)-MarketInfo( 商品十五,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十六,MODE_BID)-MarketInfo( 商品十六,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十七,MODE_BID)-MarketInfo( 商品十七,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十八,MODE_BID)-MarketInfo( 商品十八,MODE_ASK))*10000+","
       +MathAbs(MarketInfo( 商品十九,MODE_BID)-MarketInfo( 商品十九,MODE_ASK))*100+","
       +MathAbs(MarketInfo( 商品二十,MODE_BID)-MarketInfo( 商品二十,MODE_ASK))*100+","
       +MathAbs(MarketInfo( 商品二十一,MODE_BID)-MarketInfo( 商品二十一,MODE_ASK))*100+","
       +MathAbs(MarketInfo( 商品二十二,MODE_BID)-MarketInfo( 商品二十二,MODE_ASK))*100+","
       +MathAbs(MarketInfo( 商品二十三,MODE_BID)-MarketInfo( 商品二十三,MODE_ASK))*100+","
       +MathAbs(MarketInfo( 商品二十四,MODE_BID)-MarketInfo( 商品二十四,MODE_ASK))*100+","
       +MathAbs(MarketInfo( 商品二十五,MODE_BID)-MarketInfo( 商品二十五,MODE_ASK))*100+","+"\n";
       
       FileWrite(l_file_1, gs_2001);
		 FileClose(l_file_1);
   }
   else Print("打不开文件点差记录.CSV");

}
	return (0);
}