//ZBRUSH MACRO - save file to ZStartup/Macros/Misc folder

[IButton,???,"Rename all subtools so start lowercase",
	[IConfig,4.8]
	[MVarDef,Rename_Mem,1,0]
	[If,[SubToolGetCount],
		[VarSet,actST,[SubToolGetActiveIndex]]
		[Loop,[SubToolGetCount],
			[SubToolSelect,[Val,n]]
			[If,[IExists,Tool:Geometry:Divide],
				[VarSet,subtoolName,[IGetTitle,Tool:Item Info]]
				[VarSet,firstStr,[StrLower,[StrExtract,subtoolName,0,0]]]
				[VarSet,secondStr,[StrExtract,subtoolName,1,255]]
				[VarSet,subtoolName,[StrMerge,firstStr,secondStr,"dat"]]
				[MemSaveToFile,Rename_Mem,subtoolName,1]
				[FileNameSetNext,subtoolName]
				[IPress,Tool:Import]
				[FileDelete,subtoolName]
			]
		,n]
		[SubToolSelect,actST]
	]
,,.5]