Ask a Magic 8 Ball a question in the console

Usage

play_magic_8_ball(question = NULL, header = rlang::is_interactive())

Arguments

question: A character string. Ask the Magic 8 Ball anything your heart desires. If NULL, the default, you will be prompted to type a question interactively in the console.
header: If TRUE, prints a header for the game. Defaults to TRUE if the session is interactive and FALSE otherwise.

Value

A character string answering your question.

Examples

play_magic_8_ball("Will I ever find love?")
#> ── 🎱 Magic 8 Ball 🎱 ──────────────────────────────────────────────────────────
#> Question: Will I ever find love?
#> 
▼
▼◄
▼◄▲
▼◄▲▶
▼◄▲▶▼
▼◄▲▶▼◄
▼◄▲▶▼◄▲
▼◄▲▶▼◄▲▶
▼◄▲▶▼◄▲▶▼
▼◄▲▶▼◄▲▶▼◄
▼◄▲▶▼◄▲▶▼◄▲
▼◄▲▶▼◄▲▶▼◄▲▶
▼◄▲▶▼◄▲▶▼◄▲▶▼
▼◄▲▶▼◄▲▶▼◄▲▶▼◄
▼◄▲▶▼◄▲▶▼◄▲▶▼◄▲
▼◄▲▶▼◄▲▶▼◄▲▶▼◄▲▶
▼◄▲▶▼◄▲▶▼◄▲▶▼◄▲▶▼
▼◄▲▶▼◄▲▶▼◄▲▶▼◄▲▶▼◄
My sources say no.

if (rlang::is_interactive()) play_magic_8_ball()