-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathtarot.exs
executable file
·34 lines (22 loc) · 910 Bytes
/
tarot.exs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#!/usr/bin/elixir
wielkie = [ "Głupiec", "Mag", "Papieżyca", "Cesarzowa", "Cesarz",
"Papież", "Kochankowie", "Rydwan", "Sprawiedliwość",
"Eremita", "Koło Fortuny", "Siła", "Wisielec", "Śmierć",
"Umiarkowanie", "Diabeł", "Wieża Boga", "Gwiazda",
"Księżyc", "Słońce", "Sąd Ostateczny", "Świat" ]
ark = [ "Jedynka", "Dwójka", "Trójka", "Czwórka", "Piątka", "Szóstka",
"Siódemka", "Ósemka", "Dziewiątka", "Dziesiątka", "Paź", "Rycerz",
"Królowa", "Król" ]
kolory = ["Pałek", "Kielichów", "Mieczy", "Denarów"]
defmodule Tarot do
def comb(_,[]) do
[]
end
def comb(kolor,[karta|karty]) do
[karta <> " " <> kolor | comb(kolor,karty)]
end
end
małe = List.foldr(kolory, [], fn(x,acc) -> Tarot.comb(x,ark) ++ acc end)
karty = wielkie ++ małe
kt = karty |> Enum.take_random(3)
kt |> IO.inspect