Advertisement
MandB

HGP4

Sep 10th, 2021
102
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.73 KB | None | 0 0
  1. --ServerScriptService
  2.  
  3.  
  4. local DialogueEvent = game.ReplicatedStorage.RemoteEvents:FindFirstChild("DialogueEvent")
  5. local ObjectiveEvent = game.ReplicatedStorage.RemoteEvents:FindFirstChild("ObjectivEvent")
  6. local TransitionEvent = game.ReplicatedStorage.RemoteEvents:FindFirstChild("TransitionEvent")
  7.  
  8. local ToggleDialogueEvent = game.ReplicatedStorage.RemoteEvents:FindFirstChild("ToggleDialogueEvent")
  9. local ToggelObjectiveEvent = game.ReplicatedStorage.RemoteEvents:FindFirstChild("ToggleObjectiveEvent")
  10.  
  11. local IntroEvent = game.ReplicatedStorage.RemoteEvents:FindFirstChild("IntroEvent")
  12.  
  13. local function Teleport(Position)
  14. local Players = game.Players:GetPlayers()
  15.  
  16. for i, player in pairs(Players) do
  17. if player.Character then
  18. player.Character.Humanoid.Jump = true
  19. player.Character:SetPrimaryPartCFrame(Position)
  20. end
  21. end
  22. end
  23.  
  24.  
  25.  
  26. local function MainGame()
  27. ToggleDialogueEvent:FireAllClients(true)
  28. DialogueEvent:FireAllClients("I Need To Find The MainRoom")--What the dialogue says
  29. wait(4)
  30. ToggleDialogueEvent:FireAllClients(false)
  31. ToggelObjectiveEvent:FireAllClients(true)
  32. ObjectiveEvent:FireAllClients("Find The Main Room")--What the objective is
  33.  
  34. repeat wait() until game.Workspace.Triggers.DialogueTriggers:FindFirstChild("FoundOfficeTrigger") == nil
  35.  
  36. ToggleDialogueEvent:FireAllClients(true)
  37. ToggelObjectiveEvent:FireAllClients(false)
  38. DialogueEvent:FireAllClients("Darn I Need A key Better Keep Looking Around")
  39. wait(4)
  40. ToggleDialogueEvent:FireAllClients(false)
  41. ToggelObjectiveEvent:FireAllClients(true)
  42. ObjectiveEvent:FireAllClients("Find The Key")
  43.  
  44. repeat wait() until game.Workspace.Triggers.DialogueTriggers:FindFirstChild("FoundGymTrigger") == nil
  45.  
  46. ToggleDialogueEvent:FireAllClients(true)
  47. ToggelObjectiveEvent:FireAllClients(false)
  48. DialogueEvent:FireAllClients("I Need To Unlock The SpareRoom To Get The Maze")
  49. wait(4)
  50. ToggleDialogueEvent:FireAllClients(false)
  51. ToggelObjectiveEvent:FireAllClients(true)
  52. ObjectiveEvent:FireAllClients("Unlock The SpareRoom")
  53.  
  54.  
  55.  
  56.  
  57.  
  58. repeat wait() until game.Workspace.Triggers.DialogueTriggers:FindFirstChild("GymTrigger") == nil
  59.  
  60. repeat wait() until game.Workspace.Triggers.DialogueTriggers:FindFirstChild("MazeDoorTrigger") == nil
  61.  
  62. TransitionEvent:FireAllClients()
  63. wait(2)
  64. Teleport(game.Workspace.TeleportPoints.MazeExitTeleport.CFrame)
  65.  
  66. Teleport(game.Workspace.TeleportPoints.MazeTeleport.CFrame)
  67.  
  68. end
  69.  
  70. wait(2)
  71. MainGame()
  72.  
  73. game.Players.PlayerAdded:Connect(function(Player)
  74. IntroEvent:FireClient(Player)
  75. end)
  76.  
  77. --DeathPart
  78.  
  79. --Variables--
  80. local Brick = script.Parent
  81. --End--
  82.  
  83. --Code--
  84. local function PlayerTouched(Part)
  85. local Parent = Part.Parent
  86. if game.Players:GetPlayerFromCharacter(Parent) then
  87. Parent.Humanoid.Health = 0
  88. end
  89. end
  90.  
  91. Brick.Touched:connect(PlayerTouched)
  92.  
  93. --FollowScript
  94.  
  95. local Monster = script.Parent
  96.  
  97. function FindPlayer(Position)
  98. local List = game.Workspace:GetChildren()
  99. local Torso = nil
  100. local Distance = 30
  101. local HumanoidRootPart = nil
  102. local Humanoid = nil
  103. local Player = nil
  104.  
  105. for i = 1, #List do
  106. Player = List[i]
  107. if (Player.ClassName == "Model") and (Player ~= script.Parent) then
  108. HumanoidRootPart = Player:FindFirstChild("HumanoidRootPart")
  109. Humanoid = Player:FindFirstChild("Humanoid")
  110. if (HumanoidRootPart ~= nil) and (Humanoid ~= nil) and (Humanoid.Health > 0) then
  111. if (HumanoidRootPart.Position - Position).Magnitude < Distance then
  112. Torso = HumanoidRootPart
  113. Distance = (HumanoidRootPart.Position - Position).Magnitude
  114. end
  115. end
  116. end
  117. end
  118. return Torso
  119. end
  120.  
  121. while true do
  122. wait(1)
  123. local Target = FindPlayer(script.Parent.HumanoidRootPart.Position)
  124. if Target ~= nil then
  125. script.Parent.Humanoid:MoveTo(Target.Position, Target)
  126. end
  127. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement