heartfanghuntScript
Bloodmoon.esm
Variables
11
Local Variables
doOnce
AllowWerewolfForceGreeting
playerwolf
fangtalk
nolore
greetOnce
timer
xpos
ypos
zpos
zrotpos
Source
1Begin heartfanghuntScript
2
3short doOnce
4short AllowWerewolfForceGreeting
5float timer
6short playerwolf
7short fangtalk
8short nolore
9float xpos
10float ypos
11float zpos
12float zrotpos
13short greetOnce
14
15if ( GetJournalIndex BM_Wildhunt < 30 )
16 return
17endif
18
19if ( MenuMode == 1 )
20 return
21endif
22
23if ( OnDeath == 1 )
24 if ( GetJournalIndex BM_WildHunt > 0 )
25 MessageBox "As Heart-Fang breathes his last breath, the Hircine's Ring disappears from his finger, and has found a new owner."
26 Player->AddItem BM_ring_hircine 1
27 Journal BM_WildHunt 69
28 endif
29endif
30
31if ( GetJournalIndex BM_WildHunt == 62 )
32 if ( GreetOnce == 0 )
33 if ( GetTarget Player == 1 )
34 set fangtalk to 2
35 set greetOnce to 1
36 ForceGreeting
37 endif
38 endif
39endif
40
41if ( doOnce == 0 )
42 if ( GetDistance Player <= 1024 )
43 set timer to ( timer + GetSecondsPassed )
44 if ( timer > 1 )
45 if ( player->IsWerewolf == 0 )
46 StopCombat Player
47 SetFight 0
48 set playerwolf to 0
49 ForceGreeting
50 set timer to 0
51 set doOnce to 1
52 elseif ( player->IsWerewolf == 1 )
53 set playerwolf to 1
54 ForceGreeting
55 set timer to 0
56 set doOnce to 1
57 endif
58 endif
59 endif
60endif
61
62if ( fangtalk == 0 )
63 return
64endif
65
66if ( fangtalk == 1 )
67 if ( GetDistance Player <= 512 )
68 set timer to ( timer + GetSecondsPassed )
69 if ( timer > 2 )
70 set fangtalk to 2
71 ForceGreeting
72 return
73 endif
74 endif
75endif
76
77if ( fangtalk == 3 )
78 set timer to ( timer + GetSecondsPassed )
79 if ( timer > 3 )
80 set fangtalk to 4
81 endif
82endif
83
84if ( fangtalk == 4 )
85 Set xpos to ( GetPos X )
86 Set ypos to ( GetPos Y )
87 Set zpos to ( GetPos Z )
88 Set zrotpos to ( GetAngle Z )
89 PlaceItem bm_wereeffect xpos ypos zpos zrotpos
90 BecomeWerewolf
91 StartCombat Player
92 set fangtalk to 5
93endif
94
95
96
97
98End heartfanghuntScript