Here's a very interesting paper by Jon Orwant (thereby giving this response adequate Perlness ;-) on the automatic generation of game programs (in Perl of course) given a formal description, and it goes into a discussion of rock, paper, scissors among others. Not surprisingly his EGGG (Extensible Graphical Game Generator) system is also written in Perl.

--
I'd like to be able to assign to an luser