T_ScNpc_Mw_Map3VampQuarra
Tamriel_Data.esm
Variables
16
Local Variables
done
fightset
cattlekilled
nolore
nohello
noflee
noidle
nointruder
nothief
TR_Map
T_Local_Vampire
control
controlQ
T_Local_NPC
T_Local_NoLore
T_Local_Khajiit
Source
1begin T_ScNpc_Mw_Map3VampQuarra
2
3; This short script is there to allow dialogue to be filtered on the TR_Map local variable,
4; allowing for regional topics such as "Morrowind Lore" or "Geographic Regions" to be
5; appropriate to the location the NPC is. This version is for Quarra vampire NPCs.
6
7short done
8short fightset
9short cattlekilled
10short nolore
11short nohello
12short noflee
13short noidle
14short nointruder
15short nothief
16short TR_Map
17short T_Local_Vampire
18short control
19short controlQ
20short T_Local_NPC
21short T_Local_NoLore
22short T_Local_Khajiit
23
24if ( GetJournalIndex "VA_VampAmulet" == 50 )
25 setFight 100
26 setDisposition 0
27 set cattlekilled to -1
28endif
29
30if ( OnDeath )
31 if ( GetJournalIndex "VA_VampCountess" == 50 )
32 if ( VampClan == 1 )
33 set VampKills to ( VampKills + 1 )
34 elseif ( VampClan == 2 )
35 set VampKills to ( VampKills + 1 )
36 elseif ( VampClan == 3 )
37 set VampKills to ( VampKills - 1 )
38 endif
39 elseif ( GetJournalIndex "VA_VampHunter" == 90 )
40 if ( VampClan == 1 )
41 set VampKills to ( VampKills + 1 )
42 elseif ( VampClan == 2 )
43 set VampKills to ( VampKills + 1 )
44 elseif ( VampClan == 3 )
45 set VampKills to ( VampKills - 1 )
46 endif
47 endif
48 AddItem "ingred_vampire_dust_01" 1
49endif
50
51if ( done == -1 )
52 return
53endif
54
55if ( done == 2 )
56 ;check for PC NO LONGER a Quarra Vampire
57 if ( player->GetSpell "Vampire Quarra Specials" != 1 )
58 setfight 90
59 setdisposition 20
60 set done to -1
61 endif
62 return
63endif
64
65if ( done == 1 )
66 ;check for PC as a Quarra Vampire
67 if ( player->GetSpell "Vampire Quarra Specials" == 1 )
68 setfight 30
69 set done to 2
70 elseif ( player->GetSpell "Vampire Quarra Specials" != 1 )
71 if ( fightset == 0 )
72 setfight 90
73 setdisposition 20
74 set fightset to 1
75 endif
76 endif
77 return
78endif
79
80if ( done == 0 )
81 AddSpell "Vampire Blood Quarra" ;this is the blood disease
82 AddSpell "Vampire Attributes"
83 AddSpell "Vampire Skills"
84 AddSpell "Vampire Immunities"
85 AddSpell "Vampire Sun Damage"
86 AddSpell "Vampire Touch"
87 AddSpell "Vampire Quarra Specials"
88 ModRestoration 75
89 set TR_Map to 3
90 set done to 1
91 set T_Local_Khajiit to -1
92
93 if ( GetRace "T_Els_Cathay" )
94 set T_Local_Khajiit to 1
95 elseif ( GetRace "T_Els_Cathay-raht" )
96 set T_Local_Khajiit to 1
97 elseif ( GetRace "T_Els_Dagi-raht" )
98 set T_Local_Khajiit to 1
99 elseif ( GetRace "T_Els_Ohmes" )
100 set T_Local_Khajiit to 1
101 elseif ( GetRace "T_Els_Ohmes-raht" )
102 set T_Local_Khajiit to 1
103 elseif ( GetRace "T_Els_Suthay" )
104 set T_Local_Khajiit to 1
105 elseif ( GetRace "T_Els_Tojay" )
106 set T_Local_Khajiit to 1
107 elseif ( GetRace "Khajiit" )
108 set T_Local_Khajiit to 1
109 endif
110endif
111
112end