日付を 「2012.10.16.Tue」 と書かせたいのですが、どう定義したらよいでせうか?

\makeatletter
\def\TodayM{\number\year.\two@digits\month.\two@digits\day}
\makeatother

\dayの後ろに曜日の頭文字3文字を書かせたいのですが、どうすればよいでしょうか?