Скрипты на заказ

[Tiberius Flavius]

Блин, действительно классная идея. Учиться, учиться, учиться, как завещал Ленин. А к отдельным неписям действительно просто будет привязать скрипт. Так, надо быстрее доделать дым.:)

[stomoped]

Уважаемые скриптоделы, возможно вопрос где то кто то уже задавал, но я просто не нашел. Возможноли сделать скрипт анимации неписей только в определённом пространстве? То есть если например непися танцует то только вокруг одного места, не расползаясь по локации.

[Tiberius Flavius]

Естественно. За анимацию танцев (точнее, включение ее у неписей, в которых размещен anim_dancinggirl.nif) отвечает, если не ошибаюсь, переменная dance. Просто привязываешь ее в скрипте танцовщицы к определенному объекту внешнего мира (активатор, в принципе, это может быть любая тарелка) и отключаешь. Проще простого это можно сделать с помощью контроля дистанции (блок if (GetDistance "myobject" >= расстояние) ). Когда dance == 0, анимация не проигрывается. Соответственно, 1 запускает ее. Также, что я заметил, anim_dancinggirl изменяет группу idle 9, поэтому время от времени танцы прекращаются. Надо думать, здесь значение имеет настройки шансов групп idle.

[Rouge]

Товарищи,а кто выложит ссылочку на какие-нибудь анимационные группы (типа Dansinggirl)?А то хочется гарем Морровский разнообразить.

[Boma Kuro]

Также, что я заметил, anim_dancinggirl изменяет группу idle 9, поэтому время от времени танцы прекращаются. Надо думать, здесь значение имеет настройки шансов групп idle.

 

Конечно. Ставишь AiWander 0 0 0 0 0 0 0 0 0 0 0 100 - она танцует, ставишь AiWander 0 0 0 40 30 20 0 0 0 0 0 - она стоит и чешет пузо.

 

Товарищи,а кто выложит ссылочку на какие-нибудь анимационные группы (типа Dansinggirl)?А то хочется гарем Морровский разнообразить.

 

В смысле, новую анимацию для NPC? Поищи в "разработке" в теме про, хм, порно. Там, по-моему, давалась ссылка на Карловские анимации.

[Tiberius Flavius]

Конечно. Ставишь AiWander 0 0 0 0 0 0 0 0 0 0 0 100 - она танцует, ставишь AiWander 0 0 0 40 30 20 0 0 0 0 0 - она стоит и чешет пузо.

<{POST_SNAPBACK}>

Не совсем так. Не знаю, как с шансом 100, но даже с нулевым, если локальная переменная dance установлена в 1, то она будет танцевать. Правда, время от времени, она будет делать остановки.

[kovboi]

Мужики мушкет в руках перса такойже обьект, как и простот на земле. Проверил недаывно, и мушкет в контейнере тодже считываеться игрой за обьект. И вот еще если кому не жалко то скиньте мне модели( анимированые), ог-оружия, буду очень рад.

[DarkThief]

Здравствуйте!

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

[lost81]

Здравствуйте!

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

<{POST_SNAPBACK}>

 

Что-то я не совсем догнал, что ты хочешь? чтобы на опредененный вопрос добавлялся определенный предмет или этот предмет должен зависить от совокупности заданных вопросов? И на что ты планируешь такой скрипт вешать? (NPС? Activator? Door? Что-то другое?) Опиши поподробнее что тебе нужно, тогда людям будет легче работать, а то получается "иди туда, не знаю куда..."

[Boblen]

Вопросы в какой форме? Диалога или текст.сообщений (как в театре Морнхолда)?

[DarkThief]

2Bloblen

Именно как в театре Морнхолда.

2lost81

От совокупности вопросов, на активатор(или предмет).

 

Применяешь объект->Череда вопросов->В зависимости от совокупности вопросов в инвентаре перса появляется тот или иной объект.

[Boblen]

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

[DarkThief]

Скоро приведу.

[Rouge]

А че со звуками для ружжа затихли?А-у-у.

[Tiberius Flavius]

А че со звуками для ружжа затихли?А-у-у.

<{POST_SNAPBACK}>

Ты форум вообще просматриваешь? kovboi выложил классный скрипт. Отдельная тема как в Скрипторие, так и в Архиве скриптов.

[Boma Kuro]

Мужики мушкет в руках перса такойже обьект, как и простот на земле. Проверил недаывно, и мушкет в контейнере тодже считываеться игрой за обьект. И вот еще если кому не жалко то скиньте мне модели( анимированые), ог-оружия, буду очень рад.

Так, а у нас на базе?.. Или они вместе с Х ушли? Ладно, тогда я тебе на неделе скину...

[Boblen]

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

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

[Boblen]

Напишу...

[Boblen]

Нетестировавшийся вариант:

 

1. Скрипт этот нужно повесить на любой активатор (спрячте его под полом) в нужной комнате.

begin BES_Full_Unequip_Start

