Advertisement
hacimiks

Hacker Chat Gui

Apr 17th, 2024 (edited)
527
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 3.68 KB | None | 0 0
  1. a = "的"
  2. b = "一"
  3. c = "是"
  4. d = "不"
  5. e = "了"
  6. f = "人"
  7. g = "我"
  8. h = "在"
  9. i = "有"
  10. j = "他"
  11. k = "这"
  12. l = "为"
  13. m = "之"
  14. n = "大"
  15. o = "来"
  16. p = "以"
  17. q = "个"
  18. r = "中"
  19. s = "上"
  20. t = "们"
  21. u = "到"
  22. v = "说"
  23. w = "国"
  24. x = "和"
  25. y = "地"
  26. z = "也"
  27.  
  28. function convert(str)
  29.  str = str:lower()
  30.  return str:gsub("a",a):gsub("b",b):gsub("c",c):gsub("d",d):gsub("e",e):gsub("f",f):gsub("g",g):gsub("h",h):gsub("i",i):gsub("j",j):gsub("k",k):gsub("l",l):gsub("m",m):gsub("n",n):gsub("o",o):gsub("p",p):gsub("q",q):gsub("r",r):gsub("s",s):gsub("t",t):gsub("u",u):gsub("v",v):gsub("w",w):gsub("x",x):gsub("y",y):gsub("z",z)
  31. end
  32.  
  33. function unconvert(str)
  34.  str = str:lower()
  35.  return str:gsub(a,"a"):gsub(b,"b"):gsub(c,"c"):gsub(d,"d"):gsub(e,"e"):gsub(f,"f"):gsub(g,"g"):gsub(h,"h"):gsub(i,"i"):gsub(j,"j"):gsub(k,"k"):gsub(l,"l"):gsub(m,"m"):gsub(n,"n"):gsub(o,"o"):gsub(p,"p"):gsub(q,"q"):gsub(r,"r"):gsub(s,"s"):gsub(t,"t"):gsub(u,"u"):gsub(v,"v"):gsub(w,"w"):gsub(x,"x"):gsub(y,"y"):gsub(z,"z")
  36. end
  37.  
  38. function chat(str)
  39.  game:GetService("ReplicatedStorage").DefaultChatSystemChatEvents.SayMessageRequest:FireServer(str,"All")
  40. end
  41.  
  42. player = game:GetService("Players").LocalPlayer
  43.  
  44. SG = Instance.new("ScreenGui",player.PlayerGui)
  45.  
  46. frame = Instance.new("Frame",SG)
  47. frame.Size = UDim2.new(0.2,0,0.2,0)
  48. frame.AnchorPoint = Vector2.new(0.5,0.5)
  49. frame.Position = UDim2.new(0.5,0,0.8,0)
  50. frame.Active = true
  51. frame.Draggable = true
  52. frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  53. frame.BorderColor3 = Color3.fromRGB(0, 0, 255)
  54.  
  55. textbox = Instance.new("TextBox",frame)
  56. textbox.AnchorPoint = Vector2.new(0.5,0.5)
  57. textbox.Size = UDim2.new(0.95,0,0.65,0)
  58. textbox.Position = UDim2.new(0.5,0,0.6,0)
  59. textbox.TextScaled = true
  60. textbox.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  61. textbox.BorderColor3 = Color3.fromRGB(0, 0, 255)
  62. textbox.Text = "Text"
  63. textbox.TextColor3 = Color3.fromRGB(255, 255, 255)
  64.  
  65. title = Instance.new("TextLabel",frame)
  66. title.Size = UDim2.new(0.3,0,0.3,0)
  67. title.TextScaled = true
  68. title.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  69. title.BorderColor3 = Color3.fromRGB(0, 0, 255)
  70. title.Text = "Hacker Chat Gui | RemiAPE"
  71. title.TextColor3 = Color3.fromRGB(255, 255, 255)
  72.  
  73. closebutton = Instance.new("TextButton",frame)
  74. closebutton.Size = UDim2.new(0.15,0,0.25,0)
  75. closebutton.AnchorPoint = Vector2.new(1,0)
  76. closebutton.TextScaled = true
  77. closebutton.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  78. closebutton.BorderColor3 = Color3.fromRGB(0, 0, 255)
  79. closebutton.Text = "X"
  80. closebutton.Position = UDim2.new(1,0,0,0)
  81. closebutton.TextColor3 = Color3.fromRGB(255, 255, 255)
  82.  
  83. ui = Instance.new("UIAspectRatioConstraint",frame)
  84. ui.AspectRatio = 4
  85.  
  86. closebutton.MouseButton1Up:Connect(function()
  87.  SG:Destroy()
  88. end)
  89.  
  90. game:GetService("ScreenGui"):SetCore("SendNotification", {
  91.     Title = "RemiAPE | Hacker Chat";
  92.     Text = "by aoki0x";
  93.     Icon = "rbxassetid://11818627057"})
  94. Duration = 5;
  95.  
  96. textbox.FocusLost:Connect(function()
  97.  chat("三"..convert(textbox.Text))
  98. end)
  99.  
  100. player.PlayerGui.Chat.Frame.ChatChannelParentFrame.Frame_MessageLogDisplay.Scroller.ChildAdded:Connect(function(msg)
  101.  wait(1)
  102.  local message = msg.TextLabel.Text
  103.  if message:match("三") then
  104.   msg.TextLabel.TextColor3 = Color3.new(1, 0.85098, 0)
  105.   message = unconvert(message:gsub("三",""))
  106.   msg.TextLabel.Text = message
  107.  end
  108. end)
  109.  
  110. Coregui = game:GetService("CoreGui")
  111. if Coregui:FindFirstChild("BubbleChat") then
  112.  Coregui.BubbleChat.DescendantAdded:Connect(function(bubble)
  113.   wait(1)
  114.   if bubble:IsA("TextLabel") then
  115.    if bubble.Text:match("三") then
  116.     bubble.Parent.BackgroundColor3 = Color3.new(1, 0.85098, 0)
  117.     bubble.Text = unconvert(bubble.Text:gsub("三",""))
  118.    end
  119.   end
  120.  end)
  121. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement