mastriusScript
Morrowind.esm
Variables
11
Local Variables
done
curse
drain
killmessage
nolore
timer
othertimer
currenthealth
newhealth
currentfatigue
newfatigue
Source
1Begin mastriusScript
2
3
4short done
5short curse
6short drain
7short killmessage
8float timer
9float othertimer
10float currenthealth
11float newhealth
12float currentfatigue
13float newfatigue
14short nolore
15
16if ( menumode == 1)
17 return
18endif
19
20if ( GetJournalIndex "VA_VampCurse" < 90 )
21 if curse == 0
22 "mastrius"->ModStrength -100
23 "mastrius"->ModWillpower -20
24 "mastrius"->ModAgility -60
25 "mastrius"->ModSpeed -70
26 "mastrius"->ModEndurance -50
27 "mastrius"->ModHealth -200
28 "mastrius"->ModMagicka -70
29 "mastrius"->ModFatigue -245
30 "mastrius"->ModAthletics -80
31 "mastrius"->ModLongblade -50
32 "mastrius"->ModHeavyarmor -50
33 "mastrius"->ModMediumarmor -50
34 "mastrius"->Modblock -50
35 "mastrius"->Modspear -40
36 "mastrius"->ModAxe -40
37 "mastrius"->ModBluntweapon -40
38 "mastrius"->ModArmorer -40
39 "mastrius"->ModMarksman -40
40 set curse to 1
41 endif
42endif
43
44if ( GetJournalIndex "VA_VampCurse" == 90 )
45 if curse == 1
46 SetStrength 120
47 SetWillpower 72
48 SetAgility 93
49 SetSpeed 95
50 SetEndurance 110
51 SetHealth 380
52 SetMagicka 150
53 SetFatigue 350
54 SetAthletics 90
55 SetLongblade 90
56 SetHeavyarmor 90
57 SetMediumarmor 50
58 Setblock 70
59 Setspear 40
60 SetAxe 40
61 SetBluntweapon 40
62 SetArmorer 40
63 SetMarksman 40
64 SetRestoration 90
65 ;MessageBox "SHOULD HAVE MODDED ALL HIS STATS"
66 set curse to -1
67 endif
68endif
69
70if ( GetJournalIndex "VA_VampCurse" == 70 )
71 if ( curse == 1 )
72 if ( drain == 0 )
73 ;DisablePlayerLooking
74 ;DisablePlayerControls
75 FadeOut 7
76 FadeIn 7
77 set drain to 1
78 endif
79 endif
80endif
81
82if ( drain == 2 )
83 set timer to ( timer + Getsecondspassed )
84
85 if ( timer >= 7 ) ;fader delay
86 ;EnablePlayerLooking
87 ;EnablePlayerControls
88 ForceGreeting
89 set timer to 0
90 set drain to -1
91 endif
92endif
93
94if ( drain == 1 )
95 if ( killmessage == 0 )
96 set othertimer to ( othertimer + Getsecondspassed )
97
98 if ( othertimer >= 7 ) ;fader delay
99 MessageBox "You feel the life and strength draining from your body."
100 set currenthealth to ( player->GetHealth )
101 set newhealth to ( currenthealth * -0.6 )
102 player->modCurrentHealth newhealth
103 set currentfatigue to ( player->GetFatigue )
104 set newfatigue to ( currentfatigue * -0.6 )
105 player->modCurrentFatigue newfatigue
106 set othertimer to 0
107 set killmessage to -1
108 set drain to 2
109 endif
110 endif
111endif
112
113if ( done == -1 )
114 return
115endif
116
117if ( done == 2 )
118
119 ;check for PC NO LONGER a Quarra Vampire
120 if ( player->GetSpell "Vampire Aundae Specials" != 1 )
121 setfight 30
122 set done to -1
123 endif
124
125endif
126
127if ( done == 1 )
128
129 ;check for PC as a Quarra Vampire
130 if ( player->GetSpell "Vampire Quarra Specials" == 1 )
131 setfight 30
132 set done to 2
133 endif
134return
135
136endif
137
138if ( done == 0 )
139 AddSpell, "Vampire Blood Quarra" ;this is the blood disease
140 AddSpell, "Vampire Attributes"
141 AddSpell, "Vampire Skills"
142 AddSpell, "Vampire Immunities"
143 AddSpell, "Vampire Sun Damage"
144 AddSpell, "Vampire Touch"
145 AddSpell, "Vampire's Kiss"
146 AddSpell, "Vampire Quarra Specials"
147 ModRestoration 75
148 set done to 1
149endif
150
151
152
153
154
155
156
157End mastriusScript