for obj in $'DIR_'* do (
	local name = obj.name
	local subjectName = substring name 5 (name.count - 4)

	local subject = execute ("$'" + subjectName + "'")
	if subject == undefined then continue

	local subjectLookAtConstraint = lookAt_Constraint()
	subjectLookAtConstraint.appendTarget obj 100
	subjectLookAtConstraint.StoUP_axis = 1 -- Y AXIS

	subjectRotationList = rotation_list()
	subject.rotation.controller = subjectRotationList
	subjectRotationList.available.controller=subjectLookAtConstraint
)