TR_m2_Adren_Alari
TR_Mainland.esm
Variables
11
Local Variables
TR_Map
control
controlQ
T_Local_NPC
T_Local_NoLore
NoLore
OnPCHitMe
TR_m2_Nc_AdrenHelp
sayGreeting
doOnce
endCombat
Source
1Begin TR_m2_Adren_Alari
2
3short TR_Map
4short control
5short controlQ
6short T_Local_NPC
7short T_Local_NoLore
8short NoLore
9short OnPCHitMe
10short TR_m2_Nc_AdrenHelp
11short sayGreeting
12short doOnce
13short endCombat
14
15if ( GetPCCell "Sadalvel Ancestral Tomb" == 1 )
16 set T_Local_NoLore to 0
17 set T_Local_NPC to 0
18else
19 set T_Local_NoLore to 1
20 set T_Local_NPC to 1
21endif
22
23if ( OnDeath == 1 )
24 if ( GetDeadCount "TR_m2_Velyn Alari" > 0 )
25 Journal "TR_m2_Nm_BrokenFamily" 180
26 elseif ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 40 )
27 Journal "TR_m2_Nm_BrokenFamily" 160
28 elseif ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 30 )
29 if ( GetPCCell, "Necrom, Temple Library" == 1 )
30 Journal "TR_m2_Nm_BrokenFamily" 162
31 endif
32 elseif ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 20 )
33 Journal "TR_m2_Nm_BrokenFamily" 161
34 elseif ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 10 )
35 Journal "TR_m2_Nm_BrokenFamily" 150
36 endif
37endif
38
39if ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 30 )
40 StartScript TR_m2_Nm_BrokenFamilyScript
41endif
42
43if ( sayGreeting == 0 )
44 if ( GetPCCell "Sadalvel Ancestral Tomb" == 1 )
45 if ( "TR_m2_Adren Alari"->GetDistance Player <= 512 )
46 ForceGreeting
47 set sayGreeting to 1
48 endif
49 endif
50endif
51
52if ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 100 )
53 StartScript TR_m2_Nm_BrokenFamilyScript
54endif
55
56if ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 110 )
57 StartScript TR_m2_Nm_BrokenFamilyScript
58endif
59
60if ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 30 )
61 if ( OnPCHitMe == 1 )
62 if ( doOnce <= 1 )
63 set "TR_m2_Velyn Alari".TR_m2_Nc_VelynHelp to 1
64 set OnPCHitMe to 0
65 set doOnce to (doOnce + 1)
66 Player->stopCombat
67 startCombat "TR_m2_Velyn Alari"
68 endif
69 if ( doOnce == 2 )
70 startCombat Player
71 set OnPCHitMe to 0
72 endif
73 endif
74 if ( endCombat == 0 )
75 if ( "TR_m2_Velyn Alari"->getHealth <= 1 )
76 if ( TR_m2_Nc_AdrenHelp == 1 )
77 stopCombat
78 set endCombat to 1
79 set OnPCHitMe to 0
80 setFight 0
81 setFlee 0
82 AIWander 0, 0, 0
83 endif
84 endif
85 endif
86endif
87
88if ( GetJournalIndex "TR_m2_Nm_BrokenFamily" == 190 )
89 if ( cellChanged == 1 )
90 disable
91 endif
92endif
93
94if ( TR_Map == 2 )
95 return
96endif
97
98set TR_Map to 2
99
100End