API tools faq
paste
Advertisement
GrandBulwark

Untitled

GrandBulwark
Feb 27th, 2015
228
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 59.99 KB | None | 0 0
raw download clone embed print report
  1. ScriptName Bulwark_McMFollower_Summons Extends SKI_ConfigBase
  2. {Allows the player to summon any vanilla follower to their current location}
  3. ;-Script Author GrandBulwark
  4.  
  5.  
  6. ;-Followers Share Knowledge Properties------------------------------------
  7.  
  8. ;-Option IDs
  9. Int OID_SkyrimFollowersShare
  10. Int OID_DawnguardFollowersShare
  11. Int OID_HearthfiresFollowersShare
  12. Int OID_DragonbornFollowersShare
  13.  
  14.  
  15.  
  16. GlobalVariable Property FollowersShareVanilla_G Auto
  17. GlobalVariable Property FollowersShareDawnguard_G Auto
  18. GlobalVariable Property FollowersShareHearthfires_G Auto
  19. GlobalVariable Property FollowersShareDragonborn_G Auto
  20.  
  21. Quest Property FollowerSharePerksSkyrim Auto
  22. Quest Property FollowerSharePerksDawnguard Auto
  23. Quest Property FollowerSharePerksHearthfires Auto
  24. Quest Property FollowerSharePerksDragonborn Auto
  25.  
  26. ;-Follower Summon Framework Properties------------------------------------
  27.  
  28. ;-Option IDs
  29. ;-Winterhold College
  30. Int OID_Brelya_Maryon ; MGRAppBrelyna01 Objective 30
  31. Int OID_JZargo ;MGRAppJZargo01 Objective 30
  32. Int OID_Onmund ;MGRAppOnmund01 Objective 40
  33.  
  34. ;-Companions
  35. Int OID_Aela
  36. Int OID_Athis
  37. Int OID_Farkas
  38. Int OID_Njada_Stonearm
  39. Int OID_Ria
  40. Int OID_Torvar
  41. Int OID_Vilkas
  42. ;-Dark Brotherhood
  43. Int OID_Cicero
  44.  
  45. ;-Dawnguard
  46. Int OID_Agmaer
  47. Int OID_Beleval
  48. Int OID_Celann
  49. Int OID_Durak
  50. Int OID_Ingard
  51. Int OID_Serana
  52.  
  53. ;-Dragonborn
  54. Int OID_Frea ;DLC2MQ03 Objective 70
  55. Int OID_Talvas ;DLC2TTF1 Objective 200
  56. Int OID_Teldryn_Sero
  57. ;-Dungeon Quest Followers
  58. Int OID_Erandur ;DA16 Objective Objective 200
  59. Int OID_Golldir ;dunHillgrundsTombQST Objective 100
  60. Int OID_illia ;dunDarklightQST Objective 20
  61.  
  62. ;-Hirelings
  63. Int OID_Belrand
  64. Int OID_Erik_The_Slayer
  65. Int OID_Jenessa
  66. Int OID_Marcurio
  67. Int OID_Stenvar
  68. Int OID_Vorstag
  69.  
  70. ;-Housecarls
  71. Int OID_Argis_The_Bulwark ;Favor250 15
  72. Int OID_Calder ;favor254 15
  73. Int OID_Iona ;FreeformThaneRiften 30
  74. Int OID_Jordis_The_Shield_Maiden ;Favor252 15
  75. Int OID_Lydia ;Favor253 15
  76.  
  77. ;-HF Housecarls
  78. Int OID_Gregor ;Favor256 15
  79. Int OID_Rayya ;Favor258 15
  80. Int OID_Valdimar ;Favor255 15
  81.  
  82. ;-Orcs
  83. Int OID_Borgakh_The_Steel_Heart
  84. Int OID_Gorbash_The_Iron_Hand
  85. Int OID_Lob ;DA06 Objective 120
  86. Int OID_Ogol ;DA06 Objective 120
  87. Int OID_Ugor ;DA06 Objective 120
  88.  
  89. ;-Misc
  90. Int OID_Adelaisa_Vendicci ;MS10MiscObjPointer Objective 80
  91. Int OID_Ahtar ;Captain Hargar dead
  92. Int OID_Aranea_Lenith ;DA01 Objective 80
  93. Int OID_Benor
  94. Int OID_Cosnach
  95. Int OID_Derkeethus ;DarkwaterCrossingDerkeethusRescueQuest Objective 20
  96. Int OID_Faendal ;FreeformRiverwood01 Objective 210
  97. Int OID_Sven ;FreeformRiverwood01 Objective 220
  98. Int OID_Kharjo ;FreeformCaravansA Objective 15
  99. Int OID_Mjoll_The_Lioness ;FreeformRiften09 Objective 20
  100. Int OID_Uthegerd_The_Unbroken
  101.  
  102. ;Viable Checks not found
  103. Int OID_Annekke_Crag_Jumper
  104. Int OID_Roggi_Knot_Beard
  105.  
  106. ;-Animals
  107. Int OID_Meeko
  108. ;DG
  109. Int OID_BranHusky
  110. Int OID_CusithDeathHound
  111. Int OID_GarmrDeathHound
  112. Int OID_SceolangHusky
  113.  
  114. ;-Global Variables--------------------------------------------------------
  115. ;-Winterhold College
  116. GlobalVariable Property Brelya_Maryon_G Auto ; MGRAppBrelyna01 Objective 30
  117. GlobalVariable Property JZargo_G Auto ;MGRAppJZargo01 Objective 30
  118. GlobalVariable Property Onmund_G Auto ;MGRAppOnmund01 Objective 40
  119.  
  120. ;-Companions
  121. GlobalVariable Property Aela_G Auto
  122. GlobalVariable Property Athis_G Auto
  123. GlobalVariable Property Farkas_G Auto
  124. GlobalVariable Property Njada_Stonearm_G Auto
  125. GlobalVariable Property Ria_G Auto
  126. GlobalVariable Property Torvar_G Auto
  127. GlobalVariable Property Vilkas_G Auto
  128.  
  129. ;-Dark Brotherhood
  130. GlobalVariable Property Cicero_G Auto
  131.  
  132. ;-Dawnguard
  133. GlobalVariable Property Agmaer_G Auto
  134. GlobalVariable Property Beleval_G Auto
  135. GlobalVariable Property Celann_G Auto
  136. GlobalVariable Property Durak_G Auto
  137. GlobalVariable Property Ingard_G Auto
  138. GlobalVariable Property Serana_G Auto
  139.  
  140. ;-Dragonborn
  141. GlobalVariable Property Frea_G Auto ;DLC2MQ03 Objective 70
  142. GlobalVariable Property Talvas_G Auto ;DLC2TTF1 Objective 200
  143. GlobalVariable Property Teldryn_Sero_G Auto
  144.  
  145. ;-Dungeon Quest Followers
  146. GlobalVariable Property Erandur_G Auto ;DA16 Objective Objective 200
  147. GlobalVariable Property Golldir_G Auto ;dunHillgrundsTombQST Objective 100
  148. GlobalVariable Property illia_G Auto ;dunDarklightQST Objective 20
  149.  
  150. ;-Hirelings
  151. GlobalVariable Property Belrand_G Auto
  152. GlobalVariable Property Erik_The_Slayer_G Auto
  153. GlobalVariable Property Jenessa_G Auto
  154. GlobalVariable Property Marcurio_G Auto
  155. GlobalVariable Property Stenvar_G Auto
  156. GlobalVariable Property Vorstag_G Auto
  157.  
  158. ;-Housecarls
  159. GlobalVariable Property Argis_The_Bulwark_G Auto ;Favor250 15
  160. GlobalVariable Property Calder_G Auto ;favor254 15
  161. GlobalVariable Property Iona_G Auto ;FreeformThaneRiften 30
  162. GlobalVariable Property Jordis_The_Shield_Maiden_G Auto ;Favor252 15
  163. GlobalVariable Property Lydia_G Auto ;Favor253 15
  164.  
  165. ;-HF Housecarls
  166. GlobalVariable Property Gregor_G Auto ;Favor256 15
  167. GlobalVariable Property Rayya_G Auto ;Favor258 15
  168. GlobalVariable Property Valdimar_G Auto ;Favor255 15
  169.  
  170. ;-Orcs
  171. GlobalVariable Property Borgakh_The_Steel_Heart_G Auto
  172. GlobalVariable Property Gorbash_The_Iron_Hand_G Auto
  173. GlobalVariable Property Lob_G Auto ;DA06 Objective 120
  174. GlobalVariable Property Ogol_G Auto ;DA06 Objective 120
  175. GlobalVariable Property Ugor_G Auto ;DA06 Objective 120
  176.  
  177. ;-Misc
  178. GlobalVariable Property Adelaisa_Vendicci_G Auto ;MS10MiscObjPointer Objective 80
  179. GlobalVariable Property Ahtar_G Auto ;Captain Hargar dead
  180. GlobalVariable Property Aranea_Lenith_G Auto ;DA01 Objective 80
  181. GlobalVariable Property Benor_G Auto
  182. GlobalVariable Property Cosnach_G Auto
  183. GlobalVariable Property Derkeethus_G Auto ;DarkwaterCrossingDerkeethusRescueQuest Objective 20
  184. GlobalVariable Property Faendal_G Auto ;FreeformRiverwood01 Objective 210
  185. GlobalVariable Property Sven_G Auto ;FreeformRiverwood01 Objective 220
  186. GlobalVariable Property Kharjo_G Auto ;FreeformCaravansA Objective 15
  187. GlobalVariable Property Mjoll_The_Lioness_G Auto ;FreeformRiften09 Objective 20
  188. GlobalVariable Property Uthegerd_The_Unbroken_G Auto
  189.  
  190. ;-Viable Checks not found
  191. GlobalVariable Property Annekke_Crag_Jumper_G Auto
  192. GlobalVariable Property Roggi_Knot_Beard_G Auto
  193.  
  194. ;-Animals
  195. GlobalVariable Property Meeko_G Auto
  196.  
  197. ;DG
  198. GlobalVariable Property BranHusky_G Auto
  199. GlobalVariable Property CusithDeathHound_G Auto
  200. GlobalVariable Property GarmrDeathHound_G Auto
  201. GlobalVariable Property SceolangHusky_G Auto
  202.  
  203. ;-Actors------------------------------------------------------------------
  204. ;-Winterhold College
  205. Actor Property Brelya_Maryon_A Auto ; MGRAppBrelyna01 Objective 30
  206. Actor Property JZargo_A Auto ;MGRAppJZargo01 Objective 30
  207. Actor Property Onmund_A Auto ;MGRAppOnmund01 Objective 40
  208.  
  209. ;-Companions
  210. Actor Property Aela_A Auto
  211. Actor Property Athis_A Auto
  212. Actor Property Farkas_A Auto
  213. Actor Property Njada_Stonearm_A Auto
  214. Actor Property Ria_A Auto
  215. Actor Property Torvar_A Auto
  216. Actor Property Vilkas_A Auto
  217.  
  218. ;-Dark Brotherhood
  219. Actor Property Cicero_A Auto
  220. ;-Dawnguard
  221. Actor Property Agmaer_A Auto
  222. Actor Property Beleval_A Auto
  223. Actor Property Celann_A Auto
  224. Actor Property Durak_A Auto
  225. Actor Property Ingard_A Auto
  226. Actor Property Serana_A Auto
  227.  
  228. ;-Dragonborn
  229. Actor Property Frea_A Auto ;DLC2MQ03 Objective 70
  230. Actor Property Talvas_A Auto ;DLC2TTF1 Objective 200
  231. Actor Property Teldryn_Sero_A Auto
  232. ;-Dungeon Quest Followers
  233. Actor Property Erandur_A Auto ;DA16 Objective Objective 200
  234. Actor Property Golldir_A Auto ;dunHillgrundsTombQST Objective 100
  235. Actor Property illia_A Auto ;dunDarklightQST Objective 20
  236.  
  237. ;-Hirelings
  238. Actor Property Belrand_A Auto
  239. Actor Property Erik_The_Slayer_A Auto
  240. Actor Property Jenessa_A Auto
  241. Actor Property Marcurio_A Auto
  242. Actor Property Stenvar_A Auto
  243. Actor Property Vorstag_A Auto
  244.  
  245. ;-Housecarls
  246. Actor Property Argis_The_Bulwark_A Auto ;Favor250 15
  247. Actor Property Calder_A Auto ;favor254 15
  248. Actor Property Iona_A Auto ;FreeformThaneRiften 30
  249. Actor Property Jordis_The_Shield_Maiden_A Auto ;Favor252 15
  250. Actor Property Lydia_A Auto ;Favor253 15
  251.  
  252. ;-HF Housecarls
  253. Actor Property Gregor_A Auto ;Favor256 15
  254. Actor Property Rayya_A Auto ;Favor258 15
  255. Actor Property Valdimar_A Auto ;Favor255 15
  256.  
  257. ;-Orcs
  258. Actor Property Borgakh_The_Steel_Heart_A Auto
  259. Actor Property Gorbash_The_Iron_Hand_A Auto
  260. Actor Property Lob_A Auto ;DA06 Objective 120
  261. Actor Property Ogol_A Auto ;DA06 Objective 120
  262. Actor Property Ugor_A Auto ;DA06 Objective 120
  263.  
  264. ;-Misc
  265. Actor Property Adelaisa_Vendicci_A Auto ;MS10MiscObjPointer Objective 80
  266. Actor Property Ahtar_A Auto ;Captain Hargar dead
  267. Actor Property Aranea_Lenith_A Auto ;DA01 Objective 80
  268. Actor Property Benor_A Auto
  269. Actor Property Cosnach_A Auto
  270. Actor Property Derkeethus_A Auto ;DarkwaterCrossingDerkeethusRescueQuest Objective 20
  271. Actor Property Faendal_A Auto ;FreeformRiverwood01 Objective 210
  272. Actor Property Sven_A Auto ;FreeformRiverwood01 Objective 220
  273. Actor Property Kharjo_A Auto ;FreeformCaravansA Objective 15
  274. Actor Property Mjoll_The_Lioness_A Auto ;FreeformRiften09 Objective 20
  275. Actor Property Uthegerd_The_Unbroken_A Auto
  276.  
  277. ;-Viable Checks not found
  278. Actor Property Annekke_Crag_Jumper_A Auto
  279. Actor Property Roggi_Knot_Beard_A Auto
  280.  
  281. ;-Animals
  282. Actor Property Meeko_A Auto
  283. ;-DG
  284. Actor Property BranHusky_A Auto
  285. Actor Property CusithDeathHound_A Auto
  286. Actor Property GarmrDeathHound_A Auto
  287. Actor Property SceolangHusky_A Auto
  288.  
  289. ;-Quests and Checks-------------------------------------------------------
  290. Quest Property MGRAppBrelyna01_Obj30 Auto
  291. Quest Property MGRAppJZargo01_Obj30 Auto
  292. Quest Property MGRAppOnmund01_Obj40 Auto
  293. Quest Property DLC2MQ03_Frea_Obj70 Auto
  294. Quest Property DLC2TTF1_Talvas_Obj200 Auto
  295. Quest Property DA16_Erandur_Obj200 Auto
  296. Quest Property dunHillgrundsTombQST_Golldir_Obj100 Auto
  297. Quest Property dunDarklightQST_illia_Obj20 Auto
  298. Quest Property Favor250_ArgisBulwark_Obj15 Auto
  299. Quest Property favor254_Calder_Obj15 Auto
  300. Quest Property FreeformThaneRiften_Iona_Obj30 Auto
  301. Quest Property Favor252_JordisShieldMaiden_Obj15 Auto
  302. Quest Property Favor253_Lydia_Obj15 Auto
  303. Quest Property Favor256_Gregor_Obj15 Auto
  304. Quest Property Favor258_Rayya_Obj15 Auto
  305. Quest Property Favor255_Valdimar_Obj15 Auto
  306. Quest Property DA06_LobOgolUgor_Obj120 Auto
  307. Quest Property MS10MiscObjPointer_AdelaisaVendicci_Obj80 Auto
  308. Quest Property DA01_AraneaLenith_Obj80 Auto
  309. Quest Property DarkwaterCrossingDerkeethusRescueQuest_Obj20 Auto
  310. Quest Property FreeformRiverwood01_SvenObj220_FaendalObj210 Auto
  311. Quest Property FreeformCaravansA_Kharjo_Obj15 Auto
  312. Quest Property FreeformRiften09_Mjoll_Obj20 Auto
  313. Quest Property DLC1VQ02_DawnguardMain_Obj30DG_ObjIsNot30Vamp Auto
  314. Quest Property DLC2MQ01_DragonbornMain_Obj10 Auto
  315. Quest Property DB11_DarkBrotherhoodEnd_Obj80 Auto
  316. Quest Property C06_CompanionsEnd_Obj70 Auto
  317. Quest Property DLC1VQ04_Serana_Obj120 Auto
  318.  
  319. Book Property Meeko_Book Auto
  320. Actor Property CaptainHargar_AhtarCheck Auto
  321. ;-------------------------------------------------------------------------
  322. Event OnConfigInit()
  323. ModName = "Follower Command Station"
  324. Pages = new string[5]
  325. Pages[0] = "Skyrim"
  326. Pages[1] = "Dawnguard"
  327. Pages[2] = "Hearthfires"
  328. Pages[3] = "Dragonborn"
  329. Pages[4] = "Followers Share Knowledge"
  330. EndEvent
  331.  
  332. Event OnGameReload()
  333. Parent.OnGameReload()
  334. Endevent
  335.  
  336. Event OnPageReset(String page)
  337. If (page == "")
  338. LoadCustomContent("BulwarkFollowerVector.dds")
  339. Return
  340. Else
  341. UnloadCustomContent()
  342. Endif
  343.  
  344. If (page == "Skyrim")
  345. SetCursorFillMode(TOP_TO_BOTTOM)
  346. AddHeaderOption("College of Winterhold")
  347. If (MGRAppBrelyna01_Obj30.IsObjectiveCompleted(30) == True) && !Brelya_Maryon_A.IsDead()
  348. OID_Brelya_Maryon = AddSliderOption("Brelya Maryon", Brelya_Maryon_G.GetValueInt())
  349. Else
  350. Endif
  351. If (MGRAppJZargo01_Obj30.IsObjectiveCompleted(30) == True) && !JZargo_A.IsDead()
  352. OID_JZargo = AddSliderOption("JZargo", JZargo_G.GetValueInt())
  353. Else
  354. Endif
  355. If (MGRAppOnmund01_Obj40.IsObjectiveCompleted(40) == True) && !Onmund_A.IsDead()
  356. OID_JZargo = AddSliderOption("Onmund", Onmund_G.GetValueInt())
  357. Else
  358. Endif
  359. AddEmptyOption()
  360. AddHeaderOption("The Companions")
  361. If (C06_CompanionsEnd_Obj70.IsObjectiveCompleted(70) == True)
  362. If !Aela_A.IsDead()
  363. OID_Aela = AddSliderOption("Aela", Aela_G.GetValueInt())
  364. Else
  365. Endif
  366. If !Athis_A.IsDead()
  367. OID_Athis = AddSliderOption("Athis", Athis_G.GetValueInt())
  368. Else
  369. Endif
  370. If !Farkas_A.IsDead()
  371. OID_Farkas = AddSliderOption("Farkas", Farkas_G.GetValueInt())
  372. Else
  373. Endif
  374. If !Njada_Stonearm_A.IsDead()
  375. OID_Njada_Stonearm = AddSliderOption("Njada Stonearm", Njada_Stonearm_G.GetValueInt())
  376. Else
  377. Endif
  378. If !Ria_A.IsDead()
  379. OID_Ria = AddSliderOption("Ria", Ria_G.GetValueInt())
  380. Else
  381. Endif
  382. If !Torvar_A.IsDead()
  383. OID_Torvar = AddSliderOption("Torvar", Torvar_G.GetValueInt())
  384. Else
  385. Endif
  386. If !Vilkas_A.IsDead()
  387. OID_Vilkas = AddSliderOption("Vilkas", Vilkas_G.GetValueInt())
  388. Else
  389. Endif
  390. Else
  391. Endif
  392. AddEmptyOption()
  393. AddHeaderOption("The Dark Brotherhood")
  394. If (DB11_DarkBrotherhoodEnd_Obj80.IsObjectiveCompleted(80) == True) && !Cicero_A.IsDead()
  395. OID_Cicero = AddSliderOption("Cicero", Cicero_G.GetValueInt())
  396. Else
  397. Endif
  398. AddEmptyOption()
  399. AddHeaderOption("Dungeon Quest Followers")
  400. If (DA16_Erandur_Obj200.IsObjectiveCompleted(200) == True) && !Erandur_A.IsDead()
  401. OID_Erandur = AddSliderOption("Cicero", Erandur_G.GetValueInt())
  402. Else
  403. Endif
  404. If (dunHillgrundsTombQST_Golldir_Obj100.IsObjectiveCompleted(100) == True) && !Golldir_A.IsDead()
  405. OID_Golldir = AddSliderOption("Golldir", Golldir_G.GetValueInt())
  406. Else
  407. Endif
  408. If (dunDarklightQST_illia_Obj20.IsObjectiveCompleted(20) == True) && !illia_A.IsDead()
  409. OID_illia = AddSliderOption("illia", illia_G.GetValueInt())
  410. Else
  411. Endif
  412. AddEmptyOption()
  413. AddHeaderOption("Mercenaries")
  414. If !Belrand_A.IsDead()
  415. OID_Belrand = AddSliderOption("Belrand", Belrand_G.GetValueInt())
  416. Else
  417. Endif
  418. If !Vorstag_A.IsDead()
  419. OID_Vorstag = AddSliderOption("Vorstag", Vorstag_G.GetValueInt())
  420. Else
  421. Endif
  422. If !Erik_The_Slayer_A.IsDead()
  423. OID_Erik_The_Slayer = AddSliderOption("Erik The Slayer", Erik_The_Slayer_G.GetValueInt())
  424. Else
  425. Endif
  426. If !Jenessa_A.IsDead()
  427. OID_Jenessa = AddSliderOption("Jenessa", Jenessa_G.GetValueInt())
  428. Else
  429. Endif
  430. If !Marcurio_A.IsDead()
  431. OID_Marcurio = AddSliderOption("Marcurio", Marcurio_G.GetValueInt())
  432. Else
  433. Endif
  434. If !Stenvar_A.IsDead()
  435. OID_Stenvar = AddSliderOption("Stenvar", Vilkas_G.GetValueInt())
  436. Else
  437. Endif
  438. AddEmptyOption()
  439. AddHeaderOption("Housecarls")
  440. If (Favor250_ArgisBulwark_Obj15.IsObjectiveCompleted(15) == True) && !Argis_The_Bulwark_A.IsDead()
  441. OID_Argis_The_Bulwark = AddSliderOption("Argis The Bulwark", Argis_The_Bulwark_G.GetValueInt())
  442. Else
  443. Endif
  444. If (favor254_Calder_Obj15.IsObjectiveCompleted(15) == True) && !Calder_A.IsDead()
  445. OID_Calder = AddSliderOption("Calder", Calder_G.GetValueInt())
  446. Else
  447. Endif
  448. If (FreeformThaneRiften_Iona_Obj30.IsObjectiveCompleted(30) == True) && !Iona_A.IsDead()
  449. OID_Iona = AddSliderOption("Iona", Iona_G.GetValueInt())
  450. Else
  451. Endif
  452. If (Favor252_JordisShieldMaiden_Obj15.IsObjectiveCompleted(15) == True) && !Jordis_The_Shield_Maiden_A.IsDead()
  453. OID_Jordis_The_Shield_Maiden = AddSliderOption("Jordis Shield Maiden", Jordis_The_Shield_Maiden_G.GetValueInt())
  454. Else
  455. Endif
  456. If (Favor253_Lydia_Obj15.IsObjectiveCompleted(15) == True) && !Lydia_A.IsDead()
  457. OID_Lydia = AddSliderOption("Lydia", Lydia_G.GetValueInt())
  458. Else
  459. Endif
  460. AddEmptyOption()
  461. AddHeaderOption("Stronghold Orcs")
  462. If !Borgakh_The_Steel_Heart_A.IsDead()
  463. OID_Borgakh_The_Steel_Heart = AddSliderOption("Borgakh SteelHeart", Borgakh_The_Steel_Heart_G.GetValueInt())
  464. Else
  465. Endif
  466. If !Gorbash_The_Iron_Hand_A.IsDead()
  467. OID_Gorbash_The_Iron_Hand = AddSliderOption("Ghorbash IronHand", Gorbash_The_Iron_Hand_G.GetValueInt())
  468. Else
  469. Endif
  470. If (DA06_LobOgolUgor_Obj120.IsObjectiveCompleted(120) == True) && !Lob_A.IsDead()
  471. OID_Lob = AddSliderOption("Lob", Lob_G.GetValueInt())
  472. Else
  473. Endif
  474. If (DA06_LobOgolUgor_Obj120.IsObjectiveCompleted(120) == True) && !Ogol_A.IsDead()
  475. OID_Ogol = AddSliderOption("Ogol", Ogol_G.GetValueInt())
  476. Else
  477. Endif
  478. If (DA06_LobOgolUgor_Obj120.IsObjectiveCompleted(120) == True) && !Ugor_A.IsDead()
  479. OID_Ugor = AddSliderOption("Ugor", Ugor_G.GetValueInt())
  480. Else
  481. Endif
  482. AddEmptyOption()
  483. AddHeaderOption("Misc")
  484. If (MS10MiscObjPointer_AdelaisaVendicci_Obj80.IsObjectiveCompleted(80) == True) && !Adelaisa_Vendicci_A.IsDead()
  485. OID_Adelaisa_Vendicci = AddSliderOption("Ugor", Adelaisa_Vendicci_G.GetValueInt())
  486. Else
  487. Endif
  488. If (DA01_AraneaLenith_Obj80.IsObjectiveCompleted(80) == True) && !Aranea_Lenith_A.IsDead()
  489. OID_Aranea_Lenith = AddSliderOption("Aranea Lenith", Aranea_Lenith_G.GetValueInt())
  490. Else
  491. Endif
  492. If (DarkwaterCrossingDerkeethusRescueQuest_Obj20.IsObjectiveCompleted(20) == True) && !Derkeethus_A.IsDead()
  493. OID_Derkeethus = AddSliderOption("Derkeethus", Derkeethus_G.GetValueInt())
  494. Else
  495. Endif
  496. If (FreeformRiverwood01_SvenObj220_FaendalObj210.IsObjectiveCompleted(210) == True) && !Faendal_A.IsDead()
  497. OID_Faendal = AddSliderOption("Faendal", Faendal_G.GetValueInt())
  498. Else
  499. Endif
  500. If (FreeformRiverwood01_SvenObj220_FaendalObj210.IsObjectiveCompleted(220) == True) && !Sven_A.IsDead()
  501. OID_Sven = AddSliderOption("Sven", Sven_G.GetValueInt())
  502. Else
  503. Endif
  504. If (FreeformCaravansA_Kharjo_Obj15.IsObjectiveCompleted(15) == True) && !Kharjo_A.IsDead()
  505. OID_Kharjo = AddSliderOption("Kharjo", Kharjo_G.GetValueInt())
  506. Else
  507. Endif
  508. If (FreeformRiften09_Mjoll_Obj20.IsObjectiveCompleted(20) == True) && !Mjoll_The_Lioness_A.IsDead()
  509. OID_Mjoll_The_Lioness = AddSliderOption("Mjoll The Lioness", Mjoll_The_Lioness_G.GetValueInt())
  510. Else
  511. Endif
  512. If !Uthegerd_The_Unbroken_A.IsDead()
  513. OID_Uthegerd_The_Unbroken = AddSliderOption("Uthegerd The Unbroken", Uthegerd_The_Unbroken_G.GetValueInt())
  514. Else
  515. Endif
  516. If !Benor_A.IsDead()
  517. OID_Benor = AddSliderOption("Benor", Benor_G.GetValueInt())
  518. Else
  519. Endif
  520. If !Cosnach_A.IsDead()
  521. OID_Cosnach = AddSliderOption("Cosnach", Cosnach_G.GetValueInt())
  522. Else
  523. Endif
  524. If !Ahtar_A.IsDead() && CaptainHargar_AhtarCheck.IsDead()
  525. OID_Ahtar = AddSliderOption("Ahtar", Ahtar_G.GetValueInt())
  526. Else
  527. Endif
  528. AddEmptyOption()
  529. AddHeaderOption("Animals")
  530. If !Meeko_A.IsDead() && Meeko_Book.IsRead()
  531. OID_Meeko = AddSliderOption("Meeko", Meeko_G.GetValueInt())
  532. Else
  533. Endif
  534. AddEmptyOption()
  535. AddHeaderOption("Potentially Unsafe")
  536. If !Annekke_Crag_Jumper_A.IsDead()
  537. OID_Annekke_Crag_Jumper = AddSliderOption("Annekke Crag Jumper", Annekke_Crag_Jumper_G.GetValueInt())
  538. Else
  539. Endif
  540. If !Roggi_Knot_Beard_A.IsDead()
  541. OID_Roggi_Knot_Beard = AddSliderOption("Roggi KnotBeard", Roggi_Knot_Beard_G.GetValueInt())
  542. Else
  543. Endif
  544. Elseif (page == "Dawnguard")
  545. SetCursorFillMode(TOP_TO_BOTTOM)
  546. AddHeaderOption("Serana")
  547. If (DLC1VQ04_Serana_Obj120.IsObjectiveCompleted(120) == True) && !Serana_A.IsDead()
  548. OID_Serana = AddSliderOption("Serana", Serana_G.GetValueInt())
  549. Else
  550. Endif
  551. AddEmptyOption()
  552. AddHeaderOption("Dawnguard NPCs")
  553. If (DLC1VQ02_DawnguardMain_Obj30DG_ObjIsNot30Vamp.IsObjectiveCompleted(30) == True)
  554. If !Agmaer_A.IsDead()
  555. OID_Agmaer = AddSliderOption("Agmaer", Agmaer_G.GetValueInt())
  556. Else
  557. Endif
  558. If !Beleval_A.IsDead()
  559. OID_Beleval = AddSliderOption("Beleval", Beleval_G.GetValueInt())
  560. Else
  561. Endif
  562. If !Celann_A.IsDead()
  563. OID_Celann = AddSliderOption("Celann", Celann_G.GetValueInt())
  564. Else
  565. Endif
  566. If !Durak_A.IsDead()
  567. OID_Durak = AddSliderOption("Durak", Durak_G.GetValueInt())
  568. Else
  569. Endif
  570. If !Ingard_A.IsDead()
  571. OID_Ingard = AddSliderOption("Ingjard", Ingard_G.GetValueInt())
  572. Else
  573. Endif
  574. If !BranHusky_A.IsDead()
  575. OID_BranHusky = AddSliderOption("Bran", BranHusky_G.GetValueInt())
  576. Else
  577. Endif
  578. If !SceolangHusky_A.IsDead()
  579. OID_SceolangHusky = AddSliderOption("Sceolang", SceolangHusky_G.GetValueInt())
  580. Else
  581. Endif
  582. Elseif (DLC1VQ02_DawnguardMain_Obj30DG_ObjIsNot30Vamp.IsObjectiveCompleted(30) == False) && (DLC1VQ02_DawnguardMain_Obj30DG_ObjIsNot30Vamp.IsCompleted())
  583. If !CusithDeathHound_A.IsDead()
  584. OID_CusithDeathHound = AddSliderOption("Cusith", CusithDeathHound_G.GetValueInt())
  585. Else
  586. Endif
  587. If !GarmrDeathHound_A.IsDead()
  588. OID_GarmrDeathHound = AddSliderOption("Garmr", GarmrDeathHound_G.GetValueInt())
  589. Else
  590. Endif
  591. Endif
  592. Elseif (page == "Hearthfires")
  593. SetCursorFillMode(TOP_TO_BOTTOM)
  594. AddHeaderOption("Hearthfires Housecarls")
  595. If (Favor256_Gregor_Obj15.IsObjectiveCompleted(15) == True) && !Gregor_A.IsDead()
  596. OID_Gregor = AddSliderOption("Gregor", Gregor_G.GetValueInt())
  597. Else
  598. Endif
  599. If (Favor258_Rayya_Obj15.IsObjectiveCompleted(15) == True) && !Rayya_A.IsDead()
  600. OID_Rayya = AddSliderOption("Rayya", Rayya_G.GetValueInt())
  601. Else
  602. Endif
  603. If (Favor255_Valdimar_Obj15.IsObjectiveCompleted(15) == True) && !Valdimar_A.IsDead()
  604. OID_Valdimar = AddSliderOption("Valdimar", Valdimar_G.GetValueInt())
  605. Else
  606. Endif
  607. Elseif (page == "Dragonborn")
  608. SetCursorFillMode(TOP_TO_BOTTOM)
  609. AddHeaderOption("Dragonborn Followers")
  610. If (DLC2MQ01_DragonbornMain_Obj10.IsObjectiveCompleted(10) == True)
  611. If (Favor255_Valdimar_Obj15.IsObjectiveCompleted(15) == True)
  612. If !Teldryn_Sero_A.IsDead()
  613. OID_Teldryn_Sero = AddSliderOption("Teldryn Sero", Teldryn_Sero_G.GetValueInt())
  614. Else
  615. Endif
  616. If (DLC2MQ03_Frea_Obj70.IsObjectiveCompleted(70) == True) && !Frea_A.IsDead()
  617. OID_Frea = AddSliderOption("Frea", Frea_G.GetValueInt())
  618. Else
  619. Endif
  620. If (DLC2TTF1_Talvas_Obj200.IsObjectiveCompleted(200) == True) && !Talvas_A.IsDead()
  621. OID_Talvas = AddSliderOption("Talvas", Talvas_G.GetValueInt())
  622. Else
  623. Endif
  624. Else
  625. Endif
  626. Else
  627. Endif
  628. Elseif (page == "Followers Share Knowledge")
  629. SetCursorFillMode(TOP_TO_BOTTOM)
  630. AddHeaderOption("Control Quest Overwrite")
  631. OID_SkyrimFollowersShare = AddSliderOption("Skyrim.esm Followers", FollowersShareVanilla_G.GetValueInt())
  632. OID_DawnguardFollowersShare = AddSliderOption("Dawnguard.esm Followers", FollowersShareDawnguard_G.GetValueInt())
  633. OID_HearthfiresFollowersShare = AddSliderOption("Hearthfires.esm Followers", FollowersShareHearthfires_G.GetValueInt())
  634. OID_DragonbornFollowersShare = AddSliderOption("Dragonborn.esm Followers", FollowersShareDragonborn_G.GetValueInt())
  635. Endif
  636. EndEvent
  637.  
  638. Event OnOptionHighlight(int option)
  639. If (option == OID_Brelya_Maryon)
  640. SetInfoText ("Set to 1 to summon this follower")
  641. Elseif (option == OID_JZargo)
  642. SetInfoText ("Set to 1 to summon this follower")
  643. Elseif (option == OID_Onmund)
  644. SetInfoText ("Set to 1 to summon this follower")
  645. Elseif (option == OID_Aela)
  646. SetInfoText ("Set to 1 to summon this follower")
  647. Elseif (option == OID_Athis)
  648. SetInfoText ("Set to 1 to summon this follower")
  649. Elseif (option == OID_Farkas)
  650. SetInfoText ("Set to 1 to summon this follower")
  651. Elseif (option == OID_Njada_Stonearm)
  652. SetInfoText ("Set to 1 to summon this follower")
  653. Elseif (option == OID_Ria)
  654. SetInfoText ("Set to 1 to summon this follower")
  655. Elseif (option == OID_Torvar)
  656. SetInfoText ("Set to 1 to summon this follower")
  657. Elseif (option == OID_Vilkas)
  658. SetInfoText ("Set to 1 to summon this follower")
  659. Elseif (option == OID_Cicero)
  660. SetInfoText ("Set to 1 to summon this follower")
  661. Elseif (option == OID_Agmaer)
  662. SetInfoText ("Set to 1 to summon this follower")
  663. Elseif (option == OID_Beleval)
  664. SetInfoText ("Set to 1 to summon this follower")
  665. Elseif (option == OID_Celann)
  666. SetInfoText ("Set to 1 to summon this follower")
  667. Elseif (option == OID_Durak)
  668. SetInfoText ("Set to 1 to summon this follower")
  669. Elseif (option == OID_Ingard)
  670. SetInfoText ("Set to 1 to summon this follower")
  671. Elseif (option == OID_Serana)
  672. SetInfoText ("Set to 1 to summon this follower")
  673. Elseif (option == OID_Frea)
  674. SetInfoText ("Set to 1 to summon this follower")
  675. Elseif (option == OID_Talvas)
  676. SetInfoText ("Set to 1 to summon this follower")
  677. Elseif (option == OID_Teldryn_Sero)
  678. SetInfoText ("Set to 1 to summon this follower")
  679. Elseif (option == OID_Erandur)
  680. SetInfoText ("Set to 1 to summon this follower")
  681. Elseif (option == OID_Golldir)
  682. SetInfoText ("Set to 1 to summon this follower")
  683. Elseif (option == OID_illia)
  684. SetInfoText ("Set to 1 to summon this follower")
  685. Elseif (option == OID_Belrand)
  686. SetInfoText ("Set to 1 to summon this follower")
  687. Elseif (option == OID_Erik_The_Slayer)
  688. SetInfoText ("Set to 1 to summon this follower")
  689. Elseif (option == OID_Jenessa)
  690. SetInfoText ("Set to 1 to summon this follower")
  691. Elseif (option == OID_Marcurio)
  692. SetInfoText ("Set to 1 to summon this follower")
  693. Elseif (option == OID_Stenvar)
  694. SetInfoText ("Set to 1 to summon this follower")
  695. Elseif (option == OID_Vorstag)
  696. SetInfoText ("Set to 1 to summon this follower")
  697. Elseif (option == OID_Argis_The_Bulwark)
  698. SetInfoText ("Set to 1 to summon this follower")
  699. Elseif (option == OID_Calder)
  700. SetInfoText ("Set to 1 to summon this follower")
  701. Elseif (option == OID_Iona)
  702. SetInfoText ("Set to 1 to summon this follower")
  703. Elseif (option == OID_Jordis_The_Shield_Maiden)
  704. SetInfoText ("Set to 1 to summon this follower")
  705. Elseif (option == OID_Lydia)
  706. SetInfoText ("Set to 1 to summon this follower")
  707. Elseif (option == OID_Gregor)
  708. SetInfoText ("Set to 1 to summon this follower")
  709. Elseif (option == OID_Rayya)
  710. SetInfoText ("Set to 1 to summon this follower")
  711. Elseif (option == OID_Valdimar)
  712. SetInfoText ("Set to 1 to summon this follower")
  713. Elseif (option == OID_Borgakh_The_Steel_Heart)
  714. SetInfoText ("Set to 1 to summon this follower")
  715. Elseif (option == OID_Gorbash_The_Iron_Hand)
  716. SetInfoText ("Set to 1 to summon this follower")
  717. Elseif (option == OID_Lob)
  718. SetInfoText ("Set to 1 to summon this follower")
  719. Elseif (option == OID_Ogol)
  720. SetInfoText ("Set to 1 to summon this follower")
  721. Elseif (option == OID_Ugor)
  722. SetInfoText ("Set to 1 to summon this follower")
  723. Elseif (option == OID_Borgakh_The_Steel_Heart)
  724. SetInfoText ("Set to 1 to summon this follower")
  725. Elseif (option == OID_Gorbash_The_Iron_Hand)
  726. SetInfoText ("Set to 1 to summon this follower")
  727. Elseif (option == OID_Lob)
  728. SetInfoText ("Set to 1 to summon this follower")
  729. Elseif (option == OID_Ogol)
  730. SetInfoText ("Set to 1 to summon this follower")
  731. Elseif (option == OID_Ugor)
  732. SetInfoText ("Set to 1 to summon this follower")
  733. Elseif (option == OID_Adelaisa_Vendicci)
  734. SetInfoText ("Set to 1 to summon this follower")
  735. Elseif (option == OID_Aranea_Lenith)
  736. SetInfoText ("Set to 1 to summon this follower")
  737. Elseif (option == OID_Derkeethus)
  738. SetInfoText ("Set to 1 to summon this follower")
  739. Elseif (option == OID_Faendal)
  740. SetInfoText ("Set to 1 to summon this follower")
  741. Elseif (option == OID_Sven)
  742. SetInfoText ("Set to 1 to summon this follower")
  743. Elseif (option == OID_Kharjo)
  744. SetInfoText ("Set to 1 to summon this follower")
  745. Elseif (option == OID_Mjoll_The_Lioness)
  746. SetInfoText ("Set to 1 to summon this follower")
  747. Elseif (option == OID_Uthegerd_The_Unbroken)
  748. SetInfoText ("Set to 1 to summon this follower")
  749. Elseif (option == OID_Benor)
  750. SetInfoText ("Set to 1 to summon this follower")
  751. Elseif (option == OID_Cosnach)
  752. SetInfoText ("Set to 1 to summon this follower")
  753. Elseif (option == OID_Ahtar)
  754. SetInfoText ("Set to 1 to summon this follower")
  755. Elseif (option == OID_Annekke_Crag_Jumper)
  756. SetInfoText ("Set to 1 to summon this follower")
  757. Elseif (option == OID_Roggi_Knot_Beard)
  758. SetInfoText ("Set to 1 to summon this follower")
  759. Elseif (option == OID_Meeko)
  760. SetInfoText ("Set to 1 to summon this follower")
  761. Elseif (option == OID_BranHusky)
  762. SetInfoText ("Set to 1 to summon this follower")
  763. Elseif (option == OID_CusithDeathHound)
  764. SetInfoText ("Set to 1 to summon this follower")
  765. Elseif (option == OID_GarmrDeathHound)
  766. SetInfoText ("Set to 1 to summon this follower")
  767. Elseif (option == OID_SceolangHusky)
  768. SetInfoText ("Set to 1 to summon this follower")
  769. Elseif (option == OID_SkyrimFollowersShare)
  770. SetInfoText ("0=OFF, 1=ON")
  771. Elseif (option == OID_DawnguardFollowersShare)
  772. SetInfoText ("0=OFF, 1=ON")
  773. Elseif (option == OID_HearthfiresFollowersShare)
  774. SetInfoText ("0=OFF, 1=ON")
  775. Elseif (option == OID_DragonbornFollowersShare)
  776. SetInfoText ("0=OFF, 1=ON")
  777. Endif
  778. EndEvent
  779.  
  780. Event OnOptionSliderOpen(int option)
  781. If (option == OID_Brelya_Maryon)
  782. SetSliderDialogStartValue (0)
  783. SetSliderDialogDefaultValue (0)
  784. SetSliderDialogRange (0, 1)
  785. SetSliderDialogInterval (1)
  786.  
  787. Elseif (option == OID_JZargo)
  788. SetSliderDialogStartValue (0)
  789. SetSliderDialogDefaultValue (0)
  790. SetSliderDialogRange (0, 1)
  791. SetSliderDialogInterval (1)
  792.  
  793. Elseif (option == OID_Onmund)
  794. SetSliderDialogStartValue (0)
  795. SetSliderDialogDefaultValue (0)
  796. SetSliderDialogRange (0, 1)
  797. SetSliderDialogInterval (1)
  798.  
  799. Elseif (option == OID_Aela)
  800. SetSliderDialogStartValue (0)
  801. SetSliderDialogDefaultValue (0)
  802. SetSliderDialogRange (0, 1)
  803. SetSliderDialogInterval (1)
  804.  
  805. Elseif (option == OID_Athis)
  806. SetSliderDialogStartValue (0)
  807. SetSliderDialogDefaultValue (0)
  808. SetSliderDialogRange (0, 1)
  809. SetSliderDialogInterval (1)
  810.  
  811. Elseif (option == OID_Farkas)
  812. SetSliderDialogStartValue (0)
  813. SetSliderDialogDefaultValue (0)
  814. SetSliderDialogRange (0, 1)
  815. SetSliderDialogInterval (1)
  816.  
  817. Elseif (option == OID_Njada_Stonearm)
  818. SetSliderDialogStartValue (0)
  819. SetSliderDialogDefaultValue (0)
  820. SetSliderDialogRange (0, 1)
  821. SetSliderDialogInterval (1)
  822.  
  823. Elseif (option == OID_Ria)
  824. SetSliderDialogStartValue (0)
  825. SetSliderDialogDefaultValue (0)
  826. SetSliderDialogRange (0, 1)
  827. SetSliderDialogInterval (1)
  828.  
  829. Elseif (option == OID_Torvar)
  830. SetSliderDialogStartValue (0)
  831. SetSliderDialogDefaultValue (0)
  832. SetSliderDialogRange (0, 1)
  833. SetSliderDialogInterval (1)
  834.  
  835. Elseif (option == OID_Vilkas)
  836. SetSliderDialogStartValue (0)
  837. SetSliderDialogDefaultValue (0)
  838. SetSliderDialogRange (0, 1)
  839. SetSliderDialogInterval (1)
  840.  
  841. Elseif (option == OID_Cicero)
  842. SetSliderDialogStartValue (0)
  843. SetSliderDialogDefaultValue (0)
  844. SetSliderDialogRange (0, 1)
  845. SetSliderDialogInterval (1)
  846.  
  847. Elseif (option == OID_Agmaer)
  848. SetSliderDialogStartValue (0)
  849. SetSliderDialogDefaultValue (0)
  850. SetSliderDialogRange (0, 1)
  851. SetSliderDialogInterval (1)
  852.  
  853. Elseif (option == OID_Beleval)
  854. SetSliderDialogStartValue (0)
  855. SetSliderDialogDefaultValue (0)
  856. SetSliderDialogRange (0, 1)
  857. SetSliderDialogInterval (1)
  858.  
  859. Elseif (option == OID_Celann)
  860. SetSliderDialogStartValue (0)
  861. SetSliderDialogDefaultValue (0)
  862. SetSliderDialogRange (0, 1)
  863. SetSliderDialogInterval (1)
  864.  
  865. Elseif (option == OID_Durak)
  866. SetSliderDialogStartValue (0)
  867. SetSliderDialogDefaultValue (0)
  868. SetSliderDialogRange (0, 1)
  869. SetSliderDialogInterval (1)
  870.  
  871. Elseif (option == OID_Ingard)
  872. SetSliderDialogStartValue (0)
  873. SetSliderDialogDefaultValue (0)
  874. SetSliderDialogRange (0, 1)
  875. SetSliderDialogInterval (1)
  876.  
  877. Elseif (option == OID_Serana)
  878. SetSliderDialogStartValue (0)
  879. SetSliderDialogDefaultValue (0)
  880. SetSliderDialogRange (0, 1)
  881. SetSliderDialogInterval (1)
  882.  
  883. Elseif (option == OID_Frea)
  884. SetSliderDialogStartValue (0)
  885. SetSliderDialogDefaultValue (0)
  886. SetSliderDialogRange (0, 1)
  887. SetSliderDialogInterval (1)
  888.  
  889. Elseif (option == OID_Talvas)
  890. SetSliderDialogStartValue (0)
  891. SetSliderDialogDefaultValue (0)
  892. SetSliderDialogRange (0, 1)
  893. SetSliderDialogInterval (1)
  894.  
  895. Elseif (option == OID_Teldryn_Sero)
  896. SetSliderDialogStartValue (0)
  897. SetSliderDialogDefaultValue (0)
  898. SetSliderDialogRange (0, 1)
  899. SetSliderDialogInterval (1)
  900.  
  901. Elseif (option == OID_Erandur)
  902. SetSliderDialogStartValue (0)
  903. SetSliderDialogDefaultValue (0)
  904. SetSliderDialogRange (0, 1)
  905. SetSliderDialogInterval (1)
  906.  
  907. Elseif (option == OID_Golldir)
  908. SetSliderDialogStartValue (0)
  909. SetSliderDialogDefaultValue (0)
  910. SetSliderDialogRange (0, 1)
  911. SetSliderDialogInterval (1)
  912.  
  913. Elseif (option == OID_illia)
  914. SetSliderDialogStartValue (0)
  915. SetSliderDialogDefaultValue (0)
  916. SetSliderDialogRange (0, 1)
  917. SetSliderDialogInterval (1)
  918.  
  919. Elseif (option == OID_Belrand)
  920. SetSliderDialogStartValue (0)
  921. SetSliderDialogDefaultValue (0)
  922. SetSliderDialogRange (0, 1)
  923. SetSliderDialogInterval (1)
  924.  
  925. Elseif (option == OID_Erik_The_Slayer)
  926. SetSliderDialogStartValue (0)
  927. SetSliderDialogDefaultValue (0)
  928. SetSliderDialogRange (0, 1)
  929. SetSliderDialogInterval (1)
  930.  
  931. Elseif (option == OID_Jenessa)
  932. SetSliderDialogStartValue (0)
  933. SetSliderDialogDefaultValue (0)
  934. SetSliderDialogRange (0, 1)
  935. SetSliderDialogInterval (1)
  936.  
  937. Elseif (option == OID_Marcurio)
  938. SetSliderDialogStartValue (0)
  939. SetSliderDialogDefaultValue (0)
  940. SetSliderDialogRange (0, 1)
  941. SetSliderDialogInterval (1)
  942.  
  943. Elseif (option == OID_Stenvar)
  944. SetSliderDialogStartValue (0)
  945. SetSliderDialogDefaultValue (0)
  946. SetSliderDialogRange (0, 1)
  947. SetSliderDialogInterval (1)
  948.  
  949. Elseif (option == OID_Vorstag)
  950. SetSliderDialogStartValue (0)
  951. SetSliderDialogDefaultValue (0)
  952. SetSliderDialogRange (0, 1)
  953. SetSliderDialogInterval (1)
  954.  
  955. Elseif (option == OID_Argis_The_Bulwark)
  956. SetSliderDialogStartValue (0)
  957. SetSliderDialogDefaultValue (0)
  958. SetSliderDialogRange (0, 1)
  959. SetSliderDialogInterval (1)
  960.  
  961. Elseif (option == OID_Calder)
  962. SetSliderDialogStartValue (0)
  963. SetSliderDialogDefaultValue (0)
  964. SetSliderDialogRange (0, 1)
  965. SetSliderDialogInterval (1)
  966.  
  967. Elseif (option == OID_Iona)
  968. SetSliderDialogStartValue (0)
  969. SetSliderDialogDefaultValue (0)
  970. SetSliderDialogRange (0, 1)
  971. SetSliderDialogInterval (1)
  972.  
  973. Elseif (option == OID_Jordis_The_Shield_Maiden)
  974. SetSliderDialogStartValue (0)
  975. SetSliderDialogDefaultValue (0)
  976. SetSliderDialogRange (0, 1)
  977. SetSliderDialogInterval (1)
  978.  
  979. Elseif (option == OID_Lydia)
  980. SetSliderDialogStartValue (0)
  981. SetSliderDialogDefaultValue (0)
  982. SetSliderDialogRange (0, 1)
  983. SetSliderDialogInterval (1)
  984.  
  985. Elseif (option == OID_Gregor)
  986. SetSliderDialogStartValue (0)
  987. SetSliderDialogDefaultValue (0)
  988. SetSliderDialogRange (0, 1)
  989. SetSliderDialogInterval (1)
  990.  
  991. Elseif (option == OID_Rayya)
  992. SetSliderDialogStartValue (0)
  993. SetSliderDialogDefaultValue (0)
  994. SetSliderDialogRange (0, 1)
  995. SetSliderDialogInterval (1)
  996.  
  997. Elseif (option == OID_Valdimar)
  998. SetSliderDialogStartValue (0)
  999. SetSliderDialogDefaultValue (0)
  1000. SetSliderDialogRange (0, 1)
  1001. SetSliderDialogInterval (1)
  1002.  
  1003. Elseif (option == OID_Borgakh_The_Steel_Heart)
  1004. SetSliderDialogStartValue (0)
  1005. SetSliderDialogDefaultValue (0)
  1006. SetSliderDialogRange (0, 1)
  1007. SetSliderDialogInterval (1)
  1008.  
  1009. Elseif (option == OID_Gorbash_The_Iron_Hand)
  1010. SetSliderDialogStartValue (0)
  1011. SetSliderDialogDefaultValue (0)
  1012. SetSliderDialogRange (0, 1)
  1013. SetSliderDialogInterval (1)
  1014.  
  1015. Elseif (option == OID_Lob)
  1016. SetSliderDialogStartValue (0)
  1017. SetSliderDialogDefaultValue (0)
  1018. SetSliderDialogRange (0, 1)
  1019. SetSliderDialogInterval (1)
  1020.  
  1021. Elseif (option == OID_Ogol)
  1022. SetSliderDialogStartValue (0)
  1023. SetSliderDialogDefaultValue (0)
  1024. SetSliderDialogRange (0, 1)
  1025. SetSliderDialogInterval (1)
  1026.  
  1027. Elseif (option == OID_Ugor)
  1028. SetSliderDialogStartValue (0)
  1029. SetSliderDialogDefaultValue (0)
  1030. SetSliderDialogRange (0, 1)
  1031. SetSliderDialogInterval (1)
  1032.  
  1033. Elseif (option == OID_Borgakh_The_Steel_Heart)
  1034. SetSliderDialogStartValue (0)
  1035. SetSliderDialogDefaultValue (0)
  1036. SetSliderDialogRange (0, 1)
  1037. SetSliderDialogInterval (1)
  1038.  
  1039. Elseif (option == OID_Gorbash_The_Iron_Hand)
  1040. SetSliderDialogStartValue (0)
  1041. SetSliderDialogDefaultValue (0)
  1042. SetSliderDialogRange (0, 1)
  1043. SetSliderDialogInterval (1)
  1044.  
  1045. Elseif (option == OID_Lob)
  1046. SetSliderDialogStartValue (0)
  1047. SetSliderDialogDefaultValue (0)
  1048. SetSliderDialogRange (0, 1)
  1049. SetSliderDialogInterval (1)
  1050.  
  1051. Elseif (option == OID_Ogol)
  1052. SetSliderDialogStartValue (0)
  1053. SetSliderDialogDefaultValue (0)
  1054. SetSliderDialogRange (0, 1)
  1055. SetSliderDialogInterval (1)
  1056.  
  1057. Elseif (option == OID_Ugor)
  1058. SetSliderDialogStartValue (0)
  1059. SetSliderDialogDefaultValue (0)
  1060. SetSliderDialogRange (0, 1)
  1061. SetSliderDialogInterval (1)
  1062.  
  1063. Elseif (option == OID_Adelaisa_Vendicci)
  1064. SetSliderDialogStartValue (0)
  1065. SetSliderDialogDefaultValue (0)
  1066. SetSliderDialogRange (0, 1)
  1067. SetSliderDialogInterval (1)
  1068.  
  1069. Elseif (option == OID_Aranea_Lenith)
  1070. SetSliderDialogStartValue (0)
  1071. SetSliderDialogDefaultValue (0)
  1072. SetSliderDialogRange (0, 1)
  1073. SetSliderDialogInterval (1)
  1074.  
  1075. Elseif (option == OID_Derkeethus)
  1076. SetSliderDialogStartValue (0)
  1077. SetSliderDialogDefaultValue (0)
  1078. SetSliderDialogRange (0, 1)
  1079. SetSliderDialogInterval (1)
  1080.  
  1081. Elseif (option == OID_Faendal)
  1082. SetSliderDialogStartValue (0)
  1083. SetSliderDialogDefaultValue (0)
  1084. SetSliderDialogRange (0, 1)
  1085. SetSliderDialogInterval (1)
  1086.  
  1087. Elseif (option == OID_Sven)
  1088. SetSliderDialogStartValue (0)
  1089. SetSliderDialogDefaultValue (0)
  1090. SetSliderDialogRange (0, 1)
  1091. SetSliderDialogInterval (1)
  1092.  
  1093. Elseif (option == OID_Kharjo)
  1094. SetSliderDialogStartValue (0)
  1095. SetSliderDialogDefaultValue (0)
  1096. SetSliderDialogRange (0, 1)
  1097. SetSliderDialogInterval (1)
  1098.  
  1099. Elseif (option == OID_Mjoll_The_Lioness)
  1100. SetSliderDialogStartValue (0)
  1101. SetSliderDialogDefaultValue (0)
  1102. SetSliderDialogRange (0, 1)
  1103. SetSliderDialogInterval (1)
  1104.  
  1105. Elseif (option == OID_Uthegerd_The_Unbroken)
  1106. SetSliderDialogStartValue (0)
  1107. SetSliderDialogDefaultValue (0)
  1108. SetSliderDialogRange (0, 1)
  1109. SetSliderDialogInterval (1)
  1110.  
  1111. Elseif (option == OID_Benor)
  1112. SetSliderDialogStartValue (0)
  1113. SetSliderDialogDefaultValue (0)
  1114. SetSliderDialogRange (0, 1)
  1115. SetSliderDialogInterval (1)
  1116.  
  1117. Elseif (option == OID_Cosnach)
  1118. SetSliderDialogStartValue (0)
  1119. SetSliderDialogDefaultValue (0)
  1120. SetSliderDialogRange (0, 1)
  1121. SetSliderDialogInterval (1)
  1122.  
  1123. Elseif (option == OID_Ahtar)
  1124. SetSliderDialogStartValue (0)
  1125. SetSliderDialogDefaultValue (0)
  1126. SetSliderDialogRange (0, 1)
  1127. SetSliderDialogInterval (1)
  1128.  
  1129. Elseif (option == OID_Annekke_Crag_Jumper)
  1130. Debug.MessageBox("This Option is potentially unsafe, do not initiate the summon unless you know this follower")
  1131. SetSliderDialogStartValue (0)
  1132. SetSliderDialogDefaultValue (0)
  1133. SetSliderDialogRange (0, 1)
  1134. SetSliderDialogInterval (1)
  1135.  
  1136. Elseif (option == OID_Roggi_Knot_Beard)
  1137. Debug.MessageBox("This Option is potentially unsafe, do not initiate the summon unless you know this follower")
  1138. SetSliderDialogStartValue (0)
  1139. SetSliderDialogDefaultValue (0)
  1140. SetSliderDialogRange (0, 1)
  1141. SetSliderDialogInterval (1)
  1142.  
  1143. Elseif (option == OID_Meeko)
  1144. SetSliderDialogStartValue (0)
  1145. SetSliderDialogDefaultValue (0)
  1146. SetSliderDialogRange (0, 1)
  1147. SetSliderDialogInterval (1)
  1148.  
  1149. Elseif (option == OID_BranHusky)
  1150. SetSliderDialogStartValue (0)
  1151. SetSliderDialogDefaultValue (0)
  1152. SetSliderDialogRange (0, 1)
  1153. SetSliderDialogInterval (1)
  1154.  
  1155. Elseif (option == OID_CusithDeathHound)
  1156. SetSliderDialogStartValue (0)
  1157. SetSliderDialogDefaultValue (0)
  1158. SetSliderDialogRange (0, 1)
  1159. SetSliderDialogInterval (1)
  1160.  
  1161. Elseif (option == OID_GarmrDeathHound)
  1162. SetSliderDialogStartValue (0)
  1163. SetSliderDialogDefaultValue (0)
  1164. SetSliderDialogRange (0, 1)
  1165. SetSliderDialogInterval (1)
  1166.  
  1167. Elseif (option == OID_SceolangHusky)
  1168. SetSliderDialogStartValue (0)
  1169. SetSliderDialogDefaultValue (0)
  1170. SetSliderDialogRange (0, 1)
  1171. SetSliderDialogInterval (1)
  1172.  
  1173. Elseif (option == OID_SkyrimFollowersShare)
  1174. SetSliderDialogStartValue (FollowersShareVanilla_G.GetValueInt())
  1175. SetSliderDialogDefaultValue (1)
  1176. SetSliderDialogRange (0, 1)
  1177. SetSliderDialogInterval (1)
  1178.  
  1179. Elseif (option == OID_DawnguardFollowersShare)
  1180. SetSliderDialogStartValue (FollowersShareDawnguard_G.GetValueInt())
  1181. SetSliderDialogDefaultValue (1)
  1182. SetSliderDialogRange (0, 1)
  1183. SetSliderDialogInterval (1)
  1184.  
  1185. Elseif (option == OID_HearthfiresFollowersShare)
  1186. SetSliderDialogStartValue (FollowersShareHearthfires_G.GetValueInt())
  1187. SetSliderDialogDefaultValue (1)
  1188. SetSliderDialogRange (0, 1)
  1189. SetSliderDialogInterval (1)
  1190.  
  1191. Elseif (option == OID_DragonbornFollowersShare)
  1192. SetSliderDialogStartValue (FollowersShareDragonborn_G.GetValueInt())
  1193. SetSliderDialogDefaultValue (1)
  1194. SetSliderDialogRange (0, 1)
  1195. SetSliderDialogInterval (1)
  1196.  
  1197. Endif
  1198. EndEvent
  1199.  
  1200. Event OnOptionSliderAccept(int option, Float Value)
  1201. If (option == OID_Brelya_Maryon)
  1202. Brelya_Maryon_G.SetValueInt(Value As Int)
  1203. SetSliderOptionValue (OID_Brelya_Maryon, Brelya_Maryon_G.GetValueInt())
  1204. If Brelya_Maryon_G.GetValueInt() == 1
  1205. Brelya_Maryon_A.Moveto(Game.GetPlayer())
  1206. Else
  1207. Endif
  1208. Brelya_Maryon_G.SetValue(0)
  1209. Elseif (option == OID_JZargo)
  1210. JZargo_G.SetValueInt(Value As Int)
  1211. SetSliderOptionValue (OID_JZargo, JZargo_G.GetValueInt())
  1212. If JZargo_G.GetValueInt() == 1
  1213. JZargo_A.Moveto(Game.GetPlayer())
  1214. Else
  1215. Endif
  1216. JZargo_G.SetValue(0)
  1217. Elseif (option == OID_Onmund)
  1218. Onmund_G.SetValueInt(Value As Int)
  1219. SetSliderOptionValue (OID_Onmund, Onmund_G.GetValueInt())
  1220. If Onmund_G.GetValueInt() == 1
  1221. Onmund_A.Moveto(Game.GetPlayer())
  1222. Else
  1223. Endif
  1224. Onmund_G.SetValue(0)
  1225. Elseif (option == OID_Aela)
  1226. Aela_G.SetValueInt(Value As Int)
  1227. SetSliderOptionValue (OID_Aela, Aela_G.GetValueInt())
  1228. If Aela_G.GetValueInt() == 1
  1229. Aela_A.Moveto(Game.GetPlayer())
  1230. Else
  1231. Endif
  1232. Aela_G.SetValue(0)
  1233. Elseif (option == OID_Athis)
  1234. Athis_G.SetValueInt(Value As Int)
  1235. SetSliderOptionValue (OID_Athis, Athis_G.GetValueInt())
  1236. If Athis_G.GetValueInt() == 1
  1237. Athis_A.Moveto(Game.GetPlayer())
  1238. Else
  1239. Endif
  1240. Athis_G.SetValue(0)
  1241. Elseif (option == OID_Farkas)
  1242. Farkas_G.SetValueInt(Value As Int)
  1243. SetSliderOptionValue (OID_Farkas, Farkas_G.GetValueInt())
  1244. If Farkas_G.GetValueInt() == 1
  1245. Farkas_A.Moveto(Game.GetPlayer())
  1246. Else
  1247. Endif
  1248. Farkas_G.SetValue(0)
  1249. Elseif (option == OID_Njada_Stonearm)
  1250. Njada_Stonearm_G.SetValueInt(Value As Int)
  1251. SetSliderOptionValue (OID_Njada_Stonearm, Njada_Stonearm_G.GetValueInt())
  1252. If Njada_Stonearm_G.GetValueInt() == 1
  1253. Njada_Stonearm_A.Moveto(Game.GetPlayer())
  1254. Else
  1255. Endif
  1256. Njada_Stonearm_G.SetValue(0)
  1257. Elseif (option == OID_Ria)
  1258. Ria_G.SetValueInt(Value As Int)
  1259. SetSliderOptionValue (OID_Ria, Ria_G.GetValueInt())
  1260. If Ria_G.GetValueInt() == 1
  1261. Ria_A.Moveto(Game.GetPlayer())
  1262. Else
  1263. Endif
  1264. Ria_G.SetValue(0)
  1265. Elseif (option == OID_Torvar)
  1266. Torvar_G.SetValueInt(Value As Int)
  1267. SetSliderOptionValue (OID_Torvar, Torvar_G.GetValueInt())
  1268. If Torvar_G.GetValueInt() == 1
  1269. Torvar_A.Moveto(Game.GetPlayer())
  1270. Else
  1271. Endif
  1272. Torvar_G.SetValue(0)
  1273. Elseif (option == OID_Vilkas)
  1274. Vilkas_G.SetValueInt(Value As Int)
  1275. SetSliderOptionValue (OID_Vilkas, Vilkas_G.GetValueInt())
  1276. If Vilkas_G.GetValueInt() == 1
  1277. Vilkas_A.Moveto(Game.GetPlayer())
  1278. Else
  1279. Endif
  1280. Vilkas_G.SetValue(0)
  1281. Elseif (option == OID_Cicero)
  1282. Cicero_G.SetValueInt(Value As Int)
  1283. SetSliderOptionValue (OID_Cicero, Cicero_G.GetValueInt())
  1284. If Cicero_G.GetValueInt() == 1
  1285. Cicero_A.Moveto(Game.GetPlayer())
  1286. Else
  1287. Endif
  1288. Cicero_G.SetValue(0)
  1289. Elseif (option == OID_Agmaer)
  1290. Agmaer_G.SetValueInt(Value As Int)
  1291. SetSliderOptionValue (OID_Agmaer, Agmaer_G.GetValueInt())
  1292. If Agmaer_G.GetValueInt() == 1
  1293. Agmaer_A.Moveto(Game.GetPlayer())
  1294. Else
  1295. Endif
  1296. Agmaer_G.SetValue(0)
  1297. Elseif (option == OID_Beleval)
  1298. Beleval_G.SetValueInt(Value As Int)
  1299. SetSliderOptionValue (OID_Beleval, Beleval_G.GetValueInt())
  1300. If Beleval_G.GetValueInt() == 1
  1301. Beleval_A.Moveto(Game.GetPlayer())
  1302. Else
  1303. Endif
  1304. Beleval_G.SetValue(0)
  1305. Elseif (option == OID_Celann)
  1306. Celann_G.SetValueInt(Value As Int)
  1307. SetSliderOptionValue (OID_Celann, Celann_G.GetValueInt())
  1308. If Celann_G.GetValueInt() == 1
  1309. Celann_A.Moveto(Game.GetPlayer())
  1310. Else
  1311. Endif
  1312. Celann_G.SetValue(0)
  1313. Elseif (option == OID_Durak)
  1314. Durak_G.SetValueInt(Value As Int)
  1315. SetSliderOptionValue (OID_Durak, Durak_G.GetValueInt())
  1316. If Durak_G.GetValueInt() == 1
  1317. Durak_A.Moveto(Game.GetPlayer())
  1318. Else
  1319. Endif
  1320. Durak_G.SetValue(0)
  1321. Elseif (option == OID_Ingard)
  1322. Ingard_G.SetValueInt(Value As Int)
  1323. SetSliderOptionValue (OID_Ingard, Ingard_G.GetValueInt())
  1324. If Ingard_G.GetValueInt() == 1
  1325. Ingard_A.Moveto(Game.GetPlayer())
  1326. Else
  1327. Endif
  1328. Ingard_G.SetValue(0)
  1329. Elseif (option == OID_Serana)
  1330. Serana_G.SetValueInt(Value As Int)
  1331. SetSliderOptionValue (OID_Serana, Serana_G.GetValueInt())
  1332. If Serana_G.GetValueInt() == 1
  1333. Serana_A.Moveto(Game.GetPlayer())
  1334. Else
  1335. Endif
  1336. Serana_G.SetValue(0)
  1337. Elseif (option == OID_Frea)
  1338. Frea_G.SetValueInt(Value As Int)
  1339. SetSliderOptionValue (OID_Frea, Frea_G.GetValueInt())
  1340. If Frea_G.GetValueInt() == 1
  1341. Frea_A.Moveto(Game.GetPlayer())
  1342. Else
  1343. Endif
  1344. Frea_G.SetValue(0)
  1345. Elseif (option == OID_Talvas)
  1346. Talvas_G.SetValueInt(Value As Int)
  1347. SetSliderOptionValue (OID_Talvas, Talvas_G.GetValueInt())
  1348. If Talvas_G.GetValueInt() == 1
  1349. Talvas_A.Moveto(Game.GetPlayer())
  1350. Else
  1351. Endif
  1352. Talvas_G.SetValue(0)
  1353. Elseif (option == OID_Teldryn_Sero)
  1354. Teldryn_Sero_G.SetValueInt(Value As Int)
  1355. SetSliderOptionValue (OID_Teldryn_Sero, Teldryn_Sero_G.GetValueInt())
  1356. If Teldryn_Sero_G.GetValueInt() == 1
  1357. Teldryn_Sero_A.Moveto(Game.GetPlayer())
  1358. Else
  1359. Endif
  1360. Teldryn_Sero_G.SetValue(0)
  1361. Elseif (option == OID_Erandur)
  1362. Erandur_G.SetValueInt(Value As Int)
  1363. SetSliderOptionValue (OID_Erandur, Erandur_G.GetValueInt())
  1364. If Erandur_G.GetValueInt() == 1
  1365. Erandur_A.Moveto(Game.GetPlayer())
  1366. Else
  1367. Endif
  1368. Erandur_G.SetValue(0)
  1369. Elseif (option == OID_Golldir)
  1370. Golldir_G.SetValueInt(Value As Int)
  1371. SetSliderOptionValue (OID_Golldir, Golldir_G.GetValueInt())
  1372. If Golldir_G.GetValueInt() == 1
  1373. Golldir_A.Moveto(Game.GetPlayer())
  1374. Else
  1375. Endif
  1376. Golldir_G.SetValue(0)
  1377. Elseif (option == OID_illia)
  1378. illia_G.SetValueInt(Value As Int)
  1379. SetSliderOptionValue (OID_illia, illia_G.GetValueInt())
  1380. If illia_G.GetValueInt() == 1
  1381. illia_A.Moveto(Game.GetPlayer())
  1382. Else
  1383. Endif
  1384. illia_G.SetValue(0)
  1385. Elseif (option == OID_Belrand)
  1386. Belrand_G.SetValueInt(Value As Int)
  1387. SetSliderOptionValue (OID_Belrand, Belrand_G.GetValueInt())
  1388. If Belrand_G.GetValueInt() == 1
  1389. Belrand_A.Moveto(Game.GetPlayer())
  1390. Else
  1391. Endif
  1392. Belrand_G.SetValue(0)
  1393. Elseif (option == OID_Erik_The_Slayer)
  1394. Erik_The_Slayer_G.SetValueInt(Value As Int)
  1395. SetSliderOptionValue (OID_Erik_The_Slayer, Erik_The_Slayer_G.GetValueInt())
  1396. If Erik_The_Slayer_G.GetValueInt() == 1
  1397. Erik_The_Slayer_A.Moveto(Game.GetPlayer())
  1398. Else
  1399. Endif
  1400. Erik_The_Slayer_G.SetValue(0)
  1401. Elseif (option == OID_Jenessa)
  1402. Jenessa_G.SetValueInt(Value As Int)
  1403. SetSliderOptionValue (OID_Jenessa, Jenessa_G.GetValueInt())
  1404. If Jenessa_G.GetValueInt() == 1
  1405. Jenessa_A.Moveto(Game.GetPlayer())
  1406. Else
  1407. Endif
  1408. Jenessa_G.SetValue(0)
  1409. Elseif (option == OID_Marcurio)
  1410. Marcurio_G.SetValueInt(Value As Int)
  1411. SetSliderOptionValue (OID_Marcurio, Marcurio_G.GetValueInt())
  1412. If Marcurio_G.GetValueInt() == 1
  1413. Marcurio_A.Moveto(Game.GetPlayer())
  1414. Else
  1415. Endif
  1416. Marcurio_G.SetValue(0)
  1417. Elseif (option == OID_Stenvar)
  1418. Stenvar_G.SetValueInt(Value As Int)
  1419. SetSliderOptionValue (OID_Stenvar, Stenvar_G.GetValueInt())
  1420. If Stenvar_G.GetValueInt() == 1
  1421. Stenvar_A.Moveto(Game.GetPlayer())
  1422. Else
  1423. Endif
  1424. Stenvar_G.SetValue(0)
  1425. Elseif (option == OID_Vorstag)
  1426. Vorstag_G.SetValueInt(Value As Int)
  1427. SetSliderOptionValue (OID_Vorstag, Vorstag_G.GetValueInt())
  1428. If Vorstag_G.GetValueInt() == 1
  1429. Vorstag_A.Moveto(Game.GetPlayer())
  1430. Else
  1431. Endif
  1432. Vorstag_G.SetValue(0)
  1433. Elseif (option == OID_Argis_The_Bulwark)
  1434. Argis_The_Bulwark_G.SetValueInt(Value As Int)
  1435. SetSliderOptionValue (OID_Argis_The_Bulwark, Argis_The_Bulwark_G.GetValueInt())
  1436. If Argis_The_Bulwark_G.GetValueInt() == 1
  1437. Argis_The_Bulwark_A.Moveto(Game.GetPlayer())
  1438. Else
  1439. Endif
  1440. Argis_The_Bulwark_G.SetValue(0)
  1441. Elseif (option == OID_Calder)
  1442. Argis_The_Bulwark_G.SetValueInt(Value As Int)
  1443. SetSliderOptionValue (OID_Argis_The_Bulwark, Argis_The_Bulwark_G.GetValueInt())
  1444. If Argis_The_Bulwark_G.GetValueInt() == 1
  1445. Argis_The_Bulwark_A.Moveto(Game.GetPlayer())
  1446. Else
  1447. Endif
  1448. Argis_The_Bulwark_G.SetValue(0)
  1449. Elseif (option == OID_Iona)
  1450. Iona_G.SetValueInt(Value As Int)
  1451. SetSliderOptionValue (OID_Iona, Iona_G.GetValueInt())
  1452. If Iona_G.GetValueInt() == 1
  1453. Iona_A.Moveto(Game.GetPlayer())
  1454. Else
  1455. Endif
  1456. Iona_G.SetValue(0)
  1457. Elseif (option == OID_Jordis_The_Shield_Maiden)
  1458. Jordis_The_Shield_Maiden_G.SetValueInt(Value As Int)
  1459. SetSliderOptionValue (OID_Jordis_The_Shield_Maiden, Jordis_The_Shield_Maiden_G.GetValueInt())
  1460. If Jordis_The_Shield_Maiden_G.GetValueInt() == 1
  1461. Jordis_The_Shield_Maiden_A.Moveto(Game.GetPlayer())
  1462. Else
  1463. Endif
  1464. Jordis_The_Shield_Maiden_G.SetValue(0)
  1465. Elseif (option == OID_Lydia)
  1466. Lydia_G.SetValueInt(Value As Int)
  1467. SetSliderOptionValue (OID_Lydia, Lydia_G.GetValueInt())
  1468. If Lydia_G.GetValueInt() == 1
  1469. Lydia_A.Moveto(Game.GetPlayer())
  1470. Else
  1471. Endif
  1472. Lydia_G.SetValue(0)
  1473. Elseif (option == OID_Gregor)
  1474. Gregor_G.SetValueInt(Value As Int)
  1475. SetSliderOptionValue (OID_Gregor, Gregor_G.GetValueInt())
  1476. If Gregor_G.GetValueInt() == 1
  1477. Gregor_A.Moveto(Game.GetPlayer())
  1478. Else
  1479. Endif
  1480. Gregor_G.SetValue(0)
  1481. Elseif (option == OID_Rayya)
  1482. Rayya_G.SetValueInt(Value As Int)
  1483. SetSliderOptionValue (OID_Rayya, Rayya_G.GetValueInt())
  1484. If Rayya_G.GetValueInt() == 1
  1485. Rayya_A.Moveto(Game.GetPlayer())
  1486. Else
  1487. Endif
  1488. Rayya_G.SetValue(0)
  1489. Elseif (option == OID_Valdimar)
  1490. Valdimar_G.SetValueInt(Value As Int)
  1491. SetSliderOptionValue (OID_Valdimar, Valdimar_G.GetValueInt())
  1492. If Valdimar_G.GetValueInt() == 1
  1493. Valdimar_A.Moveto(Game.GetPlayer())
  1494. Else
  1495. Endif
  1496. Valdimar_G.SetValue(0)
  1497. Elseif (option == OID_Borgakh_The_Steel_Heart)
  1498. Borgakh_The_Steel_Heart_G.SetValueInt(Value As Int)
  1499. SetSliderOptionValue (OID_Borgakh_The_Steel_Heart, Borgakh_The_Steel_Heart_G.GetValueInt())
  1500. If Borgakh_The_Steel_Heart_G.GetValueInt() == 1
  1501. Borgakh_The_Steel_Heart_A.Moveto(Game.GetPlayer())
  1502. Else
  1503. Endif
  1504. Borgakh_The_Steel_Heart_G.SetValue(0)
  1505. Elseif (option == OID_Gorbash_The_Iron_Hand)
  1506. Gorbash_The_Iron_Hand_G.SetValueInt(Value As Int)
  1507. SetSliderOptionValue (OID_Gorbash_The_Iron_Hand, Gorbash_The_Iron_Hand_G.GetValueInt())
  1508. If Gorbash_The_Iron_Hand_G.GetValueInt() == 1
  1509. Gorbash_The_Iron_Hand_A.Moveto(Game.GetPlayer())
  1510. Else
  1511. Endif
  1512. Gorbash_The_Iron_Hand_G.SetValue(0)
  1513. Elseif (option == OID_Lob)
  1514. Lob_G.SetValueInt(Value As Int)
  1515. SetSliderOptionValue (OID_Lob, Lob_G.GetValueInt())
  1516. If Lob_G.GetValueInt() == 1
  1517. Lob_A.Moveto(Game.GetPlayer())
  1518. Else
  1519. Endif
  1520. Lob_G.SetValue(0)
  1521. Elseif (option == OID_Ogol)
  1522. Ogol_G.SetValueInt(Value As Int)
  1523. SetSliderOptionValue (OID_Ogol, Ogol_G.GetValueInt())
  1524. If Ogol_G.GetValueInt() == 1
  1525. Ogol_A.Moveto(Game.GetPlayer())
  1526. Else
  1527. Endif
  1528. Ogol_G.SetValue(0)
  1529. Elseif (option == OID_Ugor)
  1530. Ugor_G.SetValueInt(Value As Int)
  1531. SetSliderOptionValue (OID_Ugor, Ugor_G.GetValueInt())
  1532. If Ugor_G.GetValueInt() == 1
  1533. Ugor_A.Moveto(Game.GetPlayer())
  1534. Else
  1535. Endif
  1536. Ugor_G.SetValue(0)
  1537. Elseif (option == OID_Borgakh_The_Steel_Heart)
  1538. Borgakh_The_Steel_Heart_G.SetValueInt(Value As Int)
  1539. SetSliderOptionValue (OID_Borgakh_The_Steel_Heart, Borgakh_The_Steel_Heart_G.GetValueInt())
  1540. If Borgakh_The_Steel_Heart_G.GetValueInt() == 1
  1541. Borgakh_The_Steel_Heart_A.Moveto(Game.GetPlayer())
  1542. Else
  1543. Endif
  1544. Borgakh_The_Steel_Heart_G.SetValue(0)
  1545. Elseif (option == OID_Gorbash_The_Iron_Hand)
  1546. Gorbash_The_Iron_Hand_G.SetValueInt(Value As Int)
  1547. SetSliderOptionValue (OID_Gorbash_The_Iron_Hand, Gorbash_The_Iron_Hand_G.GetValueInt())
  1548. If Gorbash_The_Iron_Hand_G.GetValueInt() == 1
  1549. Gorbash_The_Iron_Hand_A.Moveto(Game.GetPlayer())
  1550. Else
  1551. Endif
  1552. Gorbash_The_Iron_Hand_G.SetValue(0)
  1553. Elseif (option == OID_Lob)
  1554. Lob_G.SetValueInt(Value As Int)
  1555. SetSliderOptionValue (OID_Lob, Lob_G.GetValueInt())
  1556. If Lob_G.GetValueInt() == 1
  1557. Lob_A.Moveto(Game.GetPlayer())
  1558. Else
  1559. Endif
  1560. Lob_G.SetValue(0)
  1561. Elseif (option == OID_Ogol)
  1562. Ogol_G.SetValueInt(Value As Int)
  1563. SetSliderOptionValue (OID_Ogol, Ogol_G.GetValueInt())
  1564. If Ogol_G.GetValueInt() == 1
  1565. Ogol_A.Moveto(Game.GetPlayer())
  1566. Else
  1567. Endif
  1568. Ogol_G.SetValue(0)
  1569. Elseif (option == OID_Ugor)
  1570. Ugor_G.SetValueInt(Value As Int)
  1571. SetSliderOptionValue (OID_Ugor, Ugor_G.GetValueInt())
  1572. If Ugor_G.GetValueInt() == 1
  1573. Ugor_A.Moveto(Game.GetPlayer())
  1574. Else
  1575. Endif
  1576. Ugor_G.SetValue(0)
  1577. Elseif (option == OID_Adelaisa_Vendicci)
  1578. Adelaisa_Vendicci_G.SetValueInt(Value As Int)
  1579. SetSliderOptionValue (OID_Adelaisa_Vendicci, Adelaisa_Vendicci_G.GetValueInt())
  1580. If Adelaisa_Vendicci_G.GetValueInt() == 1
  1581. Adelaisa_Vendicci_A.Moveto(Game.GetPlayer())
  1582. Else
  1583. Endif
  1584. Adelaisa_Vendicci_G.SetValue(0)
  1585. Elseif (option == OID_Aranea_Lenith)
  1586. Aranea_Lenith_G.SetValueInt(Value As Int)
  1587. SetSliderOptionValue (OID_Aranea_Lenith, Aranea_Lenith_G.GetValueInt())
  1588. If Aranea_Lenith_G.GetValueInt() == 1
  1589. Aranea_Lenith_A.Moveto(Game.GetPlayer())
  1590. Else
  1591. Endif
  1592. Aranea_Lenith_G.SetValue(0)
  1593. Elseif (option == OID_Derkeethus)
  1594. Derkeethus_G.SetValueInt(Value As Int)
  1595. SetSliderOptionValue (OID_Derkeethus, Derkeethus_G.GetValueInt())
  1596. If Derkeethus_G.GetValueInt() == 1
  1597. Derkeethus_A.Moveto(Game.GetPlayer())
  1598. Else
  1599. Endif
  1600. Derkeethus_G.SetValue(0)
  1601. Elseif (option == OID_Faendal)
  1602. Faendal_G.SetValueInt(Value As Int)
  1603. SetSliderOptionValue (OID_Faendal, Faendal_G.GetValueInt())
  1604. If Faendal_G.GetValueInt() == 1
  1605. Faendal_A.Moveto(Game.GetPlayer())
  1606. Else
  1607. Endif
  1608. Faendal_G.SetValue(0)
  1609. Elseif (option == OID_Sven)
  1610. Sven_G.SetValueInt(Value As Int)
  1611. SetSliderOptionValue (OID_Sven, Sven_G.GetValueInt())
  1612. If Sven_G.GetValueInt() == 1
  1613. Sven_A.Moveto(Game.GetPlayer())
  1614. Else
  1615. Endif
  1616. Sven_G.SetValue(0)
  1617. Elseif (option == OID_Kharjo)
  1618. Kharjo_G.SetValueInt(Value As Int)
  1619. SetSliderOptionValue (OID_Kharjo, Kharjo_G.GetValueInt())
  1620. If Kharjo_G.GetValueInt() == 1
  1621. Kharjo_A.Moveto(Game.GetPlayer())
  1622. Else
  1623. Endif
  1624. Kharjo_G.SetValue(0)
  1625. Elseif (option == OID_Mjoll_The_Lioness)
  1626. Mjoll_The_Lioness_G.SetValueInt(Value As Int)
  1627. SetSliderOptionValue (OID_Mjoll_The_Lioness, Mjoll_The_Lioness_G.GetValueInt())
  1628. If Mjoll_The_Lioness_G.GetValueInt() == 1
  1629. Mjoll_The_Lioness_A.Moveto(Game.GetPlayer())
  1630. Else
  1631. Endif
  1632. Mjoll_The_Lioness_G.SetValue(0)
  1633. Elseif (option == OID_Uthegerd_The_Unbroken)
  1634. Uthegerd_The_Unbroken_G.SetValueInt(Value As Int)
  1635. SetSliderOptionValue (OID_Uthegerd_The_Unbroken, Uthegerd_The_Unbroken_G.GetValueInt())
  1636. If Uthegerd_The_Unbroken_G.GetValueInt() == 1
  1637. Uthegerd_The_Unbroken_A.Moveto(Game.GetPlayer())
  1638. Else
  1639. Endif
  1640. Uthegerd_The_Unbroken_G.SetValue(0)
  1641. Elseif (option == OID_Benor)
  1642. Benor_G.SetValueInt(Value As Int)
  1643. SetSliderOptionValue (OID_Benor, Benor_G.GetValueInt())
  1644. If Benor_G.GetValueInt() == 1
  1645. Benor_A.Moveto(Game.GetPlayer())
  1646. Else
  1647. Endif
  1648. Benor_G.SetValue(0)
  1649. Elseif (option == OID_Cosnach)
  1650. Cosnach_G.SetValueInt(Value As Int)
  1651. SetSliderOptionValue (OID_Cosnach, Cosnach_G.GetValueInt())
  1652. If Cosnach_G.GetValueInt() == 1
  1653. Cosnach_A.Moveto(Game.GetPlayer())
  1654. Else
  1655. Endif
  1656. Cosnach_G.SetValue(0)
  1657. Elseif (option == OID_Ahtar)
  1658. Ahtar_G.SetValueInt(Value As Int)
  1659. SetSliderOptionValue (OID_Ahtar, Ahtar_G.GetValueInt())
  1660. If Ahtar_G.GetValueInt() == 1
  1661. Ahtar_A.Moveto(Game.GetPlayer())
  1662. Else
  1663. Endif
  1664. Ahtar_G.SetValue(0)
  1665. Elseif (option == OID_Annekke_Crag_Jumper)
  1666. Annekke_Crag_Jumper_G.SetValueInt(Value As Int)
  1667. SetSliderOptionValue (OID_Annekke_Crag_Jumper, Annekke_Crag_Jumper_G.GetValueInt())
  1668. If Annekke_Crag_Jumper_G.GetValueInt() == 1
  1669. Annekke_Crag_Jumper_A.Moveto(Game.GetPlayer())
  1670. Else
  1671. Endif
  1672. Annekke_Crag_Jumper_G.SetValue(0)
  1673. Elseif (option == OID_Roggi_Knot_Beard)
  1674. Roggi_Knot_Beard_G.SetValueInt(Value As Int)
  1675. SetSliderOptionValue (OID_Roggi_Knot_Beard, Roggi_Knot_Beard_G.GetValueInt())
  1676. If Roggi_Knot_Beard_G.GetValueInt() == 1
  1677. Roggi_Knot_Beard_A.Moveto(Game.GetPlayer())
  1678. Else
  1679. Endif
  1680. Roggi_Knot_Beard_G.SetValue(0)
  1681. Elseif (option == OID_Meeko)
  1682. Meeko_G.SetValueInt(Value As Int)
  1683. SetSliderOptionValue (OID_Meeko, Meeko_G.GetValueInt())
  1684. If Meeko_G.GetValueInt() == 1
  1685. Meeko_A.Moveto(Game.GetPlayer())
  1686. Else
  1687. Endif
  1688. Meeko_G.SetValue(0)
  1689. Elseif (option == OID_BranHusky)
  1690. BranHusky_G.SetValueInt(Value As Int)
  1691. SetSliderOptionValue (OID_BranHusky, BranHusky_G.GetValueInt())
  1692. If BranHusky_G.GetValueInt() == 1
  1693. BranHusky_A.Moveto(Game.GetPlayer())
  1694. Else
  1695. Endif
  1696. BranHusky_G.SetValue(0)
  1697. Elseif (option == OID_CusithDeathHound)
  1698. CusithDeathHound_G.SetValueInt(Value As Int)
  1699. SetSliderOptionValue (OID_CusithDeathHound, CusithDeathHound_G.GetValueInt())
  1700. If CusithDeathHound_G.GetValueInt() == 1
  1701. CusithDeathHound_A.Moveto(Game.GetPlayer())
  1702. Else
  1703. Endif
  1704. CusithDeathHound_G.SetValue(0)
  1705. Elseif (option == OID_GarmrDeathHound)
  1706. GarmrDeathHound_G.SetValueInt(Value As Int)
  1707. SetSliderOptionValue (OID_GarmrDeathHound, GarmrDeathHound_G.GetValueInt())
  1708. If GarmrDeathHound_G.GetValueInt() == 1
  1709. GarmrDeathHound_A.Moveto(Game.GetPlayer())
  1710. Else
  1711. Endif
  1712. GarmrDeathHound_G.SetValue(0)
  1713. Elseif (option == OID_SceolangHusky)
  1714. SceolangHusky_G.SetValueInt(Value As Int)
  1715. SetSliderOptionValue (OID_SceolangHusky, SceolangHusky_G.GetValueInt())
  1716. If SceolangHusky_G.GetValueInt() == 1
  1717. SceolangHusky_A.Moveto(Game.GetPlayer())
  1718. Else
  1719. Endif
  1720. SceolangHusky_G.SetValue(0)
  1721. Elseif (option == OID_SkyrimFollowersShare)
  1722. FollowersShareVanilla_G.SetValueInt(Value As Int)
  1723. SetSliderOptionValue (OID_SkyrimFollowersShare, FollowersShareVanilla_G.GetValueInt())
  1724. If FollowersShareVanilla_G.GetValueInt() == 1 && !FollowerSharePerksSkyrim.IsRunning()
  1725. FollowerSharePerksSkyrim.Start()
  1726. Debug.Messagebox("All Followers from the Skyrim.esm will give you a perk when they travel with you, RETURN TO GAME TO COMPLETE OPERATION")
  1727. Elseif FollowersShareVanilla_G.GetValueInt() == 0 && FollowerSharePerksSkyrim.IsRunning()
  1728. FollowerSharePerksSkyrim.Stop()
  1729. Debug.Messagebox("Player Perks from followers in the Skyrim.esm are OFF, RETURN TO GAME TO COMPLETE OPERATION")
  1730. Else
  1731. Endif
  1732. Elseif (option == OID_DawnguardFollowersShare)
  1733. FollowersShareDawnguard_G.SetValueInt(Value As Int)
  1734. SetSliderOptionValue (OID_DawnguardFollowersShare, FollowersShareDawnguard_G.GetValueInt())
  1735. If FollowersShareDawnguard_G.GetValueInt() == 1 && !FollowerSharePerksDawnguard.IsRunning()
  1736. FollowerSharePerksDawnguard.Start()
  1737. Debug.Messagebox("All Followers from the Dawnguard.esm will give you a perk when they travel with you, RETURN TO GAME TO COMPLETE OPERATION")
  1738. Elseif FollowersShareDawnguard_G.GetValueInt() == 0 && FollowerSharePerksDawnguard.IsRunning()
  1739. FollowerSharePerksDawnguard.Stop()
  1740. Debug.Messagebox("Player Perks from followers in the Dawnguard.esm are OFF, RETURN TO GAME TO COMPLETE OPERATION")
  1741. Else
  1742. Endif
  1743.  
  1744. Elseif (option == OID_HearthfiresFollowersShare)
  1745. FollowersShareHearthfires_G.SetValueInt(Value As Int)
  1746. SetSliderOptionValue (OID_HearthfiresFollowersShare, FollowersShareHearthfires_G.GetValueInt())
  1747. If FollowersShareHearthfires_G.GetValueInt() == 1 && !FollowerSharePerksHearthfires.IsRunning()
  1748. FollowerSharePerksHearthfires.Start()
  1749. Debug.Messagebox("All Followers from the Hearthfires.esm will give you a perk when they travel with you, RETURN TO GAME TO COMPLETE OPERATION")
  1750. Elseif FollowersShareHearthfires_G.GetValueInt() == 0 && FollowerSharePerksHearthfires.IsRunning()
  1751. FollowerSharePerksHearthfires.Stop()
  1752. Debug.Messagebox("Player Perks from followers in the Hearthfires.esm are OFF, RETURN TO GAME TO COMPLETE OPERATION")
  1753. Else
  1754. Endif
  1755.  
  1756. Elseif (option == OID_DragonbornFollowersShare)
  1757. FollowersShareDragonborn_G.SetValueInt(Value As Int)
  1758. SetSliderOptionValue (OID_DragonbornFollowersShare, FollowersShareDragonborn_G.GetValueInt())
  1759. If FollowersShareDragonborn_G.GetValueInt() == 1 && !FollowerSharePerksDragonborn.IsRunning()
  1760. FollowerSharePerksDragonborn.Start()
  1761. Debug.Messagebox("All Followers from the Skyrim.esm will give you a perk when they travel with you, RETURN TO GAME TO COMPLETE OPERATION")
  1762. Elseif FollowersShareDragonborn_G.GetValueInt() == 0 && FollowerSharePerksDragonborn.IsRunning()
  1763. FollowerSharePerksDragonborn.Stop()
  1764. Debug.Messagebox("Player Perks from followers in the Skyrim.esm are OFF, RETURN TO GAME TO COMPLETE OPERATION")
  1765. Else
  1766. Endif
  1767. Endif
  1768. EndEvent
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!