View difference between Paste ID: 3dTW39Ct and xh6S0CHz
SHOW: | | - or go back to the newest paste.
1
TextProperties = {"ZOffset", "CharacterAppearance", "PrimaryPart", "SkyboxBk", "SkyboxDn", "WaterTransparency", "WaterWaveSpeed", "HipHeight","ChatHistory","ConversationDistance", "BlastPressure", "BlastRadius", "InitialPrompt", "CPU", "OSVer", "OsPlatformId", "CpuSpeed", "D", "P", "maxForce", "InstanceCount", "PlaceId", "workspace", "GarbageCollectionFrequency", "BinType", "Grip", "ActivationState", "GarbageCollectionLimit", "ShadowColor", "TargetPoint", "WalkDirection", "WalkToPart", "Image",  "Font", "ClearTextOnFocus", "TextTransparency", "WalkToPoint", "ColorShift_Bottom", "ColorShift_Top","MaxSpeed","CartoonFactor","Target","MaxThrust","MaxTorque","TargetOffset","ThrustD", "ThrustP", "TurnD", "TurnP", "profileName", "Resolution", "Shadow", "Bevels", "BatchSize", "AASamples", "Genre", "CreatorType", "CreatorId", "JobId", "SkyboxUp", "SkyboxFt", "SkyboxLf", "StarCount", "ReporterType", "Outfit1", "Outfit2", "Pants", "PlayCount", "Shirt",  "MinReportInterval", "VelocitySpread","Rate", "DataSendRate", "DataGCRate",  "Archivable", "ClassName","NameDisplayerDistance", "MaxVelocity","PantsTemplate","ShirtTemplate","SoundId","Pitch","IsPlaying","IsPaused","Looped","PlayOnRemove","StudsPerTileU","StudsPerTileV", "Name", "Value", "MaxPlayers" , "PersonalServerRank" ,"NumPlayers" , "Text", "Reflectance","FogEnd", "FogStart","WaterTransparency", "Transparency", "Heat", "TeamName", "WalkSpeed", "Health", "MaxHealth", "Size", "Position", "TeamColor", "userId", "Brightness", "Ambient", "OsPlatform", "ChatMode", "AccountAgeReplicate", "Character", "Steer", "Style","NetworkOwnerV3", "CanCollide", "CFrame", "TimeOfDay", "FieldOfView", "CameraType", "LinkedSource", "MachineAddress", "Port"}
2
BoolProperties = {"Anchored", "AllowInsertFreeModels","SuperSafeChatReplicate", "Player", "HangDetection", "FullScriptCode", "DataModelJobs", "DeviceLost", "SSAO", "SoundEnabled", "SoftwareSound", "TextFits", "TextWrap", "Draggable",  "BubbleChat" , "AutoRuns", "Guest", "LocalSaveEnabled", "PlatformStand", "AutoRotate", "CelestialBodiesShown","HasBuildTools" , "ClassicChat" , "DevEnableMouseLock" ,"Netural", "CanCollide", "Disabled", "Outlines" ,"Jump", "Sit", "Visible", "IsSmooth" , "Enabled", "Locked", "FilteringEnabled", "StreamingEnabled", "GlobalShadows", "RobloxLocked", "ScriptsDisabled"}
3
BrickColorProperties = {"BrickColor", "Color","AllowSweep", "WaterColor", "ParallelPhysics", "Is30FpsThrottleEnabled", "HeadsUpDisplay",  "Texture", "Value", "WaterColor", "SkinColor", "SparkleColor", "FogColor", "HeadColor", "LeftArmColor", "RightArmColor", "TorsoColor", "RightLegColor", "LeftLegColor","ShadowColor", "Ambient", "SecondaryColor"}
4
s = Instance.new("ScreenGui", game.Players.LocalPlayer.PlayerGui)
5
pgr = Instance.new("TextButton")
6
pgr.Parent = s
7
pgr.Size = UDim2.new(0,100,0,40)
8
pgr.Position = UDim2.new(0,30,0,440)
9
pgr.Text="Xplorer"
10
pgr.BackgroundTransparency = 0.7
11
pgr.TextColor = BrickColor.new("Black")
12
pgr.BackgroundColor = BrickColor.new("Really Black")
13
pgr.BorderColor = BrickColor.new("Black")
14
pgr.Font = "ArialBold"
15
pgr.FontSize = "Size14"
16
pgr.TextStrokeColor3 = Color3.new(0/0,0/0,0/0)
17
pgr.TextStrokeTransparency = 0.3
18
pgr.BorderSizePixel = 1
19
pgr.BorderColor = BrickColor.new("White")
20
21-
if game.Players.LocalPlayer.PlayerGui:findFirstChild("Explorer") then 
21+
if game.Players.LocalPlayer.PlayerGui:findFirstChild("hacker") then 
22-
game.Players.LocalPlayer.PlayerGui:findFirstChild("Explorer"):Remove() 
22+
game.Players.LocalPlayer.PlayerGui:findFirstChild("hacker"):Remove() 
23
end
24
25
26
27
local Cloned
28
local Deleted
29
local DeleteParent
30
local Player
31
local Search
32
local ScriptSearch
33
local Gui
34
local Cloned = nil
35
local Deleted = nil
36
local DeleteParent = nil
37
local Current = 0
38
local CurrentOption = 0
39
40
function Clear()
41
if Gui then 
42
Gui:Remove() 
43
end
44
Current = 0
45
CurrentOption = 0
46
end
47
48
function AddButton(N, Function, Color, Copy)
49
if not N then 
50
error("RenderButton - No Name Specified")
51
end
52
if not Function then 
53
error("RenderButton - No Function Specified") 
54
end
55
if not Color then 
56
Color = Color3.new(1, 1, 1) 
57
end
58
if Copy == nil then 
59
Copy = true 
60
end
61
P = Instance.new("TextButton")
62
if Copy then
63
P.Size = UDim2.new(0, 110, 0, 20)
64
else
65
P.Size = UDim2.new(0, 130, 0, 20)
66
end
67
P.Text = N.Name
68
P.Name = N.Name
69
P.Parent = Gui
70
P.BackgroundColor3 = Color
71
P.TextColor3 = Color3.new(0, 0, 0)
72
P.BackgroundTransparency = 0.5
73
P.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300, 0, 50+(20*((Current%30)-1)))
74
P.MouseButton1Click:connect(function() 
75
Function(P) 
76
end)
77
D = Instance.new("TextButton")
78
D.Size = UDim2.new(0, 20, 0, 20)
79
D.Text = "X"
80
D.Name = N.Name
81
D.Parent = Gui
82
D.BackgroundColor3 = Color3.new(1, 0, 0)
83
D.TextColor3 = Color3.new(0, 0, 0)
84
D.BackgroundTransparency = 0.5
85
D.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300+130, 0, 50+(20*((Current%30)-1)))
86
D.MouseButton1Click:connect(function()
87
Deleted = N
88
DeleteParent = N.Parent
89
N.Parent = nil
90
Clear()
91
Search(DeleteParent)
92
end)
93
if Copy then
94
C = Instance.new("TextButton")
95
C.Size = UDim2.new(0, 20, 0, 20)
96
C.Text = "C"
97
C.Name = N.Name
98
C.Parent = Gui
99
C.BackgroundColor3 = Color3.new(0, 1, 0.5)
100
C.TextColor3 = Color3.new(0, 0, 0)
101
C.BackgroundTransparency = 0.5
102
C.Position = UDim2.new(0, ((math.modf(Current/30))*150)+300+110, 0, 50+(20*((Current%30)-1)))
103
C.MouseButton1Click:connect(function()
104
Cloned = N
105
Clear()
106
Search(N.Parent)
107
end)
108
end
109
Current = Current + 1
110
return P
111
end
112
113
function AddOption(N, Function, Color, Text)
114
if not N then 
115
error("RenderButton - No Name Specified") 
116
end
117
if not Color then 
118
Color = Color3.new(1, 1, 1) 
119
end
120
if Text == nil then 
121
Text = false 
122
end
123
if Text then
124
P = Instance.new("TextBox")
125
else
126
P = Instance.new("TextButton")
127
end
128
P.Text = N
129
P.Name = N
130
P.Parent = Gui
131
P.BackgroundColor3 = Color
132
P.TextColor3 = Color3.new(0, 0, 0)
133
P.BackgroundTransparency = 0.5
134
P.Size = UDim2.new(0, 150, 0, 20)
135
P.Position = UDim2.new(0, ((math.modf(CurrentOption/30))*150)+150, 0, 50+(20*((CurrentOption%30)-1)))
136
if not Text and Function then
137
P.MouseButton1Click:connect(function() Function(P) end)
138
end
139
CurrentOption = CurrentOption + 1
140
return P
141
end
142
143
function AddTextOption(Obj, Prop)
144
local Ob = Obj
145
local Pro = Prop
146
if type(Ob[Pro]) == "number" or type(Ob[Pro]) == "string" then
147
CurrentOption = CurrentOption + 1
148
local T = AddOption(Ob[Pro], nil, Color3.new(0.1, 0.4, 0.1), true)
149
CurrentOption = CurrentOption - 2
150
local O = AddOption("Change "..Pro..":", function() Ob[Pro] = T.Text end, Color3.new(0.1, 0.8, 0.1), false)
151
CurrentOption = CurrentOption + 1
152
end
153
end
154
155
function AddBrickColorOption(Obj, Prop)
156
local Ob = Obj
157
local Pro = Prop
158
if BrickColor.new(tostring(Ob[Pro])) == Ob[Pro] then
159
CurrentOption = CurrentOption + 1
160
local T = AddOption(tostring(Ob[Pro]), nil, Color3.new(0.1, 0.4, 0.1), true)
161
CurrentOption = CurrentOption - 2
162
local O = AddOption("Change "..Pro..":", function() Ob[Pro] = BrickColor.new(T.Text) end, Color3.new(0.1, 0.8, 0.1), false)
163
CurrentOption = CurrentOption + 1
164
end
165
end
166
167
function UnanchorObject(Objects)
168
local function Recurse(Base)
169
for _, Object in pairs(Base:GetChildren()) do
170
if _G.TestProperty(Object, "Anchored") then
171
Object.Anchored = not Object.Anchored
172
end
173
Recurse(Object)
174
end
175
end
176
Recurse(Objects)
177
end
178
179
180
181
182
function AddBoolOption(Obj, Prop)
183
local Ob = Obj
184
local Pro = Prop
185
if type(Ob[Pro]) == "boolean" then
186
local O = AddOption(Pro..": "..tostring(Ob[Pro]), nil, Color3.new(0.1, 0.8, 0.1), false)
187
O.MouseButton1Click:connect(function()
188
if Ob[Pro] then
189
Ob[Pro] = false
190
O.Text = Pro..": false"
191
else
192
Ob[Pro] = true
193
O.Text = Pro..": true"
194
end
195
end)
196
end
197
end
198
199
function TestProperty(Obj, Property)
200
Success = pcall(function() 
201
if Obj[Property] then 
202
return 
203
end 
204
end)
205
return Success
206
end
207
208
function LoadOptions(Object)
209
for Num, Prop in pairs(TextProperties) do
210
if TestProperty(Object, Prop) then
211
AddTextOption(Object, Prop)
212
end
213
end
214
for Num, Prop in pairs(BoolProperties) do
215
if TestProperty(Object, Prop) then
216
AddBoolOption(Object, Prop)
217
end
218
end
219
for Num, Prop in pairs(BrickColorProperties) do
220
if TestProperty(Object, Prop) then
221
AddBrickColorOption(Object, Prop)
222
end
223
end
224
end
225
226
227
function AddForceField(Player) 
228
Instance.new("ForceField", Player.Character)
229
end
230
function Killp(Player)
231
Player.Character.Humanoid.Health=0
232
end
233
function AddExplode(Player) 
234
Instance.new("Explosion", Player.Character)
235
end
236
function AddSparkles(Player) 
237
Instance.new("Sparkles", Player.Character)
238
end
239
240
241
function FreezeParts(b) 
242
if (b.className == "Part") then
243
b.Anchored=true;
244
end
245
end
246
247
248
249
250
function Search(Object)
251
Gui = Instance.new("ScreenGui")
252
Gui.Parent = game.Players.LocalPlayer.PlayerGui
253-
Gui.Name = "Explorer"
253+
Gui.Name = "hacker"
254
if Object ~= game then
255
AddOption("Back", function() 
256
Clear(); 
257
Search(Object.Parent) 
258
end, Color3.new(0.5, 1, 1), false)
259
end
260
if Object:IsA("Sound") then
261
AddOption("Copy ID", function() CopyString(tostring(Object.SoundId):sub(14)); warn("Copied."); Clear(); Search(Object); end, Color3.new(1, 0.2, 0), false)
262
AddOption("Play", function() Object:Play(); Clear(); Search(Object); end, Color3.new(0, 0, 1), false)
263
AddOption("Stop", function() Object:Stop(); Clear(); Search(Object); end, Color3.new(1, 1, 0), false)
264
end
265
if Object:IsA("BoolValue") then
266
AddBoolOption(Object,"Value")
267
end
268
if Object:IsA("Workspace") then
269
AddOption("BlackHole", function() local p= game.Players:GetChildren() for i= 1, #p do if p[i] ~= "LocalPlayer" then b = Instance.new("BodyPosition") b.Parent = p[i].Character.Torso b.maxForce = Vector3.new(6000000,60000000,60000000) b.position = Vector3.new(100,10,0)end end end, Color3.new(1, 0.6, 0.1), false) 
270
end
271
if Object:IsA("IntValue") or Object:IsA("StringValue") or Object:IsA("NumberValue")  then
272
AddOption("Copy Value", function() CopyString(tostring(Object.Value)); warn("Copied."); Clear(); Search(Object); end, Color3.new(1, 0.2, 0), false)
273
end
274
if Object:IsA("TextLabel") or Object:IsA("TextBox") or Object:IsA("Message")  then
275
AddOption("Copy Value", function() CopyString(tostring(Object.Text)); warn("Copied."); Clear(); Search(Object); end, Color3.new(1, 0.2, 0), false)
276
end
277
if Object ~= game then
278
AddOption("Unanchor Children", function() UnanchorObject(Object);  Clear(); Search(Object); end, Color3.new(1, 0.2, 0), false)
279
AddOption("ClearAllChildren", function() Object:ClearAllChildren(); Clear(); Search(Object); end, Color3.new(1, 0.6, 0.1), false)
280
end
281
if Object:IsA("Model") then
282
AddOption("SaveInstance", function() SaveInstance(Object) end, Color3.new(1, 1, 1), false)
283
end
284
AddOption("Reload", function() Clear(); Search(Object); end, Color3.new(0.2, 1, 0.2), false)
285
if Cloned then
286
AddOption("Paste", function() Cloned:Clone().Parent = Object; Clear(); Search(Object); end, Color3.new(0.5, 1, 1), false)
287
end
288
if Deleted then
289
AddOption("Undo", function() Deleted.Parent = DeleteParent; Deleted = nil; DeletedParent = nil; Clear(); Search(Object); end, Color3.new(1, 0.6, 0.1), false)
290
end
291
if Object:IsA("Player") then
292
AddOption("SwitchCamera", function() Clear(); if Object.CameraMode == "Classic" then Object.CameraMode = "LockFirstPerson" Search(Object) else Object.CameraMode = "Classic" Search(Object); end end, Color3.new(1, 0.6, 0.1), false)
293
AddOption("Goto Character", function() Clear(); if Object.Character then Search(Object.Character); end end, Color3.new(1, 1, 1), false)
294
AddOption("Kill", function() Killp(Object) end, Color3.new(1,0.6,0.1), false)
295
AddOption("Freeze", function() FreezeParts(Object.Character.Torso); end, Color3.new(1, 0.6, 0.1), false)
296
AddOption("Unequip Tools", function() Object.Character.Humanoid:UnequipTools() end, Color3.new(1, 0.6, 0.1), false)
297
--AddOption("Explode", function() AddExplode(Object); end, Color3.new(1, 0.6, 0.1), false)
298
end
299
300
301
302
if Object:IsA("Lighting") then
303
AddOption("Night", function() Object.TimeOfDay="24:24:24" end, Color3.new(1.,0.6,0.1), false)
304
AddOption("Day", function() Object.TimeOfDay="12:12:12" end, Color3.new(1.,0.6,0.1), false)
305
end
306
if Object:IsA("LocalScript") or Object:IsA("ModuleScript") then
307
AddOption("EditScript", function() Clear(); ScriptSearch(Object); end, Color3.new(1, 1, 1), false)
308
end
309
if Object:IsA("Terrain") then
310
AddOption("Clear", function() Object:Clear(); end, Color3.new(1, 1, 1), false)
311
end
312
313
LoadOptions(Object)
314
AddOption("Close", Clear, Color3.new(1, 0.2, 0), false)
315
if not Object:IsA("Workspace") or not Object:IsA("Player") then
316
for Num, Obj in pairs(Object:GetChildren()) do
317
--if not Obj:IsA("BasePart") or not Object.Parent == game.Workspace then
318
if true then
319
if Obj:IsA("LocalScript") then
320
AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 0, 0), true)
321
elseif Obj:IsA("Script") or Obj:IsA("StarterScript") or Obj:IsA("CoreScript") then
322
AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(0.5, 0.5, 0.8), true)
323
elseif Obj.Parent == game then
324
AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 1, 1), false)
325
else
326
AddButton(Obj, function() Clear(); Search(Obj); end, Color3.new(1, 1, 1), true)
327
end
328
end
329
end
330
end
331
function MoveUp(Place, Amount)
332
for i,v in pairs(Place:GetChildren()) do
333
if v:IsA("TextLabel") or v:IsA("TextBox") then
334
v.Position = v.Position + UDim2.new(0,0,0,-Amount)
335
end
336
end
337
end
338
function MoveDown(Place, Amount)
339
for i,v in pairs(Place:GetChildren()) do
340
if v:IsA("TextLabel") or v:IsA("TextBox") then
341
v.Position = v.Position + UDim2.new(0,0,0,Amount)
342
end
343
end
344
end
345
i=0
346
function ScriptSearch(S)
347
Script2 = S
348
Script = decompile(Script2)
349
Table = {}
350
Enabled = true
351
Gui = Instance.new("ScreenGui")
352
Gui.Parent = game.Players.LocalPlayer.PlayerGui
353-
Gui.Name = "Explorer"
353+
Gui.Name = "hacker"
354
while Enabled do
355
Start, End = string.find(Script, '\n')
356
print(Start, End)
357
if Start and End then
358
table.insert(Table, string.sub(Script, 1, End))
359
New = string.sub(Script, End+1, string.len(Script))
360
Script = New
361
else
362
Enabled = false
363
table.insert(Table, string.sub(Script, 1, End))
364
print("Finished")
365
end
366
end
367
P = Instance.new("TextLabel")
368
P.Size = UDim2.new(0, 500, 0, 20)
369
P.Text = Script2.Name
370
P.Name = "Script Line"
371
P.Parent = Gui
372
P.BackgroundColor3 = Color3.new(1, 1, 1)
373
P.TextColor3 = Color3.new(0, 0, 0)
374
P.BackgroundTransparency = 0.5
375
P.Position = UDim2.new(0.5, -250, 0, 150+(20*(i-1)))
376
P.TextXAlignment = "Left"
377
i=i+1
378
New = {}
379
for I,Val in pairs(Table) do
380
print(Val)
381
P = Instance.new("TextBox")
382
P.ClearTextOnFocus = false
383
P.Size = UDim2.new(0, 500, 0, 20)
384
P.Text = Val
385
P.Name = "Script Line"
386
P.Parent = Gui
387
P.BackgroundColor3 = Color3.new(1, 1, 1)
388
P.TextColor3 = Color3.new(0, 0, 0)
389
P.BackgroundTransparency = 0.5
390
P.Position = UDim2.new(0.5, -250, 0, 150+(20*(i-1)))
391
P.TextXAlignment = "Left"
392
table.insert(New, P)
393
i=i+1
394
end
395
i=1
396
P = Instance.new("TextButton")
397
P.Size = UDim2.new(0, 20, 0, 20)
398
P.Text = "^"
399
P.Name = "Scroll"
400
P.Parent = Gui
401
P.BackgroundColor3 = Color3.new(1, 1, 1)
402
P.TextColor3 = Color3.new(0, 0, 0)
403
P.BackgroundTransparency = 0.5
404
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
405
P.MouseButton1Click:connect(function() 
406
MoveUp(Gui, -20) 
407
end)
408
i=i+1
409
P = Instance.new("TextButton")
410
P.Size = UDim2.new(0, 20, 0, 20)
411
P.Text = "v"
412
P.Name = "Scroll"
413
P.Parent = Gui
414
P.BackgroundColor3 = Color3.new(1, 1, 1)
415
P.TextColor3 = Color3.new(0, 0, 0)
416
P.BackgroundTransparency = 0.5
417
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
418
P.MouseButton1Click:connect(function() 
419
MoveDown(Gui, -20) 
420
end)
421
i=i+1
422
P = Instance.new("TextButton")
423
P.Size = UDim2.new(0, 20, 0, 20)
424
P.Text = "^^"
425
P.Name = "Scroll"
426
P.Parent = Gui
427
P.BackgroundColor3 = Color3.new(1, 1, 1)
428
P.TextColor3 = Color3.new(0, 0, 0)
429
P.BackgroundTransparency = 0.5
430
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
431
P.MouseButton1Click:connect(function() 
432
MoveUp(Gui, -200) 
433
end)
434
i=i+1
435
P = Instance.new("TextButton")
436
P.Size = UDim2.new(0, 20, 0, 20)
437
P.Text = "vv"
438
P.Name = "Scroll"
439
P.Parent = Gui
440
P.BackgroundColor3 = Color3.new(1, 1, 1)
441
P.TextColor3 = Color3.new(0, 0, 0)
442
P.BackgroundTransparency = 0.5
443
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
444
P.MouseButton1Click:connect(function() 
445
MoveDown(Gui, -200) 
446
end)
447
i=i+1
448
P = Instance.new("TextButton")
449
P.Size = UDim2.new(0, 20, 0, 20)
450
P.Text = "S"
451
P.Name = "Save"
452
P.Parent = Gui
453
P.BackgroundColor3 = Color3.new(0, 1, 0)
454
P.TextColor3 = Color3.new(0, 0, 0)
455
P.BackgroundTransparency = 0.5
456
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
457
P.MouseButton1Click:connect(function()
458
StringS = ""
459
for Num, Obj in pairs(New) do
460
StringS = StringS..Obj.Text..'\n'
461
end
462
S.Source = StringS
463
S.Disabled = true
464
S.Disabled = false
465
end)
466
i=i+1
467
P = Instance.new("TextButton")
468
P.Size = UDim2.new(0, 20, 0, 20)
469
P.Text = "C"
470
P.Name = "Copy"
471
P.Parent = Gui
472
P.BackgroundColor3 = Color3.new(1, 0.2, 0)
473
P.TextColor3 = Color3.new(0, 0, 0)
474
P.BackgroundTransparency = 0.5
475
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
476
P.MouseButton1Click:connect(function()
477
StringS = ""
478
for Num, Obj in pairs(New) do
479
StringS = StringS..Obj.Text..'\n'
480
end
481
CopyString(StringS)
482
end)
483
i=i+1
484
P = Instance.new("TextButton")
485
P.Size = UDim2.new(0, 20, 0, 20)
486
P.Text = "x"
487
P.Name = "Back"
488
P.Parent = Gui
489
P.BackgroundColor3 = Color3.new(1, 0.2, 0)
490
P.TextColor3 = Color3.new(0, 0, 0)
491
P.BackgroundTransparency = 0.5
492
P.Position = UDim2.new(0.5, -270, 0, 150+(20*(i-1)))
493
P.MouseButton1Click:connect(function()
494
Clear()
495
i=0
496
Search(S)
497
end)
498
i=i+1
499
end
500
end
501
502
pgr.MouseButton1Click:connect(function()
503
Clear()
504
Search(game)
505
end)