Texture Resolution Edit / Maya

TsSetTexRes.mel

//Viewのテクスチャ表示を一時的に変更
//マテリアルを選択して実行
//引数：解像度サイズ

global proc TsSetTexRes(int $TexRes){	
	int $moto = `displayPref -q -maxTextureResolution`;
	displayPref -maxTextureResolution $TexRes;
	string $infoName[] = `listConnections -type materialInfo`;
	
	for( $tmp in $infoName){
		string $TexName[] = `listConnections -type file $tmp`;
		disconnectAttr ($TexName[0] + ".message") ($tmp + ".texture[0]");
		connectAttr -force ($TexName[0] + ".message") ($tmp + ".texture[0]");	
	};
	refresh ;
	displayPref -maxTextureResolution $moto;
} 

//usage
//TsSetTexRes(4096);