//Activate the workbook that has 150 columns
win -a Book1;
//Activate the worksheet that has 150 columns
page.active = 1;
//Split worksheet
wsplit mode:=col col:=1;
//Loop over every worksheet
doc -e LW{
	//Copy column X to the active worksheet
	colcopy irng:=[%H]1!Col(1) orng:=!Col(2);
	//Swap column 1 and column 2
	colswap (1,2);
	//Export worksheet to the specified path and name it with the name of the active worksheet
	expASC path:="C:\Users\yuki\Documents\OriginLab\User Files\" + page.active$ + ".dat";
}

expASC path:="C:\Users\yuki\Documents\OriginLab\User Files\" + col(B)[L]$+ ".dat";