in reply to YAGG (Yet Another Golf Game)

This solution comes in at 89 characters:
@h=0;print map(rand>.5?++$H&&++$h[-1]&&H:++$#h&&$",,$/, join('|',grep$_,@h),$/,$H,$/
Could you clarify the exact output format that the code should produce?

Replies are listed 'Best First'.
Re: Re: YAGG (Yet Another Golf Game)
by Necos (Friar) on Feb 13, 2002 at 21:14 UTC
    Just a the number of heads that occur in a row, follwed by the number of heads total. Look at the sample output in the root node for a better example. The only real requirement in the output is that the flip data, tally, and total need to be separated by newlines.

    Theodore Charles III
    Network Administrator
    Los Angeles Senior High
    4650 W. Olympic Blvd.
    Los Angeles, CA 90019
    323-937-3210 ext. 224