52 lines
1.2 KiB
Elixir
52 lines
1.2 KiB
Elixir
defmodule RollInterface do
|
|
|
|
def infinite_loop(objs\\%{}) do
|
|
IO.puts ""
|
|
|
|
input = String.strip(IO.gets("Input a roll: "))
|
|
|
|
cond do
|
|
Regex.match? ~r/^e(x(it)?)?$/, input ->
|
|
objs
|
|
|
|
cap = Regex.named_captures(~r/^d(el(ete)?)? (?<name>[A-Za-z]\w*)$/, input) ->
|
|
objs = Map.delete(objs, cap["name"])
|
|
IO.puts "***** Deleted #{cap["name"]} *****"
|
|
infinite_loop(objs)
|
|
|
|
input == "" ->
|
|
IO.puts ""
|
|
Enum.map(Map.keys(objs), fn(o_name) ->
|
|
IO.puts "***** #{o_name} *****\t #{Roll.to_string(objs[o_name])} ... #{Roll.test(objs[o_name], true, true)}"
|
|
end)
|
|
infinite_loop(objs)
|
|
|
|
true ->
|
|
cap = Regex.named_captures(~r/^(?<name>[A-Za-z]\w*) +(?<roll>.+)$/, input)
|
|
add_obj = !is_nil(cap)
|
|
|
|
input = cond do
|
|
add_obj -> cap["roll"]
|
|
true -> input
|
|
end
|
|
|
|
roll = try do
|
|
roll = Roll.new(input)
|
|
IO.puts "#{Roll.to_string(roll)} ... #{Roll.test(roll, true, true)}"
|
|
roll
|
|
rescue
|
|
e in RollParserError -> IO.puts e.message
|
|
end
|
|
objs = cond do
|
|
add_obj -> Map.put(objs, cap["name"], roll)
|
|
true -> objs
|
|
end
|
|
|
|
infinite_loop(objs)
|
|
end
|
|
|
|
|
|
end
|
|
|
|
end
|