View difference between Paste ID: Kuit10Tx and N7QYVVCx
SHOW: | | - or go back to the newest paste.
1
--[[
2
    Thomas The Dank Engine:
3
                            By: KrystalTeam
4
                            Features: Being a dank engine that kill people
5
                            Version: 1.0.0.2
6
--]]
7
 
8
local p = game.Players.LocalPlayer.Character
9
local weld = Instance.new("Weld",p.Torso)
10
weld.Part0 = p.Torso
11
 
12
local train = Instance.new("Part",p.Torso)
13
train.Anchored = true
14
train.CanCollide = false
15
train.Size = Vector3.new(3,2,6)
16
train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
17
weld.Part1 = train
18
weld.C1 = CFrame.new(0,0,0) * CFrame.Angles(0,math.rad(180),0)
19
train.Anchored = false
20
local TrainMesh = Instance.new("SpecialMesh",train)
21
TrainMesh.MeshType = Enum.MeshType.FileMesh
22-
TrainMesh.Scale = Vector3.new(0.050,0.050,0.045)
22+
TrainMesh.Scale = Vector3.new(34.798, 17, 34.3)
23-
TrainMesh.MeshId = "rbxassetid://430571807"
23+
TrainMesh.MeshId = "rbxassetid://906939696"
24-
TrainMesh.TextureId = "rbxassetid://430571813"
24+
TrainMesh.TextureId = "rbxassetid://906939805"
25
26
plr = game.Players.LocalPlayer
27
mouse = plr:GetMouse()
28
part = nil
29
bp = nil
30
particles = nil
31
function clerp(a,b,c,d)
32
	for i = 0,d,.01 do
33
		a.CFrame = CFrame.new(b:lerp(c,i))
34
		wait()
35
	end
36
end
37
function slerp(a2,b2,c2,d2)
38
	for i2 = 0,d2,.01 do
39
		a2.CFrame = CFrame.new(b2:lerp(c2,i2))
40
		wait()
41
	end
42
end
43-
Particle.Texture = "rbxassetid://185414427"
43+
mouse.KeyDown:connect(function(key)
44
	if key == "e" and plr.Character.Parent == workspace then
45
		plr.Character.Parent = workspace.Camera
46
		plr.Character.Archivable = true
47
		Instance.new("ForceField",plr.Character).Visible = false
48
		for y,t in pairs(plr.Character:GetChildren()) do
49
			if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
50
				t.Transparency = 1
51-
p.Humanoid.WalkSpeed = 60;
51+
				if t.Name == "Head" and t:FindFirstChild("face") then
52
					t.face.Transparency = 1
53
				end
54
			elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
55
				t.Handle.Transparency = 1
56
			end
57
		end
58
	elseif key == "z" and plr.Character.Parent == workspace.Camera and part == nil then
59
		plr.Character.Torso.CFrame = CFrame.new(Vector3.new(mouse.hit.p.X,mouse.hit.p.Y+1.5,mouse.hit.p.Z),plr.Character.Torso.CFrame.p)
60
	elseif key == "x" and plr.Character.Parent == workspace.Camera and part == nil then
61
		if plr.Character.Torso.Anchored == true then
62
			for y,t in pairs(plr.Character:GetChildren()) do
63
				if t:IsA("Part") then
64
					t.Anchored = false
65
				end
66
			end
67
		else
68
			for y,t in pairs(plr.Character:GetChildren()) do
69
				if t:IsA("Part") then
70
					t.Anchored = true
71-
                    local Whistle = SFX(130767645)
71+
				end
72
			end
73
		end
74
	elseif key == "c" and plr.Character.Parent == workspace.Camera and part ~= nil then
75
		local clone = part:Clone()
76
		clone.Parent = workspace
77
		clone.Anchored = false
78
		clone:ClearAllChildren()
79-
local Music = SFX(534298340)
79+
		clone.CanCollide = true
80
		bp.Parent = clone
81
		particles.Parent = clone
82
		if part.Parent:FindFirstChildOfClass("Humanoid") then
83
			part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false
84
		end
85
		part:Destroy()
86
		part = clone
87
	elseif key == "t" and plr.Character.Parent == workspace.Camera and part == nil then
88
		plr.Character.Parent = workspace
89
		plr.Character.Archivable = false
90
		plr.Character:FindFirstChildOfClass("ForceField"):Remove()
91
		for y,t in pairs(plr.Character:GetChildren()) do
92
			if t:IsA("Part") and t.Name ~= "HumanoidRootPart" then
93
				t.Transparency = 0
94
				if t.Name == "Head" and t:FindFirstChild("face") then
95
					t.face.Transparency = 0
96
				end
97
			elseif t:IsA("Accessory") and t:FindFirstChild("Handle") then
98
				t.Handle.Transparency = 0
99
			end
100
		end
101
	end
102
end)
103
mouse.Button1Down:connect(function()
104
	if plr.Character.Parent == workspace.Camera then
105
		if mouse ~= nil then
106
			if mouse.Target ~= nil then
107
				part = mouse.Target
108
				bp = Instance.new("BodyPosition",part)
109
				bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
110
				bp.Position = part.Position
111
				particles = Instance.new("ParticleEmitter",part)
112
				particles.Color = ColorSequence.new(Color3.new(0,0,0))
113
				particles.Size = NumberSequence.new(1)
114
				particles.Texture = "rbxassetid://292289455"
115
				particles.VelocitySpread = 360
116
				particles.Speed = NumberRange.new(0)
117
				particles.RotSpeed = NumberRange.new(0)
118
				particles.Rotation = NumberRange.new(0)
119
				particles.Rate = 250
120
				particles.Lifetime = NumberRange.new(.2,.4)
121
				particles.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0,1,0),NumberSequenceKeypoint.new(.12,.688,0),NumberSequenceKeypoint.new(.891,.887,0),NumberSequenceKeypoint.new(1,1,0)})
