Copy Material Editor

Thanks ! Now it looks like a real script !!! :-)

Smal modifications. Hope it is okay :)

----------------------------------------------------------------------------------------------------------------------------------
-- Copy Material Editor by Titane357 @ www.scriptspot.com
----------------------------------------------------------------------------------------------------------------------------------
	try (destroyDialog ::rol_CmatEd) catch()

	rollout rol_CmatEd "Copy Material Editor"
	(
		button btn_CopyMatEd "CopyMatEd" width:115 height:22 tooltip:"Copy Materials in MatEditor + assign to spheres" align:#center
		button btn_DelObjs "Delete Scene Objects" width:115 height:22 tooltip:"Delete All Objects in Scene" align:#center
		HyperLink hl_homepage "..:: Titane357' 2013 ::.." address:"http://www.scriptspot.com/users/titane357" color:(color 255 255 255) hovercolor:(color 111 111 111) visitedcolor:(color 255 255 255) align:#center
		
		on btn_CopyMatEd pressed do
		(
			
				axyzyo = Plane length:6 width:8 lengthsegs:6 widthsegs:8 pos:[3.5,-2.5,0] isSelected:on wirecolor:(color 40 40 40)
				matt = 0
				
				for p = 1 to 4 do 
				(
					for cnt= 1 to 6 do 
					( 
						matt = matt +1
						a = copy meditmaterials[matt] 
						Sphere radius:0.4 smooth:on segs:32 chop:0 slice:off sliceFrom:0 sliceTo:0 mapcoords:on recenter:off wirecolor: black pos:[cnt,-p,0] isSelected:on material:a
						$.parent = axyzyo
					)
				)
				select axyzyo
		)
		
		on btn_DelObjs pressed do
		(
			if (queryBox "Are you sure you want to DELETE ALL OBJECTS in Scene?") == true do
			(
				delete (for obj in objects collect obj)
			)
		)
		
	)
	
	createDialog rol_CmatEd 140 75 100 150 style:#(#style_titlebar, #style_sysmenu, #style_toolwindow)