TextBin

Novo Texto Importar Arquivo

tool = Instance.new("Tool",owner.Backpack)
tool.RequiresHandle = false
tool.CanBeDropped = false
remote = Instance.new("RemoteEvent",tool)
remote.Name = "Fire"

NLS([[
local mouse = game.Players.LocalPlayer:GetMouse()

tool = script.Parent

tool.Activated:Connect(function()	
	
	local MousePos = mouse.Hit.Position
	
	script.Parent.Fire:FireServer(MousePos)
	
end)
]],tool)

NumberOfDongs = 8

b = BrickColor.new

blast_radius = 50

blast_pressure = 800000

detonation_time = 1.5 --seconds

tool.Fire.OnServerEvent:Connect(function(player,MousePos)

local bmod = Instance.new("Model",workspace)

local p1 = Instance.new("Part",bmod)
	p1.Size = Vector3.new(0.5,5, 5)
	p1.BrickColor = b("Dark stone grey")
	p1.BottomSurface = "Smooth"
	p1.TopSurface = "Smooth"
	p1.CFrame = CFrame.Angles(0,0,math.rad(90)) + MousePos
	p1.Shape = "Cylinder"
	p1.Anchored = true
	p1.Reflectance = 0.1

local p2 = Instance.new("Part",bmod)
	p2.Size = Vector3.new(1,3,5)
	p2.BrickColor = b("Really red")
	p2.BottomSurface = "Smooth"
	p2.TopSurface = "Smooth"
	p2.Shape = "Cylinder"
	p2.CFrame = CFrame.Angles(0,0,math.rad(90)) + MousePos + Vector3.new(0,0.5,0)
	p2.Anchored = true
	p2.Reflectance = 0.1

local proxprompt = Instance.new("ProximityPrompt")
	proxprompt.Parent = p2
	proxprompt.KeyboardKeyCode = Enum.KeyCode.E
	proxprompt.ActionText = "Do not press."
	proxprompt.HoldDuration = 2

proxprompt.Triggered:Connect(function()

local startpos = p2.CFrame + Vector3.new(0,5,0)

function generaterod(Color)

local mod = Instance.new("Model",bmod)

local primary = Instance.new("Part",mod) 
			primary.Massless = true
			primary.Size = Vector3.new(1.2, 1.2 ,1.2)
			primary.Transparency = 1
			primary.CanCollide = false

mod.PrimaryPart = primary

local Shaft = Instance.new("Part",mod)
			Shaft.Size = Vector3.new(8, 1, 1)
			Shaft.BrickColor = Color
			Shaft.TopSurface = "Smooth"
			Shaft.BottomSurface = "Smooth"
			Shaft.Shape = "Cylinder"
			Shaft.Material = "SmoothPlastic"

local weld = Instance.new("Weld",Shaft)
			weld.C0 = CFrame.new(0,1.4,-4) * CFrame.Angles( math.rad(0),math.rad(90),math.rad(0) )
			weld.Part0 = primary
			weld.Part1 = Shaft

local Ball1 = Instance.new("Part",mod)
			Ball1.Size = Vector3.new(2.5, 2.5, 2.5)
			Ball1.BrickColor = Color
			Ball1.TopSurface = "Smooth"
			Ball1.BottomSurface = "Smooth"
			Ball1.Shape = "Ball"
			Ball1.Material = "SmoothPlastic"

weld = Instance.new("Weld",Ball1)
			weld.C0 = CFrame.new(0.8, 0.91 ,0)
			weld.Part0 = primary
			weld.Part1 = Ball1

local Ball2 = Instance.new("Part",mod)
			Ball2.Size = Vector3.new(2.5, 2.5, 2.5)
			Ball2.BrickColor = Color
			Ball2.TopSurface = "Smooth"
			Ball2.BottomSurface = "Smooth"
			Ball2.Shape = "Ball"
			Ball2.Material = "SmoothPlastic"

weld = Instance.new("Weld",Ball2)
			weld.C0 = CFrame.new(-0.8, 0.91 ,0)
			weld.Part0 = primary
			weld.Part1 = Ball2

local Tip = Instance.new("Part",mod)
			Tip.Size = Vector3.new(1,1,1)
			Tip.Color = Color3.fromRGB(255, 152, 220)

local Mesh = Instance.new("FileMesh",Tip)
			Mesh.MeshId = "http://www.roblox.com/asset/?id=1527559"
			Mesh.Scale = Vector3.new(0.6, 0.6, 0.6)

weld = Instance.new("Weld",Tip)
			weld.C0 = CFrame.new(0, 1.38 ,-7.7) * CFrame.Angles( math.rad(-90), math.rad(0), math.rad(0) )
			weld.Part0 = primary
			weld.Part1 = Tip

local boing = Instance.new("Sound",Tip)
			boing.SoundId = "rbxasset://sounds//short spring sound.wav"
			boing.Volume = 2

local boom = Instance.new("Sound",Tip)
			boom.SoundId = "rbxasset://sounds/collide.wav"
			boom.Volume = 2
			boom.PlaybackSpeed = 0.8

mod:SetPrimaryPartCFrame(startpos)

boing:Play()

delay(detonation_time,function()

local splode = Instance.new("Explosion",Tip)
				splode.BlastPressure = blast_pressure
				splode.BlastRadius = blast_radius
				splode.Position = Tip.Position

boom:Play()

splode.Hit:Connect(function(hit)

local bad = hit.Parent:FindFirstChildOfClass("ForceField")
		if bad then bad:Destroy()
		end

local hum = hit.Parent:FindFirstChildOfClass("Humanoid")
		wait()
		if hum then
			hum:Destroy()
		end

if hit.Anchored == true then
						hit.Anchored = false
						hit:BreakJoints()

for _,joints in pairs(hit:GetJoints()) do
							joints:Destroy()

end
					end

end)
			end)

spawn(function()

wait(5)
				bmod:Destroy()
			end)

end

for i = 1, NumberOfDongs/2 do

generaterod(b("Rust"))
			generaterod(b("Pastel orange"))

end			
	end)
end)

Configurações do Texto

Título do Texto : [Opcional]

Guardar na Pasta : [Opcional]

Syntax Highlighting : [Opcional]

Expiração do Texto : [Opcional]

Status do Texto : [Opcional]

Senha : [Opcional]

Descrição: [Opcional]

Tags: [Opcional]

Criptografar Texto (?)

No momento você não está logado, isso significa que você não pode editar ou excluir nada que você poste. Cadastre-se ou faça o Login

Textos Recentes

Little girls hidden videos
HTML | 52 | há 1 hora
Russian
HTML | 49 | há 1 hora
Sem título
HTML | 169 | há 6 horas
A Interactive cyoas list
HTML | 176 | há 6 horas
Arshal
HTML | 194 | há 8 horas
Sem título
HTML | 226 | há 9 horas
Sem título
HTML | 274 | há 11 horas

Configurações do Texto

Idiomas do site