122
				dwn = true
123
			end
124
		end
125
		while dwn == true do 
126
			wait()	
127
			bp.Position = mouse.hit.p
128
			if part then
129
				if part.Parent:FindFirstChildOfClass("Humanoid") then
130
					part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = true
131
				end
132
			end
133
		end
134
	end
135
end)
136
mouse.Button1Up:connect(function()
137
	dwn = false
138
	if part then if part.Parent:FindFirstChildOfClass("Humanoid") then part.Parent:FindFirstChildOfClass("Humanoid").PlatformStand = false end part = nil end
139
	if bp then bp:Destroy() end
140
	if particles then particles:Destroy() end
141
end)
142
base = Instance.new("ScreenGui",plr.PlayerGui)
143
bbg = Instance.new("BillboardGui",plr.Character.Head)
144
bbg.Size = UDim2.new(0,200,0,50)
145
bbg.StudsOffset = Vector3.new(0,3,0)
146
bbgTl = Instance.new("TextLabel",bbg)
147
bbgTl.BackgroundTransparency = 1
148
bbgTl.Size = UDim2.new(10,0,1,0)
149
bbgTl.Position = UDim2.new(-4.5,0,0,0)
150
bbgTl.Font = "Code"
151
bbgTl.Text = " "
152
bbgTl.TextSize = 25
153
bbgTl.TextStrokeColor3 = Color3.new(1,1,1)
154
bbgTl.TextColor3 = Color3.new(0,0,0)
155
bbgTl.TextStrokeTransparency = 0
156
bbgTl.TextWrapped = true
157
plr.Chatted:connect(function(msg)
158
	bbgTl.Text = msg
159
	wait(5)
160
	if bbgTl.Text == msg then
161
		bbgTl.Text = " "
162
	end
163
end)
164
touchCounter = 0
165
while wait() do
166
	if plr.Character.Parent == workspace.Camera then
167
		local c = plr.Character:Clone()
168
		c:MakeJoints()
169
		for y,t in pairs(c:GetChildren()) do
170
			if t:IsA("Part") then
171
				t.CanCollide = false 
172
				t.Anchored = true 
173
				t.Transparency = .5
174
				t.TopSurface = "Smooth"
175
				t.BottomSurface = "Smooth"
176
				t.RightSurface = "Smooth"
177
				t.LeftSurface = "Smooth"
178
				t.FrontSurface = "Smooth"
