TR_m3_q_bartolomaeus
TR_Mainland.esm
Variables
11
Local Variables
enableonce
disableonce
nolore
bartdead
button
messageOn
questover
T_Local_NPC
T_Local_NoLore
TR_Map
timer
Source
1begin TR_m3_q_bartolomaeus
2
3short enableonce
4short disableonce
5short nolore
6short bartdead
7float timer
8short button
9short messageOn
10short questover
11short T_Local_NPC
12short T_Local_NoLore
13short TR_Map
14
15if ( TR_Map != 3 )
16 set TR_Map to 3
17endif
18
19if ( MenuMode == 1 )
20 return
21endif
22
23if ( TR_m3_q_fienddisappear == 1 )
24 if ( GetDisabled == 0 )
25 if ( timer == 0 )
26 ExplodeSpell, "Invisibility"
27 set timer to 1
28 elseif ( timer < 3.5 )
29 Set timer to ( timer + GetSecondsPassed )
30 else
31 Disable
32 endif
33 endif
34endif
35
36if ( OnActivate == 1 )
37 if ( bartdead == 1 )
38 if ( player->GetItemCount, "TR_m3_q_fiendblade_full" == 1 )
39 set bartdead to 2
40 Messagebox, "Stab the blade through Bartolomaeus?", "Yes", "No"
41 set messageOn to 1
42 ;set TR_m3_q_bartresurrect
43 else
44 Activate
45 endif
46 else
47 Activate
48 endif
49endif
50
51if ( questover == 1 )
52 return
53endif
54
55if ( messageOn == 1 )
56 set button to GetButtonPressed
57 if ( button == -1 )
58 return
59 endif
60 if ( button == 0 )
61 Messagebox, "You plunge the blade into Bartolomaeus. The sword melts into his body, and reforms itself in his hand. His eyes flutter open."
62 player->removeitem "TR_m3_q_fiendblade_full" 1
63 Journal TR_m3_OE_Freedom 115
64 Resurrect
65 ForceGreeting
66 set messageOn to 0
67 endif
68 if ( button == 1 )
69 set messageOn to 0
70 set bartdead to 1
71 return
72 endif
73endif
74
75if ( GetJournalIndex, "TR_m3_OE_Freedom" == 100 )
76 sethealth 0
77 set questover to 1
78endif
79
80if ( OnDeath == 1 )
81 if ( GetJournalIndex, "TR_m3_OE_Freedom" < 100 )
82 Journal TR_m3_OE_Freedom 110
83 set bartdead to 1
84 endif
85endif
86
87if ( GetAttacked == 1 )
88 set TR_m3_q_givebartsword to 2
89endif
90
91if ( enableonce == 1 )
92 return
93endif
94
95if ( GetJournalIndex, "TR_m3_OE_Freedom" >= 60 )
96 enable
97 set enableonce to 1
98 return
99endif
100
101if ( GetDisabled == 0 )
102 if ( disableonce == 0 )
103 disable
104 set disableonce to 1
105 endif
106endif
107
108end