; ОБМЕН ТРОГЛОДИТОВ НА МУМИЙ
!?OB50/85/0;
!!HE-1:C1/70/70/?y39;
!!IF&y39<10:M^У вас недостаточно троглодитов для обмена^;
!!FU&y39<10:E; выход, если мало троглодитов
!!VRy39::10; делим на 10 если больше
!!MA:C141/6/?y67;
!!VRy67:*y39; стоимость мумий * на их кол-во
!!OW:R-1/6/?y1;
!!IF&y1<y67:M^У вас недостаточно золота для обмена^;
!!FU&y1<y67:E; выход
!!IF&y1>y67:Q1^Вы хотите обменять троглодитов на мумий?^;
!!IF&-1/y1>y67:M^{Как} {хотите..}^;
!!FU&-1/y1>y67:E; выход, если нет
!!IF&1/y1>y67:M^Меняю!^;
!!HE-1&1/y1>y67:C1/70/70/y39;
!!HE-1&1/y1>y67:C2/141/y39/1;
!!IF&1/y1>y67:M^Обмен завершён..^;
!!OW&1/y1>y67:R-1/6/d-y67;
!!FU&1/y1>y67:E; стоп, если всё выполнено

; КОТЁЛ ДЛЯ БЕСОВ
!?OB22/86/0;
!!OB22/86/0:S0;
!!IF:Q1^Ты наверное хочешь меня убить!!! Я правильно тебя понял? ^;
!!IF&1:M^За меня теперь поквитется сам Верховный дьявол, поскольку я сильно слаб, чтобы с тобой справиться, а он нет!^;
!!HE-1&1:O?y47 P?y20/?y21/?y22;
!!IF&1:M^{Молись}…^;
!!HE-1&1/y47=0:Ty20/y21/y22/55/66666;
!!IF&-1:M^Это уже {хорошо}^;
!!IF&-1:M^Значит будем разговаривать дальше…^;
!!IF&-1:M^Слушай: дай мне денег на расходы.. Я хочу купить себе котёл, в котором сварю потом тебя..^;
!!IF&-1:Q1^Ты мне будешь покупать котёл или тебя сварить в другом котле?^;
!!IF&-1/-1:M^Ты бросаешь мне вызов!!!^;
!!IF&-1/-1:M^Хочешь поговорить об этом с самим хозяином…^;
!!IF&-1/-1:M^Я тебе сейчас устрою с ним встречу….^;
!!HE-1&-1/-1:O?y47 P?y20/?y21/?y22;
!!IF&-1/-1:M^{Молись}…^;
!!HE-1&-1/-1/y47=0:Ty20/y21/y22/55/66666;

!!IF&-1/1:M^Давай же покупай мне котёл - я жду….^;
!!IF&-1/1:M^У тебя должно быть 666000 золотых монет на его покупку!!!^;
!!IF&-1/1:M^ У тебя есть такие деньги или нету их?^;
!!IF&-1/1:M^Я сейчас сам покопаюсь в твоей казне и проверю....^;
!!IF&-1/1:M^Я проверил и вот результат моей проверки....^;
!!OW&-1/1:R-1/6/?y1;
!!IF&-1/1/y1<666000:M^Всё-таки у тебя их нет..^;
!!IF&-1/1/y1<666000:M^Всё, надоело мне!!! ХОЗЯИН убей его..^;
!!HE-1&-1/1/y1<666000:O?y47 P?y20/?y21/?y22;
!!IF&-1/1/y1<666000:M^{Молись}…^;
!!HE-1&-1/1/y1<666000/y47=0:Ty20/y21/y22/55/66666;
!!IF&-1/1/y1>666000:M^Вижу, что такая сумма присутствует у тебя…^;
!!IF&-1/1/y1>666000:M^Где мой котёл? ОТВЕЧАЙ МНЕ ИЛИ ТЕБЕ НЕПОЗАВИДУЮТ…^;
!!IF&-1/1/y1>666000:M^Даю пять секунд…^;
!!IF&-1/1/y1>666000:M^Время пошло…^;
!!IF&-1/1/y1>666000:M^Время твоё уже вышло…^;
!!IF&-1/1/y1>666000:Q1^Ну что: строешь мне котёл или нет?^;
!!IF&-1/1/y1>666000/-1:M^Слышь, разберись с ним…^;
!!HE-1&-1/1/y1>666000/-1:O?y47 P?y20/?y21/?y22;
!!IF&-1/1/y1>666000/-1:M^{Молись}…^;
!!HE-1&-1/1/y1>666000/-1/y47=0:Ty20/y21/y22/55/66666;
!!IF&-1/1/y1>666000/1:M^Вы построили бесу его долгожданный котёл…^;
!!OW&-1/1/y1>666000/1:R-1/6/d-666000;
!!UN&-1/1/y1>666000/1:I22/88/0/63/27;
!!UN&-1/1/y1>666000/1:I22/88/0/63/27;
!!IF&-1/1/y1>666000/1:M^Теперь мне нужно проверить котёл, как он работает…^;
!!IF&-1/1/y1>666000/1:Q1^ТЫ ХОЧЕШЬ, ЧТОБЫ Я ТЕБЯ СВАРИЛ И ИСПЫТАЛ СВОЙ КОТЁЛ? ^;
!!IF&-1/1/y1>666000/1/-1:M^Я тебя за это начинаю варить в другом котле…^;
!!IF&-1/1/y1>666000/1/-1:M^Уже варю…^;
!!HE-1&-1/1/y1>666000/1/-1:O?y47;
!!IF&-1/1/y1>666000/1/-1:M^{Молись}…^;
!!HE-1&-1/1/y1>666000/1/-1/y47=0:P44/105/0;
!!IF&-1/1/y1>666000/1/-1/y47=0:M^Вы насмерть сварились в смоле, кипящей в другом адовом котле беса и погибли вместе с конём…^;
!!HE-1&-1/1/y1>666000/1/-1/y47=0:K;
!!IF&-1/1/y1>666000/1/1/y47=0:M^За смелость я Вас ценю и отпускаю на волю…^;
!!IF&-1/1/y1>666000/1/1/y47=0:M^Бес Вас благодарит и дарит 800000 золотых монет…^;
!!OW&-1/1/y1>666000/1/1/y47=0:R-1/6/d800000;
!!IF&-1/1/y1>666000/1/1/y47=0:M^Бес сам сварил себя в котле, так как не было никого больше рядом…^;
!!UN&-1/1/y1>666000/1/1/y47=0:O22/86/0;
!!UN&-1/1/y1>666000/1/1/y47=0:O22/86/0;
!!UN&-1/1/y1>666000/1/1/y47=0:O22/86/0;
!!IF&-1/1/y1>666000/1/1/y47=0:M^Котёл не выдержал перегрузки и взорвался, так как бес был очень жирным и тяжёлым…^;
!!UN&-1/1/y1>666000/1/1/y47=0:O22/88/0;
!!UN&-1/1/y1>666000/1/1/y47=0:O22/88/0;
!!UN&-1/1/y1>666000/1/1/y47=0:O22/88/0;
!!IF&-1/1/y1>666000/1/1/y47=0:M^Вы очень устали психологически и физически от этого беса.. Вам нужен целый день на отдых…^;
!!HE-1&-1/1/y1>666000/1/1/y47=0:Wd-1000000;
!!FU&-1/1/y1>666000/1/1/y47=0:E; выход, если нет