mertaScript
Morrowind.esm
Variables
3
Local Variables
done
greeting
nolore
Source
1Begin mertaScript
2
3short done
4short greeting
5short nolore
6
7
8
9if ( GetDistance Player <= 128 )
10 if ( VampClan == 2)
11 if ( GetJournalIndex "VA_VampCountess" >= 20 )
12 if ( greeting == 0 )
13 ForceGreeting
14 set greeting to -1
15 endif
16 endif
17 endif
18endif
19
20if ( OnDeath == 1 )
21 if ( GetJournalIndex "VA_VampCountess" >= 20 )
22 Journal "VA_VampCountess" 40
23 endif
24endif
25
26if ( done == -1 )
27 return
28endif
29
30if ( done == 2 )
31
32 ;check for PC NO LONGER a Berne Vampire
33 if ( player->GetSpell "Vampire Aundae Specials" != 1 )
34 setfight 90
35 set done to -1
36 endif
37
38endif
39
40if ( done == 1 )
41
42 ;check for PC as a Berne Vampire
43 if ( player->GetSpell "Vampire Berne Specials" == 1 )
44 setfight 30
45 set done to 2
46 endif
47return
48
49endif
50
51if ( done == 0 )
52 AddSpell, "Vampire Blood Berne" ;this is the blood disease
53 AddSpell, "Vampire Attributes"
54 AddSpell, "Vampire Skills"
55 AddSpell, "Vampire Immunities"
56 AddSpell, "Vampire Sun Damage"
57 AddSpell, "Vampire Touch"
58 AddSpell, "Vampire's Kiss"
59 AddSpell, "Vampire Berne Specials"
60 ModRestoration 75
61
62 set done to 1
63endif
64end mertaScript