tarenScript
Tribunal.esm
Variables
9
Local Variables
walkstate
enabled
walked
distancecheck
tooclose
nolore
doonce
walktimer
timer
Source
1begin tarenScript
2
3short walkstate
4short enabled
5float walktimer
6float timer
7short walked
8short distancecheck
9short tooclose
10short nolore
11short doonce
12
13if ( MenuMode == 1 )
14 Return
15endif
16
17if ( GetJournalIndex "MS_Adulterer" >= 150 )
18 disable
19endif
20
21if ( doonce = 0 )
22 disable
23 set doonce to 1
24endif
25
26if ( GetJournalIndex "MS_Adulterer" < 1 )
27 return
28endif
29
30if ( GetJournalIndex "MS_Adulterer" >= 1 )
31 if ( getdeadcount "velyna seran" >= 1 )
32 "taren andoren"->ClearForceSneak
33 startcombat player
34 setfight 100
35 setdisposition 0
36 set walkstate to 0
37 endif
38endif
39
40if ( enabled == 0 )
41 if ( GetJournalIndex "MS_Adulterer" == 10 )
42 Enable
43 set enabled to 1
44 endif
45endif
46
47if ( GetAttacked == 1 )
48 set walkstate to 12
49endif
50
51if ( OnDeath == 1 )
52 Journal "MS_Adulterer" 120
53endif
54
55if ( gethealth < 1 )
56 return
57endif
58
59if ( enabled == 1 )
60 if ( GetDistance Player > 500 )
61 if ( GetDistance Player < 1024 )
62 set walkstate to 1
63 set enabled to 2
64 Journal "MS_Adulterer" 20
65 endif
66 endif
67endif
68
69if ( tooclose == 0 )
70 if ( walkstate > 0 )
71 if ( GetDistance Player <= 500 )
72 MessageBox, "You're too close! Get farther away before he realizes you're following him!"
73 set tooclose to 1
74 endif
75 endif
76endif
77
78if ( tooclose == 1 )
79 set timer to ( timer + GetSecondsPassed )
80 if ( timer >= 5 )
81 if ( GetDistance Player <= 500 )
82 set tooclose to 2
83 ForceGreeting
84 else
85 if ( tooclose < 2 )
86 MessageBox, "Good, he didn't see you."
87 set timer to 0
88 set tooclose to 0
89 endif
90 endif
91 endif
92endif
93
94if ( walked == 2 )
95 set walktimer to ( walktimer + GetSecondsPassed )
96 if ( walktimer > 5 )
97 set walkstate to 8
98 set walked to 3
99 endif
100 Return
101endif
102
103
104if ( walkstate == 1 )
105 "taren andoren"->ForceSneak
106 "taren andoren"->AiTravel -550, -1581, 218, 0
107 set walkstate to 2
108elseif ( walkstate == 2 )
109 if ( "taren andoren"->GetAiPackageDone == 1 )
110 set walkstate to 3
111 endif
112elseif ( walkstate == 3 )
113 "taren andoren"->AiTravel -1462, -2607, 218, 90
114 set walkstate to 4
115elseif ( walkstate == 4 )
116 if ( "taren andoren"->GetAiPackageDone == 1 )
117 set walkstate to 5
118 endif
119elseif ( walkstate == 5 )
120 "taren andoren"->AiTravel -1359, -2832, 218, 0
121 set walkstate to 6
122elseif ( walkstate == 6 )
123 if ( "taren andoren"->GetAiPackageDone == 1 )
124 set walkstate to 7
125 endif
126elseif ( walkstate == 7 )
127 set walked to 2
128 Return
129elseif ( walkstate == 8 )
130; "taren andoren"->AiTravel 1153, -2610, -96, 270
131 "taren andoren"->AiTravel -866, -3052, 282, 0
132 set walkstate to 10
133elseif ( walkstate == 9 )
134 if ( "taren andoren"->GetAiPackageDone == 1 )
135 "taren andoren"->ClearForceSneak
136 "taren andoren"->AiFollow "velyna seran" 0, 0, 0, 0
137 set walkstate to 0
138 endif
139elseif ( walkstate == 10 )
140 if ( "taren andoren"->GetAiPackageDone == 1 )
141 ;messagebox "Checking Distance to Player"
142 If ( getdistance player <= 2000 )
143 Journal "MS_Adulterer" 30
144 endif
145 "taren andoren"->ClearForceSneak
146 "taren andoren"->AiFollow "velyna seran" 0, 0, 0, 0
147 set walkstate to 0
148 endif
149elseif ( walkstate == 11 )
150 "taren andoren"->ClearForceSneak
151 "taren andoren"->AiFollow "velyna seran" 0, 0, 0, 0
152 set walkstate to 0
153elseif ( walkstate == 10 )
154 if ( "taren andoren"->GetAiPackageDone == 1 )
155 "taren andoren"->ClearForceSneak
156 "taren andoren"->AiFollow "velyna seran" 0, 0, 0, 0
157 set walkstate to 0
158 StartCombat Player
159 setfight 100
160 setdisposition 0
161 endif
162endif
163End