API tools faq
paste
View difference between Paste ID: BE4Rk132 and PxiW1u3E
SHOW: | | - or go back to the newest paste.
1
if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
2
local Player = owner
3
local Mouse,mouse,mou,UserInputService,ContextActionService
4
do
5
	script.Parent = Player.Character
6
	local CAS = {Actions={}}
7
	local Event = Instance.new("RemoteEvent")
8
	Event.Name = "UserInput_Event"
9
	Event.Parent = Player.Character
10
	local fakeEvent = function()
11
		local t = {_fakeEvent=true}
12
		t.Connect = function(self,f)self.Function=f end
13
		t.connect = t.Connect
14
		return t
15
	end
16-
oil = game.Players.LocalPlayer
16+
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
17
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
18
	function CAS:BindAction(name,fun,touch,...)
19
		CAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
20
	end
21
	function CAS:UnbindAction(name)
22
		CAS.Actions[name] = nil
23
	end
24
	local function te(self,ev,...)
25
		local t = m[ev]
26-
mou = oil:GetMouse()
26+
		if t and t._fakeEvent and t.Function then
27
			t.Function(...)
28
		end
29
	end
30
	m.TrigEvent = te
31
	UIS.TrigEvent = te
32
	Event.OnServerEvent:Connect(function(plr,io)
33
	    if plr~=Player then return end
34
		if io.isMouse then
35
			m.Target = io.Target
36
			m.Hit = io.Hit
37
		elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
38
	        if io.UserInputState == Enum.UserInputState.Begin then
39
				m:TrigEvent("Button1Down")
40
			else
41
				m:TrigEvent("Button1Up")
42
			end
43
		else
44
			for n,t in pairs(CAS.Actions) do
45
				for _,k in pairs(t.Keys) do
46
					if k==io.KeyCode then
47
						t.Function(t.Name,io.UserInputState,io)
48
					end
49
				end
50
			end
51
	        if io.UserInputState == Enum.UserInputState.Begin then
52
	            m:TrigEvent("KeyDown",io.KeyCode.Name:lower())
53
				UIS:TrigEvent("InputBegan",io,false)
54
			else
55
				m:TrigEvent("KeyUp",io.KeyCode.Name:lower())
56
				UIS:TrigEvent("InputEnded",io,false)
57
	        end
58
	    end
59
	end)
60
	NLS([==[
61
	local Player = game:GetService("Players").LocalPlayer
62
63
	local Char = Player.Character
64
	local Event = Char:WaitForChild("UserInput_Event")
65
66
	local UIS = game:GetService("UserInputService")
67
68
	local input = function(io,a)
69
	    if a then return end
70
		local io = {KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState}
71
		Event:FireServer(io)
72
	end
73
	UIS.InputBegan:Connect(input)
74
	UIS.InputEnded:Connect(input)
75
	local Changed = false
76
	local Mouse = Player:GetMouse()
77
	local h,t = Mouse.Hit,Mouse.Target
78
	while wait(1/30) do
79
		if h~=Mouse.Hit or t~=Mouse.Target then
80
			Event:FireServer({isMouse=true,Target=Mouse.Target,Hit=Mouse.Hit})
81
            h,t=Mouse.Hit,Mouse.Target
82
		end
83
	end
84
	]==],Player.Character)
85
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
86
end
87
88
print("controls:")

89
print("z - make it morning")

90
print("x - make it night")

91
print("c - clean workspace")

92
print("v - heal the player your mouse is pointing at")

93
print("f - make the player your mouse is pointing at fat")

94
print("n - make everyone fat")

95
print("e - annihilate the player your mouse is pointing at")

96
print("p - suicide")

97
print("k - kill other players")

98
print("b - control the player your mouse it pointing at")

99
print("r - tp evryone to you")

100
print("t - send the player your mouse is pointing at to 'heaven'")

101
print("q - spawn pet")

102
print("g - spawn a blackhole")

103
oil = owner

104
sauce = oil.Character

105
tor = sauce:FindFirstChild("Torso") or sauce:FindFirstChild("UpperTorso")

106
head = sauce:FindFirstChild("Head")

