Yingyang005

Undertale

Dec 8th, 2024 (edited)
56
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.51 KB | None | 0 0
  1. local OrionLib = loadstring(game:HttpGet(('https://raw.githubusercontent.com/shlexware/Orion/main/source')))()
  2.  
  3. -- Créer la fenêtre principale
  4. local Window = OrionLib:MakeWindow({Name = "SSwendRT", HidePremium = false, SaveConfig = true, IntroText = "Bienvenue dans Undertale Timeline Reset"})
  5.  
  6. -- Fonction pour téléporter le joueur à une position donnée
  7. local function teleportTo(position)
  8. local player = game.Players.LocalPlayer
  9. local character = player.Character or player.CharacterAdded:Wait()
  10. local humanoidRootPart = character:WaitForChild("HumanoidRootPart")
  11. humanoidRootPart.CFrame = CFrame.new(position)
  12. print("Téléporté à : "..tostring(position))
  13. end
  14.  
  15. -- Fonction pour collecter tout ce qui se trouve dans un rayon de 20 cm en utilisant TouchInterest
  16. local function collectInRange(range)
  17. local player = game.Players.LocalPlayer
  18. local character = player.Character or player.CharacterAdded:Wait()
  19. local humanoidRootPart = character:WaitForChild("HumanoidRootPart")
  20. local position = humanoidRootPart.Position
  21.  
  22. for _, item in pairs(workspace:GetDescendants()) do
  23. if item:IsA("BasePart") and (item.Position - position).Magnitude <= range then
  24. for _, touchInterest in pairs(item:GetChildren()) do
  25. if touchInterest:IsA("TouchInterest") then
  26. firetouchinterest(humanoidRootPart, item, 0)
  27. firetouchinterest(humanoidRootPart, item, 1)
  28. print("Objet collecté : "..item.Name)
  29. end
  30. end
  31. end
  32. end
  33. end
  34.  
  35. -- Fonction pour téléporter le joueur à toutes les Souls dans le folder Blacklisted
  36. local function teleportToAllSouls()
  37. local blacklistedFolder = workspace:FindFirstChild("Blacklisted")
  38. if blacklistedFolder then
  39. print("Dossier 'Blacklisted' trouvé. Téléportation en cours...")
  40. for _, soul in ipairs(blacklistedFolder:GetChildren()) do
  41. if soul:IsA("BasePart") then
  42. teleportTo(soul.Position)
  43. wait(2) -- Attendre un moment avant la prochaine téléportation
  44. collectInRange(20) -- Collecter tout ce qui se trouve dans un rayon de 20 cm
  45. end
  46. end
  47. print("Téléportation à toutes les Souls terminée.")
  48. else
  49. print("Le dossier 'Blacklisted' n'a pas été trouvé dans le workspace.")
  50. end
  51. end
  52.  
  53. -- Fonction pour équiper automatiquement le character
  54. local function equipCharacter()
  55. local player = game.Players.LocalPlayer
  56. local character = player.Character or player.CharacterAdded:Wait()
  57.  
  58. local usePart = workspace:WaitForChild("Map"):WaitForChild("CharacterSelection")
  59. :WaitForChild("Customs"):WaitForChild("Characters")
  60. :WaitForChild("Prototype 1"):WaitForChild("Use")
  61. :WaitForChild("ClickDetector")
  62.  
  63. if usePart and usePart:IsA("ClickDetector") then
  64. fireclickdetector(usePart)
  65. print("Character équipé automatiquement.")
  66. else
  67. print("La partie 'Use' n'a pas été trouvée ou n'est pas un 'ClickDetector'.")
  68. end
  69. end
  70.  
  71. -- Fonction pour dupliquer toutes les "Souls" dans le dossier Blacklisted à la même position avec leurs propriétés
  72. local function duplicateSouls()
  73. local blacklistedFolder = workspace:FindFirstChild("Blacklisted")
  74. if not blacklistedFolder then
  75. print("Le dossier 'Blacklisted' n'a pas été trouvé dans le workspace.")
  76. return
  77. end
  78.  
  79. for _, soul in ipairs(blacklistedFolder:GetChildren()) do
  80. if soul.Name == "Soul" and soul:IsA("BasePart") then
  81. local duplicatedSoul = soul:Clone()
  82. duplicatedSoul.Parent = blacklistedFolder
  83. print("Soul dupliquée à la position : "..tostring(soul.Position))
  84. end
  85. end
  86. end
  87.  
  88. -- Création des onglets et sections
  89. local MainTab = Window:MakeTab({Name = "Undertale Timeline Reset", Icon = "rbxassetid://4483345998", PremiumOnly = false})
  90. local FarmSection = MainTab:AddSection({Name = "Farm"})
  91.  
  92. FarmSection:AddButton({
  93. Name = "Téléportation aux Souls (+ Pumpkins)",
  94. Callback = function()
  95. teleportToAllSouls()
  96. print("Téléportation aux Souls démarrée.")
  97. end
  98. })
  99.  
  100. FarmSection:AddButton({
  101. Name = "Trouver SnowPile",
  102. Callback = function()
  103. local player = game.Players.LocalPlayer
  104. local character = player.Character or player.CharacterAdded:Wait()
  105. local humanoidRootPart = character:WaitForChild("HumanoidRootPart")
  106. local blacklistedFolder = workspace:FindFirstChild("Blacklisted")
  107.  
  108. if blacklistedFolder then
  109. local snowPile = blacklistedFolder:FindFirstChild("Snow Pile")
  110. if snowPile then
  111. humanoidRootPart.CFrame = snowPile.CFrame + Vector3.new(0, 3, 0)
  112. print("Téléportation à 'Snow Pile'.")
  113. else
  114. print("Snow Pile non trouvé dans 'Blacklisted'.")
  115. end
  116. else
  117. print("Le dossier 'Blacklisted' n'a pas été trouvé dans le workspace.")
  118. end
  119. end
  120. })
  121.  
  122. FarmSection:AddButton({
  123. Name = "Dupliquer les Souls",
  124. Callback = function()
  125. duplicateSouls()
  126. print("Duplication des Souls terminée.")
  127. end
  128. })
  129.  
  130. FarmSection:AddButton({
  131. Name = "Équiper le Character",
  132. Callback = function()
  133. equipCharacter()
  134. print("Character équipé automatiquement.")
  135. end
  136. })
  137.  
  138. -- Fonction d'initialisation
  139. OrionLib:Init()
  140.  
Advertisement
Add Comment
Please, Sign In to add comment