A-small-casual-game-with-138-characters-where-you-may-die-and-have-a-lot-of-extensive-conversation-and-maybe-some-fun-and-all-for-freee

Submitted by: Martin Barth Score: 4.00 (out of 10)
Length: 138 characters
Computer Language: Perl
Interface Language: English
Description

You have to roll a die against the machine and may have some smalltalk.

Instructions

Run this perl script from the command line, for example:

$perl Ascgw138cwymdahaloecamsfaaff.pl

[Editor's note: You may wish to consider renaming the script first.]

Download: Ascgw138cwymdahaloecamsfaaff

Source Code:

Use the arrow to expand or collapse this section

print "Die:\n>";
while ()
{
       chop;
       $d = int(rand(6))+1;
       if ($_ eq $d)
       {
               die "OK!\n";
       }
       elsif (tr/aeiou/uoaei/)
       {
               print "$_!\n>";
       }
       else
       {
               print "no,$d!\n>";
       }
}

IF
TWIFcomp

TWIFcomp

Recent comments

A-small-casual-game-with-138-characters-where-you-may-die-and-have-a-lot-of-extensive-conversation-and-maybe-some-fun-and-all-for-freee