Create greeting.tcl

Greeting a user on join.