107
larm = sauce:FindFirstChild("Left Arm") or sauce:FindFirstChild("LeftUpperArm")

108
rarm = sauce:FindFirstChild("Right Arm") or sauce:FindFirstChild("RightUpperArm")

109
rleg = sauce:FindFirstChild("Right Leg") or sauce:FindFirstChild("RightUpperLeg")

110
lleg = sauce:FindFirstChild("Left Leg") or sauce:FindFirstChild("LeftUpperLeg")

111
hum = sauce:FindFirstChildOfClass("Humanoid")

112
humroot = sauce:FindFirstChild("HumanoidRootPart")

113
remoteequipped = true

114
controlling = false

115
light = game:GetService("Lighting")

116
tool = Instance.new("Tool", oil.Backpack)

117
tool.Name = "Remote"

118
hand = Instance.new("Part", tool)

119
hand.Name = "Handle"

120
hand.Size = Vector3.new(1, 1, 1)

121
hand.Transparency = 1

122
p1 = Instance.new("Part", hand)

123
p1.Size = Vector3.new(0.6, 0.1, 1.2)

124
p1.Material = "Metal"

125
p1.Name = "p1"

126
p2 = Instance.new("Part", hand)

127
p2.Size = Vector3.new(0.4, 0.1, 0.1)

128
p2.Material = "Metal"

129
p2.Name = "p2"

130
p2.Shape = "Cylinder"

131
p3 = Instance.new("Part", hand)

132
p3.Shape = "Ball"

133
p3.Material = "Neon"

134
p3.Size = Vector3.new(0.15, 0.15, 0.15)

135
p3.BrickColor = BrickColor.new("Crimson")

136
p3.Name = "p3"

137
p4 = Instance.new("Part", hand)

138
p4.Size = Vector3.new(0.2, 0.4, 0.4)

139
p4.Material = "Neon"

140
p4.Name = "p4"

141
p4.BrickColor = BrickColor.new("Maroon")

142
p4.Shape = "Cylinder"

143
w1 = Instance.new("Weld", p1)

144
w1.Part0 = hand

145
w1.Part1 = p1

146
w1.C1 = CFrame.new(0, 0, 0.6)

147
w1.Name = "w1"

148
w2 = Instance.new("Weld", p2)

149
w2.Part0 = hand

150
w2.Part1 = p2

151
w2.C1 = CFrame.new(1.3, 0, 0) * CFrame.Angles(math.rad(0), math.rad(90), math.rad(0))

152
w3 = Instance.new("Weld", p3)

153
w3.Part0 = hand

154
w3.Part1 = p3

155
w3.C1 = CFrame.new(0, 0, 1.5)

156
w4 = Instance.new("Weld", p4)

157
w4.Part0 = hand

158
w4.Part1 = p4

159
w4.C1 = CFrame.new(0.1, 0, 0.6) * CFrame.Angles(math.rad(0), math.rad(0), math.rad(90))

