Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: Re: "Another thrice-damned version of Mastermind"

by tinypig (Beadle)
on May 04, 2003 at 11:18 UTC ( #255463=note: print w/replies, xml ) Need Help??

in reply to Re: "Another thrice-damned version of Mastermind"
in thread "Another thrice-damned version of Mastermind"

Nice work. I was reviewing it and I honestly don't remember why I did that (it's been a while since I originally wrote it). The only thing I can think is that I might have been concerned about overwriting the digit. I did have a quit (q) command in there when it was longer, though that is just a shot in the dark. With your suggestion implemented, it does seem to work fine:
sub q{$;=1;for(0..3){$;[$_]=int(rand(9))}}sub _{print@_}&q;for(;;){$:= +$~=0 ;_"$/$; ";$_=<>;if(/^\d{4}$/){@q=split//;--$#q;$@=-1;for(@q){($_==$;[+ ++$@] )&&++$:||(grep/$_/,@;)&&++$~}_"$~W$:B ";++$;;$:==4|$;>10&&_(@;)&&&q}}

Replies are listed 'Best First'.
Re: Re: Re: "Another thrice-damned version of Mastermind"
by jgallagher (Pilgrim) on May 04, 2003 at 13:20 UTC
    Actually, it doesn't. As per Aristotle's suggestion above, the (grep/$_/,@;) would return true every time, thus always telling you you had four correct numbers.
    by tinypig (Beadle) on May 04, 2003 at 17:25 UTC
      Sorry, you guys are right. Strange, I thought I ran that this morning and it worked.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://255463]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (5)
As of 2023-03-26 18:58 GMT
Find Nodes?
    Voting Booth?
    Which type of climate do you prefer to live in?

    Results (63 votes). Check out past polls.