BILL_MT_WritMavon
Morrowind.esm
Variables
9
Local Variables
CL1
CL2
OnPCHitMe
fightTolmeraRelenim
fightCirgesAdrard
fightCirwedh
fightSiliusFulcinius
fightFerarilieRiscel
fightCielNestal
Source
1Begin BILL_MT_WritMavon
2; log a journal entry for each successful 'hit' the player performs for the Morag Tong
3
4; script location: should be placed on each and every target of the Morag Tong, with
5; changes to reflect the person it is running on.
6
7short CL1
8short CL2
9short OnPCHitMe
10
11short fightTolmeraRelenim
12short fightCirgesAdrard
13short fightCirwedh
14short fightSiliusFulcinius
15short fightFerarilieRiscel
16short fightCielNestal
17
18if ( GetJournalIndex MT_WritMavon < 10 )
19 if ( OnPCHitMe == 1 )
20 if ( GetTarget Player == 0 )
21 StartCombat Player
22 endif
23 Set OnPCHitMe to 0
24 endif
25 return
26endif
27
28if ( MenuMode == 1 )
29 return
30endif
31
32if ( OnPCHitMe == 1 )
33 set fightTolmeraRelenim to 1
34 set fightCirgesAdrard to 1
35 set fightCirwedh to 1
36 set fightSiliusFulcinius to 1
37 set fightFerarilieRiscel to 1
38 set fightCielNestal to 1
39 if ( GetTarget Player == 0 )
40 StartCombat Player
41 endif
42 Set OnPCHitMe to 0
43endif
44
45if ( fightTolmeraRelenim == 1 )
46 if ( "tolmera relenim"->GetTarget Player == 1 )
47 "tolmera relenim"->StopCombat
48 "tolmera relenim"->SetFight 30
49 set fightTolmeraRelenim to 0
50 endif
51endif
52
53if ( fightCirgesAdrard == 1 )
54 if ( "cirges adrard"->GetTarget Player == 1 )
55 "cirges adrard"->StopCombat
56 "cirges adrard"->SetFight 30
57 set fightCirgesAdrard to 0
58 endif
59endif
60
61if ( fightCirwedh == 1 )
62 if ( "cirwedh"->GetTarget Player == 1 )
63 "cirwedh"->StopCombat
64 "cirwedh"->SetFight 30
65 set fightCirwedh to 0
66 endif
67endif
68
69if ( fightSiliusFulcinius == 1 )
70 if ( "silius fulcinius"->GetTarget Player == 1 )
71 "silius fulcinius"->StopCombat
72 "silius fulcinius"->SetFight 30
73 set fightSiliusFulcinius to 0
74 endif
75endif
76
77if ( fightFerarilieRiscel == 1 )
78 if ( "ferarilie riscel"->GetTarget Player == 1 )
79 "ferarilie riscel"->StopCombat
80 "ferarilie riscel"->SetFight 30
81 set fightFerarilieRiscel to 0
82 endif
83endif
84
85if ( fightCielNestal == 1 )
86 if ( "ciel nestal"->GetTarget Player == 1 )
87 "ciel nestal"->StopCombat
88 "ciel nestal"->SetFight 30
89 set fightCielNestal to 0
90 endif
91endif
92
93if ( CellChanged == 1 )
94 if ( GetJournalIndex MT_WritMavon > 0 )
95 SetFight 100
96 endif
97 set CL1 to GetPCCrimeLevel
98endif
99
100if ( OnDeath == 1 )
101 ; when we are killed...
102
103 if ( GetJournalIndex MT_WritMavon > 0 )
104 ; ... and if the player has a writ for us...
105
106 set CL2 to GetPCCrimeLevel
107 if ( CL2 > CL1 )
108 ; ... append a journal entry if the execution is seen ...
109 Player->Journal MT_WritMavon 80
110 else
111 ; ... append a journal entry if the execution is NOT seen ...
112 Player->Journal MT_WritMavon 90
113 endif
114 endif
115endif
116
117End