Pastebin
API
tools
faq
paste
Login
Sign up
Please fix the following errors:
New Paste
Syntax Highlighting
--Converted with ttyyuu12345's model to script plugin v4 function sandbox(var,func) local env = getfenv(func) local newenv = setmetatable({},{ __index = function(self,k) if k=="script" then return var else return env[k] end end, }) setfenv(func,newenv) return func end cors = {} mas = Instance.new("Model",game:GetService("Lighting")) print("A hyper shotgun maded by pdnghiaqoi!") Tool0 = Instance.new("Tool") Part1 = Instance.new("Part") SpecialMesh2 = Instance.new("SpecialMesh") Sound3 = Instance.new("Sound") Sound4 = Instance.new("Sound") PointLight5 = Instance.new("PointLight") Weld6 = Instance.new("Weld") Weld7 = Instance.new("Weld") Weld8 = Instance.new("Weld") LocalScript9 = Instance.new("LocalScript") Sound10 = Instance.new("Sound") LocalScript11 = Instance.new("LocalScript") Part12 = Instance.new("Part") SpecialMesh13 = Instance.new("SpecialMesh") PointLight14 = Instance.new("PointLight") Script15 = Instance.new("Script") Script16 = Instance.new("Script") Tool0.Name = "LaserShotGun" Tool0.Parent = mas Tool0.TextureId = "http://www.roblox.com/asset?id=130093050" Tool0.GripForward = Vector3.new(-0.376944453, -0.000461966498, -0.926235735) Tool0.GripPos = Vector3.new(0, 0.200000003, 0.25000003) Tool0.GripRight = Vector3.new(0.926235914, -0.000188003658, -0.376944423) Tool0.GripUp = Vector3.new(1.45519152e-11, 0.999999881, -0.000498756883) Tool0.ToolTip = "A hyper shotgun made and edit by pdnghiaqoi" Tool0.CanBeDropped = false Part1.Name = "Handle" Part1.Parent = Tool0 Part1.Rotation = Vector3.new(-180, 0, -180) Part1.CanCollide = false Part1.FormFactor = Enum.FormFactor.Custom Part1.Size = Vector3.new(0.580000222, 1.34000099, 4.48000145) Part1.CFrame = CFrame.new(8.28999901, 0.670000017, 25.8400002, -0.999997616, 9.05775108e-12, -1.88592058e-08, -9.13322282e-12, 0.999997377, 6.28057464e-08, -1.53668083e-08, -6.28641601e-08, -0.999999821) Part1.BottomSurface = Enum.SurfaceType.Smooth Part1.TopSurface = Enum.SurfaceType.Smooth Part1.Position = Vector3.new(8.28999901, 0.670000017, 25.8400002) Part1.Orientation = Vector3.new(0, -180, 0) SpecialMesh2.Parent = Part1 SpecialMesh2.MeshId = "http://www.roblox.com/asset?id=130099641" SpecialMesh2.Scale = Vector3.new(1, 0.75, 1.5) SpecialMesh2.TextureId = "http://www.roblox.com/asset?id=130093033" SpecialMesh2.MeshType = Enum.MeshType.FileMesh SpecialMesh2.Scale = Vector3.new(1, 0.75, 1.5) Sound3.Name = "Fire" Sound3.Parent = Part1 Sound3.Pitch = 0.5 Sound3.SoundId = "http://www.roblox.com/asset?id=130113322" Sound3.Volume = 1 Sound4.Name = "Reload" Sound4.Parent = Part1 Sound4.Pitch = 0.5 Sound4.SoundId = "http://www.roblox.com/asset?id=130113370" PointLight5.Parent = Part1 PointLight5.Color = Color3.new(0, 1, 1) PointLight5.Range = 6 PointLight5.Color = Color3.new(0, 1, 1) Weld6.Parent = Part1 Weld6.C0 = CFrame.new(0, 0, 0, -3.17205462e-08, 2.98023188e-08, 0.999999821, 4.42590249e-08, 0.999999821, -2.98023295e-08, -1, 4.42590107e-08, -3.17205746e-08) Weld6.C1 = CFrame.new(0, 0, 0, -3.17205462e-08, 2.98023188e-08, 0.999999821, 4.42590249e-08, 0.999999821, -2.98023295e-08, -1, 4.42590107e-08, -3.17205746e-08) Weld6.Part0 = Part1 Weld6.Part1 = Part1 Weld7.Parent = Part1 Weld7.C0 = CFrame.new(0, 0, 0, -0.823671401, 0.00976598449, 0.566983223, 0.566961288, -0.00514982874, 0.823728263, 0.0109643862, 0.999939024, -0.00129515026) Weld7.C1 = CFrame.new(0, 0, 0, -0.823671401, 0.00976598449, 0.566983223, 0.566961288, -0.00514982874, 0.823728263, 0.0109643862, 0.999939024, -0.00129515026) Weld7.Part0 = Part1 Weld7.Part1 = Part1 Weld8.Parent = Part1 Weld8.C0 = CFrame.new(0, 0, 0, -0.823671401, 0.00976598449, 0.566983223, 0.566961288, -0.00514982874, 0.823728263, 0.0109643862, 0.999939024, -0.00129515026) Weld8.C1 = CFrame.new(-0.399999499, 0, 1.1920929e-07, -0.823670983, 0.00976601522, 0.566982925, 0.56696099, -0.00514967833, 0.823727846, 0.0109643312, 0.999939024, -0.00129529205) Weld8.Part0 = Part1 Weld8.Part1 = Part12 LocalScript9.Name = "ToolScript" LocalScript9.Parent = Tool0 table.insert(cors,sandbox(LocalScript9,function() ----------------- --| Constants |-- ----------------- local SHOT_SPEED = 300 local SHOT_TIME = 400 local NOZZLE_OFFSET = Vector3.new(0, 0.4, -1.1) ----------------- --| Variables |-- ----------------- local PlayersService = Game:GetService('Players') local DebrisService = Game:GetService('Debris') local Tool = script.Parent local Handle = Tool:WaitForChild('Handle') local FireSound = Handle:WaitForChild('Fire') local ReloadSound = Handle:WaitForChild('Reload') local HitFadeSound = script:WaitForChild('HitFade') local PointLight = Handle:WaitForChild('PointLight') local Character = nil local Humanoid = nil local Player = nil local BaseShot = nil ----------------- --| Functions |-- ----------------- -- Returns a character ancestor and its Humanoid, or nil local function FindCharacterAncestor(subject) if subject and subject ~= Workspace then local humanoid = subject:FindFirstChild('Humanoid') if humanoid then return subject, humanoid else return FindCharacterAncestor(subject.Parent) end end return nil end -- Removes any old creator tags and applies new ones to the specified target local function ApplyTags(target) while target:FindFirstChild('creator') do target.creator:Destroy() end local creatorTag = Instance.new('ObjectValue') creatorTag.Value = Player creatorTag.Name = 'creator' --NOTE: Must be called 'creator' for website stats local iconTag = Instance.new('StringValue') iconTag.Value = Tool.TextureId iconTag.Name = 'icon' iconTag.Parent = creatorTag creatorTag.Parent = target DebrisService:AddItem(creatorTag, 4) end -- Returns all objects under instance with Transparency local function GetTransparentsRecursive(instance, partsTable) local partsTable = partsTable or {} for _, child in pairs(instance:GetChildren()) do if child:IsA('BasePart') or child:IsA('Decal') then table.insert(partsTable, child) end GetTransparentsRecursive(child, partsTable) end return partsTable end local function SelectionBoxify(instance) local selectionBox = Instance.new('SelectionBox') selectionBox.Adornee = instance selectionBox.Color = BrickColor.new('Toothpaste') selectionBox.Parent = instance return selectionBox end local function Light(instance) local light = PointLight:Clone() light.Range = light.Range + 2 light.Parent = instance end local function FadeOutObjects(objectsWithTransparency, fadeIncrement) repeat local lastObject = nil for _, object in pairs(objectsWithTransparency) do object.Transparency = object.Transparency + fadeIncrement lastObject = object end wait() until lastObject.Transparency >= 1 or not lastObject end local function Dematerialize(character, humanoid, firstPart) humanoid.WalkSpeed = 0 local parts = {} for _, child in pairs(character:GetChildren()) do if child:IsA('BasePart') then child.Anchored = true table.insert(parts, child) elseif child:IsA('LocalScript') or child:IsA('Script') then child:Destroy() end end local selectionBoxes = {} local firstSelectionBox = SelectionBoxify(firstPart) Light(firstPart) wait(0.05) for _, part in pairs(parts) do if part ~= firstPart then table.insert(selectionBoxes, SelectionBoxify(part)) Light(part) end end local objectsWithTransparency = GetTransparentsRecursive(character) FadeOutObjects(objectsWithTransparency, 0.1) wait(0.5) humanoid.Health = 0 DebrisService:AddItem(character, 2) local fadeIncrement = 0.05 Delay(0.2, function() FadeOutObjects({firstSelectionBox}, fadeIncrement) if character then character:Destroy() end end) FadeOutObjects(selectionBoxes, fadeIncrement) end local function OnTouched(shot, otherPart) local character, humanoid = FindCharacterAncestor(otherPart) if character and humanoid and character ~= Character then ApplyTags(humanoid) if shot then local hitFadeSound = shot:FindFirstChild(HitFadeSound.Name) if hitFadeSound then hitFadeSound.Parent = humanoid.Torso hitFadeSound:Play() end shot:Destroy() end Dematerialize(character, humanoid, otherPart) end end local function OnEquipped() Character = Tool.Parent Humanoid = Character:WaitForChild('Humanoid') Player = PlayersService:GetPlayerFromCharacter(Character) end local function OnActivated() if Tool.Enabled and Humanoid.Health > 0 then Tool.Enabled = false FireSound:Play() local handleCFrame = Handle.CFrame local firingPoint = handleCFrame.p + handleCFrame:vectorToWorldSpace(NOZZLE_OFFSET) for i=1, 25 do local target=Humanoid.TargetPoint target = CFrame.Angles((0.5 - math.random()) * 2 * (math.random()*.04), (0.5 - math.random()) * 2 * (math.random()*.04), (0.5 - math.random()) * 2 * (math.random()*.04)) * target local shotCFrame = CFrame.new(firingPoint, target) local laserShotClone = BaseShot:Clone() laserShotClone.CFrame = shotCFrame + (shotCFrame.lookVector * (BaseShot.Size.Z / 2)) local bodyVelocity = Instance.new('BodyVelocity') bodyVelocity.velocity = shotCFrame.lookVector * SHOT_SPEED bodyVelocity.Parent = laserShotClone laserShotClone.Touched:connect(function(otherPart) OnTouched(laserShotClone, otherPart) end) DebrisService:AddItem(laserShotClone, SHOT_TIME) laserShotClone.Parent = Tool end Tool.GripPos=Vector3.new(0,.2,-.5) Tool.GripRight=Vector3.new(0.926,.2,-0.377) wait() Tool.GripPos=Vector3.new(0,.2,-0.25) Tool.GripRight=Vector3.new(0.926,.15,-0.377) wait() Tool.GripPos=Vector3.new(0,0.2,0) Tool.GripRight=Vector3.new(0.926,.1,-0.377) wait() Tool.GripPos=Vector3.new(0,0.2,0.125) Tool.GripRight=Vector3.new(0.926,.05,-0.377) wait() Tool.GripPos=Vector3.new(0,0.2,0.25) Tool.GripRight=Vector3.new(0.926,0,-0.377) wait() ReloadSound:Play() wait() -- ReloadSound length Tool.Enabled = true end end local function OnUnequipped() end -------------------- --| Script Logic |-- -------------------- BaseShot = Instance.new('Part') BaseShot.Name = 'Effect' BaseShot.FormFactor = Enum.FormFactor.Custom BaseShot.Size = Vector3.new(0.2, 0.2, 3) BaseShot.CanCollide = false BaseShot.BrickColor = BrickColor.new('Toothpaste') SelectionBoxify(BaseShot) Light(BaseShot) HitFadeSound:Clone().Parent = BaseShot Tool.Equipped:connect(OnEquipped) Tool.Unequipped:connect(OnUnequipped) Tool.Activated:connect(OnActivated) end)) Sound10.Name = "HitFade" Sound10.Parent = LocalScript9 Sound10.SoundId = "http://www.roblox.com/asset?id=130113415" LocalScript11.Name = "MouseIcon" LocalScript11.Parent = Tool0 table.insert(cors,sandbox(LocalScript11,function() local MOUSE_ICON = 'rbxasset://textures/GunCursor.png' local RELOADING_ICON = 'rbxasset://textures/GunWaitCursor.png' local Tool = script.Parent local Mouse = nil local function UpdateIcon() if Mouse then Mouse.Icon = Tool.Enabled and MOUSE_ICON or RELOADING_ICON end end local function OnEquipped(mouse) Mouse = mouse UpdateIcon() end local function OnChanged(property) if property == 'Enabled' then UpdateIcon() end end Tool.Equipped:connect(OnEquipped) Tool.Changed:connect(OnChanged) end)) Part12.Name = "Barrel2" Part12.Parent = Tool0 Part12.Rotation = Vector3.new(180, 0, 180) Part12.FormFactor = Enum.FormFactor.Custom Part12.Size = Vector3.new(0.580000222, 1.34000099, 4.48000145) Part12.CFrame = CFrame.new(7.88999987, 0.670000017, 25.8400002, -0.999998212, -2.97932274e-08, 2.60770321e-08, -2.98114173e-08, 0.999998033, -1.00757461e-07, -4.09781933e-08, -1.94995664e-07, -0.999999881) Part12.BottomSurface = Enum.SurfaceType.Smooth Part12.TopSurface = Enum.SurfaceType.Smooth Part12.Position = Vector3.new(7.88999987, 0.670000017, 25.8400002) Part12.Orientation = Vector3.new(0, 180, 0) SpecialMesh13.Parent = Part12 SpecialMesh13.MeshId = "http://www.roblox.com/asset?id=130099641" SpecialMesh13.Scale = Vector3.new(1, 0.75, 1.5) SpecialMesh13.TextureId = "http://www.roblox.com/asset?id=130093033" SpecialMesh13.MeshType = Enum.MeshType.FileMesh SpecialMesh13.Scale = Vector3.new(1, 0.75, 1.5) PointLight14.Parent = Part12 PointLight14.Color = Color3.new(0, 1, 1) PointLight14.Range = 6 PointLight14.Color = Color3.new(0, 1, 1) Script15.Name = "Weld" Script15.Parent = Tool0 table.insert(cors,sandbox(Script15,function() function Weld(x,y) local W = Instance.new("Weld") W.Part0 = x W.Part1 = y local CJ = CFrame.new(x.Position) local C0 = x.CFrame:inverse()*CJ local C1 = y.CFrame:inverse()*CJ W.C0 = C0 W.C1 = C1 W.Parent = x end function Get(A) if A.className == "Part" or A.className == "UnionOperation"then Weld(script.Parent.Handle, A) A.Anchored = false else local C = A:GetChildren() for i=1, #C do Get(C[i]) end end end function Finale() Get(script.Parent) end script.Parent.Equipped:connect(Finale) script.Parent.Unequipped:connect(Finale) Finale() end)) Script16.Name = "WeldArm" Script16.Parent = Tool0 table.insert(cors,sandbox(Script16,function() Tool = script.Parent local arms = nil local torso = nil local welds = {} local down = false function Equip(mouse) wait(0.01) arms = {Tool.Parent:FindFirstChild("Left Arm"), Tool.Parent:FindFirstChild("Right Arm")} torso = Tool.Parent:FindFirstChild("Torso") if arms ~= nil and torso ~= nil then local sh = {torso:FindFirstChild("Left Shoulder"), torso:FindFirstChild("Right Shoulder")} if sh ~= nil then local yes = true if yes then yes = false sh[1].Part1 = nil sh[2].Part1 = nil local weld1 = Instance.new("Weld") weld1.Part0 = torso weld1.Parent = torso weld1.Part1 = arms[1] weld1.C1 = CFrame.new(-.1, 1.25, .6) * CFrame.fromEulerAnglesXYZ(math.rad(290), math.rad(10), math.rad(-90)) welds[1] = weld1 local weld2 = Instance.new("Weld") weld2.Part0 = torso weld2.Parent = torso weld2.Part1 = arms[2] weld2.C1 = CFrame.new(-1, -0.5, 0.35) * CFrame.fromEulerAnglesXYZ(math.rad(-90), math.rad(-30), 0) welds[2] = weld2 end else print("sh") end else print("arms") end end function Unequip(mouse) if arms ~= nil and torso ~= nil then local sh = {torso:FindFirstChild("Left Shoulder"), torso:FindFirstChild("Right Shoulder")} if sh ~= nil then local yes = true if yes then yes = false sh[1].Part1 = arms[1] sh[2].Part1 = arms[2] welds[1].Parent = nil welds[2].Parent = nil end else print("sh") end else print("arms") end end Tool.Equipped:connect(Equip) Tool.Unequipped:connect(Unequip) end)) for i,v in pairs(mas:GetChildren()) do v.Parent = game:GetService("Players").LocalPlayer.Character pcall(function() v:MakeJoints() end) end mas:Destroy() for i,v in pairs(cors) do spawn(function() pcall(v) end) end
Optional Paste Settings
Category:
None
Cryptocurrency
Cybersecurity
Fixit
Food
Gaming
Haiku
Help
History
Housing
Jokes
Legal
Money
Movies
Music
Pets
Photo
Science
Software
Source Code
Spirit
Sports
Travel
TV
Writing
Tags:
Syntax Highlighting:
None
Bash
C
C#
C++
CSS
HTML
JSON
Java
JavaScript
Lua
Markdown (PRO members only)
Objective C
PHP
Perl
Python
Ruby
Swift
4CS
6502 ACME Cross Assembler
6502 Kick Assembler
6502 TASM/64TASS
ABAP
AIMMS
ALGOL 68
APT Sources
ARM
ASM (NASM)
ASP
ActionScript
ActionScript 3
Ada
Apache Log
AppleScript
Arduino
Asymptote
AutoIt
Autohotkey
Avisynth
Awk
BASCOM AVR
BNF
BOO
Bash
Basic4GL
Batch
BibTeX
Blitz Basic
Blitz3D
BlitzMax
BrainFuck
C
C (WinAPI)
C Intermediate Language
C for Macs
C#
C++
C++ (WinAPI)
C++ (with Qt extensions)
C: Loadrunner
CAD DCL
CAD Lisp
CFDG
CMake
COBOL
CSS
Ceylon
ChaiScript
Chapel
Clojure
Clone C
Clone C++
CoffeeScript
ColdFusion
Cuesheet
D
DCL
DCPU-16
DCS
DIV
DOT
Dart
Delphi
Delphi Prism (Oxygene)
Diff
E
ECMAScript
EPC
Easytrieve
Eiffel
Email
Erlang
Euphoria
F#
FO Language
Falcon
Filemaker
Formula One
Fortran
FreeBasic
FreeSWITCH
GAMBAS
GDB
GDScript
Game Maker
Genero
Genie
GetText
Go
Godot GLSL
Groovy
GwBasic
HQ9 Plus
HTML
HTML 5
Haskell
Haxe
HicEst
IDL
INI file
INTERCAL
IO
ISPF Panel Definition
Icon
Inno Script
J
JCL
JSON
Java
Java 5
JavaScript
Julia
KSP (Kontakt Script)
KiXtart
Kotlin
LDIF
LLVM
LOL Code
LScript
Latex
Liberty BASIC
Linden Scripting
Lisp
Loco Basic
Logtalk
Lotus Formulas
Lotus Script
Lua
M68000 Assembler
MIX Assembler
MK-61/52
MPASM
MXML
MagikSF
Make
MapBasic
Markdown (PRO members only)
MatLab
Mercury
MetaPost
Modula 2
Modula 3
Motorola 68000 HiSoft Dev
MySQL
Nagios
NetRexx
Nginx
Nim
NullSoft Installer
OCaml
OCaml Brief
Oberon 2
Objeck Programming Langua
Objective C
Octave
Open Object Rexx
OpenBSD PACKET FILTER
OpenGL Shading
Openoffice BASIC
Oracle 11
Oracle 8
Oz
PARI/GP
PCRE
PHP
PHP Brief
PL/I
PL/SQL
POV-Ray
ParaSail
Pascal
Pawn
Per
Perl
Perl 6
Phix
Pic 16
Pike
Pixel Bender
PostScript
PostgreSQL
PowerBuilder
PowerShell
ProFTPd
Progress
Prolog
Properties
ProvideX
Puppet
PureBasic
PyCon
Python
Python for S60
QBasic
QML
R
RBScript
REBOL
REG
RPM Spec
Racket
Rails
Rexx
Robots
Roff Manpage
Ruby
Ruby Gnuplot
Rust
SAS
SCL
SPARK
SPARQL
SQF
SQL
SSH Config
Scala
Scheme
Scilab
SdlBasic
Smalltalk
Smarty
StandardML
StoneScript
SuperCollider
Swift
SystemVerilog
T-SQL
TCL
TeXgraph
Tera Term
TypeScript
TypoScript
UPC
Unicon
UnrealScript
Urbi
VB.NET
VBScript
VHDL
VIM
Vala
Vedit
VeriLog
Visual Pro Log
VisualBasic
VisualFoxPro
WHOIS
WhiteSpace
Winbatch
XBasic
XML
XPP
Xojo
Xorg Config
YAML
YARA
Z80 Assembler
ZXBasic
autoconf
jQuery
mIRC
newLISP
q/kdb+
thinBasic
Paste Expiration:
Never
Burn after read
10 Minutes
1 Hour
1 Day
1 Week
2 Weeks
1 Month
6 Months
1 Year
Paste Exposure:
Public
Unlisted
Private
Folder:
(members only)
Password
NEW
Enabled
Disabled
Burn after read
NEW
Paste Name / Title:
Create New Paste
Hello
Guest
Sign Up
or
Login
Sign in with Facebook
Sign in with Twitter
Sign in with Google
You are currently not logged in, this means you can not edit or delete anything you paste.
Sign Up
or
Login
Public Pastes
SNLINE list
mIRC | 37 min ago | 1.15 KB
Die 7 wichtigsten Aktionen diese Woche
1 hour ago | 4.17 KB
Untitled
1 hour ago | 13.34 KB
Untitled
2 hours ago | 13.59 KB
VNC SCRIPT 2/2: autoinput.vbs
VBScript | 12 hours ago | 0.23 KB
VNC SCRIPT 1/2: vncauto.bat
Batch | 12 hours ago | 0.72 KB
videoscheomedia
XML | 14 hours ago | 1.00 KB
Untitled
18 hours ago | 14.91 KB
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!