BILL_MT_WritOran
Morrowind.esm
Variables
9
Local Variables
CL1
CL2
OnPCHitMe
fightArvamaRathri
fightBrethasDeras
fightGadelaAndus
fightGlathel
fightNalasaSarothren
fightSovaliUvayn
Source
1Begin BILL_MT_WritOran
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 fightArvamaRathri
12short fightBrethasDeras
13short fightGadelaAndus
14short fightGlathel
15short fightNalasaSarothren
16short fightSovaliUvayn
17
18
19if ( MenuMode == 1 )
20 return
21endif
22
23if ( GetJournalIndex MT_WritOran < 10 )
24 if ( OnPCHitMe == 1 )
25 if ( GetTarget Player == 0 )
26 StartCombat Player
27 endif
28 Set OnPCHitMe to 0
29 endif
30 return
31endif
32
33if ( OnPCHitMe == 1 )
34 set fightArvamaRathri to 1
35 set fightBrethasDeras to 1
36 set fightGadelaAndus to 1
37 set fightGlathel to 1
38 set fightNalasaSarothren to 1
39 set fightSovaliUvayn to 1
40 if ( GetTarget Player == 0 )
41 StartCombat Player
42 endif
43 set OnPCHitMe to 0
44endif
45
46if ( fightArvamaRathri == 1 )
47 if ( "arvama rathri"->GetTarget Player == 1 )
48 "arvama rathri"->StopCombat
49 "arvama rathri"->SetFight 30
50 set fightArvamaRathri to 0
51 endif
52endif
53
54if ( fightBrethasDeras == 1 )
55 if ( "brethas deras"->GetTarget Player == 1 )
56 "brethas deras"->StopCombat
57 "brethas deras"->SetFight 30
58 set fightBrethasDeras to 0
59 endif
60endif
61
62if ( fightGadelaAndus == 1 )
63 if ( "gadela andus"->GetTarget Player == 1 )
64 "gadela andus"->StopCombat
65 "gadela andus"->SetFight 30
66 set fightGadelaAndus to 0
67 endif
68endif
69
70if ( fightGlathel == 1 )
71 if ( "glathel"->GetTarget Player == 1 )
72 "glathel"->StopCombat
73 "glathel"->SetFight 30
74 set fightGlathel to 0
75 endif
76endif
77
78if ( fightNalasaSarothren == 1 )
79 if ( "nalasa sarothren"->GetTarget Player == 1 )
80 "nalasa sarothren"->StopCombat
81 "nalasa sarothren"->SetFight 30
82 set fightNalasaSarothren to 0
83 endif
84endif
85
86if ( fightSovaliUvayn == 1 )
87 if ( "sovali uvayn"->GetTarget Player == 1 )
88 "sovali uvayn"->StopCombat
89 "sovali uvayn"->SetFight 30
90 set fightSovaliUvayn to 0
91 endif
92endif
93
94if ( CellChanged == 1 )
95 set CL1 to GetPCCrimeLevel
96endif
97
98if ( OnDeath == 1 )
99 ; when we are killed...
100
101 if ( GetJournalIndex MT_WritOran > 0 )
102 ; ... and if the player has a writ for us...
103
104 set CL2 to GetPCCrimeLevel
105 if ( CL2 > CL1 )
106 ; ... append a journal entry if the execution is seen ...
107 Player->Journal MT_WritOran 80
108 else
109 ; ... append a journal entry if the execution is NOT seen ...
110 Player->Journal MT_WritOran 90
111 endif
112 endif
113endif
114
115End