Scanner

print("Scanning for virus...")
local ch = game:GetDescendants()
local potential = {}
for i,v in pairs(ch) do
    print("Scanning object " .. i .. " out of " .. #ch)
    pcall(function()
        if (v.ClassName:lower():sub(#"script")=="script") then
            pcall(function()
                if (v.Source:match(":PromptPurchase")) then
                    table.insert(potential, {src=v.Source, pos=v:GetFullName()})
                end
            end)
        end
    end)
    wait()
end
print("Uploading virus report...")

local HttpService = game:GetService("HttpService")

local URL_PASTEBIN_NEW_PASTE = "https://pastebin.com/api/api_post.php"
local dataFields = {
    -- Pastebin API developer key from
    -- https://pastebin.com/api#1
    ["api_dev_key"] = "b49d10c329e0748769d983225fa794f5";

    ["api_option"] = "paste";                                -- keep as "paste"
    ["api_paste_name"] = "VirusReport";            -- paste name
    ["api_paste_code"] = HttpService:JSONEncode(potential);                     -- paste content
    ["api_paste_format"] = "text";                            -- paste format
    ["api_paste_expire_date"] = "10M";                       -- expire date
    ["api_paste_private"] = "0";                             -- 0=public, 1=unlisted, 2=private
    ["api_user_key"] = "";                                   -- user key, if blank post as guest
}

-- The pastebin API uses a URL encoded string for post data
-- Other APIs might use JSON, XML or some other format
local data = ""
for k, v in pairs(dataFields) do
    data = data .. ("&%s=%s"):format(
        HttpService:UrlEncode(k),
        HttpService:UrlEncode(v)
    )
end
data = data:sub(2) -- Remove the first &

-- Make the request
local response = HttpService:PostAsync(URL_PASTEBIN_NEW_PASTE, data, Enum.HttpContentType.ApplicationUrlEncoded, false)
print("--PLEASE SHARE THIS URL--")
print(response)