[VarDef,maxColors,54]//max 54 materials - change to increase number andadd colors below

[VarDef,col(maxColors),0]

//hex color values
[VarSet,col(0),0xff0000]
[VarSet,col(1),0x00ff00]
[VarSet,col(2),0x0000ff]
[VarSet,col(3),0xffff00]
[VarSet,col(4),0xff00ff]
[VarSet,col(5),0x00ffff]
[VarSet,col(6),0x80ff00]
[VarSet,col(7),0xff0080]
[VarSet,col(8),0x00ff80]
[VarSet,col(9),0x0080ff]
[VarSet,col(10),0xff8000]
[VarSet,col(11),0x8000ff]
[VarSet,col(12),0xffff80]
[VarSet,col(13),0xff80ff]
[VarSet,col(14),0x80ffff]
[VarSet,col(15),0xff8080]
[VarSet,col(16),0x8080ff]
[VarSet,col(17),0x80ff80]
[VarSet,col(18),0xc0ff00]
[VarSet,col(19),0xff00c0]
[VarSet,col(20),0x00ffc0]
[VarSet,col(21),0x00c0ff]
[VarSet,col(22),0xffc000]
[VarSet,col(23),0xc000ff]
[VarSet,col(24),0xffffc0]
[VarSet,col(25),0xffc0ff]
[VarSet,col(26),0xc0ffff]
[VarSet,col(27),0x40ff00]
[VarSet,col(28),0xff0040]
[VarSet,col(29),0x00ff40]
[VarSet,col(30),0x0040ff]
[VarSet,col(31),0xff4000]
[VarSet,col(32),0x4000ff]
[VarSet,col(33),0xffff40]
[VarSet,col(34),0xff40ff]
[VarSet,col(35),0x40ffff]
[VarSet,col(36),0xffc080]
[VarSet,col(37),0xc080ff]
[VarSet,col(38),0xc0ff80]
[VarSet,col(39),0xff80c0]
[VarSet,col(40),0x80c0ff]
[VarSet,col(41),0x80ffc0]
[VarSet,col(42),0xff4080]
[VarSet,col(43),0x4080ff]
[VarSet,col(44),0x40ff80]
[VarSet,col(45),0xff8040]
[VarSet,col(46),0x8040ff]
[VarSet,col(47),0x80ff40]
[VarSet,col(48),0xffc0c0]
[VarSet,col(49),0xc0c0ff]
[VarSet,col(50),0xc0ffc0]
[VarSet,col(51),0xff4040]
[VarSet,col(52),0x4040ff]
[VarSet,col(53),0x40ff40]
//add more colors if changing Max colors

[IButton,???,"Create colored materials",
	[IConfig,2021]
	[ISet,Material:Item Info,1]
	[FileNameSetNext,"MatCapWhite.zmt"]
	[IPress,Material:Load]
	[IPress,Material:CopyMat]
	[VarSet,matId,2]	
	[Loop,maxColors,		
		[ISet,Material:Item Info,[Var,matId]]
		[IPress,Material:PasteMat]
		[VarSet,colMat,[Val,col(n)]/65536]
		[ISet,Material:MODIFIERS:A,colMat]
		[IPress,Color:Fill Object]
		[VarInc,matId]	
	,n]
	[ISet,Material:Item Info,1]
]/*End of Macro*/