
'
' Add a few custom properties to the selected entities
'

For Local e:TEntity = EachIn GetSelection()
	
	Local cs:TCustomString = CustomString("Cool","Beans")
	Local cf:TCustomFloat = CustomFloat("Awesome",1.0)
	e.AddCustomProperty(cs)
	e.AddCustomProperty(cf)

Next
