void write(string name, int tf)
{
string Format = "n%s,%.5f,%.5f,%.5f,%.5f";

char FileName[40];

TimeFrame = frameSync(tf);

vars open = series(priceOpen());
vars high = series(priceHigh());
vars low = series(priceLow());
vars close = series(priceClose());

sprintf(FileName,name,strx(Asset,"/","")); // remove slash from forex pairs

if(is(INITRUN))
file_write(FileName,"Date,Open,High,Low,Close",0);
else if (frame(0))
file_append(FileName,strf(Format,
strdate("%Y-%m-%d %H:%M"),
open[0],
high[0],
low[0],
close[0]));

}

function run()
{
BarPeriod = 1;

StartDate = 20170103;
EndDate = 20170331;

write("History\%s_H1.csv",60);

write("History\%s_H4.csv",240);
}