Vampire_Aundae
Morrowind.esm
Variables
9
Local Variables
done
fightset
cattlekilled
nolore
nohello
noflee
noidle
nointruder
nothief
Source
1begin Vampire_Aundae
2
3short done
4short fightset
5short cattlekilled
6short nolore
7short nohello
8short noflee
9short noidle
10short nointruder
11short nothief
12
13if ( GetJournalIndex "VA_VampHunter" == 110 )
14 setFight 100
15 setDisposition 0
16 set cattlekilled to -1
17 return
18endif
19
20if ( OnDeath == 1 )
21 if ( GetJournalIndex "VA_VampCountess" == 50 )
22 if ( VampClan == 1 )
23 set VampKills to ( VampKills - 1 )
24 elseif ( VampClan == 2 )
25 set VampKills to ( VampKills + 1 )
26 elseif ( VampClan == 3 )
27 set VampKills to ( VampKills + 1 )
28 endif
29 elseif ( GetJournalIndex "VA_VampAmulet" == 30 )
30 if ( VampClan == 1 )
31 set VampKills to ( VampKills - 1 )
32 elseif ( VampClan == 2 )
33 set VampKills to ( VampKills + 1 )
34 elseif ( VampClan == 3 )
35 set VampKills to ( VampKills + 1 )
36 endif
37 endif
38 AddItem "ingred_vampire_dust_01" 1
39endif
40
41if ( done == -1 )
42 return
43endif
44
45if ( done == 2 )
46
47 ;check for PC NO LONGER a Aundae Vampire
48 if ( player->GetSpell "Vampire Aundae Specials" != 1 )
49 setfight 90
50 setdisposition 20
51 set done to -1
52 endif
53
54endif
55
56if ( done == 1 )
57
58 ;check for PC as a Aundae Vampire
59 if ( player->GetSpell "Vampire Aundae Specials" == 1 )
60 setfight 30
61 set done to 2
62 elseif ( player->GetSpell "Vampire Aundae Specials" != 1 )
63 if ( fightset == 0 )
64 setfight 90
65 setdisposition 20
66 set fightset to 1
67 endif
68 endif
69return
70
71endif
72
73if ( done == 0 )
74 AddSpell, "Vampire Blood Aundae" ;this is the blood disease
75 AddSpell, "Vampire Attributes"
76 AddSpell, "Vampire Skills"
77 AddSpell, "Vampire Immunities"
78 AddSpell, "Vampire Sun Damage"
79 AddSpell, "Vampire Touch"
80 AddSpell, "Vampire Aundae Specials"
81 ModRestoration 75
82 set done to 1
83endif
84
85end Vampire_Aundae