Camicia

Вказівки

У цій вправі ми змоделюємо гру, дуже схожу на класичну карткову гру Camicia. Наша програма отримає початкову конфігурацію колод двох гравців і повинна змоделювати гру до її завершення (або визначити, що вона ніколи не завершиться).

Правила

• Колода ділиться між двома гравцями. Карти гравця читаються зліва направо, де найлівіша карта лежить зверху колоди.
• Раунд складається з того, що обидва гравці викладають принаймні по одній карті.
• Гравці по черзі викладають верхню карту своєї колоди на центральну купу.
• Якщо карта є числовою картою (2-10), хід просто переходить до іншого гравця.
• Якщо карта є платіжною картою, потрібно сплатити штраф:
  • J → суперник має сплатити 1 карту
  • Q → суперник має сплатити 2 карти
  • K → суперник має сплатити 3 карти
  • A → суперник має сплатити 4 карти
• Якщо гравець, який сплачує штраф, відкриває ще одну платіжну карту, він припиняє сплачувати штраф. Тоді інший гравець має сплатити штраф на основі нової платіжної карти.
• Якщо штраф сплачено повністю й без переривання, гравець, який виклав останню платіжну карту, забирає центральну купу і кладе її вниз своєї колоди. Потім цей гравець починає наступний раунд.
• Якщо в гравця закінчуються карти і він не може викласти карту (або під час сплати штрафу, або коли настає його черга), центральну купу забирає інший гравець.
• Момент, коли гравець забирає карти з центральної купи, називається взяткою.
• Якщо після взятки всі карти опиняються в одного гравця, гра завершується.
• Гра входить у цикл, щойно колоди стають такими самими, якими вони вже були раніше під час гри, не враховуючи числові карти!

Приклади

Невеликий приклад партії, яка завершується.

status: "finished", cards: 13, tricks: 1

Це невеликий приклад партії, яка зациклюється.

Початок раунду 4 збігається з початком раунду 2. Нагадаємо, конкретні значення числових карт не важливі.

status: "loop", cards: 8, tricks: 3

Завдання

• Використовуючи вхідні дані, змоделюйте гру за наведеними вище правилами.
• Визначте таку інформацію про гру:
  • Status: "finished" або "loop"
  • Cards: загальна кількість карт, викладених протягом гри
  • Tricks: кількість разів, коли було забрано центральну купу

Переваги та недоліки from_quote

Функція Card.from_quote розбирає рядок тексту (англ. string) у Card. Завдяки цьому можна писати такий код:

card : Card
card = "Q"

Цей код неявно викликає Card.from_quote("Q") під час компіляції. Виконання коду під час компіляції в такий спосіб (або іншими способами, описаними нижче) може потенційно пришвидшити програму, адже їй не потрібно виконувати розбір і перевірку даних під час виконання. Крім того, це гарантує, що некоректні дані (наприклад, неправильний формат дати) буде відкинуто під час компіляції, а не під час виконання, що робить застосунок надійнішим. І насамкінець, це робить код приємним і читабельним. Наприклад, ось один із тестів у цій вправі:

result = simulate_game({
    player_a: ["2", "A"],
    player_b: ["3", "4", "5", "6", "K"],
})

Однак той, хто читає цей код, може припустити, що функція simulate_game приймає запис із двома List(Str), тоді як насправді це запис із двома List(Card). Це може призводити до плутанини й помилок. Тому краще віддати перевагу трохи довшому, але явнішому формату: "Q".Card, який теж викликає from_quote під час компіляції.

У своїх програмах краще використовувати from_str:

Card := { ... }.{
    from_str : Str -> Try(Card, [InvalidCard])
    from_str = |card_str| ...
}

Також можна викликати from_str (або будь-яку іншу чисту функцію) під час компіляції, ось так:

Ok(card) = Card.from_str("Q")

Зауваження: якщо розмістити це визначення на верхньому рівні, воно буде виконуватися під час компіляції (адже функція чиста, а її вхідні дані відомі під час компіляції). Усередині функції from_str можна використовувати під час виконання.

Підказки

---

Джерело

Beggar-My-Neighbour