Glow

gistfile1.txt

To set the light level:
	let arealight be 0cp;
	let lights be the list of luminous things;
	let litdevices be the list of luminous devices;
	add litdevices to lights;
	repeat with luminant running through lights:
		say "LUMOS - [luminant]: [candlepower of luminant].";
		now arealight is arealight plus candlepower of luminant;
		say "[arealight].";