Advertisement
kele666CN

Untitled

Apr 14th, 2025
9
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.80 KB | None | 0 0
  1. if not game:IsLoaded() then
  2. game.Loaded:Wait()
  3. end
  4.  
  5. local lcpl = game:GetService("Players").LocalPlayer
  6. local correct_key = "dhnb666"
  7. local user_key = vision_key or ""
  8.  
  9. if user_key ~= correct_key then
  10. lcpl:Kick("[蛋黄]\n错误的卡密 , 请重试")
  11. return
  12. end
  13.  
  14. local function modifyPrompt(prompt)
  15. if prompt:IsA("ProximityPrompt") then
  16. prompt.HoldDuration = 0
  17. prompt.ClickablePrompt = true
  18. end
  19. end
  20. for _, prompt in ipairs(workspace:GetDescendants()) do
  21. modifyPrompt(prompt)
  22. end
  23. workspace.DescendantAdded:Connect(function(instance)
  24. modifyPrompt(instance)
  25. end)
  26.  
  27. local textToDisplay = "蛋皇快速互动"
  28. local fontSize = 30
  29. local colors = {
  30. Color3.fromRGB(255, 0, 0),
  31. Color3.fromRGB(0, 255, 0),
  32. Color3.fromRGB(0, 0, 255),
  33. Color3.fromRGB(255, 255, 0),
  34. Color3.fromRGB(0, 255, 255),
  35. Color3.fromRGB(255, 0, 255)
  36. }
  37. local currentColorIndex = 1
  38. local colorChangeInterval = 1
  39. local timer = 0
  40.  
  41. local screenGui = Instance.new("ScreenGui")
  42. screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  43.  
  44. local textLabel = Instance.new("TextLabel")
  45. textLabel.Position = UDim2.new(0.5, 0, 0.1, 0)
  46. textLabel.Size = UDim2.new(0, 0, 0, fontSize)
  47. textLabel.BackgroundTransparency = 1
  48. textLabel.Text = textToDisplay
  49. textLabel.Font = Enum.Font.SourceSansBold
  50. textLabel.TextSize = fontSize
  51. textLabel.TextColor3 = colors[currentColorIndex]
  52. textLabel.Parent = screenGui
  53.  
  54. game:GetService("RunService").Heartbeat:Connect(function(dt)
  55. timer = timer + dt
  56. if timer >= colorChangeInterval then
  57. currentColorIndex = currentColorIndex + 1
  58. if currentColorIndex > #colors then
  59. currentColorIndex = 1
  60. end
  61. textLabel.TextColor3 = colors[currentColorIndex]
  62. timer = 0
  63. end
  64. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement