ucell-uz

2 часа назад, ScA4Ok сказал:

после второго запуска язык снова стал корейским.

чего ты мучаешься тут на форуме есть всё что касается русского клиента, юзай к примеру поиск!

выполни все шаги что в той теме и у тя всё будет на русском

1 минуту назад, Кеник сказал:

Проморгал про "Не спам и не флуд", извини (:

 Могу перетащить в Юмор или просто выпилить, если все еще актуально. Мне в целом фиолетово.

100% юмор !

44 минуты назад, Kubix! сказал:

А че произошло? я просто не осилил всё это читать

коротко если сказать произошло вот что :  "леди" технично набивается в модераторы форума)) вот по сути и всё..

тему создала видать чуток под шафе - ))) а через пару дней зашла и видит)) ого чего я тут начеркала, теперь просит или закрыть  тему или удалить))

ничего страшного под шафе  такое со всеми бывает.

p.s - карлсберг, хейнекен, золотая корона и миллер - оценили ваши старания "леди" ___)))

2 часа назад, Neero сказал:

извините,а функцию искать в файле? или это отдельный файл?

и может просто ее отключить? как?

29 минуты назад, Neero сказал:

[Status]: Connection of the account 'test11' accepted.
[Info]: Closed connection from '213.110.210.138'.

ты когда накладывал patch использовал функцию Proxy Server Support

я  точно не помню как правильно пишется но найди эту функцию и включи в патч

попробуй вот так

https://cloud.mail.ru/public/UcQi2wyqXUsv/motr/rudc.grf

https://cloud.mail.ru/public/UcQi2wyqXUsv/motr/ruif.grf

закинь это всё в корень рошки, найди файл data.ini

пропиши в data.ini

[Data]
0=rudc.grf
1=ruif.grf
// 3=newprontera.grf
4=data.grf
// 5=ev_xmas.grf

затем скачай 

https://cloud.mail.ru/public/UcQi2wyqXUsv/motr/2013-08-14aRagexe.exe Client Update by Themon.rar

извлеки с архива Gravity.rar

закинь от туда 2 файла в корень к себе custon.grf и hercules.grf

и также пропиши у себя в data.ini

отпишись потом ) 

надеюсь ты обсификацию отрубил в самом сервере

2 часа назад, qabakrall сказал:

проблема решена)

хм... если вам не помогала функция Diasbled мульти-виндов

как решилась проблема? я просто давно уже не занимаюсь рошкой

возможно экзешник изначально был багнут? как решилась то проблема? ну это я так для себя интересуюсь)

3 часа назад, qabakrall сказал:

Как можно запретить открытие второго окна? Есть ли вообще такая функция?

внимательно нужно быть при патче с немо

25 минуты назад, Glun203 сказал:

ближе к марту-апрелю

ага дожить бы ещё до этих дней )) ибо уже вот вот может взорваться супер вулкан йелоу стоун (америка сидит  страхе)

давно не работал с рАреной отключи обсификацию

В ../src/config/core.h меняем:

#define PACKET_OBFUSCATION

на:

// #define PACKET_OBFUSCATION

Сохраняем изменения и компилируем сервера. 

В 18.01.2018в4:39 PM, qabakrall сказал:

Давненько я не писал сюда, вот решил кое-что написать и столкнулся с проблемой, я не видел ещё такого скрипта который давал бы бонус без экипировки...

Суть например ты проходишь задание и получаешь в награду скорость передвижение + 5% на всегда. При этом никакой экипировки... Бонус не слетает никогда...

Такой скрипт вообще существует? На эмуле Hercules

скорей всего нужно этот скрипт затолкать в at_commands и сделать что-то типо статуса премиум типо пока есть прем ты с передвижением в 5%

или же усложнить задачу юзерам на передвижение пожизненно "Внимание данный квест проходится 1 чаром и 1 раз, для прохождения квеста требуется статус премиум или супер-премиум)))"

ну или же просто сделать скрипт с командой типо @speed5

примерно так это будет)

а вот есть он или нет я хз, скорее всего есть если кто-то сделал что-то типо такого уже

наверно чуваку очень нужны были бабки, искал походу адреса эл..почты с надеждой что какой-то пасс подойдёт к мылу, и узная пасс к мыло он надеялся что сможет достать оттуда какое-нить бабло

ну раз человек на столько туп!  и если хочет заработать бабла пускай уж занимается майнингом криптовалют, сейчас этим почти все занимаются)) да и на рошке много не заработаешь это уже не факт

чё говорить то) я и сам занимаюсь майнингом биткоина, на ро  забил пока что!

помогите исправить небольшой баг

использую геркулес нa libconfig 1.4.9 Hercules-master_2015-12-17--15-58.zip

проблема такова пробежал мимо мобов в варп, вернулся обратно в тот же варп и увидел хп у всех мобов которые аргятся, где подправить нужно?

в геркулесе 2014 такой фишки не было, там работало всё как надо  хп мобов выходило только пока не ударишь его.. смотрите рисунок

Скрытый текст

 

 

В 19.11.2017в0:22 PM, Temtaime сказал:

Я бы посоветовал обновить драйвера на последние. Отпишитесь, поможет ли.

обновил дровишки с офф сервера нвидиа, установил самую последнюю версию + поковырялся в настройках в панели нвидиа, выставил всё по максимум имею ввиду графические параметры качество текстур и шейдоры

теперь вместо старой ошибки которая писала (108) появилась новая (420)

возможно я один с такой видео картой, не от фирмы ати радеон, но очень хочется опробовать ваш экзешник...

а к выпуску официального релиза будет приложение совместимо с x86 битными процессорами?

ведь не у всех стоят 64 битные системы.. сделал пробный  запуск на винде хр 32 бита, и тут понял что приложение работает только в режиме 64 =)

ещё момент, почему выскакивает данный эрор? может я чего не правильно понимаю? винда вин10 х64 или приложение работает с видео картами только ATI Radeon?

Скрытый текст

 

 

ну там как бы не только эмоции не компилятся, но и остальное тоже, самое интересное что когда компилю плагин отдельно то валятся эроры

но если этот же плагин воткнуть в сам эмуль  /src/map/atcommand.c то компилится без ошибок.. я скину эмуль полностью, потому как сборки давно уже отличаются

В 13.09.2017в1:56 AM, Habilis сказал:

УПД : Просто если у пачанов есть еще какие-то Ах*тельные идеи, пусть пока пишут, если чо понравиться и будет по силам Хабиле релизну все сразу кароч...

а почему бы не сделать плагин для склеивания пати, то есть если по русски плагин что бы объединить обе пати группы, в обеих патях должны быть лидеры к примеру с премиум аккаунтом

чем выгодна такая штука? ну во-первых патя имеющая уровень 80-90+ лв из 12 человек в шаре делают дополнительную группу возможно из более высоких лв уровней возможно это будут танки или биши

в данном плагине сделать общий чат который видят обе группы читать и писать обе группы будут видеть хп каждого из пать, и только 2 премиум игрока могут сделать пати коннект и объединить обе группы, только 2 премиум игрока должны быть лидерами каждой пати

@partyconnect <name>
Посылает запрос на объединение групп лидеру <name> другой группы. У присоединенной группы видно полоску HP и чат группы. Лидер другой группы тоже должен быть премиум.
@partydisconnect
Отключает объединение групп.

@partysp (<period>)
Показывает текущее SP у вашей пати. Откат 5 секунд. Можно задать время <period> блокировки просмотра SP.

@partyleader <name>
Смена лидера группы с текущего на участника группы <name>. Используется лидером группы. Работает только в городах.

давно не занимался эмулем для рошки, и вот решил поковырять её

есть несколько проблем :

