# Pastebin BFWwVwP0
#!raku

my Int $cost = 1;

my @wheel = '🍉', '7', '🍍', '🍇', '🍒', '🍑', '🍓';

my %multipliers = 7 => 20, '🍑' => 10, '🍒' => 8, '🍉' => 6, '🍓' => 5, '🍇' => 4, '🍍' => 3;
my %result = 1 => @wheel.pick, 2 => @wheel.pick, 3 => @wheel.pick;

say %result;

if %result<1> eq %result<2> eq %result<3> {
    my $profit = $cost * (%multipliers{%result<1>} || 1);
    say 'win' ~ " ($profit)";
} else {
    say 'lose';
}