Data update

Task/Magic-8-ball/Crystal/magic-8-ball.cr

@@ -0,0 +1,13 @@
+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.",
+           "Yes.", "Signs point to yes.", "Reply hazy, try again.",
+           "Ask again later.", "Better not tell you now.", "Cannot predict now.",
+           "Concentrate and ask again.", "Don't count on it.", "My reply is no.",
+           "My sources say no.", "Outlook not so good.", "Very doubtful."]
+
+loop do
+  print "Your question: "; STDOUT.flush
+  break if (gets || "").empty?
+  puts answers.sample
+end