FLOAT Thing is Dirty;
WHILE (Thing) {
Wash;
BAD;
GOTO HELL;
} HELL: Shop \!\! Barbeshop \!\! Love-story_reading; }
Понятно, что домашняя работа (в частности, стирка) бесконечна, и число грязных вещей (Thing) никогда не кончится. Поэтому необходимо использовать оператор безусловного перехода, которое в данном случае посылает эту работу в HELL. Когда его использовать, зависит от вашего настроения, однако если вы не хотите BAD с вашим мужчиной, старайтесь им не злоупотреблять.
Примечание: некоторые скажут, что в написанном примере можно было воспользоваться оператором BREAK. И что? Вы остановили работу, а не послали ее к черту и вам придется рано или поздно ее продолжить, причем наверняка переменная THING существенно увеличится.
Некоторые могут заметить странное определение метки "черта". Так ведь к черту посылается стирка, а вместо нее предлагается или поход по магазинам, или парикмахерская, или просто чтение любовных романов.
Еще один пример иллюстрирует тот факт, что женщина любит ушами:
CHAR Ask "Do you love me?"; Neverending:
IF ( Ask is 'Yes') GOTO Neverending;
11. Условные операторы
Не случайно этот раздел мы отнесли ближе к концу. Смысл этого оператора слишком очевиден: жизнь полна компромиссов и выполнение ваших желаний постоянно наталкивается на массу условий. Надеемся, что наш язык поможет вам в решении ваших проблем. В следующем пункте мы предоставим вам несколько программ для самостоятельного изучения.
12. Примеры
1. Кандидат на брак.
#UNDEFINE MAN
#INCLUDE ALL
MAIN (Target is LOVE);
LONG CHAR Why = "Зачем вы девушки, NICE LOVE, неCONST у них LOVE";
INT MAN [ Boss, Friend, Nice ...];
INT LOVE [ SEX, Flirt, LOVE];
SEEK ( LOVE );
FOUND MAN;
IF ( Man[Boss] ) FOUND SEX;
IF ( Man[Friend] ) FOUND Flirt;
IF ( Man[Nice] ) DO Why;
ELSE New SEEK;
Примечание: могут сказать, а как же все же найти свою любовь. Ну, дорогие дамы, если вы считаете, что это задачу за вас смогут решить машины...
2. Муж вернулся из командировки...
INT Lover is IN_FRIDGE;
INT Husband is FOOL;
LONG CHAR Kill ( Lover must die! );
INT Furniture[Dresser, Bed, ...];
RETURN ( Husband );
Husband;
SEEK ( Lover );
IF ( Furniture[Any] ) FOUND {
SAY Kill;
SUX; }
ELSE RULEZ;
Муж, конечно, успокоится, не найдя любовника. Но что будет с любовником, который спрятался в холодильнике? И вправду удовольствия познаются через страдания.
13. Задачи.
Как вы уже поняли, Male C - универсальный язык программирования, посредством которого можно решать обширный круг повседневных задач. Единственный путь изучения языка - говорить на нем. Предлагаем несколько задач для самостоятельного решения:
