Юмор разных лет - [46]
Примечание: в Male C+ и некоторых диалектах C для решения этой проблемы вводятся дополнительные значения этой переменной, типа ALMOST.TRUE или BETWEEN.TRUE.FALSE. Мы считаем, что в этом нет необходимости, т. к. не решается главная проблема: выбор. Если ваш муж возвращается очень поздно, в подпитии, странно пахнет духами и при этом говорит, что задержался на работе, это может хоть ALMOST.TRUE, хоть ALMOST.FALSE, все равно ничего, кроме скалки, не поможет. Через три месяца после вашей женитьбы жена может принести вам чернокожего младенца. Если при этом она убеждает вас, что ни с кем, кроме вас, последний год в близких отношениях не была, ваша LOVE к ней может заставить считать это и за BETWEEN.TRUE.FALSE и даже за TRUE. Однако вы, вероятней всего, будете единственным в этом убеждении.
2.2. Наборы переменных
Наборы переменных — группа переменных, связанных общими свойствами. К примеру, массив Furniture[] содержит набор мебели, а составная переменна AgeofWomen — возраст женщины. INT LOVE [SEX, Flirt, LOVE] очевидно обозначает набор состояний любви.
3. Операции присваивания
Операции присваивания вообще одни из самых популярных у нас операций. Этим занимаются все, начиная с ваших детей и кончая государством.
Операции присваивания для переменных в общем такие же, как и в обычном C, кроме некоторых неважных случаев для упрощения понимания программ. Примеры:
MONEY = $100то же самое, что MONEY is $100
IF (FOUND)то же самое, что FOUND
STATE is RULEZто же самое, что RULEZ
4. Цикл DO
По замыслу создателей языка, должен быть самым употребительным оператором. Действительно, разве всех нас не учили в детстве, что единственный путь к известности и достатку — труд? Однако многие из нас выросли и нашли разные пути к достатку и без утомительных циклов DO. К примеру, молодая девушка пишет в газеты бесплатных объявлений: «18 лет, обаятельная-привлекательная 90-60-90, без специальных навыков, рассмотрю предложения от $500». Кстати, разберем это объявление на Male C и попробуем сделать выводы.
>MONEY is EMPTY;
>SEEK (WORK); IF (MONEY $500) BREAK; /*Облом*/
>DO {
>SEX;
>WHILE (HEALTH is SO-SO); }
>Is STATE GOOD?
Молодая-привлекательная без особых навыков, но с запросами от $500 может получить только определенную работу, причем весьма интенсивно. При этом, правда, ответ на последний оператор программы остается открытым. Кое-кому нравиться быть «секретуткой».
5. Особые операторы
Смысл особых операторов можно понять из их перевода. Нет смысла перечислять их все, т. к. список существенно зависит от реализации языка. Однако мы разъясним смысл некоторых, используемых в этом руководстве.
SEEK() — поиск. В скобках указывается переменная, по которой ведется поиск. SEEK (Husband) и SEEK (Lover) далеко не одно и то же, хотя, конечно, каждая женщина надеется, что ее муж всегда будет хорошим любовником, а ее любовник наконец разведется с женой и жениться на ней.
FOUND () — найдено! Что найдено, смотрите в скобках. Следующий пример иллюстрирует хорошо известный факт, что искать черную кошку в темной комнате — безнадежное занятие.
>DOUBLE Room = Cat = Black;
>SEEK (Cat); FOUND (EMPTY);
6. Оператор RETURN
Все возвращается на круги своя. Таким образом, RETURN непосредственно связан с операторами циклов. Пример:
>INT Age;
>IF (Age > 50) IF (WORK is GOOD \!\! Alcohol is EMPTY) HEALTH is GOOD;
>ELSE HEALTH is BAD;
>Age!= RETURN;
>DIE;
>END;
Конечно, после 50 здоровье уже не то, особенно если вы злоупотребляли. С другой стороны, «Кто не курит и не пьет, тот здоровенький помрёт» — годы не возвратишь.
7. Оператор CONTINUE
Большей частью опять же используется в циклах. Рассмотрим пример:
>INT Age;
>INT Man;
>INT Tired is NO;
>IF (Age of Women > 30)
>DO { SEX; IF (Man is Tired) { SUX; LOVE is NO;
>BREAK;}
>CONTINUE; }
Если женщине за тридцать и ее мужу где столько же или больше, то для него начинаются трудные времена. Если он будет постоянно ссылаться на усталость, то женщину ждет облом, неудовлетворенность в любви и вообще SUX. А если не будет, но вы полагаете, что будет RULEZ? А вот и нет. Есть только продолжение, продолжение и продолжение.
8. Оператор SWITCH
Переключаться в жизни необходимо постоянно. И вынуждено, и просто потому, отдых необходим. Следующий пример иллюстрирует тот простой факт, что отдых — смена деятельности.
>DOUBLE Relax;
>DO {WORK; WHILE (HEALTH is SO-SO)}
>SWITCH (MONEY) { CASE ($1000): СANARY; CASE ($500): RelaxHouse;
>CASE ($10): BEER;}
>HEALTH is GOOD;
Вопрос, как подействуют Канары, Дом Отдыха или пиво на здоровье конкретного индивида, остается открытым. Мы надеемся, что оно улучшиться (даже от пива).
9. Оператор BREAK
BREAK — оператор аварийного выхода, чаще всего в негативном смысле (облом). Разберем пример:
>CHAR WORK is Empty;
>SEEK (WORK);
>FOUND;
>SWITCH (MONEY) { CASE ($10/Month): BREAK; CASE ($100/Month):
>BREAK;
>CASE ($1000/Month): RULEZ; }
Результат поисков работы может быть разным. Если зарплата меньше $1000 в месяц — SUX и BREAK (т. е. облом). Еще пример:
