Форум HeroesWorld-а - Показать сообщение отдельно - Скрипты
Тема: Скрипты
Показать сообщение отдельно
#1009
Старый 26.02.2013, 00:00
  #1009
^
RedHeavenHero
 
Аватар для RedHeavenHero
📖
Регистрация: 10.02.2012
Сообщения: 2380
Выставка наград
Регистрация: 10.02.2012
Сообщения: 2380
Выставка наград
По умолчанию
Re: Скрипты

Есть много способов. Представлю один из них:
	SetObjectEnabled("имя гарнизона", nil);
Trigger(4, "имя гарнизона", "capture_gar");

function capture_gar(hero)
	local a = {};
	a[1], a[3], a[5], a[7], a[9], a[11], a[13] = GetObjectCreaturesTypes("имя гарнизона");
	for i = 1, 7 do
		if a[i*2-1] ~= 0 then
			a[i*2] = 2 * GetObjectCreatures("имя гарнизона", a[i*2-1]);
		end;
	end;
	SetObjectEnabled("имя гарнизона", 1);
	Trigger(4, "имя гарнизона", nil);
	MakeHeroInteractWithObject(hero, "имя гарнизона");
	local i = GetLastSavedCombatIndex();
	while i == GetLastSavedCombatIndex() do
		sleep(1);
	end;
	if not IsHeroAlive(hero) then 
		SetObjectEnabled("имя гарнизона", nil);
		Trigger(4, "имя гарнизона", "capture_gar");
		return
	end;
	for i = 1, 7 do
		if a[i*2] then
			AddObjectCreatures("имя гарнизона", a[i*2-1], a[i*2]);
		end;
	end;
	DenyGarrisonCreaturesTakeAway("имя гарнизона", 1);
end;
Тут надо только заменить "имя гарнизона" на скриптовое имя вашего гарнизона. В скрипте оно должно писаться в кавычках, а в редакторе (в поле Name в свойствах объекта) - без.
__________________
Карты для Героев Меча и Магии 5
Одиночные: Завеса срывается, Посол, Последний рывок, Эхо Пустоты
Кампания: Империя Единорога

Существа NCF
Орден Порядка: 1
Нейтралы: 1 2 3 4
Карты для Героев Меча и Магии 5
Одиночные: Завеса срывается, Посол, Последний рывок, Эхо Пустоты
Кампания: Империя Единорога

Существа NCF
Орден Порядка: 1
Нейтралы: 1 2 3 4
RedHeavenHero вне форума
Ответить с цитированием