Перейти к содержанию

lost81

Граждане
  • Постов

    291
  • Зарегистрирован

  • Посещение

Весь контент lost81

  1. да просто в лом удалять было, да и мало ли для каких целей может понадобиться другим... ;)
  2. Все твои косяки были из-за того, что даже при PCVampire == 0 NPC'и считают тебя вампиром если у тебя в характеристиках есть "вампиризм"!
  3. да хоть на кольцо или амулет! :D
  4. если хорошо посмотришь, то увидишь перед 2-мя из них ";" => нужны не все! :P
  5. Вполне реально! ;) специально для тебя! наслаждайся! B) забирай здесь!
  6. [morrscript]begin No_Vamp_helm ; По заказу DobrbIi_NeiL ; Автор: lost81 (lost81@mail.ru) 15.06.2005 ; Скрипт цепляется на все что можно одеть ; позволяет нормально жить и общаться с другими неписями в состоянии вампиризма ; до тех пор пока вещь одета на игроке, при ее снятии к игроку по прежнему относятся как к вампиру! short OnPCEquip short status if ( MenuMode == 1 ) return endif if ( VampClan == 1 ) if ( OnPCEquip == 1 ) if ( status == 0 ) Player->RemoveSpell, "Vampire Attributes" Player->RemoveSpell, "Vampire Skills" Player->RemoveSpell, "Vampire Immunities" Player->RemoveSpell, "Vampire Sun Damage" Player->RemoveSpell, "Vampire Touch" Player->RemoveSpell, "Vampire Aundae Specials" ; Player->RemoveSpell, "Vampire Berne Specials" ; Player->RemoveSpell, "Vampire Quarra Specials" set PCVampire to 0 set VampClan to -1 StopScript vampdreamScript set status to 1 endif endif endif if ( OnPCEquip == 0 ) if ( status == 1 ) Player->AddSpell, "Vampire Attributes" Player->AddSpell, "Vampire Skills" Player->AddSpell, "Vampire Immunities" Player->AddSpell, "Vampire Sun Damage" Player->AddSpell, "Vampire Touch" Player->AddSpell, "Vampire Aundae Specials" ; Player->AddSpell, "Vampire Berne Specials" ; Player->AddSpell, "Vampire Quarra Specials" set PCVampire to 1 set VampClan to 1 StartScript vampdreamScript set status to 0 endif endif if ( VampClan == 2 ) if ( OnPCEquip == 1 ) if ( status == 0 ) Player->RemoveSpell, "Vampire Attributes" Player->RemoveSpell, "Vampire Skills" Player->RemoveSpell, "Vampire Immunities" Player->RemoveSpell, "Vampire Sun Damage" Player->RemoveSpell, "Vampire Touch" ; Player->RemoveSpell, "Vampire Aundae Specials" Player->RemoveSpell, "Vampire Berne Specials" ; Player->RemoveSpell, "Vampire Quarra Specials" set PCVampire to 0 set VampClan to -1 set status to 2 StopScript vampdreamScript endif endif endif if ( OnPCEquip == 0 ) if ( status == 2 ) Player->AddSpell, "Vampire Attributes" Player->AddSpell, "Vampire Skills" Player->AddSpell, "Vampire Immunities" Player->AddSpell, "Vampire Sun Damage" Player->AddSpell, "Vampire Touch" ; Player->AddSpell, "Vampire Aundae Specials" Player->AddSpell, "Vampire Berne Specials" ; Player->AddSpell, "Vampire Quarra Specials" set PCVampire to 1 set VampClan to 2 set status to 0 StartScript vampdreamScript endif endif if ( VampClan == 3 ) if ( OnPCEquip == 1 ) if ( status == 0 ) Player->RemoveSpell, "Vampire Attributes" Player->RemoveSpell, "Vampire Skills" Player->RemoveSpell, "Vampire Immunities" Player->RemoveSpell, "Vampire Sun Damage" Player->RemoveSpell, "Vampire Touch" ; Player->RemoveSpell, "Vampire Aundae Specials" ; Player->RemoveSpell, "Vampire Berne Specials" Player->RemoveSpell, "Vampire Quarra Specials" set PCVampire to 0 set VampClan to -1 set status to 3 StopScript vampdreamScript endif endif endif if ( OnPCEquip == 0 ) if ( status == 3 ) Player->AddSpell, "Vampire Attributes" Player->AddSpell, "Vampire Skills" Player->AddSpell, "Vampire Immunities" Player->AddSpell, "Vampire Sun Damage" Player->AddSpell, "Vampire Touch" ; Player->AddSpell, "Vampire Aundae Specials" ; Player->AddSpell, "Vampire Berne Specials" Player->AddSpell, "Vampire Quarra Specials" set PCVampire to 1 set VampClan to 3 set status to 0 StartScript vampdreamScript endif endif end [/morrscript] Предположительно скрипт должен вешаться на какой-нибудь шлем (я бы повесил с наименьшими харрактеристиками, дабы не облегчать жизнь конечному юзеру!)
×
×
  • Создать...