179
				t.BackSurface = "Smooth"
180
				t.BrickColor = BrickColor.new("Really black")
181
				if t.Name == "Head" and t:FindFirstChild("face") then
182
					t.face:Remove()
183
				elseif t.Name == "Torso" and t:FindFirstChild("roblox") then
184
					t.roblox:Remove()
185
				elseif t.Name == "HumanoidRootPart" then
186
					t:Remove()
187
				end
188
			else 
189
				t:Remove()
190
			end
191
		end
192
		c.Parent = workspace
193
		game.Debris:AddItem(c,.05)
194
	end
195
end
196
197
198
-- Objects
199
 
200
local ScreenGui = Instance.new("ScreenGui")
201
local TextButton = Instance.new("TextButton")
202
 
203
-- Properties
204
 
205
ScreenGui.Parent = game.Players.LocalPlayer.PlayerGui
206
 
207
TextButton.Parent = ScreenGui
208
TextButton.BackgroundColor3 = Color3.new(1, 1, 1)
209
TextButton.Size = UDim2.new(0, 200, 0, 50)
210
TextButton.Font = Enum.Font.SourceSans
211
TextButton.FontSize = Enum.FontSize.Size14
212
TextButton.Text = "Bowser Roar"
213
TextButton.TextSize = 14
214
 
215
--[[Function/s being made!]]
216
function PlayMusic(ID)
217
    for i, v in pairs (game.Workspace:GetChildren()) do
218
    if v:IsA("Sound") then
219
    end
220
    end
221
    local music = Instance.new("Sound")
222
    local asset = "rbxassetid://"
223
    music.SoundId = asset .. ID
224
    music.Parent = workspace
225
    music.Volume = 50
226
    music.Looped = false
227
    music:Play()
228
end
229
--[[Connecting functions!]]
230
TextButton.MouseButton1Down:connect(function()
231
PlayMusic(171756886)
232
end)
233
 
234
print("thx for use dis m8, k bye")
235
 
236
local weld2 = Instance.new("Weld",p.Torso)
237
weld2.Part0 = p.Torso
238
local Smoke = Instance.new("Part",p.Torso)
239
Smoke.Anchored = true
240
Smoke.CanCollide = false
241
Smoke.Size = Vector3.new(1,1,1)
242
Smoke.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
243
weld2.Part1 = Smoke
244
weld2.C1 = CFrame.new(0,-4,3.5)-- * CFrame.Angles(0,math.rad(180),0)
245
Smoke.Anchored = false
246
Smoke.Transparency = 1;
247
 
248
local Particle = Instance.new("ParticleEmitter",Smoke)
249
Particle.Rate = 50;
250
Particle.Speed = NumberRange.new(30,60);
251
Particle.VelocitySpread = 4;
252
Particle.Texture = "rbxassetid://25732702"
253
 
254
local Light = Instance.new("SpotLight",train)
255
Light.Angle = 45;
256
Light.Brightness = 100;
257
Light.Face = Enum.NormalId.Back;
258
Light.Range = 30;
259
 
260
p.Humanoid.WalkSpeed = 50;
261
 
262
 
263
for i,v in pairs(p:GetChildren()) do
264
    if v:IsA("Part") then
265
        v.Transparency = 1;
266
    elseif v:IsA("Hat") then
267
        v:Destroy()
268
    elseif v:IsA("Model") then
269
        v:Destroy()
270
    end
271
end
272
 
273
local function SFX(id) local s=Instance.new("Sound",p.Torso); s.SoundId = "rbxassetid://"..id; s.Volume = 1; return s; end
274
train.Touched:connect(function(p)
275
    if p.Parent then
276
        if p.Parent:IsA("Model") then
277
            if game.Players:FindFirstChild(p.Parent.Name) then
278
                if p.Parent.Name ~= game.Players.LocalPlayer.Name then
279
                    game.Players:FindFirstChild(p.Parent.Name).Character:BreakJoints()
280
                    local Whistle = SFX(834663785)
281
                    Whistle:Play()
282
                end
283
            end
284
        end
285
    end
286
end)
287
 
288
local Music = SFX(301463006)
289
Music.Looped = true;
290
wait(1)
291
Music:Play();