Дейв Тейлор - Сценарии командной оболочки. Linux, OS X и Unix. 2-е издание

····echo "I've dealt: "; echo " $cardname1"; echo " $cardname2"

··}

··function introblurb

··{

····cat << EOF

Welcome to Acey Deucey. The goal of this game is for you to correctly guess

whether the third card is going to be between the two cards I'll pull from

the deck. For example, if I flip up a 5 of hearts and a jack of diamonds,

you'd bet on whether the next card will have a higher rank than a 5 AND a

lower rank than a jack (that is, a 6, 7, 8, 9, or 10 of any suit).

Ready? Let's go!

EOF

··}

··games=0

··won=0

··if [$# −gt 0]; then # Полезная информация, если параметр определен

····introblurb

··fi

··while [/bin/true]; do

····initializeDeck

····shuffleDeck

····dealCards

····splitValue=$(($rank2 −$rank1))

····if [$splitValue −eq 0]; then

······echo "No point in betting when they're the same rank!"

······continue

····fi

····/bin/echo −n "The spread is $splitValue. Do you think the next card will "

····/bin/echo −n "be between them? (y/n/q) "

····read answer

····if ["$answer" = "q"]; then

······echo ""

······echo "You played $games games and won $won times."

······exit 0

····fi

····echo "I picked: $cardname3"

····# Третья карта попадает между первыми двумя? Проверим.

····#·· Помните, равные значения = проигрыш.

····if [$rank3 −gt $rank1 −a $rank3 −lt $rank2]; then # Выигрыш!

······winner=1

····else

······winner=0

····fi

····if [$winner −eq 1 −a "$answer" = "y"]; then

······echo "You bet that it would be between the two, and it is. WIN!"

······won=$(($won + 1))

····elif [$winner −eq 0 −a "$answer" = "n"]; then

······echo "You bet that it would not be between the two, and it isn't. WIN!"

······won=$(($won + 1))

····else

······echo "Bad betting strategy. You lose."

····fi

····games=$(($games + 1)) # How many times do you play?

··done

··exit 0

Моделирование колоды карт — непростая задача. Важно решить, как представлять сами карты и как «тасовать» или случайным образом организовывать колоду.

Чтобы решить эту проблему, в сценарии создается два массива по 52 элемента: deck[] и newdeck[] . Первый массив представляет упорядоченную колоду карт, в котором достоинство каждой карты замещается значением -1 при ее «извлечении» из колоды, а второй, newdeck[], представляет колоду, куда в случайное место помещается извлеченная карта.

То есть массив newdeck[] представляет «перетасованную» колоду. Даже при том, что в этой игре используются только первые три карты, для нас гораздо интереснее рассмотреть универсальное решение, чем специализированное.

Это означает, что сценарий в чем-то избыточен. Но ведь правда же интересно!

Давайте пройдемся по функциям и посмотрим, как все устроено. Во-первых, инициализация колоды реализуется действительно просто, в чем нетрудно убедиться, вернувшись назад и взглянув на функцию initializeDeck.

Аналогично функция shuffleDeck выглядит на удивление прямолинейной, потому что всю основную работу в действительности выполняет функция pickCard. Функция shuffleDeck просто обходит 52 элемента в массиве deck[], случайно выбирая элемент, который прежде не был выбран, и сохраняет его в очередном n -м элементе массива newdeck[].

Давайте внимательно исследуем функцию pickCard , потому что именно она выполняет основную работу, связанную с тасованием колоды. Функция разбита на два блока: первый пытается выбрать случайную доступную карту, ограничивая число попыток значением $threshold. Так как функция вызывается снова и снова, первые вызовы всегда будут успешно обрабатываться этим блоком, но потом, когда 50 карт окажутся перемещены в newdeck[], высока вероятность того, что 10 попыток случайно попасть в элементы с оставшимися картами не увенчаются успехом. Это блок цикла while .

После того как значение $errcount увеличится до значения $threshold, стратегия случайного выбора отбрасывается ради сохранения высокой производительности и сценарий переходит ко второму блоку: он выполняет обход массива, пока не найдет первую доступную карту. Это блок .

Задумавшись над последствиями такой стратегии, вы поймете, что чем ниже порог, тем выше вероятность появления в newdeck упорядоченных последовательностей карт, особенно в конце. В экстремальном случае threshold = 1 получится упорядоченная колода, где newdeck[] = deck[]. Является ли число 10 достаточно большим значением? Хотя исследование этого вопроса далеко выходит за рамки нашей книги, мы будем рады получить письмо от любого, кто проведет эксперименты и найдет лучший баланс между качеством тасования и производительностью!