$$; ifmatches(%CHATCLEAN%,"Balance: (.+?)\."); match(%CHATCLEAN%,"Balance: (.+?)\.",{#new_money}); if(%#new_money% != %@#current_money%); @#last_changes_of_money=%#new_money%-%@#current_money%; @#current_money=%#new_money%; endif; unset(#new_money); filter; endif; ifmatches(%CHATCLEAN%,"^\[Money\] You have sent (.+?) Червонцев to (.+?)\.$"); match(%CHATCLEAN%,"^\[Money\] You have sent (.+?) Червонцев to (.+?)\.$",{&amount,&nick}); modify("&%&color_system_base%[%TIME%] Вы отправили &%&color_system_additional%%&amount% &%&color_system_base%червонцев игроку &%&color_system_additional%%&nick%&%&color_system_base%."); match(%&amount%,"(.+?)\.",{#amount}); dec(@#current_money,%#amount%); @#last_changes_of_money = -%#amount%; unset(#amount); unset(&amount); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^\[Money\] (.+?) has sent you (.+?) Червонцев\.$"); match(%CHATCLEAN%,"^\[Money\] (.+?) has sent you (.+?) Червонцев\.$",{&nick,&amount}); modify("&%&color_system_base%[%TIME%] Игрок &%&color_system_additional%%&nick% &%&color_system_base%отправил вам &%&color_system_additional%%&amount% &%&color_system_base%червонцев."); match(%&amount%,"(.+?)\.",{#amount}); inc(@#current_money,%#amount%); @#last_changes_of_money = %#amount%; unset(#amount); unset(&amount); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^(.+?) заработал достижение \[(.+?)\]$"); match(%CHATCLEAN%,"^(.+?) заработал достижение \[(.+?)\]$",{&nick,&achievement}); modify("&%&color_system_base%[%TIME%] Игрок &%&color_system_additional%%&nick% &%&color_system_base%заработал достижение [&%&color_system_additional%%&achievement%&%&color_system_base%]"); unset(&achievement); unset(&nick); endif; ifmatches(%CHATCLEAN%,"http"); else; ifmatches(%CHATCLEAN%,"\[(.+?)\] (.+?): (.+?)"); match(%CHATCLEAN%,"\[(.+?)\] (.+?): (.+$)",{&ch,&nick,&msg}); $$; $$; modify(&%&color%[%TIME%] [%&ch%] %&tag%%&prefix%&f%&nick%: &%&color%%&msg%); unset(&ch); unset(&nick); unset(&msg); unset(&prefix); unset(&tag); unset(&color); endif; endif; ifmatches(%CHATCLEAN%,"http"); else; ifmatches(%CHATCLEAN%,"^\[(.+?)\] \* (.+?) (.+?)$"); match(%CHATCLEAN%,"^\[(.+?)\] \* (.+?) (.+?)$",{&ch,&nick,&msg}); $$; ifmatches(%&nick%,"^<"); modify("&%&color%[%TIME%] [%&ch%] * %&msg%"); else; modify("&%&color%[%TIME%] [%&ch%] * %&nick% %&msg%"); endif; unset(&ch); unset(&nick); unset(&msg); unset(&color); endif; endif; ifmatches(%CHATCLEAN%,"http"); else; ifmatches(%CHATCLEAN%,"From (.+?): (.+?)"); match(%CHATCLEAN%,"From (.+?): (.+$)",{&nick,&msg}); $$; modify("&%&color_pm_base%[%TIME%] &%&color_pm_additional%<-- &%&color_pm_base%%&nick%: &%&color_pm_additional%%&msg%"); unset(&nick); unset(&msg); unset(&tag); unset(&prefix); endif; endif; ifmatches(%CHATCLEAN%,"http"); else; ifmatches(%CHATCLEAN%,"To (.+?): (.+?)"); match(%CHATCLEAN%,"To (.+?): (.+$)",{&nick,&msg}); $$; modify("&%&color_pm_base%[%TIME%] &%&color_pm_additional%--> &%&color_pm_base%%&nick%: &%&color_pm_additional%%&msg%"); unset(&nick); unset(&msg); unset(&tag); unset(&prefix); endif; endif; ifmatches(%CHATCLEAN%,"^\[Shop\] You bought %amount (.+?) from (.+?) for (.+?) Червонцев"); match(%CHATCLEAN%,"^\[Shop\] You bought %amount (.+?) from (.+?) for (.+?) Червонцев",{&product,&nick,&price}); modify("&%&color_system_base%[%TIME%] Вы купили &%&color_system_additional%%&product% &%&color_system_base%у игрока &%&color_system_additional%%&nick% &%&color_system_base%за &%&color_system_additional%%&price% &%&color_system_base%червонцев."); match(%&price%,"(.+?)\.",{#price}); dec(@#current_money,%#price%); @#last_changes_of_money = -%#price%; unset(&product); unset(&price); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^\[Shop\] You sold %amount (.+?) to (.+?) for (.+?) Червонцев"); match(%CHATCLEAN%,"^\[Shop\] You sold %amount (.+?) to (.+?) for (.+?) Червонцев",{&product,&nick,&price}); modify("&%&color_system_base%[%TIME%] Вы продали &%&color_system_additional%%&product% &%&color_system_base%игроку &%&color_system_additional%%&nick% &%&color_system_base%за &%&color_system_additional%%&price% &%&color_system_base%червонцев."); match(%&price%,"(.+?)\.",{#price}); inc(@#current_money,%#price%); @#last_changes_of_money = %#price%; unset(&product); unset(&price); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^\[Shop\] (.+?) sold %amount (.+?) for (.+?) Червонцев to you"); match(%CHATCLEAN%,"^\[Shop\] (.+?) sold %amount (.+?) for (.+?) Червонцев to you",{&nick,&product,&price}); modify("&%&color_system_base%[%TIME%] Игрок &%&color_system_additional%%&nick% &%&color_system_base%продал вам &%&color_system_additional%%&product% &%&color_system_base%за &%&color_system_additional%%&price% &%&color_system_base%червонцев."); match(%&price%,"(.+?)\.",{#price}); inc(@#current_money,%#price%); @#last_changes_of_money = %#price%; unset(&product); unset(&price); unset(#price); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^\[Shop\] (.+?) bought %amount (.+?) for (.+?) Червонцев from you"); match(%CHATCLEAN%,"^\[Shop\] (.+?) bought %amount (.+?) for (.+?) Червонцев from you",{&nick,&product,&price}); modify("&%&color_system_base%[%TIME%] Игрок &%&color_system_additional%%&nick% &%&color_system_base%купил у вас &%&color_system_additional%%&product% &%&color_system_base%за &%&color_system_additional%%&price% &%&color_system_base%червонцев."); match(%&price%,"(.+?)\.",{#price}); dec(@#current_money,%#price%); @#last_changes_of_money = -%#price%; unset(&product); unset(&price); unset(#price); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^Your account has been debited 50$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%С вашего аккаунта списано 50 червонцев за попытку телепортации на домашнюю точку клана."); filter; dec(@#current_money,50); @#last_changes_of_money = -50; unset(&color); endif; ifmatches(%CHATCLEAN%,"^Waiting for teleport, stand still for 10 seconds$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Для успешной телепортации, не двигайтесь с места в течении 10 секунд!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^9$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 9 секунд!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^8$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 8 секунд!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^7$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 7 секунд!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^6$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 6 секунд!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^5$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 5 секунд!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^4$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 4 секунды!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^3$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 3 секунды!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^2$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 2 секунды!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^1$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%До телепортации осталось 1 секунда!"); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^You moved, teleport cancelled$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Из-за смены вашего местопложения телепорт не удался, попробуйте еще раз."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^You are now at (.+?)'s home base$"); match(%CHATCLEAN%,"^You are now at (.+?)'s home base$",{&clan}); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Вы телепортировались на домашнюю точку клана %&clan%"); filter; unset(&color); unset(&clan); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] Необходимо подождать 10 секунд для завершения"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Для отправки товара в Магазин Игроков, не вынимайте продаваемый товар из инвентаря в течении 10 секунд."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] Успешно добавлено$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); echo("/money"); logto(notice,"&%&color%Ваш товар успешно отправлен на сервер. Для его возврата, просто купите его у самого себя."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^Вы телепортированы в Спавноград"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Вы телепортировались на главную площадь Спавнограда."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^ Ты вернулся домой"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Вы телепортировались домой."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^ Не двигайся в течение трех секунд для возвращения домой"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Для возвращения домой не двигайся в течении 3 секунд."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^ Извини, но нельзя двигаться при возвращении домой"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Телепортация прервана из-за движения перемещаемого."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^You were charged (.+?)\.00 Червонцев"); match(%CHATCLEAN%,"^You were charged (.+?)\.00 Червонцев",{#price}); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Вы прошли через платный портал. С вашего счета списано %#price% червонцев."); dec(@#current_money,%#price%); @#last_changes_of_money = -%#price%; filter; unset(#price); unset(&color); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] Предмет для продажи необходимо взять в руку$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Извините, но вы не можете продать свою руку, возьмите в неё продаваемый товар."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] Проверка очереди заказов\.\.\.$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Проверяем, нет ли у вас товаров в очереди на доставку..."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] \((.+?)\) Нет текущих заказов$"); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); logto(notice,"&%&color%Товары в очереди отсутствуют."); filter; unset(&color); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] (\(.+?)\) (.+?) предметов удалено\, (.+?) предметов добавлено\, (.+?) в очереди$"); match(%CHATCLEAN%,"^\[InventorySQL\] (\(.+?)\) (.+?) предметов удалено\, (.+?) предметов добавлено\, (.+?) в очереди$",{&a,&b,#c,#d}); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); echo("/money"); if(#c = 1); &a = " 1 товар"; elseif(1 < #c < 5); &a = "о %#c% товара"; else; &a = "о %#c% товаров"; endif; if(#d = 1); &b = "ет доставки: 1 товар"; elseif(1 < #d < 5); &b = "ют доставки: %#d% товара"; else; &b = "ют доставки: %#d% товаров"; endif; logto(notice,"&%&color%Доставлен%&a%. Ожида%&b%."); filter; unset(&a); unset(&b); unset(#c); unset(#d); unset(&color); endif; ifmatches(%CHATCLEAN%,"^You sold (.+?) to the shop for \$(.+?)$"); match(%CHATCLEAN%,"^You sold (.+?) to the shop for \$(.+?)$",{&product,&price}); modify("&%&color_system_base%[%TIME%] Вы продали &%&color_system_additional%%&product% &%&color_system_base%серверному магазину за &%&color_system_additional%%&price% &%&color_system_base%червонцев."); match(%&price%,"(.+?)\.",{#price}); inc(@#current_money,%#price%); @#last_changes_of_money = %#price%; unset(&product); unset(&price); unset(&nick); endif; ifmatches(%CHATCLEAN%,"^\[InventorySQL\] (\(.+?)\) (.+?) предметов удалено\, (.+?) предметов добавлено\, (.+?) в очереди$"); match(%CHATCLEAN%,"^\[InventorySQL\] (\(.+?)\) (.+?) предметов удалено\, (.+?) предметов добавлено\, (.+?) в очереди$",{&a,&b,#c,#d}); if(note); &color=%&color_note_1%; else; &color=%&color_note_2%; endif; toggle(note); echo("/money"); if(#c = 1); &a = " 1 товар"; elseif(1 < #c < 5); &a = "о %#c% товара"; else; &a = "о %#c% товаров"; endif; if(#d = 1); &b = "ет доставки: 1 товар"; elseif(1 < #d < 5); &b = "ют доставки: %#d% товара"; else; &b = "ют доставки: %#d% товаров"; endif; logto(notice,"&%&color%Доставлен%&a%. Ожида%&b%."); filter; unset(&a); unset(&b); unset(#c); unset(#d); unset(&color); endif; $$;