(
global masterRollout 
try(destroyDialog masterRollout)catch()

-- Maxscript Football ball maker by BENETATOS Themis
--default values

BallRadius					 = 150
BallDefaultRadiusSpinner = 25
global DoBALL

rollout DoBALL "Create Ball" (
	Spinner BallRadiusSpinner 	  "Ball Radius: " range:[1,100000,BallDefaultRadiusSpinner]   type:#float align:#left width:80  offset:[-1,0]
	button DoBall  "Create Ball" align:#center width:160
	on DoBall pressed do
	(
		set animate off --anim off
		undo off(
			with redraw off
			
			Hedra family:2 scalep:100 scaleq:100 scaler:100 mapcoords:on radius:BallRadius transform:(matrix3 [1,0,0] [0,0,1] [0,-1,0] [0,0,0]) isSelected:on
			$.family = 2
			$.p = 0.34
			$.name = (uniquename "FootBall_")
			modPanel.addModToSelection (Edit_Poly ()) ui:on
			-- poly select and extrude and inset
			subobjectLevel = 4
			$.modifiers[#Edit_Poly].SetSelection #Face #{1..32}
			$.modifiers[#Edit_Poly].SetOperation #ExtrudeFace
			$.modifiers[#Edit_Poly].extrudeFaceType = 2
			$.modifiers[#Edit_Poly].extrudeFaceHeight = 5
			$.modifiers[#Edit_Poly].Commit ()
	
			-- set material ID, black patch white ball
			$.modifiers[#Edit_Poly].SetSelection #Face #{}
			$.modifiers[#Edit_Poly].Select #Face #{21,22,23,24,25,26,27,28,29,30,31,32}
			$.modifiers[#Edit_Poly].ButtonOp #GrowSelection
			$.modifiers[#Edit_Poly].SetOperation #SetMaterial
			$.modifiers[#Edit_Poly].materialIDToSet = 0
			$.modifiers[#Edit_Poly].Commit ()
			$.modifiers[#Edit_Poly].SetSelection #Face #{1..20, 33..152}
			$.modifiers[#Edit_Poly].SetOperation #SetMaterial
			$.modifiers[#Edit_Poly].materialIDToSet = 0
			$.modifiers[#Edit_Poly].Commit ()
			
			-- make inset for each poly
			$.modifiers[#Edit_Poly].SetSelection #Face #{1..212}
			$.modifiers[#Edit_Poly].SetOperation #Inset
			$.modifiers[#Edit_Poly].insetType = 1
			$.modifiers[#Edit_Poly].Commit ()
			$.modifiers[#Edit_Poly].ConvertSelection #Face #Edge
			
			-- poly deselect
			$.modifiers[#Edit_Poly].SetSelection #Face #{}
			subobjectLevel = 0
			modPanel.setCurrentObject $.modifiers[#Edit_Poly]
			-- convert to edit poly, add turbosmooth and spherify
			macros.run "Modifier Stack" "Convert_to_Poly"
			modPanel.addModToSelection (TurboSmooth ()) ui:on
			$.modifiers[#TurboSmooth].iterations = 2
			modPanel.addModToSelection (Spherify ()) ui:on
			$.modifiers[#Spherify].percent = 75
				
			-- create multisub material on slot 24 and assign to ball
			meditMaterials[24] = Multimaterial ()
			meditMaterials[24].materialList.count = 2
			meditMaterials[24].materialList[2].Diffuse = color 255 255 255
			meditMaterials[24].material1.Diffuse = color 0 0 0
			$.material = meditMaterials[24]
	
			-- convert to edit poly
			macros.run "Modifier Stack" "Convert_to_Poly"
	
			-- rescale to radius spinner
			scale $ [0.01,0.01,0.01]
			scale $ [BallRadiusSpinner.value,BallRadiusSpinner.value,BallRadiusSpinner.value]
				
		)
	)
)

rollout AboutUs "About" 
(
	label title "Football Ball Maker v1.0"
	label author "BENETATOS 'Mr.T-Prodz' Themistokle"
	button launch "mrt-prodz.com" width:160
	on launch pressed do (
	ShellLaunch "http://www.mrt-prodz.com" ""
	)
)

rollout masterRollout "Football Ball Maker by Mr.T"
(
	subRollout sub_rollout01 width:210 height:185	align:#center
	on masterRollout open do
	(
		addSubRollout sub_rollout01 Aboutus rolledup:true
		addSubRollout sub_rollout01 DoBALL rolledup:false
	)
)
createDialog masterRollout 220 195

)