Форум HeroesWorld-а - Показать сообщение отдельно - Скрипты
Тема: Скрипты
Показать сообщение отдельно
#209
Старый 27.08.2011, 16:34
  #209
^
Ment
 
Аватар для Ment
📖
Регистрация: 30.10.2009
Адрес: Национальный заповедник
Сообщения: 31052
Регистрация: 30.10.2009
Адрес: Национальный заповедник
Сообщения: 31052
По умолчанию
Re: Скрипты

Ну вот пример из моей карты (по понедельникам прибывает караван):
function Caravan()
if GetDate(DAY_OF_WEEK)==1 then
goldy=GetPlayerResource(1, 6)+diff*10000;
SetPlayerResource(2, 6, goldy);
MessageBox(GetMapDataPath()..'NewCar.txt');
CreateCaravan('CN', 1, 0, 180, 1,0, 184, 14);
sleep(2);
if nom==0 then
AddObjectCreatures('CN',106,(5-diff)*10);
AddObjectCreatures('CN',107,(5-diff)*5);
elseif nom==1 then
AddObjectCreatures('CN',106,(5-diff)*20);
AddObjectCreatures('CN',107,(5-diff)*10);
AddObjectCreatures('CN',108,(5-diff)*5);
elseif nom==2 then
AddObjectCreatures('CN',106,(5-diff)*20);
AddObjectCreatures('CN',107,(5-diff)*10);
AddObjectCreatures('CN',108,(5-diff)*5);
AddObjectCreatures('CN',109,(5-diff)*3);
AddObjectCreatures('CN',110,(5-diff)*2);
elseif nom==3 then
AddObjectCreatures('CN',106,(5-diff)*30);
AddObjectCreatures('CN',107,(5-diff)*15);
AddObjectCreatures('CN',108,(5-diff)*8);
AddObjectCreatures('CN',109,(5-diff)*5);
AddObjectCreatures('CN',110,(5-diff)*3);
elseif nom==4 then
AddObjectCreatures('CN',106,(5-diff)*30);
AddObjectCreatures('CN',107,(5-diff)*15);
AddObjectCreatures('CN',108,(5-diff)*8);
AddObjectCreatures('CN',109,(5-diff)*5);
AddObjectCreatures('CN',110,(5-diff)*3);
AddObjectCreatures('CN',111,(5-diff)*2);
else
AddObjectCreatures('CN',106,(5-diff)*30);
AddObjectCreatures('CN',107,(5-diff)*15);
AddObjectCreatures('CN',108,(5-diff)*8);
AddObjectCreatures('CN',109,(5-diff)*5);
AddObjectCreatures('CN',110,(5-diff)*3);
AddObjectCreatures('CN',111,(5-diff)*2);
AddObjectCreatures('CN',112,(5-diff)*1);
end;
nom=nom+1;
end;
end;
Trigger(NEW_DAY_TRIGGER,'Caravan');
Ment вне форума
Ответить с цитированием