View difference between Paste ID: qTq84tCz and uS9D88U1
SHOW: | | - or go back to the newest paste.
1-
 -- Objects
1+
local Player = game.Players.LocalPlayer;
2-
--https://v3rmillion.net/member.php?action=profile&uid=61310
2+
local Mouse = Player:GetMouse();
3-
wait(3)
3+
local MaxRange = 300;
4
local Hotkey = Enum.KeyCode.X;
5-
local ObjectValues = {}
5+
local UIS = game:GetService'UserInputService';
6
local auto = true;
7-
local function StringToArray(String,Separator)
7+
8-
	local Array = {}
8+
function Shoot()
9-
	local ExtStr = String
9+
    local MyHMR = Player.Character and Player.Character.PrimaryPart;
10-
	repeat
10+
    local MyData = workspace.PlayerData:FindFirstChild(Player.Name);
11-
		if ExtStr == "" or ExtStr == " " then
11+
    local IsSameTeam = (MyHMR and MyHMR.Parent:FindFirstChild'CowboyHat' and true) or false;
12-
			
12+
    if MyHMR and MyData then
13-
		else
13+
        for i,v in pairs(game.Players:GetPlayers()) do
14-
			local Start = string.find(ExtStr,Separator)
14+
            local HMR = v and v.Character and v.Character.PrimaryPart;
15-
			if Start ~= nil then
15+
            local Data = workspace.PlayerData:FindFirstChild(v.Name);
16-
				local Arg = string.sub(ExtStr,0,Start-1)
16+
            local Hum = HMR and v.Character:FindFirstChild'Humanoid';
17-
				table.insert(Array,Arg)
17+
            local Head = Hum and v.Character:FindFirstChild'Head';
18-
				ExtStr = string.sub(ExtStr,Start+string.len(Separator))
18+
            
19-
			else
19+
            if Head and Hum.Health > 0 and not (((HMR.Parent:FindFirstChild'CowboyHat' and true) or false) == IsSameTeam) then
20-
				table.insert(Array,ExtStr)
20+
                local Found = false;
21-
				ExtStr = ""
21+
                for ii,targ in pairs({HMR, Head}) do
22-
			end
22+
                    if not Found then
23-
		end
23+
                        local R = Ray.new(MyHMR.Position, (targ.Position-MyHMR.Position).unit*MaxRange);
24-
	until ExtStr == ""
24+
                        local P, Pos = workspace:FindPartOnRay(R, Player.Character);
25-
	if string.lower(Array[1]) == "/e" then
25+
                        local p = Instance.new('Part', Player.Character);
26-
		Array[1] = nil
26+
                        p.Anchored = true;
27-
		for i, v in pairs(Array) do
27+
                        p.Material = Enum.Material.Neon;
28-
			if i == 1 then
28+
                        p.CanCollide = false;
29-
				
29+
                        p.Transparency = .5;
30-
			else
30+
                        local dist = (MyHMR.Position-Pos).magnitude;
31-
				Array[i-1] = v
31+
                        p.Size = Vector3.new(.1,.1,dist);
32-
			end
32+
                        p.CFrame = CFrame.new(MyHMR.Position, Pos)*CFrame.new(0,0,-dist/2);
33-
		end
33+
                        game:GetService('Debris'):AddItem(p, .1)
34-
	end
34+
                        if P and P:isDescendantOf(HMR.Parent) then
35-
	return Array
35+
                            Hum.Health = 0;
36
                            local Info = {};
37
                            Info.Start = MyHMR.Position;
38-
local function IndicateValue(Value)
38+
                            Info.HitPart = targ;
39-
	local Type = tostring(typeof(Value))
39+
                            Info.HitPosition = targ.Position;
40-
	if Type == "string" then
40+
                            game.ReplicatedStorage.Events.GunFired:FireServer(Info);
41-
		return "'"..Value.."'"
41+
                            warn('Hit '..v.Name);
42-
	elseif Type == "number" then
42+
                            Found = true;
43-
		return Value
43+
                            delay(1, function()
44-
	elseif Type == "Instance" then
44+
                                if Hum and Hum.Parent then
45-
		return "ObjectValue"
45+
                                    Hum.Health = 100
46-
	elseif Type == "Color3" then
46+
                                end
47-
		return "Color3.new("..Value.r..","..Value.g..","..Value.b..")"
47+
                            end)
48-
	elseif Type == "Vector3" then
48+
                            p.Color = Color3.new(0,1,0);
49-
		return "Vector3.new("..Value.X..","..Value.Y..","..Value.Z..")"
49+
                        else
50-
	elseif Type == "nil" then
50+
                            p.Color = Color3.new(1,0,0);
51-
		return "nil"
51+
                        end
52-
	elseif Type == "boolean" then
52+
                    end
53-
		return tostring(Value)
53+
                end
54-
	elseif Type == "BrickColor" then
54+
            end
55-
		return "BrickColor.new("..Value.r..","..Value.g..","..Value.b..")"
55+
        end
56-
	elseif Type == "EnumItem" then
56+
    end
57-
		return tostring(Value)
57+
58-
	elseif Type == "UDim2" then
58+
UIS.InputBegan:Connect(function(Key, GPE)
59-
		return "UDim2.new("..Value.X.Scale..","..Value.X.Offset..","..Value.Y.Scale..","..Value.Y.Offset..")"
59+
    if Key.KeyCode == Hotkey then
60-
	else
60+
        Shoot();
61-
		return "Unable To Indicate Propety... "
61+
    end
62-
	end
62+
63
spawn(function()
64
    while auto and wait(.1) do
65-
local Properties = {
65+
        print'Shooting..';
66-
	"Value",
66+
        Shoot();
67-
	"Color",
67+
    end
68-
	"AllowSweep",
68+
69-
	"WaterColor",
69+
warn'Loaded!';