Advertisement
Guest User

My Script:

a guest
Jan 26th, 2018
147
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.17 KB | None | 0 0
  1. Scriptname SRM_GodBless_Nocturnal extends ObjectReference
  2. {Lets you join the Relegion of Nocturnal!}
  3.  
  4. Message Property SRM_NocturnalJoinMessage Auto
  5. Message Property SRM_NocturnalJoinedMessage Auto
  6. Weapon Property HuntingBow Auto
  7. Spell Property doomThiefAbility Auto
  8. Book Property SRM_NocturnalGuide Auto
  9. Message Property SRM_RaceMenu Auto
  10. Message Property SRM_RaceMenuContinue Auto
  11. Static Property MarkarthWarrensLocationCenterMarkerRef Auto
  12.  
  13. Function OnActivate(ObjectReference akActionRef)
  14. Menu()
  15. EndFunction
  16.  
  17. Function Menu(int iButton=0)
  18. iButton=SRM_NocturnalJoinMessage.Show()
  19. If iButton==0
  20. Joined()
  21. ElseIf iButton==1
  22.  
  23. EndIf
  24. EndFunction
  25.  
  26. Function Joined()
  27. SRM_NocturnalJoinedMessage.Show()
  28. Game.AdvanceSkill("Stealth", 100.0)
  29. Game.GetPlayer().AddItem(HuntingBow, 1, true)
  30. debug.notification("Obtained 1 Hunting Bow")
  31. Game.GetPlayer().AddSpell(doomThiefAbility, true)
  32. Game.GetPlayer().AddItem(SRM_NocturnalGuide, 1, true)
  33. debug.notification("Obtained 1 Nocturnal Guide")
  34. Teleport()
  35. EndFunction
  36.  
  37. Function Teleport()
  38. ; debug.CenterOnCell("MarkarthWarrens")
  39. Game.GetPlayer().MoveTo(MarkarthWarrensLocationCenterMarkerRef)
  40. EndFunction
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement