// Downloaded From https://www.WiseStockTrader.com
// Press Scan button // // created a directory on your C drive named AmiBroker data backup

dayhours = ParamToggle("Day hours only", "No|Yes");
fmkdir("c:\\AmiBackupD\\");
SetBarsRequired(100000,100000);
lname = Name(); // gets the name of the symbol
// note: if you have names with invalid characters like / you must rename the file before you try to create a Name 
// add an IF line for each symbol you need to rename
if (lname == "ER2U8-GLOBEX-FUT") lname = "ER2U8";

fh = fopen( "c:\\AmiBackupD\\" + lname + ".csv", "w"); 
if( fh ) 
{ 
	if(Interval() == inDaily OR Interval() == inMonthly OR Interval() ==
inWeekly)
	{
		fputs( "Ticker,Date,Open,High,Low,Close,Volume \n", fh ); 
	   	for( i = 0; i < BarCount; i++ ) 
		{ 
 		  	y = Year(); 
 		  	m = Month(); 
		   	d = Day(); 
			fputs( Name() + "," , fh );
   		   	ds = StrFormat("%02.0f-%02.0f-%02.0f,", m[ i ], d[ i ], y[ i ] ); 
   	   		fputs( ds, fh ); 
      		qs = StrFormat("%.4f,%.4f,%.4f,%.4f,%.0f\n", O[ i ],H[ i ],L[ i ],C[ i
],V[ i ] ); 
      		fputs( qs, fh ); 
			if(i == 65500 OR i == 130000 OR i == 196500 OR i == 262000)
			{
				fclose( fh ); 
				if(i == 65500  ) fh = fopen( "c:\\AmiBackupD\\" + lname + " A.csv", "w"); 
				if(i == 130000 ) fh = fopen( "c:\\AmiBackupD\\" + lname + " B.csv", "w"); 
				if(i == 196500 ) fh = fopen( "c:\\AmiBackupD\\" + lname + " C.csv", "w"); 
				if(i == 262000 ) fh = fopen( "c:\\AmiBackupD\\" + lname + " D.csv", "w"); 
			}
		}
	}
	else // intraday so add time field
	{
		fputs( "Ticker,Date,Time,Open,High,Low,Close,Volume \n", fh ); 
 	  	y = Year(); 
 	  	m = Month(); 
	   	d = Day(); 
	   	r = Hour();
	   	e = Minute();
	   	n = Second();
   
	   	for( i = 1; i < BarCount; i++ ) 
		{ 
			if (dayhours AND LastValue(TimeNum()) >= 92900 AND LastValue(TimeNum()) <=
161500)
			{ 
				fputs( Name() + "," , fh );
 		     	ds = StrFormat("%02.0f-%02.0f-%02.0f,", m[ i ], d[ i ], y[ i ] ); 
   			   	fputs( ds, fh ); 
 
  	    		ts = StrFormat("%02.0f:%02.0f:%02.0f,", r[ i ],e[ i ],n[ i ] ); 
  	    		fputs( ts, fh ); 

	 	     	qs = StrFormat("%.4f,%.4f,%.4f,%.4f,%.0f\n", O[ i ],H[ i ],L[ i ],C[ i
],V[ i ] ); 
		      	fputs( qs, fh ); 
			}
			else
			{ 
				fputs( Name() + "," , fh );
 		     	ds = StrFormat("%02.0f-%02.0f-%02.0f,", m[ i ], d[ i ], y[ i ] ); 
   			   	fputs( ds, fh ); 
 
  	    		ts = StrFormat("%02.0f:%02.0f:%02.0f,", r[ i ],e[ i ],n[ i ] ); 
  	    		fputs( ts, fh ); 

	 	     	qs = StrFormat("%.4f,%.4f,%.4f,%.4f,%.0f\n", O[ i ],H[ i ],L[ i ],C[ i
],V[ i ] ); 
		      	fputs( qs, fh ); 
			}
			if(i == 65500 OR i == 130000 OR i == 196500 OR i == 262000)
			{
				fclose( fh ); 
				if(i == 65500  ) fh = fopen( "c:\\AmiBackupD\\" + lname + " A.csv", "w"); 
				if(i == 130000 ) fh = fopen( "c:\\AmiBackupD\\" + lname + " B.csv", "w"); 
				if(i == 196500 ) fh = fopen( "c:\\AmiBackupD\\" + lname + " C.csv", "w"); 
				if(i == 262000 ) fh = fopen( "c:\\AmiBackupD\\" + lname + " D.csv", "w"); 
			}
 	  	} 
	}
   	fclose( fh ); 
} 

Buy = 1;