rollout rolSelSetKeySet "Hallo på do"
(
	dropDownList dDLTransformMode "Choose mode"
		items:#("Transform", "Position", "Rotate", "Scale")
	dropDownList dDLSelSets "Choose selection set"
		items:(for i = 1 to getNumNamedSelSets() collect getNamedSelSetName i)
	button btnSetKey "Set key" align:#right

	on btnSetKey pressed do
	(
		for i in selectionSets[dDLSelSets.selection] do
		(
			case dDLTransformMode.selection of
			(
				1: addNewKey i.transform.controller slidertime
				2: addNewKey i.position.controller slidertime
				3: addNewKey i.rotation.controller slidertime
				4: addNewKey i.scale.controller slidertime
			)
		)
	)
)
createDialog rolSelSetKeySet