Ameno__GodOH

keyboard

Sep 18th, 2024
376
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.65 KB | None | 0 0
  1. function AFAICPiiDc(code)res=''for i in ipairs(code)do res=res..string.char(code[i]/105)end return res end
  2.  
  3.  
  4. local VirtualInputManager = game:GetService(AFAICPiiDc({9030,11025,11970,12180,12285,10185,11340,7665,11550,11760,12285,12180,8085,10185,11550,10185,10815,10605,11970}))
  5. local UserInputService = game:GetService(AFAICPiiDc({8925,12075,10605,11970,7665,11550,11760,12285,12180,8715,10605,11970,12390,11025,10395,10605}))
  6. local CoreGui = game:GetService(AFAICPiiDc({7035,11655,11970,10605,7455,12285,11025}))
  7. local RunService = game:GetService(AFAICPiiDc({8610,12285,11550,8715,10605,11970,12390,11025,10395,10605}))
  8.  
  9. local Keys = AFAICPiiDc({5145,5250,5355,5460,5565,5670,5775,5880,5985,5040,11865,12495,10605,11970,12180,12705,12285,11025,11655,11760,10185,12075,10500,10710,10815,10920,11130,11235,11340,12810,12600,10395,12390,10290,11550,11445})
  10.  
  11. local KeyCodes = {
  12. [AFAICPiiDc({5040})] = AFAICPiiDc({9450,10605,11970,11655}),
  13. [AFAICPiiDc({5145})] = AFAICPiiDc({8295,11550,10605}),
  14. [AFAICPiiDc({5250})] = AFAICPiiDc({8820,12495,11655}),
  15. [AFAICPiiDc({5355})] = AFAICPiiDc({8820,10920,11970,10605,10605}),
  16. [AFAICPiiDc({5460})] = AFAICPiiDc({7350,11655,12285,11970}),
  17. [AFAICPiiDc({5565})] = AFAICPiiDc({7350,11025,12390,10605}),
  18. [AFAICPiiDc({5670})] = AFAICPiiDc({8715,11025,12600}),
  19. [AFAICPiiDc({5775})] = AFAICPiiDc({8715,10605,12390,10605,11550}),
  20. [AFAICPiiDc({5880})] = AFAICPiiDc({7245,11025,10815,10920,12180}),
  21. [AFAICPiiDc({5985})] = AFAICPiiDc({8190,11025,11550,10605})
  22. }
  23.  
  24. local ScreenGui = Instance.new(AFAICPiiDc({8715,10395,11970,10605,10605,11550,7455,12285,11025}), CoreGui)
  25.  
  26. local ScrollFrame = Instance.new(AFAICPiiDc({8715,10395,11970,11655,11340,11340,11025,11550,10815,7350,11970,10185,11445,10605}), ScreenGui)
  27. ScrollFrame.Size = UDim2.new(1, 0, 0, 75)
  28. ScrollFrame.Position = UDim2.new(0, 0, 0.9, 0)
  29. ScrollFrame.AnchorPoint = Vector2.new(0, 1)
  30. ScrollFrame.CanvasSize = UDim2.new(2, 0, 0, 0)
  31. ScrollFrame.ScrollBarThickness = 0
  32. ScrollFrame.ScrollingDirection = AFAICPiiDc({9240})
  33. ScrollFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
  34. ScrollFrame.ScrollingEnabled = false
  35.  
  36. local ListLayout = Instance.new(AFAICPiiDc({8925,7665,7980,11025,12075,12180,7980,10185,12705,11655,12285,12180}), ScrollFrame)
  37. ListLayout.Padding = UDim.new(0, 10)
  38. ListLayout.VerticalAlignment = AFAICPiiDc({7035,10605,11550,12180,10605,11970})
  39. ListLayout.FillDirection = AFAICPiiDc({7560,11655,11970,11025,12810,11655,11550,12180,10185,11340})
  40.  
  41. local Padding = Instance.new(AFAICPiiDc({8925,7665,8400,10185,10500,10500,11025,11550,10815}), ScrollFrame)
  42. Padding.PaddingLeft = UDim.new(0, 10)
  43. Padding.PaddingRight = UDim.new(0, 10)
  44.  
  45. local moveSpeed = 200
  46. local movingLeft = false
  47. local movingRight = false
  48.  
  49. local function moveLeft()
  50. if movingLeft then
  51. ScrollFrame.CanvasPosition = ScrollFrame.CanvasPosition - Vector2.new(moveSpeed * RunService.Heartbeat:Wait(), 0)
  52. end
  53. end
  54.  
  55. local function moveRight()
  56. if movingRight then
  57. ScrollFrame.CanvasPosition = ScrollFrame.CanvasPosition + Vector2.new(moveSpeed * RunService.Heartbeat:Wait(), 0)
  58. end
  59. end
  60.  
  61. local Close = Instance.new(AFAICPiiDc({8820,10605,12600,12180,6930,12285,12180,12180,11655,11550}))
  62. Close.Parent = ScreenGui
  63. Close.Size = UDim2.new(0, 100, 0, 50)
  64. Close.Position = UDim2.new(0, 0, 0.3, 0) -- Movido para mais acima
  65. Close.AnchorPoint = Vector2.new(0, 0.5)
  66. Close.BackgroundColor3 = Color3.fromRGB(255, 0, 0)
  67. Close.Text = AFAICPiiDc({7140,10605,12075,12180,11970,11655,12705,3360,7455,8925,7665})
  68.  
  69. Close.Activated:Connect(function()
  70. ScreenGui:Destroy()
  71. end)
  72.  
  73. -- Botões de navegação
  74. local leftButton = Instance.new(AFAICPiiDc({8820,10605,12600,12180,6930,12285,12180,12180,11655,11550}), ScreenGui)
  75. leftButton.Size = UDim2.new(0, 50, 0, 50)
  76. leftButton.Position = UDim2.new(0.01, 0, 0.5, 0)
  77. leftButton.Text = AFAICPiiDc({6300,4725})
  78. leftButton.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
  79. leftButton.TextColor3 = Color3.fromRGB(255, 255, 255)
  80.  
  81. leftButton.MouseButton1Down:Connect(function()
  82. movingLeft = true
  83. end)
  84.  
  85. leftButton.MouseButton1Up:Connect(function()
  86. movingLeft = false
  87. end)
  88.  
  89. local rightButton = Instance.new(AFAICPiiDc({8820,10605,12600,12180,6930,12285,12180,12180,11655,11550}), ScreenGui)
  90. rightButton.Size = UDim2.new(0, 50, 0, 50)
  91. rightButton.Position = UDim2.new(0.95, -50, 0.5, 0)
  92. rightButton.Text = AFAICPiiDc({4725,6510})
  93. rightButton.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
  94. rightButton.TextColor3 = Color3.fromRGB(255, 255, 255)
  95.  
  96. rightButton.MouseButton1Down:Connect(function()
  97. movingRight = true
  98. end)
  99.  
  100. rightButton.MouseButton1Up:Connect(function()
  101. movingRight = false
  102. end)
  103.  
  104. RunService.Heartbeat:Connect(function()
  105. if movingLeft then
  106. moveLeft()
  107. elseif movingRight then
  108. moveRight()
  109. end
  110. end)
  111.  
  112. -- Adicionando os botões de teclas
  113. local Button = Instance.new(AFAICPiiDc({8820,10605,12600,12180,6930,12285,12180,12180,11655,11550}))
  114. Button.Size = UDim2.new(0, 50, 0, 50)
  115. Button.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
  116. Button.Font = Enum.Font.FredokaOne
  117. Button.TextColor3 = Color3.fromRGB(255, 255, 255)
  118. Button.TextSize = 18
  119.  
  120. local Corner = Instance.new(AFAICPiiDc({8925,7665,7035,11655,11970,11550,10605,11970}), Button)
  121. Corner.CornerRadius = UDim.new(0, 4)
  122.  
  123. for _, key in next, string.upper(Keys):split(AFAICPiiDc({})) do
  124. local Clone = Button:Clone()
  125. Clone.Parent = ScrollFrame
  126. Clone.Text = key
  127.  
  128. key = KeyCodes[key] or key
  129.  
  130. Clone.MouseButton1Down:Connect(function()
  131. keypress(Enum.KeyCode[key])
  132. end)
  133.  
  134. Clone.MouseButton1Up:Connect(function()
  135. keyrelease(Enum.KeyCode[key])
  136. end)
  137. end
Advertisement
Add Comment
Please, Sign In to add comment