Create weather.tcl

Random Weather TCL.