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