Magic 8-ball: Difference between revisions

Content added Content deleted
m (→‎{{header|Wren}}: Changed to Wren S/H)
(Added Easylang)
Line 1,242: Line 1,242:


(Hit ENTER key to ask again)</pre>
(Hit ENTER key to ask again)</pre>

=={{header|EasyLang}}==
<syntaxhighlight>
answers$[] = [ "It is certain" "It is decidedly so" "Without a doubt" "Yes, definitely" "You may rely on it" "As I see it, yes" "Most likely" "Outlook good" "Signs point to yes" "Yes" "Reply hazy, try again" "Ask again later" "Better not tell you now" "Cannot predict now" "Concentrate and ask again" "Don't bet on it" "My reply is no" "My sources say no" "Outlook not so good" "Very doubtful" ]
print "q to quit."
repeat
print "What would you like to know? "
q$ = input
until q$ = "q"
print answers$[randint len answers$[]]
.
</syntaxhighlight>


=={{header|Factor}}==
=={{header|Factor}}==