TR_m3_MT_WritDelyna
TR_Mainland.esm
Variables
11
Local Variables
CL1
CL2
TR_map
control
controlQ
nolore
T_Local_NPC
OnPCHitMe
fightArvelaDuren
fightNelsNarvys
fightBelasIrethi
Source
1Begin TR_m3_MT_WritDelyna
2
3short CL1
4short CL2
5short TR_map
6short control
7short controlQ
8short nolore
9short T_Local_NPC
10
11short OnPCHitMe
12short fightArvelaDuren
13short fightNelsNarvys
14short fightBelasIrethi
15
16set TR_map to 3
17
18if ( MenuMode == 1 )
19 return
20endif
21
22if ( GetJournalIndex TR_m3_MT_DelynaSilvas < 10 )
23 if ( OnPCHitMe == 1 )
24 if ( GetTarget Player == 0 )
25 StartCombat Player
26 endif
27 Set OnPCHitMe to 0
28 endif
29 return
30endif
31
32if ( OnPCHitMe == 1 )
33 set fightArvelaDuren to 1
34 set fightNelsNarvys to 1
35 set fightBelasIrethi to 1
36 if ( GetTarget Player == 0 )
37 StartCombat Player
38 endif
39 set OnPCHitMe to 0
40endif
41
42if ( fightArvelaDuren == 1 )
43 if ( "TR_m3_Arvela Duren"->GetTarget Player == 1 )
44 "TR_m3_Arvela Duren"->StopCombat
45 "TR_m3_Arvela Duren"->SetFight 30
46 set fightArvelaDuren to 0
47 endif
48endif
49
50if ( fightNelsNarvys == 1 )
51 if ( "TR_m3_Nels Narvys"->GetTarget Player == 1 )
52 "TR_m3_Nels Narvys"->StopCombat
53 "TR_m3_Nels Narvys"->SetFight 30
54 set fightNelsNarvys to 0
55 endif
56endif
57
58if ( fightBelasIrethi == 1 )
59 if ( "TR_m3_Belas Irethi"->GetTarget Player == 1 )
60 "TR_m3_Belas Irethi"->StopCombat
61 "TR_m3_Belas Irethi"->SetFight 30
62 set fightBelasIrethi to 0
63 endif
64endif
65
66if ( CellChanged == 1 )
67 set CL1 to GetPCCrimeLevel
68endif
69
70if ( OnDeath == 1 )
71 ; when we are killed...
72
73 if ( GetJournalIndex TR_m3_MT_DelynaSilvas > 0 )
74 ; ... and if the player has a writ for us...
75
76 set CL2 to GetPCCrimeLevel
77 if ( CL2 > CL1 )
78 ; ... append a journal entry if the execution is seen ...
79 Player->Journal TR_m3_MT_DelynaSilvas 80
80 else
81 ; ... append a journal entry if the execution is NOT seen ...
82 Player->Journal TR_m3_MT_DelynaSilvas 90
83 endif
84 endif
85endif
86
87End