160
161
162
tool.Equipped:connect(function()

163
remoteequipped = true

164
function pressed(key)

165
if remoteequipped == true then

166
if key == "x" then

167
light.TimeOfDay = 21

168
elseif key == "z" then

169
light.TimeOfDay = 7

170
elseif key == "c" then

171
for i,v in pairs(workspace:GetChildren()) do

172
if v:IsA("Part") and v.Name ~= "Base" then

173
v.Locked = false

174
v:remove()

175
end

176
if v:IsA("Model") and not v:FindFirstChildOfClass("Humanoid") then

177
v:remove()

178
end

179
end

180
elseif key == "p" then

181
hum.Health = 0

182
elseif key == "k" then

183
for i,v in pairs(workspace:GetChildren()) do

184
if v:IsA("Model") and v:FindFirstChildOfClass("Humanoid") and v.Name ~= sauce.Name then

185
khum = v:FindFirstChildOfClass("Humanoid")

186
khum.Health = 0

187
end

188
end

189
elseif key == "r" then

190
for i,v in pairs(workspace:GetChildren()) do

191
if v:IsA("Model") and v:FindFirstChildOfClass("Humanoid") and v.Name ~= sauce.Name then

192
vtor = v:FindFirstChild("Torso" )or v:FindFirstChild("UpperTorso")

193
vtor.CFrame = tor.CFrame * CFrame.new(0, 0, -5)

194
end

195
end

196
elseif key == "v" then

197
if mou.Target.Parent and mou.Target.Parent:FindFirstChildOfClass("Humanoid") then

198
mouhum = mou.Target.Parent:FindFirstChildOfClass("Humanoid")

199
mouhum.Health = mouhum.MaxHealth

200
mouhead = mou.Target.Parent:FindFirstChild("Head")

201
bill = Instance.new("BillboardGui", mouhead)

202
bill.AlwaysOnTop = true

203
bill.StudsOffset = Vector3.new(0, 2, 0)

204
bill.Adornee = mouhead

205
bill.Size = UDim2.new(5, 35, 5, 35)

206
btext = Instance.new("TextLabel", bill)

207
btext.Text = mou.Target.Parent.Name.." has been Healed!"

208
btext.Font = "Bodoni"

209
btext.TextSize = 30

210
btext.TextScaled = true

211
btext.BorderSizePixel = 0

212
btext.BackgroundTransparency = 1

213
btext.Size = UDim2.new(1.5, 0, 0.5, 0)

214
btext.TextColor = BrickColor.new("Bright green")

215
game:GetService("Debris"):AddItem(bill, 2)

216
end

217
elseif key == "e" then

218
if mou.Target.Parent and mou.Target.Parent:FindFirstChildOfClass("Humanoid") then

219
local nomoretor = mou.Target.Parent:FindFirstChild("Torso") or mou.Target.Parent:FindFirstChild("UpperTorso")

220
local nomorehum = mou.Target.parent:FindFirstChildOfClass("Humanoid")

221
local explo = Instance.new("Explosion", workspace)

222
explo.Position = nomoretor.Position

223
nomorehum.Health = 0

224
end

225
elseif key == "f" then

226
if mou.Target.Parent and mou.Target.Parent:FindFirstChildOfClass("Humanoid") then

227
local fatman = mou.Target.Parent

228
local fatmanhum = fatman:FindFirstChildOfClass("Humanoid")

229
fatmanhum.WalkSpeed = 8

230
local fattor = mou.Target.Parent:FindFirstChild("Torso") or mou.Target.Parent:FindFirstChild("UpperTorso")

231
local hinum = Instance.new("Sound", fattor)

232
hinum.SoundId = "rbxassetid://1278031541"

233
hinum.Volume = 10

234
local realfat = Instance.new("Part", fattor)

235
realfat.BrickColor = fattor.BrickColor

236
realfat.Material = "SmoothPlastic"

237
local supaweld = Instance.new("Weld", realfat)

238
supaweld.Part0 = fattor

239
supaweld.Part1 = realfat

240
local fat = Instance.new("SpecialMesh", realfat)

241
fat.MeshType = "Sphere"

242
fat.Scale = Vector3.new(0.6, 1.6, 0.9)

243
fat.Offset = Vector3.new(0, -0.4, -0.7)

244
hinum:Play()

245
if fatman:FindFirstChildOfClass("Shirt") then

246
fatman:FindFirstChildOfClass("Shirt"):remove()

247
end

248
end

249
elseif key == "b" then

250
if mou.Target.Parent and mou.Target.Parent:FindFirstChildOfClass("Humanoid") and controlling == false then

251
controlling = true

252
cman = mou.Target.Parent

253
mtor = cman:FindFirstChild("Torso") or cman:FindFirstChild("UpperTorso")

254
mlarm = cman:FindFirstChild("Left Arm") or cman:FindFirstChild("LeftUpperArm")

255
mrarm = cman:FindFirstChild("Right Arm") or cman:FindFirstChild("RightUpperArm")

256
mlleg = cman:FindFirstChild("Left Leg") or cman:FindFirstChild("LeftUpperLeg")

257
mrleg = cman:FindFirstChild("Right Leg") or cman:FindFirstChild("RightUpperLeg")

258
mhead = cman:FindFirstChild("Head")

259
mhum = cman:FindFirstChildOfClass("Humanoid")

260
mhum.PlatformStand = true

261
hum.NameOcclusion = "NoOcclusion"

262
mface = head:FindFirstChild("face")

263
mface.Transparency = 1

264
humroot.Transparency = 1

265
for i,v in pairs(sauce:GetChildren()) do

266
if v:IsA("Part") then

267
v.Transparency = 1

268
end

269
if v:IsA("Accessory") then

270
v.Handle.Transparency = 1

271
end

272
end

273
ow1 = Instance.new("Weld", tor)

274
ow1.Part0 = tor

275
ow1.Part1 = mtor

276
ow2 = Instance.new("Weld", larm)

277
ow2.Part0 = larm

278
ow2.Part1 = mlarm

279
ow3 = Instance.new("Weld", rarm)

280
ow3.Part0 = rarm

281
ow3.Part1 = mrarm

282
ow4 = Instance.new("Weld", lleg)

283
ow4.Part0 = lleg

284
ow4.Part1 = mlleg

285
ow5 = Instance.new("Weld", rleg)

286
ow5.Part0 = rleg

287
ow5.Part1 = mrleg

288
ow6 = Instance.new("Weld", head)

289
ow6.Part0 = head

290
ow6.Part1 = mhead

291
elseif controlling == true then

292
controlling = false

293
ow1:Destroy()

294
ow2:Destroy()

295
ow3:Destroy()

296
ow4:Destroy()

297
ow5:Destroy()

298
ow6:Destroy()

299
mhum.PlatformStand = false

300
hum.NameOcclusion = "OccludeAll"

301
humrootTransparency = 1

302
mface.Transparency = 0

303
for i,v in pairs(sauce:GetChildren()) do

304
if v:IsA("Part") and v ~= humroot then

305
v.Transparency = 0

306
end

307
if v:IsA("Accessory") then

308
v.Handle.Transparency = 0

309
end

310
end

311
end

312
elseif key == "n" then

313
for i,v in pairs(workspace:GetChildren()) do

314
if v:IsA("Model") and v:FindFirstChildOfClass("Humanoid") and v.Name ~= sauce.Name then

315
local fatman = v

316
local fatmanhum = fatman:FindFirstChildOfClass("Humanoid")

317
fatmanhum.WalkSpeed = 8

318
local fattor = fatman:FindFirstChild("Torso") or fatman:FindFirstChild("UpperTorso")

319
local hinum2 = Instance.new("Sound", fattor)

320
hinum2.SoundId = "rbxassetid://1278031541"

321
hinum2.Volume = 10

322
local realfat = Instance.new("Part", fattor)

323
realfat.BrickColor = fattor.BrickColor

324
realfat.Material = "SmoothPlastic"

325
local supaweld = Instance.new("Weld", realfat)

326
supaweld.Part0 = fattor

327
supaweld.Part1 = realfat

328
local fat = Instance.new("SpecialMesh", realfat)

329
fat.MeshType = "Sphere"

330
fat.Scale = Vector3.new(0.6, 1.6, 0.9)

331
fat.Offset = Vector3.new(0, -0.4, -0.7)

332
hinum2:Play()

333
if fatman:FindFirstChildOfClass("Shirt") then

334
fatman:FindFirstChildOfClass("Shirt"):remove()

335
end

336
end

337
end

338
elseif key == "t" then

339
if mou.Target.Parent and mou.Target.Parent:FindFirstChildOfClass("Humanoid") then

340
local goneman = mou.Target.Parent

341
local gonehead = goneman:FindFirstChild("Head")

342
local gonetor = goneman:FindFirstChild("Torso") or goneman:FindFirstChild("UpperTorso")

343
local lightb = Instance.new("Part", goneman)

344
lightb.Shape = "Cylinder"

345
lightb.CanCollide = false

346
lightb.Anchored = true

347
lightb.Size = Vector3.new(300, 10, 10)

348
lightb.Material = "Neon"

349
lightb.Transparency = 0.5

350
lightb.BrickColor = BrickColor.new("New Yeller")

351
lightb.CFrame = gonetor.CFrame * CFrame.new(0, 140, 0) * CFrame.Angles(math.rad(0), math.rad(0), math.rad(90))

352
local start = gonetor.CFrame

353
local finish = lightb.CFrame * CFrame.new(140, 0, 0)

354
for i = 0,1,.01 do

355
gonetor.CFrame = start:lerp(finish, i)

356
wait()

357
end

358
gonehead.Size = Vector3.new(50, 50, 50)

359
lightb:Destroy()

360
end

361
elseif key == "q" then

362
if mou.Target ~= nil then

363
local dont = Instance.new("Part", sauce)

364
dont.CFrame = mou.Hit

365
dont.Material = "Sand"

366
dont.BrickColor = BrickColor.new("Pastel yellow")

367
dont.Size = Vector3.new(3, 3, 3)

368
dont.Shape = "Ball"

369
dont.Anchored = true

370
local obj = Instance.new("Sound", dont)

371
local feats = {463838589, 691897627, 179270320, 425407550, 1074595721, 1065045593, 142688397, 1308566029, 1402510823}

372
obj.SoundId = "rbxassetid://"..feats[math.random(1,#feats)]

373
obj.Volume = 10

374
obj.Looped = true

375
obj:Play()

376
oil.Chatted:connect(function(msg)

377
if msg:lower():sub(1, 7) == "plastic" then

378
dont.Material = "Plastic"

379
elseif msg:lower():sub(1, 5) == "slate" then

380
dont.Material = "Slate"

381
elseif msg:lower():sub(1, 3) == "ice" then

382
dont.Material = "Ice"

383
elseif msg:lower():sub(1, 5) == "metal" then

384
dont.Material = "Metal"

385
elseif msg:lower():sub(1, 4) == "neon" then

386
dont.Material = "Neon"

387
elseif msg:lower():sub(1, 5) == "grass" then

388
dont.Material = "Grass"

389
elseif msg:lower():sub(1, 4) == "sand" then

390
dont.Material = "Sand"

391
elseif msg:lower():sub(1, 9) == "woodplank" then

392
dont.Material = "WoodPlanks"

393
elseif msg:lower():sub(1, 4) == "wood" then

394
dont.Material = "Wood"

395
elseif msg:lower():sub(1, 6) == "marble" then

396
dont.Material = "Marble"

397
elseif msg:lower():sub(1, 8) == "concrete" then

398
dont.Material = "Concrete"

399
elseif msg:lower():sub(1, 5) == "brick" then

400
dont.Material = "Brick"

401
elseif msg:lower():sub(1, 7) == "granite" then

402
dont.Material = "Granite"

403
elseif msg:lower():sub(1, 6) == "pebble" then

404
dont.Material = "Pebble"

405
elseif msg:lower():sub(1, 11) == "cobblestone" then

406
dont.Material = "Cobblestone"

407
elseif msg:lower():sub(1, 13) == "corrodedmetal" then

408
dont.Material = "CorrodedMetal"

409
elseif msg:lower():sub(1, 12) == "diamondplate" then

410
dont.Material = "DiamondPlate"

411
elseif msg:lower():sub(1, 4) == "foil" then

412
dont.Material = "Foil"

413
elseif msg:lower():sub(1, 6) == "fabric" then

414
dont.Material = "Fabric"

415
elseif msg:lower():sub(1, 6) == "yellow" then

416
dont.BrickColor = BrickColor.new("New Yeller")

417
elseif msg:lower():sub(1, 6) == "purple" then

418
dont.BrickColor = BrickColor.new("Bright violet")

419
elseif msg:lower():sub(1, 3) == "red" then

420
dont.BrickColor = BrickColor.new("Crimson")

421
elseif msg:lower():sub(1, 5) == "black" then

422
dont.BrickColor = BrickColor.new("Really black")

423
elseif msg:lower():sub(1, 5) == "white" then

424
dont.BrickColor = BrickColor.new("Institutional white")

425
elseif msg:lower():sub(1, 4) == "pink" then

426
dont.BrickColor = BrickColor.new("Hot pink")

427
elseif msg:lower():sub(1, 5) == "green" then

428
dont.BrickColor = BrickColor.new("Bright green")

429
elseif msg:lower():sub(1, 4) == "grey" then

430
dont.BrickColor = BrickColor.new("Medium stone grey")

431
elseif msg:lower():sub(1, 5) == "brown" then

432
dont.BrickColor = BrickColor.new("Burnt Sienna")

433
elseif msg:lower():sub(1, 6) == "orange" then

434
dont.BrickColor = BrickColor.new("Deep orange")

435
elseif msg:lower():sub(1, 4) == "blue" then

436
dont.BrickColor = BrickColor.new("Really blue")

437
elseif msg:lower():sub(1, 4) == "cyan" then

438
dont.BrickColor = BrickColor.new("Cyan")

439
elseif msg:lower():sub(1, 6) == "pastel" then

440
dont.BrickColor = BrickColor.new("Pastel yellow")

441
elseif msg:lower():sub(1, 5) == "ghost" then

442
dont.Transparency = 0.7

443
elseif msg:lower():sub(1, 5) == "alive" then

444
dont.Transparency = 0

445
elseif msg:lower():sub(1, 5) == "block" then

446
dont.Shape = "Block"

447
elseif msg:lower():sub(1, 4) == "ball" then

448
dont.Shape = "Ball"

449
elseif msg:lower():sub(1, 3) == "bye" then

450
dont:Destroy()

451
elseif msg:lower():sub(1, 17) == "pick another song" then

452
obj:Stop()

453
obj.SoundId = "rbxassetid://"..feats[math.random(1,#feats)]

454
obj.Volume = 10

455
obj.Looped = true

456
obj:Play()

457
elseif msg:lower():sub(1, 4) == "play" then

458
obj:Play()

459
elseif msg:lower():sub(1, 4) == "stop" then

460
obj:Stop()

461
elseif msg:lower():sub(1, 3) == "add" then

462
obj:Stop()

463
local arg = msg:sub(5, 999)

464
obj.SoundId = "rbxassetid://"..arg

465
obj:Play()

466
end

467
end)

468
while true do

469
for i = 0,1,.001 do

470
dont.CFrame = dont.CFrame:lerp(tor.CFrame * CFrame.new(0, 5, 3), i)

471
dont.Size = Vector3.new(obj.PlaybackLoudness/80, obj.PlaybackLoudness/80, obj.PlaybackLoudness/80)

472
wait()

473
end

474
wait()

475
end

476
end

477
elseif key == "g" then

478
if mou.Target ~= nil then

479
local MAN = mou.Target.Parent

480
local MANT = MAN:FindFirstChild("Torso") or MAN:FindFirstChild("UpperTorso")

481
local hole = Instance.new("Part", workspace)

482
hole.Shape = "Ball"

483
hole.Size = Vector3.new(0.7, 0.7, 0.7)

484
hole.BrickColor = BrickColor.new("Eggplant")

485
hole.Anchored = true

486
hole.Material = "Neon"

487
hole.CFrame = mou.Hit

488
for i,v in pairs(workspace:GetChildren()) do

489
if v:IsA("Model") and v:FindFirstChildOfClass("Humanoid") and v.Name ~= sauce.Name then

490
local owtor = v

491
blacktor = owtor:FindFirstChild("Torso") or owtor:FindFirstChild("UpperTorso")

492
bodpos = Instance.new("BodyPosition", blacktor)

493
bodpos.Position = hole.Position

494
bodpos.P = 5000000000

495
bodpos.MaxForce = Vector3.new(500000000, 500000000, 500000000)

496
end

497
end

498
end

499
500
end

501
end

502
end

503
mou.KeyDown:connect(pressed)

504
end)

505
tool.Unequipped:connect(function()

506
remoteequipped = false

507
end)
        

    


            


                                


        

            



                
    

        Public Pastes
    

    
            

    

                    

        

    





    


    
    
    
    
    
    
    
    




    


    



                

            We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.             OK, I Understand
        

    
                

            

                
                    
                
            

            

                Not a member of Pastebin yet?

                Sign Up, it unlocks many cool features!