;Заметьте, что ## в первом блоке должны быть меньше, чем во втором
;А во втором блоке меньше тех, когда квест выполнен и игрока можно отпустить.

; Пока не достигли опред.прогресса - не работаем
if ( GetJournalIndex, "Journal" < ## )
  return
endif

;Достигли нужной точки квеста - запускаем глоб.скрипт
;Который будет контролировать снятие/надевание предметов.
if ( GetJournalIndex, "Journal" < ## )
  if ( ScriptRunning, "BES_Full_Unequip_Glob" == 0 )
     StartScript, "BES_Full_Unequip_Glob"
  endif
  return
endif

end

 

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

begin BES_Full_Unequip_Glob

short statum

; Когда квест выполнен - останавливаем глоб скрипт
if ( GetJournalIndex, "Journal" == ## )
  StopScript, "BES_Full_Unequip_Glob"
  return
endif

if ( statum == 0 );Проверяем на шлем
  if ( Player -> GetItemCount, "Your_Helm_ID" < 1 ); если нет - дадим
     Player -> AddItem, "Your_Helm_ID" 1
  endif
  if ( Player -> HasItemEquipped, "Your_Helm_ID" == 0 ); не надет - наденем
     Player -> Equip, "Your_Helm_ID"
  endif
  set statum to 1; и идем дальше
endif
if ( statum == 1 ); Проверяем штаны
  if ( Player -> GetItemCount, "Your_Pants_ID" < 1 ); если нет - дадим
     Player -> AddItem, "Your_Pants_ID" 1
  endif
  if ( Player -> HasItemEquipped, "Your_Pants_ID" == 0 ); не надет - наденем
     Player -> Equip, "Your_Pants_ID"
  endif
  set statum to 2; и идем дальше
endif

; Основная проверка на все типы брони, кроме шлема
; И если они небездоспешные, идем в нужную секцию
; Откуда добавляем нужный "фантомный" предмет,
; Тут же надеваем его на игрока
; И тут же снимаем, потом снова возвращаемся к проверке 
if ( statum == 2 )
  if ( Player->GetArmorType, 1 != -1 )
     set statum to 10
  elseif ( Player->GetArmorType, 2 != -1 )
     set statum to 11
  elseif ( Player->GetArmorType, 3 != -1 )
     set statum to 12
  elseif ( Player->GetArmorType, 4 != -1 )
     set statum to 13
  elseif ( Player->GetArmorType, 5 != -1 )
     set statum to 14
  elseif ( Player->GetArmorType, 6 != -1 )
     set statum to 15
  endif
  if ( Player->GetArmorType, 7 != -1 )
     set statum to 16
  elseif ( Player->GetArmorType, 8 != -1 )
     set statum to 17
  elseif ( Player->GetArmorType, 9 != -1 )
     set statum to 18
  elseif ( Player->GetArmorType, 10 != -1 )
     set statum to 19
  endif
  if ( Player -> HasItemEquipped, "Your_Helm_ID" == 0 )
     set statum to 0
  elseif ( Player -> HasItemEquipped, "Your_Pants_ID" == 0 )
     set statum to 1
  endif
endif

;Блок снимания/надевания нужных деталей брони.
if ( statum == 10 )
  Player -> Additem, "Your_dummy_Cuirass" 1
  Player -> Equip, "Your_dummy_Cuirass"
  Player -> RemoveItem, "Your_dummy_Cuirass" 1
  set statum to 2
elseif ( statum == 11 )
  Player -> Additem, "Your_dummy_LPauldron" 1
  Player -> Equip, "Your_dummy_LPauldron"
  Player -> RemoveItem, "Your_dummy_LPauldron" 1
  set statum to 2
elseif ( statum == 12 )
  Player -> Additem, "Your_dummy_RPauldron" 1
  Player -> Equip, "Your_dummy_RPauldron"
  Player -> RemoveItem, "Your_dummy_RPauldron" 1
  set statum to 2
elseif ( statum == 13 )
  Player -> Additem, "Your_dummy_Greaves" 1
  Player -> Equip, "Your_dummy_Greaves"
  Player -> RemoveItem, "Your_dummy_Greaves" 1
  set statum to 2
elseif ( statum == 14 )
  Player -> Additem, "Your_dummy_Boots" 1
  Player -> Equip, "Your_dummy_Boots"
  Player -> RemoveItem, "Your_dummy_Boots" 1
  set statum to 2
elseif ( statum == 15 )
  Player -> Additem, "Your_dummy_LGauntlet" 1
  Player -> Equip, "Your_dummy_LGauntlet"
  Player -> RemoveItem, "Your_dummy_LGauntlet" 1
  set statum to 2
endif
if ( statum == 16 )
  Player -> Additem, "Your_dummy_RGauntlet" 1
  Player -> Equip, "Your_dummy_RGauntlet"
  Player -> RemoveItem, "Your_dummy_RGauntlet" 1
  set statum to 2
elseif ( statum == 17 )
  Player -> Additem, "Your_dummy_Shield" 1
  Player -> Equip, "Your_dummy_Shield"
  Player -> RemoveItem, "Your_dummy_Shield" 1
  set statum to 2
elseif ( statum == 18 )
  Player -> Additem, "Your_dummy_LBracer" 1
  Player -> Equip, "Your_dummy_LBracer"
  Player -> RemoveItem, "Your_dummy_LBracer" 1
  set statum to 2
elseif ( statum == 19 )
  Player -> Additem, "Your_dummy_RBracer" 1
  Player -> Equip, "Your_dummy_RBracer"
  Player -> RemoveItem, "Your_dummy_RBracer" 1
  set statum to 2
endif

end

 

Скрипт на дверь пишется аналогично 1 скрипту, если кто другой не кинет, напишу его завтра.

[lost81]

На дверь можно так:

 

[morrscript]

begin LockedDoor

 

If (MenuMode == 1)

return

endif

 

If ( OnActivate == 1 )

If ( GetJournalIndex, "Journal" < ** ) ; **- номер финальной записи квеста

PlaySound "LockedDoor"

MessageBox "Квест не завершен, дверь не откроется!"

return

elseif ( GetJournalIndex, "Journal" >= ** )

Activate

endif

endif

 

end

[/morrscript]

[Boblen]

А чтобы злобный читер не вылетел оттуда телепортацией, переписываем мой стартовый скрипт так:

begin BES_Full_Unequip_Start

;Заметьте, что ## в первом блоке должны быть меньше, чем во втором
;А во втором блоке меньше тех, когда квест выполнен и игрока можно отпустить.

; Пока не достигли опред.прогресса - не работаем
if ( GetJournalIndex, "Journal" < ## )
 return
endif

;Достигли нужной точки квеста - запускаем глоб.скрипт
;Который будет контролировать снятие/надевание предметов.
if ( GetJournalIndex, "Journal" < ## )
 if ( ScriptRunning, "BES_Full_Unequip_Glob" == 0 )
    StartScript, "BES_Full_Unequip_Glob"
 endif
  if ( ScriptRunning, "BES_StopTeleport_Glob" == 0 )
    StartScript, "BES_StopTeleport_Glob"
 endif
 return
endif

end

 

И пишем следующий глоб скрипт:

 

begin BES_StopTeleport_Glob
float timer
float posX
float posY
float PosZ
short doOnce

if ( GetJournalIndex, "Journal" == ## ); выпустить игрока
  StopScript, BES_StopTeleport_Glob
  return
endif

if ( doOnce == 0 ); запоминаем координаты игрока
  set posX to ( player -> GetPos, x )
  set posY to ( player -> GetPos, y )
  set posZ to ( player -> GetPos, z )
  set doOnce to 1
endif

if ( timer <= 5 ); проверка идет раз в 5 сек.
  set timer to ( timer + GetSecondsPassed )
  return
endif

if ( GetPCCell, "Your_Cell_ID" == 1 ); Если в ячейке - 
  set doOnce to 0; запомним вновь его координаты
  set timer to 0
else; а если нет
  Player -> PositionCell, PosX, Posy, PosZ, 5400, "Your_Cell_ID"; геть назад
  MessageBox, "Куды собрался, гаденыш"
  set timer to 0
endif

end

 

Кстати, я советую на игрока надеть не только штаны, но и рубашку и мантию. Короче полный комплект одежды, а также кольца и амулеты... иначе он сможет использовать магию колец, мантий и прочего... Тогда придется чуть расширить 1 глоб.скрипт, но ничего сложного, расширяем первую часть, где надеваем не только шлем и штаны, но ивсе остальное... а также делаем такое же дополнение к части после проверки GetArmorType, также, как и для штанов со шлемом...

[Rouge]

Не,не надо надевать все подряд...шахтеры в мантиях не работают  :1anim_ag:

Да и стащить в том интерьере все равно нечего,т.к. везде охрана (по 7000 жизней у каждого - убить их просто нереально)

 

Спасибо за скрипты.

<{POST_SNAPBACK}>

Зато баланс потерял.

[Rouge]

Из моей темы в обсуждениях.

Мне нужно чтобы непись по указанию игрока из диалога начинал двигаться к пианину,садился за него(Карловская анимация) и активировал эту самую пианину.Напишите ПЛЗ.

[Boma Kuro]

Так, а у нас на базе?.. Или они вместе с Х ушли? Ладно, тогда я тебе на неделе скину...

[Ashkhan]

Люди! Помощь нужна. Я тут замутил плаг один, ну и написать скрипт не могу (хотя вроде умею). Мне нужно, чтобы при активации предмета-активатора произошло что-то вроде землетрясения. Например, чтобы с потолка камни падали. Я пробовал, но скорость у этих камней уж очень маленькая. Может, кто знает, как реализовать?