{"body":"#!raku\r\n\r\nmy Int $cost = 1;\r\n\r\nmy @wheel = '🍉', '7', '🍍', '🍇', '🍒', '🍑', '🍓';\r\n\r\nmy %multipliers = 7 => 20, '🍑' => 10, '🍒' => 8, '🍉' => 6, '🍓' => 5, '🍇' => 4, '🍍' => 3;\r\nmy %result = 1 => @wheel.pick, 2 => @wheel.pick, 3 => @wheel.pick;\r\n\r\nsay %result;\r\n\r\nif %result<1> eq %result<2> eq %result<3> {\r\n    my $profit = $cost * (%multipliers{%result<1>} || 1);\r\n    say 'win' ~ \" ($profit)\";\r\n} else {\r\n    say 'lose';\r\n}","name":"slots.raku","extension":"txt","url":"https://www.irccloud.com/pastebin/BFWwVwP0/slots.raku","modified":1619314541,"id":"BFWwVwP0","size":455,"lines":17,"own_paste":false,"theme":"","date":1619314541}