1) не могу писать в чат больше 3х одинаковых сообщений ковырял папку /battle/*.conf и без успешно

2) решил переместить плагины в папку /plugins/ которые я затолкал в /src/map/atcommand.c

воспользовался мини гайдом 

http://herc.ws/board/topic/12855-emotion-heart-show-hold-detach/

и вот тут пошли проблемы, использую я геркулеса последней версии на libc 1.4.9 (libconfig) после уже был 1,5,0

некоторые плагины хорошо сели такие как : (@dance, @show, @heart, @hold) отваливаются плагины такие как @petinfo, @emotion, @detach

в каком смысле отваливаются, тупо эрорит при компиляции

но если эти плагины затолкать в /src/map/atcommand.c

то вообще никаких ошибок то и нет, может кто подскажет что и как нужно, не хочу чтобы данные плагины сидели /src/map/atcommand.c хочу чтобы были отдельно в папке плагинс

и ещё есть один ньюанс то что пишет так это нормально? хотя в игре все команды работают исправно

		if(Sex) mes "..."; else mes "...";

	clauses with simple

		mes "Welcome, " + (Sex?"Mr.":"Mrs.") + " " + strcharinfo(0);

согласен, дурак, но на тот момент я не знал что есть папка /док/  скрипты переводил конечно же для себя, а выкладывал ну ро умирает, хотел привлечь публику

видать придётся код проверять, на ошибки, или пере-собрать, ну и на том спс..

Юна и Юпи

hercules путь к скрипту /hercules-master/npc/cities/prontera.txt

Скрытый текст

prontera,160,133,2	script	Юпи#pront	8_F,{
				if(#language == 1) {
			set $@npcnames$,"^BC7F15[ Юпи ]^000000";
			mes $@npcnames$;
				if(Sex) mes "Хотя многие монстры могут выглядеть одинаково, будь осторожен! ^000000    Среди монстров с одинаковой базовой формой есть разновидности."; else mes "Хотя многие монстры могут выглядеть одинаково, будь внимательна! ^000000    Среди монстров с одинаковой базовой формой, есть разновидности.";
				next;
			mes $@npcnames$;
				if(Sex) mes "Монстр, выглядящий в точности так же, как мирное и слабое существо, с которым ты уже сталкивался, может оказаться диким и злобным!"; else mes "Монстр, выглядящий в точности так же, как мирное и слабое существо, с которым ты уже сталкивалась, может оказаться диким и злобным!";
				next;
			mes $@npcnames$;
			mes "Отличить разновидности монстров друг от друга можно по их цвету. Дикие и более серьёзные монстры, раскрашены в более опасный цвет.";
				close;
				}
							if(#language == 2) {
						set $@npcnames$,"^BC7F15[ YuPi ]^000000";
						mes $@npcnames$;
						mes "Although many monsters may look the same, be careful! There are variations among monsters that have the same basic form.";
							next;
						mes $@npcnames$;
						mes "One monster, that looks just like a peaceful and weak one that you've already encountered, may actually be wild and ferocious!";
							next;
						mes $@npcnames$;
						mes "You can tell these kinds of monsters apart by their body color. Wilder and more powerful monsters have more dangerous looking colors.";
							close;
							}
						}


prontera,148,203,2	script	Юна#pront	8_F_GIRL,{
				if(#language == 1) {
			set $@npcnames$,"^BC7F15[ Юна ]^000000";
			mes $@npcnames$;
			mes "Узри...";
			mes "Могущественного Одина !";
			mes "Бога Мудрости !";
			mes "Бога Войны !";
				next;
			mes $@npcnames$;
			mes "Здесь, в Рун-Мидгарде, мы служим Одину, и грозному богу, который пожертвовал одним из своих глаз, чтобы обрести мудрость.";
				next;
			mes $@npcnames$;
			mes "Скульптура, которую ты видишь - это статуя могущественного Одина. ^000000         Правда, это сущий позор, потому что она на него обсалютно не похожа.";
				next;
			mes $@npcnames$;
				if(Sex) mes "Могу поспорить, когда ты увидел эту статую впервые, ты подумал...   ^3355FF   'Ах, что за мускулистый мужчина на коне^000000.'"; else mes "Могу поспорить, когда ты увидела эту статую впервые, ты подумала,   ^3355FF   'Ах, что за мускулистый мужчина на коне^000000.'";
				next;
			mes $@npcnames$;
			mes "Но эта статуя явно не достатачно мускулиста и не достатачно божественна, чтобы дать верное представление о боге ! ^000000              Может, если бы у него был бы нимб?";
				close;
				}
							if(#language == 2) {
						set $@npcnames$,"^BC7F15[ YuNa ]^000000";
						mes $@npcnames$;
						mes "Behold...";
						mes "Mighty Odin !";
						mes "God of Wisdom !";
						mes "God of War !";
							next;
						mes $@npcnames$;
						mes "Here, in Rune-Midgard, we serve Odin, and the fearsome god who sacrificed one of his eyes in order to acquire wisdom.";
							next;
						mes $@npcnames$;
						mes "I mean, this statue is totally different from our image of Odin. ^000000    I guess the sculptor took too many artistic liberties.";
							next;
						mes $@npcnames$;
						mes "I bet the first time you saw this statue, you thought...     ^3355FF            'Oh, what a nice muscle man on a horse^000000.'";
							next;
						mes $@npcnames$;
						mes "But this statue is obviously not muscular enough, not godly enough to fairly represent a god !  ^000000     Maybe if he had a halo?";
							close;
							}
						}

 

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

Если вы спросите почему такие отступы в тексте скрипта в разговоре, отвечу сразу в самой игре чтобы это выглядело читаимо...

ну ёлы палы, я же не профи, чего вы от меня хотите )) возможно есть ошибки малые, но я на них обращаю внимание только когда эмуль ругается в консоли

мне главное работоспособность скрипта, а то что скрывается за кодом, ну я уж хз, яж говорю я краб, но слава богу все скрипты рабочие

ну чёж поделать поймите и простите)) если вы профи в скриптинге, вы сами уже подправите, я не юзаю нотепад++  юзаю обычный виндовый блокнот xD

ещё раз напомню...обращаю внимание когда скрипт даёт эрор в консоли, собираю скрипты ну как вам сказать)) методом тыка, если мучится чё-нить и получится

if(Sex == 1)
	mes "Сожалею, но ты должен достигнуть, как минимум, ^FF000060 Базового Уровня,^000000 чтобы начать мои квесты.";
		else {
	mes "Сожалею, но ты должна достигнуть, как минимум, ^FF000060 Базового Уровня,^000000 чтобы начать мои квесты.";
		}

я срезал с квеста на получение профы мага, только тогда я заметил что выбор пола тут расчитан, увы значить сам изначально в скрипте была допущена ошибка, с самого паблика, не судите строго но как было, так я и срезал, и я долго мучился чтобы его пристроить в другой скрипт, потому что када я срезал были эроры, помощи я как такого в скриптинге ни у кого не прошу, не то что стыдно просто заваливать не хочу тупыми постами, и ждать ответа на него долго не хочется, поэтому и собираю методом тыка, результат есть, работает главное и норм...

3 минуты назад, Habilis сказал:

Потом ты из этого скрипта сможешь выдернуть что тебе нужно...

надеюсь что разберусь что и откуда резать -)

мне основное это чтобы квест проходился 1 раз, и только 1 чаром, чтобы за выполненную доску давали итем, мессаги с сообщением что вы не можете проходить эту доску поскольку она уже вся пройдена, чтобы мобов нельзя было брать паралельно с мессагой типо ты не можешь взять другого моба пока не пройдёшь то что у тебя взято

я конечно не в курсе что вы там готовите, но думаю это будет интересно

3 минуты назад, Habilis сказал:

Отвечу тут, По тому что другим пачянам будет интересно... наверное....

Доска Эдэма 91-99, код скрипта сумбурен и трудно читаем, 

Хабиля с нуля напишет такой квсест с использованием элементов из скрипта доска эдема 91-99

Хабиля напишет похожий скрипт,

который-бы соответствовал стандартам Хабили в скриптинге и кодинге.

 

По тому что Хабиле нужен скрипт ежедневной охоты.

 

пока времени особо нет... извините....

ну чтож мистер хабиб, будим ждать!

10 минуту назад, Кеник сказал:

Именно это. Читать тяжело (: И это как раз-таки проблема..

ну я конечно извиняюсь, я использую разрешение экрана 1440х900 и меня устраивает, конечно если использовать 2990х1680 логично что всё мелкое будет)

ппц там много )) как бы с ума не сойти, от этих квестов + ещё приходится срезать лишнее и добавлять

заканчиваю с переводом нпц Инструктора ура и те квесты которые он даёт.. полностью перевёл квест.. в айсе которая связана с нпц наоми

сейчас мучаюсь с нпц который даёт шмот эдема и оружие  к зачарованию, там просто голову поломать можно, учитывая тот факт что я краб в скриптинге

предлагаю тестовый вариант, естественно всё ещё в процессе, но если кто-то хочет взглянуть на сам скрипт

Скрытый текст

moc_para01,23,35,5	script	Инструктор Ура#2nd01	4_M_KNIGHT_BLACK,{
	set $@npcnames$,"^BC7F15[ Инструктор Ура ]^000000";

		if (countitem(Para_Team_Mark) < 1) {
	mes $@npcnames$;
	mes "Пожалуйста, зарегистрируйся у ^3355FFСекретаря Эдема^000000.";
		}
		else if (para_2nd01 == 0) {
		if (BaseLevel < 60) {
	mes $@npcnames$;
	mes "";
		if(Sex == 1)
	mes "Сожалею, но ты должен достигнуть, как минимум, ^FF000060 Базового Уровня,^000000 чтобы начать мои квесты.";
		else {
	mes "Сожалею, но ты должна достигнуть, как минимум, ^FF000060 Базового Уровня,^000000 чтобы начать мои квесты.";
		}
		close;
		}
		else if (BaseLevel < 70) {
	mes $@npcnames$;
	mes "Ты как раз вовремя! у меня для тебя есть новый квест. Что скажешь, готов начать его сейчас?";
		next;
		switch(select("Да:Нет")) {
	case 1:
	mes $@npcnames$;
	mes "Отлично! Найди ^3131FFРомео в Комодо.^000000";
		next;
	mes $@npcnames$;
	mes "Он находится близ входа в ^3131FFПещеру на Севере Комодо^000000";
		para_2nd01 = 1;
		setquest 7214;	// Advanced Training at Comodo
		close;
	case 2:
	mes $@npcnames$;
	mes "Плохо, очень плохо. А я как раз припас такую хорошую награду для тебя...";
		}
		close;
}
		else if (BaseLevel < 80) {
			mes "Let's see...";
			mes "Your level would suggest that Comodo is just too easy for you.";
			mes "Yeah, here we go.";
			next;
			mes "[Instructor Ur]";
			mes "Do you know where Glast Heim is?";
			mes "If there was a tragic accident now, the capital of the Rune-Midgarts Kingdom could revert back to there.";
			next;
			mes "[Instructor Ur]";
			mes "Well, if it wasn't infested with undead monsters, it would become the new capitol of Rune-Midgarts.";
			next;
			mes "[Instructor Ur]";
			mes "Please, come back alive.";
			para_2nd01 = 7;
			setquest 7219;	// Advanced Training at Glast Heim
		}
		else if (BaseLevel < 90) {
			mes "Ah, ok so for you...";
			mes "Hmm where do I send you?";
			next;
			mes "[Instructor Ur]";
			mes "There an industrial city called Einbroch.";
			mes "You know it? It's a city covered in smog.";
			mes "It's a pretty gloomy city come to think of it.";
			next;
			mes "[Instructor Ur]";
			mes "Anyways, go to Einbroch and find the Dispatched Instructor there. He should be in the field south of the main city.";
			setquest 7223;	// Advanced Training in Einbroch
			para_2nd01 = 12;
		}
		else
			callsub S_Quest89100;
	}
	else if (para_2nd01 == 5) {
		mes "Oh, there he is.";
		mes "Romeo seems to be back from his field report.";
		next;
		mes "[Instructor Ur]";
		mes "We have rewards for you.";
		mes "I'm sure Romeo gave you some items, but we brought more useful things.";
		next;
		mes "[Instructor Ur]";
		mes "Do you know where the weapon storage is at?";
		mes "Go out through that large blue door and walk to the end of the hallway.";
		mes "Ask the Blacksmith, and he will give you new equipment.";
		next;
		mes "[Instructor Ur]";
		mes "And the 2nd stage training and missions start at level 70, so come back then.";
		mes "Don't forget, I'll be waiting for you.";
		para_2nd01 = 6;
		para_2nd02 = 1;
		erasequest 7218;	// Report to Instructor Ur
	}
	else if (para_2nd01 == 6) {
		if (BaseLevel > 69) {
			mes "Hey, buddy~";
			mes "What's going on?";
			next;
			switch( select( "I want to start training.", "I'm just visiting." ) ) {
				mes "[Instructor Ur]";
			case 1:
				mes "Hmm... You have a good form!";
				mes "Let me see....";
				mes "Which location would suit you...?";
				next;
				mes "[Instructor Ur]";
				if (BaseLevel < 80) {
					mes "Ah, this place should be good!";
					mes "Do you know where Glast Heim is?";
					mes "If it wasn't for that terrible accident, Glast Heim would still be";
					mes "the capital of Rune Midgard, not Prontera.";
					next;
					mes "[Instructor Ur]";
					mes "Anyways, that ancient castle is now full of undead monsters .";
					mes "It's especially bad around the Abbey in the south.";
					next;
					mes "[Instructor Ur]";
					mes "All of those undead monsters come from the underground graveyard";
					mes "Well... I guess you don't have to go all the way into the graveyard...";
					next;
					mes "[Instructor Ur]";
					mes "Once you get to the Abbey you'll see our unit member stationed in front of the entrance.";
					mes "Follow his instructions to help clear out that area.";
					next;
					mes "[Instructor Ur]";
					mes "Please come back alive.";
					para_2nd01 = 7;
					setquest 7219;	// Advanced Training at Glast Heim
				}
				else if (BaseLevel < 90)
					callsub S_Quest7990;
				else
					callsub S_Quest89100;
				close;
			case 2:
				mes "Really? At your level, I think you can easily complete the top class missions..";
				mes "I'll be here if you change your mind.";
				close;
			}
		}
		else {
			mes "2nd stage training missions start at level 70.";
			mes "I'll see you then.";
			mes "Did you pick up the necessary equipment from the storage?";
			mes "Hahaha!";
		}
	}
	else if (para_2nd01 == 10) {
		mes "Oh! You're here!";
		mes "I just got a message from Johan.";
		mes "I think he's not telling me something, but I can't figure out what that is.";
		next;
		mes "[Instructor Ur]";
		mes "Anyways, good job. I'm glad you're not hurt";
		mes "The Blacksmith BK said he'll reinforce your weapon.";
		next;
		callsub S_Para2;
		mes "[Instructor Ur]";
		mes "You know where the Blacksmith is at right??";
		mes "Go out through the blue door, to the end of the hallway.";
		mes "BK is a great blacksmith, he'll make your weapon stronger.";
		mes "What are you waiting for?";
		para_2nd01 = 11;	// Report to Instructor Ur
		erasequest 7222;
	}
	else if (para_2nd01 == 11) {
		if (BaseLevel > 79) {
			mes "Ah, ever so improving "+ strcharinfo(0) +"?";
			mes "To what do I owe this pleasure?";
			next;
			switch( select( "I came for more training.", "I'm just visiting." ) ) {
				mes "[Instructor Ur]";
			case 1:
				mes "Hmm... You have a good form!";
				mes "Let me see....";
				next;
				mes "[Instructor Ur]";
				if (BaseLevel < 90)
					callsub S_Quest7990;
				else
					callsub S_Quest89100;
				close;
			case 2:
				mes "Really? At your level, I think you can easily complete the top class missions..";
				mes "I'll be here if you change your mind.";
				close;
			}
		}
		else {
			mes "3rd stage training starts at level 80.";
			mes "I'll see you then.";
			mes "Oh, if you haven't reinforced your weapon yet, go talk to BK.";
		}
	}
	else if (para_2nd01 == 15) {
		mes "Ah, you've come.";
		mes "I just received a message from Kiren.";
		mes "How was he? He didn't throw a tantrum for waking him up?";
		mes "I wouldn't be surprised if he did";
		next;
		mes "[Instructor Ur]";
		mes "Anyways, good job. I'm glad you're not hurt.";
		mes "The Blacksmith BK said he'll reinforce your weapon.";
		next;
		callsub S_Para2;
		mes "[Instructor Ur]";
		mes "You know where the Blacksmith is at right??";
		mes "Go out through the blue door, to the end of the hallway.";
		mes "BK is a great blacksmith, he'll make your weapon stronger.";
		mes "What are you waiting for?";
		erasequest 7228;	// Report to Instructor Ur
		para_2nd01 = 16;
	}
	else if (para_2nd01 == 16) {
		if (BaseLevel > 89) {
			mes "It's nice to see you still strong!";
			mes "What brings you today?";
			next;
			if (select( "I want to continue training.", "I'm just visiting." ) == 2) {
				mes "[Instructor Ur]";
				mes "Really? At your level, I think you can easily complete the top class missions..";
				mes "I'll be here if you change your mind.";
				close;
			}
			mes "[Instructor Ur]";
			callsub S_Quest89100;
		}
		else {
			mes "4th stage training starts at level 90.";
			mes "I'll see you then.";
			mes "Oh, if you haven't reinforced your weapon yet, go talk to BK.";
		}
	}
	else if (para_2nd01 == 20) {
	mes $@npcnames$;
		callsub S_Para2;
		mes "Пройди в заднюю комнату, и поговори ";
		mes "там с <NAVI>Тореном<INFO>moc_para01,47,37,0,000,0</INFO></NAVI> ^3131FFи с Экспертом по Оружию^000000 и получишь награду.";
		para_2nd01 = 30;
		erasequest 7232;	//Report to Instructor Ur
	}
	else if (para_2nd01 == 29) {
	mes $@npcnames$;
		mes "Ты уже всё? Отличная работа!";
		next;
	mes $@npcnames$;
		callsub S_Para2;
		mes "Пройди в заднюю комнату, и поговори ";
		mes "там с <NAVI>Майклом<INFO>moc_para01,47,37,0,000,0</INFO></NAVI> ^3131FFи с Экспертом по Оружию^000000 и получишь награду.";
		para_2nd01 = 30;
		erasequest 7237;	// Report to Instructor Ur
	}
	else if (para_2nd01 == 30) {
	mes $@npcnames$;
		mes "Пройди в заднюю комнату, и поговори ";
		mes "там с <NAVI>Тореном<INFO>moc_para01,47,37,0,000,0</INFO></NAVI> ^3131FFи с Экспертом по Оружию^000000 и получишь награду.";
	}
	else if (para_2nd01 < 5)
		callsub S_Direction,"Ромео в Комодо";
	else if (para_2nd01 < 10)
		callsub S_Direction,"Glast Heim Castle";
	else if (para_2nd01 < 15)
		callsub S_Direction,"Einbroch";
	else if (para_2nd01 < 20)
		callsub S_Direction,"Наоми в Ледяном Подземелье";
	else if (para_2nd01 < 29) {
		mes "You have to travel very far to get to the ^4d4dffRune Midgard Expedition Camp^000000!";
		mes "If you want to stay there then earn your keep by doing missions. Got it?";
	}
	close;
S_Para2:
	if (para_2nd02 == 0) {
		mes "Ты уже всё? Отличная работа!";
		para_2nd02 = 1;
		next;
	}
	return;
S_Direction:
	mes $@npcnames$;
	mes "Чего же ты ждёшь? Ступай и найди ^4d4dff"+ getarg(0) +"^000000";
	return;

S_Quest7990:
	mes "Hmm.. Not bad ...";
	mes "You must be getting a hang of this..";
	mes "Let's go with a simple mission this time";
	next;
	mes "[Instructor Ur]";
	mes "There is a industrial city called Einbroch.";
	mes "You've heard of it? It's a city clouded with pollution.";
	mes "You'll appreciate the environment here so much more after visiting that city...";
	mes "We should all be thankful.";
	next;
	mes "[Instructor Ur]";
	mes "Anyways, go out to the field south of Einbroch and you'll see the Dispatched Instructor.";
	mes "I'm sure he'll recognize you first.";
	mes "Don't forget to bring the Eden Group badge.";
	next;
	mes "[Instructor Ur]";
	mes "The city's pollution is unbearable";
	mes "But the surrounding fields are relatively clean...";
	mes "This should be pretty easy for you.";
	para_2nd01 = 12;
	setquest 7223;	// Advanced Training in Einbroch
	return;

S_Quest89100:
		if (BaseLevel < 100) {
	mes $@npcnames$;
	mes "Ты как раз вовремя! у меня для тебя есть новый квест. Что скажешь, готов начать его сейчас?";
		next;
		switch(select("Да:Нет")) {
	case 1:
	mes $@npcnames$;
	mes "Отлично! Найди ^3131FFНаоми в Ледяном Подземелье.^000000";
		next;
	mes $@npcnames$;
	mes "Она находится недалеко от ^3131FFВхода^000000 внутри самого Подземелья";
		para_2nd01 = 17;
		setquest 7229;	// Advanced Training in Ice Dungeon
		close;
	case 2:
	mes $@npcnames$;
	mes "Плохо, очень плохо. А я как раз припас такую хорошую награду для тебя...";
		}
		close;
}
	else {
		mes "Well, well...";
		mes "I don't even know where to send you now.";
		mes "I'm sure you are familiar with most places around here";
		next;
		mes "[Instructor Ur]";
		mes "Then, should I send you somewhere farther this time?";
		mes "There is a cat hand agent here.";
		mes "Do you see him over there?";
		next;
		mes "[Instructor Ur]";
		mes "Through him, you can get to Ash Vacuum pretty easily .";
		mes "Since there is a Expedition Camp there...";
		next;
		mes "[Instructor Ur]";
		mes "All you have to do is find the Eden Group agent there.";
		mes "Tell him I sent you, and he'll give you instructions.";
		mes "You can explore the new world";
		mes "It's like a vacation isn't it?";
		next;
		mes "[Instructor Ur]";
		mes "Hahaha!";
		mes ".. Maybe I'll go instead of sending you.";
		mes "Anyways, their names are Ma~ something... I don't know.";
		next;
		mes "[Instructor Ur]";
		mes "So, the mission, once again, is finding our agent at the Midgard Expedition Camp.";
		mes "Isn't this the easiest mission you've ever had?";
		mes "Don't forget my present when you come back~!";
		para_2nd01 = 22;
		setquest 7233;	// Advanced Training at Ash Vacuum
	}
	return;
}

//- 90~99 -
ice_dun01,154,13,5	script	Наоми#05	4_F_JOB_BLACKSMITH,{
	set $@npcnames$,"^BC7F15[ Наоми ]^000000";
	mes $@npcnames$;
		if (para_2nd01 <= 17) {
		if (para_2nd01 < 17) {
	mes "Т-так-к... Х-х-холод-д-дн-н-н-о...";
			close;
		}
	mes "Как же тут холодно.";
		next;
	mes $@npcnames$;
	mes "Ещё эти надоедливые Сиромы со своим ледяным дыханием...";
		next;
	mes $@npcnames$;
	mes "Можешь убить ^3131FF30 шт. Siroma^000000 для меня?";
		para_2nd01 = 18;
		erasequest 7229;	// Advanced Training in Ice Dungeon
		setquest 7230;	// Siroma hunting
		}
		else if (para_2nd01 == 18) {
		if (questprogress(7230,HUNTING) == 2) {
	mes "Спасибо, но этих Сиром по-прежнему полно здесь!";
		next;
	mes $@npcnames$;
	mes "Мне нужно сделать кое-какой горячительный напиток. Ну... чтобы не замёрзнуть совсем. Поможешь?";
		next;
	mes $@npcnames$;
	mes "Нужно ещё убить ^3131FF30 шт. Siroma^000000 и";
	mes "принести мне ^3131FF30 шт. <ITEMLINK>Ice Cubic<INFO>7066</INFO></ITEMLINK>";
	mes "1 шт. <ITEMLINK>Milk<INFO>519</INFO></ITEMLINK> и 1шт. <ITEMLINK>Sweet Sauce<INFO>7453</INFO></ITEMLINK>^000000";
	mes "Ладно?";
		para_2nd01 = 19;
		erasequest 7230;	// Siroma hunting
		setquest 7231;	// Hunting and Gathering
		getexp 40000,40000;
		npcskill "AL_HEAL",10,99,60;
		percentheal 0,100;
		}
		else {
	mes "Пожалуйста, убей ^3131FF30 шт. Siroma^000000. Терпеть их не могу.";
		}
	}
		else if (para_2nd01 == 19) {
		if (questprogress(7231,HUNTING) == 2 && countitem(Ice_Piece) > 29 && countitem(Sweet_Sauce) > 0 && countitem(Milk) > 0) {
	mes "Ура-ура, ты справился!";
		next;
	mes $@npcnames$;
	mes "Ну теперь-то я буду в порядке, можешь обо мне не беспокоиться.";
		next;
	mes $@npcnames$;
	mes "Возвращайся в ^31CE31Центральный офис Группы Эдем^000000 за наградой.";
		delitem Ice_Piece,30;
		delitem Sweet_Sauce,1;
		delitem Milk,1;
		para_2nd01 = 20;
		erasequest 7231;	// Hunting and Gathering
		setquest 7232;	// Report to Instructor Ur
		getexp 40000,40000;
		}
		else {
	mes "Нужно ещё убить ^3131FF30 шт. Siroma^000000 и";
	mes "принести мне ^3131FF30 шт. <ITEMLINK>Ice Cubic<INFO>7066</INFO></ITEMLINK>";
	mes "1 шт. <ITEMLINK>Milk<INFO>519</INFO></ITEMLINK> и 1шт. <ITEMLINK>Sweet Sauce<INFO>7453</INFO></ITEMLINK>^000000";
	mes "Ладно?";
		}
	}
		else if (para_2nd01 == 20) {
	mes "Возвращайся в ^31CE31Центральный офис Группы Эдем^000000 за наградой.";
		}
	else
		mes "Alas, is there anywhere where the buildup of ice caps is more than here?";
	close;
}

moc_para01,112,96,5	script	Administrator Michael	4_M_RUSMAN1,{
	mes "[Michael]";
	mes "Why did you come here?";
	next;
	switch (select("To get supplies:Where is here?:Upgrade equipment")) {
		mes "[Michael]";
	case 1:
		if (para_suv01 == 11) {
			mes "If you've completed step 1";
			mes "we can supply you with a Eden Group Hat, Uniform, Manteau and Boots.";
			mes "^4d4dffCheck your inventory first.^000000";
			next;
			if (select("Let me check my inventory:I have enough room.") == 1) {
				mes "[Michael]";
				mes "Make sure you have enough room for the supplies.";
				close;
			}
			mes "[Michael]";
			mes "Two of the supplies, the ^4d4dffHat and Manteau^000000,";
			mes "will only be given out once.";
			mes "So treat them with caution and care.";
			next;
			mes "[Michael]";
			mes "As for the Boots and the Uniforms, you will receive better quality ones based on your course grades.";
			next;
			mes "[Michael]";
			mes "One Eden Group Hat.";
			mes "One Eden Group Uniform I.";
			mes "One pair of Eden Group Boots I.";
			mes "One Eden Group Manteau.";
			mes "A total of 4 supplies, that's all.";
			para_suv01 = 12;
			para_suv02 = 1;
			getitem Para_Team_Hat,1;
			getitem Para_Team_Manteau,1;
			getitem Para_Team_Boots1,1;
			getitem Para_Team_Uniform1,1;
			next;
			mes "[Michael]";
			mes "Is that correct?";
			mes "It is manufactured for beginners so they don't have the best effect but they're still cheaper than equipment in the shops.";
			next;
			mes "[Michael]";
			mes "We made them especially for the Eden Group.";
		}
		else if (para_suv01 == 22) {
			mes "If you've completed step 2, we offer extra weapons including the basic equipment.";
			next;
			mes "[Michael]";
			mes "We have chosen the proper weapon for each class.";
			mes "But we can't support some classes that can't join us.";
			next;
			mes "[Michael]";
			mes "We can't manufacture all of the weapons in the world, don't you agree?";
			next;
			mes "[Michael]";
			mes "We will supply 1 Weapon, Shoes and Uniform so a total of three things.";
			mes "Also we supply extra things to consider some members who can't use some of the supplies.";
			next;
			mes "[Michael]";
			mes "^4d4dffPlease check your inventory to get those items.^000000";
			next;
			if (select("I will make more space.:I have got enough space.") == 1) {
				mes "[Michael]";
				mes "Make enough space.";
				close;
			}
			mes "[Michael]";
			if (Class == Job_Swordman || Class == Job_Swordman_High || Class == Job_Knight || Class == Job_Crusader) {
				callsub S_Select,"We have one and Two-handed swords",
					P_Slayer1,"Eden Slayer I","Two-handed sword","Attack 162","",
					P_Sabre1,"Eden Saber I","One-handed sword","Attack 147","This is what we strive for.";
			}
			if (Class == Job_Thief || Class == Job_Thief_High || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Ninja || Class == Job_Novice || Class == Job_Novice_High) {
				callsub S_Select,"",
					P_Dagger1,"Eden Dagger I","Dagger","MATK+60, attack 124","This is what we strive for.";
			}
			if (Class == Job_Merchant || Class == Job_Merchant_High || Class == Job_Blacksmith || Class == Job_Alchemist) {
				callsub S_Select,"We have a mace and a One-handed sword",
					P_Sabre1,"Eden Saber I","One-handed sword","Attack 147","This is what we strive for.",
					P_Mace1,"Eden Mace I","Mace","Attack 142","";
			}
			if (Class == Job_Archer || Class == Job_Archer_High || Class == Job_Hunter || Class == Job_Dancer || Class == Job_Bard) {
				callsub S_Select,"",
					P_Bow1,"Eden Bow I","Bow","Attack 82","";
			}
			if (Class == Job_Acolyte || Class == Job_Acolyte_High || Class == Job_Priest || Class == Job_Monk) {
				callsub S_Select,"We have a mace and a staff",
					P_Mace1,"Eden Mace I","Mace","Attack 142","",
					P_Staff1,"Eden Staff I","Staff","INT+2, MATK+125, attack 60","";
			}
			if (Class == Job_Mage || Class == Job_Mage_High || Class == Job_Wizard || Class == Job_Sage) {
				callsub S_Select,"",
					P_Staff1,"Eden Staff I","Staff","INT+2, MATK+125, attack 60","";
			}
			if (Class == Job_Gunslinger) {
				callsub S_Select,"",
					P_Revolver1,"Eden Revolver I","Revolver","HIT-5, attack 44","";
			}

			mes "Let me see... you will receive..";
			mes "the Eden Group Boots II and Uniform II.";
			next;
			mes "[Michael]";
			para_suv01 = 23;
			getitem P_Dagger1,1;
			getitem Para_Team_Boots2,1;
			getitem Para_Team_Uniform2,1;
			if (para_suv02 == 0) {
				mes "I don't know what weapon will suit you so, you'll get a Dagger.";
				mes "You don't have a record of receiving any supplies";
				mes "so, you'll receive the Eden Group Hat and Manteau aswell.";
				getitem Para_Team_Hat,1;
				getitem Para_Team_Manteau,1;
				para_suv02 = 2;
				next;
				mes "[Michael]";
				mes "Check your supplies again and look after it.";
				close;
			}
			para_suv02 = 2;
			mes "A Weapon, Uniform and Boots all 3 supplies.";
			mes "I don't know what weapon will suit you so, you'll get a Dagger.";
			mes "Please check it again.";
			next;
			mes "[Michael]";
			mes "I hope they're useful to you.";
		}
		else if (para_suv01 == 37) {
			mes "You've completed the last training course.";
			mes "It's time for you to receive a new weapon.";
			next;
			mes "[Michael]";
			mes "We have more upgraded weapons, uniforms and boots.";
			mes "Ah, in case of the weapon that was made only for 1st jobs.";
			mes "So, I can't offer them to higher jobs.";
			next;
			mes "[Michael]";
			mes "^4d4dffPlease check you inventory to get those supplies.^000000";
			next;
			if (select("I'll come back.:I have enough room.") == 1) {
				mes "[Michael]";
				mes "Make sure you have enough room.";
				close;
			}
			mes "[Michael]";
			if (Class == Job_Swordman || Class == Job_Swordman_High || Class == Job_Knight || Class == Job_Crusader) {
				callsub S_Select,"We have one and Two-handed swords",
					P_Sabre2,"Eden Saber II","One-handed sword","Attack 170","",
					P_Slayer2,"Eden Slayer II","Two-handed sword","Attack 185","";
			}
			if (Class == Job_Thief || Class == Job_Thief_High || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Novice || Class == Job_Novice_High || Class == Job_SuperNovice || Class == Job_Soul_Linker || Class == Job_Ninja) {
				callsub S_Select,"",
					P_Dagger2,"Eden Dagger II","Dagger","MATK+70, attack 158","";
			}
			if (Class == Job_Acolyte || Class == Job_Acolyte_High || Class == Job_Priest || Class == Job_Monk) {
				callsub S_Select,"We have a mace and a staff",
					P_Mace2,"Eden Mace II","Mace","Attack 163","",
					P_Staff2,"Eden Staff II","Staff","INT+3, MATK+150, attack 60","";
			}
			if (Class == Job_Archer || Class == Job_Archer_High || Class == Job_Hunter || Class == Job_Dancer || Class == Job_Bard) {
				callsub S_Select,"",
					P_Bow2,"Eden Bow II","Bow","Attack 82","";
			}
			if (Class == Job_Mage || Class == Job_Mage_High || Class == Job_Wizard || Class == Job_Sage) {
				callsub S_Select,"",
					P_Staff2,"Eden Staff II","Staff","INT+3, MATK+155, attack 60","";
			}
			if (Class == Job_Merchant || Class == Job_Merchant_High || Class == Job_Blacksmith || Class == Job_Alchemist) {
				callsub S_Select,"We have a mace and a One-handed sword",
					P_Sabre2,"Eden Saber II","One-handed sword","Attack 170","",
					P_Mace2,"Eden Mace II","Mace","Attack 163","";
			}
			if (Class == Job_Gunslinger) {
				callsub S_Select,"",
					P_Revolver2,"Eden Revolver II","Revolver","HIT-5, attack 60","";
			}
			mes "Let me see... you will receive..";
			mes "the Eden Group Boots III and Uniform III.";
			next;
			para_suv01 = 38;
			getitem Para_Team_Boots3,1;
			getitem Para_Team_Uniform3,1;
			mes "[Michael]";
			if (para_suv02 == 0) {
				mes "You don't have a record of receiving any supplies";
				mes "so, you'll receive the Eden Group Hat and Manteau aswell.";
				para_suv02 = 3;
				getitem Para_Team_Hat,1;
				getitem Para_Team_Manteau,1;
				next;
				mes "[Michael]";
				mes "Check your supplies again and look after it.";
				close;
			}
			para_suv02 = 3;
			mes "A Uniform and Boots all 2 supplies.";
			mes "Please check it again.";
			next;
			mes "[Michael]";
			mes "I hope they're useful to you.";
		}
		else {
			mes "Wait...I will check the record...";
			mes "...";
			mes "...hummmm.";
			next;
			mes "[Michael]";
			mes "Sorry, but I can't find any record that you can obtain supplies.";
			mes "Are you sure?";
		}
		close;
	case 2:
		mes "We store weapons, armor and other goods which were created by the Eden Group here.";
		mes "We also have a lot of special stuff.";
		next;
		mes "[Michael]";
		mes "To prepare for emergencies, we hav enough equipment and supplies for an entire army.";
		mes "Frankly... we don't have a use for it now but in case soemthing happens like in Morroc.";
		next;
		mes "[Michael]";
		mes "Just take a look around and don't touch anything.";
		next;
		mes "[Michael]";
		mes "If I make a mistake, Reke will punish me.";
		close;
	case 3:
		mes "You mean upgrading equipment, right?";
		mes "We can only upgrade the Eden Group Hat.";
		next;
		mes "[Michael]";
		if (para_suv02 == 3) {
			if (countitem(Para_Team_Hat) > 0) {
				disable_items;
				mes "What status bonus do you want to upgrade?";
				next;
				switch (select("Upgrade STR:Upgrade AGI:Upgrade VIT:Upgrade INT:Upgrade DEX:Upgrade LUK:Nevermind.")) {
				case 1: callsub S_Upgrade,"STR",4701;
				case 2: callsub S_Upgrade,"AGI",4731;
				case 3: callsub S_Upgrade,"VIT",4741;
				case 4: callsub S_Upgrade,"INT",4711;
				case 5: callsub S_Upgrade,"DEX",4721;
				case 6: callsub S_Upgrade,"LUK",4751;
				case 7:
					mes "[Michael]";
					mes "Why? It'll be beter than it is.";
					mes "Anyway, we can only offer you one Hat.";
					next;
					mes "[Michael]";
					mes "What you do with it is up to you.";
					close;
				}
			}
			mes "First come with a Hat that you want me to upgrade.";
			mes "Make sure that it's in your inventory, got it?";
			close;
		}
		if (para_suv02 == 4) {
			mes "Umm, didn't you upgrade this already?";
			mes "According to the records";
			mes ""+strcharinfo(0)+": Has already upgraded their Hat.";
			next;
			mes "[Michael]";
			mes "We can only offer 1 upgrade.";
			mes "Sorry but I can't do it twice.";
			close;
		}
		mes "You haven't received all the supplies up to step 3.";
		mes "Upgrading your Hat is a special service.";
		next;
		mes "[Michael]";
		mes "Sorry but I can't help you.";
		close;
	}
S_Upgrade:
	mes "[Michael]";
	mes "I see.";
	mes "I will ^4d4dffUpgrade "+ getarg(0) +"^000000.";
	mes "Are you sure?";
	next;
	switch (select("Yes I am.:No wait.")) {
	case 1:
		mes "[Michael]";
		mes "I will start to upgrade.";
		next;
		mes "[Michael]";
		mes "Here you are.";
		para_suv02 = 4;
		delitem Para_Team_Hat,1;
		getitem2 5583,1,1,0,0,0,0,0,getarg(1);
		close;
	case 2:
		mes "[Michael]";
		mes "Don't you want to upgrade?";
		close;
	}

S_Select:
	.@total_arg = getargcount();
	if (.@total_arg < 7)
		mes "We only have 1 weapon for you.";
	else {
		mes "What kind of weapon do you want?";
		mes getarg(0);
		mes "Here are the options.";
	}
	next;
	mes "[Michael]";
	for ( .@i = 1; .@i < .@total_arg; .@i += 5 ) {
		.@menu$ =  .@menu$ + getarg(.@i+1) + ":";
		mes getarg(.@i+1)+": "+ getarg(.@i+2) +". "+ getarg(.@i+3) +".";
	}
	if (.@total_arg < 7)
		mes "It is Lv. 2 and the required level is "+ (para_suv01 == 22 ? "26" : "40") +".";
	else
		mes "Both of them are Lv. 2 weapons and the required level is "+ (para_suv01 == 22 ? "26" : "40") +".";
	next;
	mes "[Michael]";
	mes "They also can't be traded with other players or be refined.";
	next;
	if (.@total_arg < 7) {
		.@i = 1;
		mes "[Michael]";
		mes "You'll receive the "+ getarg(.@i+1) +".";
		next;
		mes "[Michael]";
	}
	else {
		.@i = (select(.@menu$) -1) *5 +1;
		mes "[Michael]";
		mes "You've chosen the "+ getarg(.@i+1) +".";
	}
	if (para_suv01 == 22) {
		mes "Additionally you'll receive the Eden Group Boots II and Uniform II.";
		next;
		getitem Para_Team_Boots2,1;
		getitem Para_Team_Uniform2,1;
		para_suv01 = 23;
	}
	else {
		mes "Additionally you'll receive the Eden Group Boots III and Uniform III.";
		next;
		getitem Para_Team_Boots3,1;
		getitem Para_Team_Uniform3,1;
		para_suv01 = 38;
	}
	getitem getarg(.@i),1;
	mes "[Michael]";
	if (para_suv02 == 0) {
		mes "You don't have a record of receiving any supplies";
		mes "so, you'll receive the Eden Group Hat and Manteau aswell.";
		getitem Para_Team_Hat,1;
		getitem Para_Team_Manteau,1;
		if (para_suv01 == 22)
			para_suv02 = 2;
		else
			para_suv02 = 3;
		next;
		mes "[Michael]";
		mes "Check your supplies again and look after it.";
	}
	else {
		if (para_suv01 == 22)
			para_suv02 = 2;
		else
			para_suv02 = 3;
		mes "A "+ getarg(.@i+2) +", Uniform and Boots all 3 supplies.";
		mes "Please check it again.";
		next;
		mes "[Michael]";
		mes "I hope they're useful to you.";
		mes getarg(.@i+4);
	}
	close;
}

moc_para01,111,83,3	script	Торен#2nd10	2_M_OLDBLSMITH,{
	if (checkweight(Para_Team_Manteau2,5) == 0) {
		mes "- You have too many items in your inventory to continue -";
		close;
	}
	mes "[Thorn]";
	if (countitem(Para_Team_Mark) < 1) {
		mes "Хм..м. Ты не можешь возпользоваться моими услугами, для начала подойди к ^3355FFСекретарю^000000 и зарегистрируйся.";
		close;
	}
	mes "Йо! Чем могу помочь?";
	next;
	switch( select( "Где моя награда?", "Зачаруй мне...", "Give me new equipment." ) ) {
		mes "[Thorn]";
	case 3:
		if (para_2nd01 < 6) {
			mes "Hmm equipment strengthening.";
			mes "I don't exactly do that for just anyone.";
			mes "The first step is at least a higher degree of training so have you done the Eden Group training yet?";
			next;
			mes "[Thorn]";
			mes "You have not awakened yet.";
			mes "First do the missions set forth by Instructor Ur and I'll help you strengthen your equipment.";
			next;
			mes "[Thorn]";
			mes "I won't help you unless you do that first!";
		}
		else if (para_2nd04 == 3) {
			mes "Strengthen your equipment eh?";
			mes "I'll strengthen the new Eden Group equipment for you by giving it a random stat boost.";
			next;
			mes "[Thorn]";
			mes "So what equipment do you want to enhance?";
			next;
			switch( select( "Eden Group Manteau II", "Eden Group Armor IV", "Eden Group Boots IV" ) ) {
				case 1: callsub S_Enchant,Para_Team_Manteau2,"Manteau";
				case 2: callsub S_Enchant,Para_Team_Armor,"Armor";
				case 3: callsub S_Enchant,Para_Team_Boots4,"Boots";
			}
		}
		else {
			mes "I will strengthen your equipment after you've done a personal request of mine.";
			next;
			mes "[Thorn]";
			mes "I just want to be sure that you're worthy of using my services.";
		}
		close;
	case 2:
		if (para_2nd02 < 2) {
			mes "Сперва раздобудь ^3131FFПродвинутую Экипировку Эдема.^000000";
		}
		else if (para_2nd04 == 0) {
			mes "Хорошо, но для этого мне нужно пару предметов.";
			next;
			mes "[Thorn]";
			if (BaseLevel < 80) {
				mes "Принеси мне ^3131FF20 шт.^000000 <ITEMLINK>Iron Ore<INFO>1002</INFO></ITEMLINK>";
				mes "и ^3131FF10 шт.^000000 <ITEMLINK>Iron<INFO>998</INFO></ITEMLINK>";
			}
			else {
				mes "Принеси мне ^3131FF20 шт.^000000 <ITEMLINK>Used Iron Plate<INFO>7319</INFO></ITEMLINK>";
				.@add = 1;
			}
			next;
				para_2nd04 = 1 + .@add;
				setquest (7238 + .@add);	// Errands for Thorn (easy/hard)
				close;
		}
		else if (para_2nd04 == 1 || para_2nd04 == 2) {
			if (para_2nd04 == 1) {
				setarray .@item[0],Iron_Ore,Iron;
				setarray .@amount[0],20,10;
				setarray .@countitem[0],countitem(Iron_Ore),countitem(Iron);
				.@string$ = "Принеси мне ^3131FF20 шт.^000000 <ITEMLINK>Iron Ore<INFO>1002</INFO></ITEMLINK>";
				.@string$ = "и ^3131FF10 шт.^000000 <ITEMLINK>Iron<INFO>998</INFO></ITEMLINK>";
			}
			else {
				.@item[0] = 7319;
				.@amount[0] = 20;
				.@countitem[0] = countitem(Old_Steel_Plate);
				.@add = 1;
				.@string$ = "Принеси мне ^3131FF20 шт.^000000 <ITEMLINK>Used Iron Plate<INFO>7319</INFO></ITEMLINK>";
			}
			if (.@countitem[0] >= .@amount[0] && .@countitem[1] >= .@amount[1]) {
				mes "Let me guess...";
				mes "You've brought me the best quality materials.";
				mes "Good.";
				next;
				mes "[Thorn]";
				mes "I can always use more Iron materials.";
				mes "Instead of a normal reward I'll give you an advanced equipment.";
				next;
				mes "[Thorn]";
				mes "If at any time you think you have equipment that you need to strengthen come by me again.";
				delitem .@item[0],.@amount[0];
				if (.@countitem[1])
					delitem .@item[1],.@amount[1];
				para_2nd04 = 3;
				erasequest (7238 + .@add);
				setquest 7240;
			}
			else {
				mes .@string$;
			}
		}
		else if (para_2nd04 == 3) {
			mes "Now, that's it.";
			mes "That's enough for today.";
			mes "For now, ask me to strengthen your equipment and I'll do it for you.";
			next;
			mes "[Thorn]";
			mes "If you have one of these bring them to me.";
			mes "Eden Group Manteau II, Eden Group Armor IV, Eden Group Boots IV.";
		}
		else if (para_2nd04 == 4) {
			if (questprogress(7241,PLAYTIME) == 1) {
				mes "Come back later.";
				mes "You have to wait for some time first.";
			}
			else {
				mes "Uh-huh...";
				mes "What are we going to... oh don't worry.";
				mes "Come to me later.";
				erasequest 7241;	// Errands for Thorn timer
				para_2nd04 = 0;
			}
		}
		close;
	case 1:
		if (para_2nd02 < 1) {
			mes "Я тебе ничего не должен, проваливай!";
		}
		else if (para_2nd02 == 1) {
			mes "Ты, должно быть, ^3131FF"+strcharinfo(0)+",^000000 верно?";
			mes "Инструктор Ура говорил мне о тебе.";
			next;
			mes "У меня для тебя есть один неплохой набор экипировки, носи его с гордостью, ведь ты член ^31CE31Группы Эдем.^000000 И не вздумай продавать что-либо из этого.";
			next;
			mes "[Thorn]";
			mes "Можешь выбрать для себя ^4d4dffоружие.^000000";
			next;
			mes "[Thorn]";
			if (BaseJob == Job_Knight || BaseJob == Job_Crusader) {
				callsub L_Select,"One-handed sword, two-handed sword or spear.",
					P_Slayer3,"Eden Group Slayer III","Two-handed Sword, Attack 200",
					P_Saber3,"Eden Group Saber III","One-handed Sword, Attack 185",
					P_Sphere1,"Eden Group Spear I","One-handed, Attack 165";
			}
			else if (BaseJob == Job_Assassin) {
				callsub L_Select,"You have your choice of dagger or katar.",
					P_Dagger3,"Eden Group Dagger III","Dagger, MATK +80, ATK 165",
					P_Katar1,"Eden Group Katar I","Katar, ATK 155";
			}
			else if (BaseJob == Job_Rogue || BaseClass == Job_Novice)
				getitem P_Dagger3,1;
			else if (BaseJob == Job_Alchemist || BaseJob == Job_Blacksmith) {
				callsub L_Select,"Your options are Mace, Saber and Axe.",
					P_Mace3,"Eden Group Mace III","Mace, Attack 172",
					P_Saber3,"Eden Group Saber III","Sword, Attack 185",
					P_Two_Handed_Axe1,"Eden Group Axe I","Axe, Attack 195"; 
			}
			else if (BaseJob == Job_Wizard)
				getitem P_Staff3,1;
			else if (BaseJob == Job_Sage) {
				callsub L_Select,"",
					P_Staff3,"Eden Group Staff III","Staff, MATK + 170, INT +4, Attack 60",
					P_Dic1,"Eden Group Dictionary I","Book, MATK +100, Attack 135";
			}
			else if (BaseJob == Job_Priest) {
				callsub L_Select,"",
					P_Staff3,"Eden Group Staff III","Staff, MATK + 170, INT +4, Attack 60",
					P_Dic1,"Eden Group Dictionary I","Book, MATK +100, Attack 135",
					P_Mace3,"Eden Group Mace III","Mace, Attack 172";
			}
			else if (BaseJob == Job_Monk) {
				callsub L_Select,"",
					P_Knuckle1,"Eden Group Knuckles I","Knuckle, Attack 120",
					P_Mace3,"Eden Group Mace III","Mace, Attack 172";
			}
			else if (BaseJob == Job_Hunter)
				getitem P_Bow3,1;
			else if (BaseJob == Job_Bard) {
				callsub L_Select,"",
					P_Bow3,"Eden Group Bow III","Bow, Attack 140",
					P_String_Inst1,"Eden Group Guitar I","Guitar, Attack 125";
			}
			else if (BaseJob == Job_Dancer) {
				callsub L_Select,"",
					P_Bow3,"Eden Group Bow III","Bow, Attack 140",
					P_Tail1,"Eden Group Whip I","Whip, Attack 125";
			}
			else if (Class == Job_Ninja) {
				callsub L_Select,"",
					P_Dagger3,"Eden Group Dagger III","Dagger, MATK +80, ATK 165",
					P_Huuma_Shuriken1,"Eden Group Huuma Shuriken I","Huuma Suriken, MATK +50, ATK 170";
			}
			else if (Class == Job_Star_Gladiator)
				getitem P_Dic1,1;
			else if (Class == Job_Soul_Linker) {
				callsub L_Select,"",
					P_Dagger3,"Eden Group Dagger III","Dagger, MATK +80, ATK 165",
					P_Staff3,"Eden Group Staff III","Staff, MATK +170, INT +4, ATK 60";
			}
			else if (Class == Job_Gunslinger)
				getitem P_Revolver3,1;
			else {
				mes "Hmm, you are eligible to receive equipment.";
				mes "Yeah I understand that.";
				next;
				mes "[Thorn]";
				mes "Hmm something went wrong though. I'm not sure what...";
				close;
			}
			para_2nd02 = 2;
			getitem Para_Team_Hat2,1;
			getitem Para_Team_Manteau2,1;
			getitem Para_Team_Boots4,1;
			getitem Para_Team_Armor,1;
			mes "Увидимся позже. И удачи тебе в приключениях!";
		}
		else if (para_2nd02 == 2) {
			mes "Я уже выдал тебе наиболее продвинутую экипировку из имеющихся.";
		}
		else {
			mes "Have you gotten your gear yet?";
			mes "I can give you the gear but I can't strengthen it for you.";
			next;
			mes "[Thorn]";
			mes "Your armor can be strengthened by someone else.";
			mes "I wish I could but I can't.";
		}
	}
	close;
L_Select:
	mes getarg(0);
	for ( .@i = 1; .@i < getargcount(); .@i += 3 ) {
		.@menu$ =  .@menu$ + getarg(.@i+1) + ":";
		mes getarg(.@i+1)+" : "+ getarg(.@i+2);
	}
	next;
	.@i = (select(.@menu$) -1) *3 +1;
	mes "[Toren]";
	getitem getarg(.@i),1;
	return;
S_Enchant:
	mes "[Thorn]";
	if (countitem(getarg(0)) > 0) {
		setarray .@bonus[1],
			Luck2,
			Mdef4,
			Def3,
			Strength2,
			Mdef6,
			Def6,
			Agility2,
			Mdef8,
			Def9,
			Dexterity2,
			Inteligence2,
			Vitality2;
		.@1st = .@bonus[ rand(1,12) ];
		.@2nd = .@bonus[ rand(1,12) ];
		mes "Eden Group "+ getarg(1) +"?";
		mes "I understand.";
		mes "Remember the stats that are enhanced will be random.";
		mes "You sure you want me to enhance this?";
		next;
		switch( select( "I changed my mind.", "Yes, enhance it." ) ) {
			mes "[Thorn]";
		case 1:
			mes "You sure you don't want to enhance it?";
			mes "It's your choice.";
			close;
		case 2:
			mes "I understand.";
			mes "Let's begin the enhancement.";
			next;
			specialeffect EF_REPAIRWEAPON;
			progressbar "ffff00",3;
			delitem getarg(0),1;
			para_2nd04 = 4;
			changequest 7240,7241;
			getitem2 getarg(0),1,1,0,0,0,0,.@1st,.@2nd;
			mes "[Thorn]";
			mes "Ok, seems that the enhancement went well.";
			mes "If you don't like the result then you can come back again tomorrow.";
			close;
		}
	}
	mes "Hmm... Don't you have the "+ getarg(1) +"?";
	mes "I don't think you have it with you.";
	close;
}

moc_para01,112,79,3	script	Weapons Expert BK#2nd11	4_M_REPAIR,{
	setarray .@wplist[0],
		P_Slayer3,
		P_Saber3,
		P_Dagger3,
		P_Katar1,
		P_Two_Handed_Axe1,
		P_Sphere1,
		P_Staff3,
		P_Mace3,
		P_Bow3,
		P_Dic1,
		P_String_Inst1,
		P_Tail1,
		P_Revolver3,
		P_Knuckle1,
		P_Huuma_Shuriken1;
	.@menu$ = "Eden Group Slayer III:" +
		"Eden Group Saber III:" +
		"Eden Group Dagger III:" +
		"Eden Group Katar I:" +
		"Eden Group Axe I:" +
		"Eden Group Spear I:" +
		"Eden Group Staff III:" +
		"Eden Group Mace III:" +
		"Eden Group Bow III:" +
		"Eden Group Dictionary I:" +
		"Eden Group Guitar I:" +
		"Eden Group Whip I:" +
		"Eden Group Revolver III:" +
		"Eden Group Knuckles I:" +
		"Eden Group Huuma Shuriken I";
	mes "[BK]";
	mes "What's happening?";
	mes "No way?!";
	next;
	if (select( "Enhancing weapons.", "What?" ) == 2) {
		mes "[BK]";
		mes "Yeah?";
		mes "Are you asking me what I know?";
		next;
		select("...??");
		mes "[BK]";
		mes ".....????";
		close;
	}
	mes "[BK]";
	mes "Ah, you're here to enhance your gear.";
	mes "Okay, shall we?";
	next;
	mes "[BK]";
	if (para_2nd02 < 2) {
		mes "You have to have the equipment first in order for me to do anything.";
		mes "Didn't you get anything from Thorn yet?";
	}
	else if (para_2nd02 == 2) {
		if (para_2nd01 < 11) {
			mes "Hmm, no.";
			mes "I don't have permission from Instructor Ur.";
			mes "You have to finish your training.";
			next;
			mes "[BK]";
			mes "Once you do that I can help you.";
			mes "Until then I won't talk to you.";
		}
		else {
			mes "Okay, what weapon do you want to enhance?";
			next;
			.@s = select(.@menu$) -1;
			mes "[BK]";
			if (countitem(.@wplist[.@s]) > 0) {
				mes "Ok for the first reinforcement.";
				mes "ATK + 3% or MATK + 3%?";
				mes "I'll give you the option to grant this effect on the selected gear.";
				next;
				mes "[BK]";
				mes "You can't change your mind after so choose wisely.";
				next;
				if (select( "ATK +3%","MATK +3%" ) == 1) {
					.@string$ = "Ok, you've chosen to raise physical attack.";
					.@card = Atk3;
				}
				else {
					.@string$ = "Ok, you've chosen to raise magical attack.";
					.@card = Matk3;
					.@add = 1;
				}
				mes "[BK]";
				mes .@string$;
				mes "Would you look at that. Your weapon will now be stronger.";
				para_2nd03 = 1 + .@add;
				next;
				specialeffect EF_REPAIRWEAPON;
				progressbar "ffff00",3;
				para_2nd02 = 3;
				delitem .@wplist[.@s],1;
				getitem2 .@wplist[.@s],1,1,0,0,0,0,0,.@card;
				mes "[BK]";
				mes "Isn't it magnificent?";
				mes "I know, I know, I'm pretty amazing!";
			}
			else {
				mes "Are you kidding me?";
				mes "You don't seem to have that weapon in your possession.";
			}
		}
	}
	else if (para_2nd02 == 3) {
		if (para_2nd01 < 16) {
			mes "Hmm, I'm not sure you're ready.";
			mes "All 3 steps of Instructor Ur's missions have to be completed first.";
			next;
			mes "[BK]";
			mes "You get what I'm saying?";
			mes "Finish the third mission from Instructor Ur.";
		}
		else {
			mes "Good. So you previously received an addition to Atk or Matk.";
			mes "For this option you can choose from Brute, Plant, Fish, Dragon, Increased Heal.";
			next;
			mes "[BK]";
			mes "Once you've chosen you can't change your mind again.";
			mes "But your weapon will increase damage to the type of enhancement you pick.";
			next;
			mes "[BK]";
			mes "Basically I will add a random monster card with the property type that you choose.";
			mes "Good luck!";
			next;
			switch( select( "Brute Type", "Plant Type", "Insect Type", "Fish Type", "Dragon Type", "Increased Heal" ) ) {
			case 1:
				setarray .@arg[0],Goblin_Card,Bradium_Goram_Card,111;
				.@type$ = "Brute";
				break;
			case 2:
				setarray .@arg[0],Scorpion_Card,Nepenthes_Card,121;
				.@type$ = "Plant";
				break;
			case 3:
				setarray .@arg[0],Caramel_Card,Pinguicula_Card,131;
				.@type$ = "Insect";
				break;
			case 4:
				setarray .@arg[0],Flora_Card,Naga_Card,141;
				.@type$ = "Fish";
				break;
			case 5:
				setarray .@arg[0],Petit_Card,Egg_Of_Draco_Card,151;
				.@type$ = "Dragon";
				break;
			case 6:
				setarray .@arg[0],Heal_Amount2,Heal_Amount2,161;
			}
			mes "[BK]";
			for ( .@i = 0; .@i < 15; .@i++ ) {
				if (countitem(.@wplist[.@i]) > 0) {
					if (.@arg[0] == Heal_Amount2)
						mes "Good. Your weapon will now increase Heal effectiveness.";
					else
						mes "Good. Your weapon will increase attacks to "+ .@type$ +" type monsters.";
					next;
					specialeffect EF_REPAIRWEAPON;
					progressbar "ffff00",3;
					delitem .@wplist[.@i],1;
					para_2nd02 = 4;
					if (para_2nd03 == 1) {
						para_2nd03 = .@arg[2];
						getitem2 .@wplist[.@i],1,1,0,0,0,0,.@arg[0],Atk3;
					}
					else {
						para_2nd03 = .@arg[2] + 100;
						getitem2 .@wplist[.@i],1,1,0,0,0,0,.@arg[1],Matk3;
					}
					mes "[BK]";
					mes "Isn't it magnificent?";
					mes "I know, I know, I'm pretty amazing!";
					close;
				}
			}
			mes "Sorry, but it doesn't seem like you have a weapon that can be enhanced.";
			mes "How did this happen?";
			close;
		}
	}
	else if (para_2nd02 == 4) {
		if (para_2nd01 < 30) {
			mes "Instructor Ur has a lot of training missions doesn't he?";
			mes "There's only one more stage.";
			mes "Reach the final stage of training.";
		}
		else {
			mes "Okay, this is the last step.";
			mes "I will make your weapon even more enhanced.";
			next;
			mes "[BK]";
			mes "The card added from the previous step will be doubled.";
			mes "And if you have a healing weapon it will increase it's healing efficiency.";
			mes "You understand?";
			next;
			mes "[BK]";
			mes "Ok what weapon did you have now?";
			next;
			.@s = select(.@menu$) -1;
			mes "[BK]";
			if (countitem(.@wplist[.@s]) > 0) {
				mes "Doubling the strength of your bonus stat.";
				next;
				specialeffect EF_REPAIRWEAPON;
				progressbar "ffff00",3;
				delitem .@wplist[.@s],1;
				para_2nd02 = 5;
				if (para_2nd03 == 111)
					getitem2 .@wplist[.@s],1,1,0,0,0,Goblin_Card,Goblin_Card,Atk3;
				else if (para_2nd03 == 121)
					getitem2 .@wplist[.@s],1,1,0,0,0,Scorpion_Card,Scorpion_Card,Atk3;
				else if (para_2nd03 == 131)
					getitem2 .@wplist[.@s],1,1,0,0,0,Caramel_Card,Caramel_Card,Atk3;
				else if (para_2nd03 == 141)
					getitem2 .@wplist[.@s],1,1,0,0,0,Flora_Card,Flora_Card,Atk3;
				else if (para_2nd03 == 151)
					getitem2 .@wplist[.@s],1,1,0,0,0,Petit_Card,Petit_Card,Atk3;
				else if (para_2nd03 == 161)
					getitem2 .@wplist[.@s],1,1,0,0,0,Heal_Amount2,Heal_Amount2,Atk3;
				else if (para_2nd03 == 211)
					getitem2 .@wplist[.@s],1,1,0,0,0,Bradium_Goram_Card,Bradium_Goram_Card,Matk3;
				else if (para_2nd03 == 221)
					getitem2 .@wplist[.@s],1,1,0,0,0,Nepenthes_Card,Nepenthes_Card,Matk3;
				else if (para_2nd03 == 231)
					getitem2 .@wplist[.@s],1,1,0,0,0,Pinguicula_Card,Pinguicula_Card,Matk3;
				else if (para_2nd03 == 241)
					getitem2 .@wplist[.@s],1,1,0,0,0,Naga_Card,Naga_Card,Matk3;
				else if (para_2nd03 == 251)
					getitem2 .@wplist[.@s],1,1,0,0,0,Egg_Of_Draco_Card,Egg_Of_Draco_Card,Matk3;
				else if (para_2nd03 == 261)
					getitem2 .@wplist[.@s],1,1,0,0,0,Heal_Amount2,Heal_Amount2,Matk3;
				mes "[BK]";
				mes "Isn't it magnificent?";
				mes "I know, I know, I'm pretty amazing!";
			}
			else {
				mes "Hey, you think I'm joking?";
				mes "Do you have the weapons or not?";
			}
		}
	}
	else if (para_2nd02 > 4) {
		mes "How do you like your enhanced weapon?";
		mes "Hopefully it has helped you.";
		next;
		mes "[BK]";
		mes "I've given you the peak of your weapon's efficiency.";
		mes "Weapons aren't the only things that need strength, though, don't you agree?";
		next;
		mes "[BK]";
		mes "Come on admit it.";
		mes "Thorn gave inspiration and I intend on providing strong equipment, that's how to live life.";
		mes "Hahahaha!";
	}
	close;
}

 

я тоже выбираю герка, он идентичен по коду ближе к еА ну, это мне так кажется ибо многое почти в коде одинаковое

я вообще не удивлюсь что бывший еА это он же и есть Геркулес просто люди некоторые поменялись или же новенькие в команде

хотя я могу и ошибаться это свойственно людям -)