Following Tom's spirit (but not his advice about unnecessary
embellishments), I made a little Christmas program (and in the
meanwhile learned some smcl). Enjoy.
Sergio
==START OF DO FILE =====================================
capture program drop MerryChristmas
program define MerryChristmas
di "{break}"
forval i=0(4)12 {
forval j=1(2)9 {
local n=`i'+`j'
local tree=" "
forval k=1/`n' {
if `n'==1 {
local tree="`tree'"+"{res}*"
}
else if uniform()>0.8 {
local tree="`tree'"+"{error}*"
}
else {
local tree="`tree'"+"{text}*"
}
}
di "{center:`tree'}"
}
}
di "{center:{input}==STATA==}"
di "{center:{input}==STATA==}"
di "{hline}"
end
MerryChristmas
exit
=========================================================
On 12/22/05, Steichen, Thomas J. <[email protected]> wrote:
> Here's wishing each of you a very Stataish Christmas, sparse and clean, direct and full of meaning, unencumbered with unnecessary
> embellishments. And may your New Year be far less complex than Stata graphics syntax!
>
> Until '06,
> Tom
>
> Thomas J. Steichen
> [email protected]
>
>
>
> -----------------------------------------
> CONFIDENTIALITY NOTE: This e-mail message, including any attachment(s),
> contains information that may be confidential, protected by the
> attorney-client or other legal privileges, and/or proprietary non-
> public information. If you are not an intended recipient of this
> message or an authorized assistant to an intended recipient, please
> notify the sender by replying to this message and then delete it from
> your system. Use, dissemination, distribution, or reproduction of this
> message and/or any of its attachments (if any) by unintended recipients
> is not authorized and may be unlawful.
>
>
> *
> * For searches and help try:
> * http://www.stata.com/support/faqs/res/findit.html
> * http://www.stata.com/support/statalist/faq
> * http://www.ats.ucla.edu/stat/stata/
>
*
* For searches and help try:
* http://www.stata.com/support/faqs/res/findit.html
* http://www.stata.com/support/statalist/faq
* http://www.ats.ucla.edu/stat/stata/
