At one startup we had a similar setup but using perl and a serial-controlled power switch.
It began with a stoplight but in december we brought in an xmas tree and put on strings of green, yellow, and flashing red lights. For a while "the tree is green" was pleasingly literal.