View difference between Paste ID: kAFcLE7M and XsasAtAM
SHOW: | | - or go back to the newest paste.
1
-- ty krystalburger
2
--[[
3
	Thomas The Dank Engine:
4
							By: KrystalTeam
5
							Features: Being a dank engine that kill people
6
							Version: 1.0.0.2
7
--]]
8
9
local p = game.Players.LocalPlayer.Character
10
local weld = Instance.new("Weld",p.Torso)
11
weld.Part0 = p.Torso
12
13
local train = Instance.new("Part",p.Torso)
14
train.Anchored = true
15
train.CanCollide = false
16
train.Size = Vector3.new(3,2,6)
17
train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
18
weld.Part1 = train
19
weld.C1 = CFrame.new(0,0,0) * CFrame.Angles(0,math.rad(180),0)
20
train.Anchored = false
21
local TrainMesh = Instance.new("SpecialMesh",train)
22
TrainMesh.MeshType = Enum.MeshType.FileMesh
23
TrainMesh.Scale = Vector3.new(0.020,0.020,0.015)
24
TrainMesh.MeshId = "rbxassetid://431017802"
25
TrainMesh.TextureId = "rbxassetid://431017809"
26
27
28
local weld2 = Instance.new("Weld",p.Torso)
29
weld2.Part0 = p.Torso
30
local Smoke = Instance.new("Part",p.Torso)
31
Smoke.Anchored = true
32
Smoke.CanCollide = false
33
Smoke.Size = Vector3.new(1,1,1)
34
Smoke.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
35
weld2.Part1 = Smoke
36
weld2.C1 = CFrame.new(0,-4,3.5)-- * CFrame.Angles(0,math.rad(180),0)
37
Smoke.Anchored = false
38
Smoke.Transparency = 1;
39
40
local Particle = Instance.new("ParticleEmitter",Smoke)
41
Particle.Rate = 50;
42
Particle.Speed = NumberRange.new(30,60);
43
Particle.VelocitySpread = 4;
44
Particle.Texture = "rbxassetid://133619974"
45
46
local Light = Instance.new("SpotLight",train)
47
Light.Angle = 45;
48
Light.Brightness = 100;
49
Light.Face = Enum.NormalId.Back;
50
Light.Range = 30;
51
52
p.Humanoid.WalkSpeed = 60;
53
54
55
for i,v in pairs(p:GetChildren()) do
56
	if v:IsA("Part") then
57
		v.Transparency = 1;
58
	elseif v:IsA("Hat") then
59
		v:Destroy()
60
	elseif v:IsA("Model") then
61
		v:Destroy()
62
	end
63
end
64
65
local function SFX(id) local s=Instance.new("Sound",p.Torso); s.SoundId = "rbxassetid://"..id; s.Volume = 1; return s; end
66
train.Touched:connect(function(p)
67
	if p.Parent then
68
		if p.Parent:IsA("Model") then
69
			if game.Players:FindFirstChild(p.Parent.Name) then
70
				if p.Parent.Name ~= game.Players.LocalPlayer.Name then
71
					game.Players:FindFirstChild(p.Parent.Name).Character:BreakJoints()
72
					local Whistle = SFX(475073913)
73
					Whistle:Play()
74
				end
75
			end
76
		end
77
	end
78
end)
79
80-
local Music = SFX(624973558)
80+
local Music = SFX(2727229759)
81
Music.Looped = true;
82
wait(1)
83
Music:Play();
84
-- ~CL 2016