Advertisement
InTesting

Anti Glitcher Test

Jul 17th, 2019
313
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 4.69 KB | None | 0 0
  1. print'https://pastebin.com/raw/ZRFU59wE'
  2. local function Compare_Value_To_Table(val,tab)
  3.     for _,v in pairs(tab)do
  4.         if v==val then
  5.             return v
  6.         end
  7.     end
  8. end
  9. local function Find_Sub_String_In_Whole_String(whole_string,sub_strings_table)
  10.     for _,v in pairs(sub_strings_table)do
  11.         if string.find(whole_string:lower()
  12.             ,tostring(v):lower()
  13.         )then
  14.             return v
  15.         end
  16.     end
  17. end
  18. local function obj_check_one(ob)
  19.     if ob~=nil then
  20.         if typeof(ob)~='userdata'then
  21.             if ob.Parent~=nil then
  22.                 return ob
  23.             end
  24.         end
  25.     end
  26. end
  27. local function Get_Player_From_Character_Descendant(ob)
  28.     local full_1 = ob:GetFullName()
  29.     local sep1 = string.find(full_1:lower(),
  30.         '%.'
  31.     )
  32.     if sep1 then
  33.         local sep2 = string.find(full_1:lower(),
  34.             '%.',
  35.             sep1 + 1
  36.         )
  37.         if sep2 then
  38.             local char_name = full_1:sub(sep1 + 1,sep2 - 1)
  39.             if char_name then
  40.                 local player = game:service'Players':FindFirstChild(char_name)
  41.                 if player then
  42.                     return player
  43.                 end
  44.             end
  45.         end
  46.     end
  47. end
  48. local function Check_Name_Property_From_Table(ob,table_of_classnames,table_to_check)
  49.     for _,z in pairs(table_of_classnames)do
  50.         if pcall(ob:IsA(z))then
  51.             if Find_Sub_String_In_Whole_String(ob.Name,table_to_check)then
  52.                 local plr = Get_Player_From_Character_Descendant(ob)
  53.                 if plr then
  54.                     plr:LoadCharacter()
  55.                     return true
  56.                 else
  57.                     ob:Destroy()
  58.                     return true
  59.                 end
  60.             end
  61.         end
  62.     end
  63. end
  64. local a_table_1 = {'NGRWings','Puller','Pusher','STARGLITCHER',415898123,1119453744,
  65.         1509634377,415898123,723652641,519067542,152539141,614032233,'DERPZGLITCHER_REMAKE',
  66.         1564523997,621367124,2074863720,623662713,862258091,1146120545,226788368,211637330,1637719516,
  67.         1994963968,'Mayhem',1539245059,1283869370,1369263130,661079869,1347011178,1495032271,708334127,
  68.         1359036559,582020393,363284685,643309199,2659531944,904930498,1259692095,561833161,1873219898,
  69.         1166995642,1141556798,1420353940,147930134,157460916,190845741,432493949,1497785701,2347469019,
  70.         228428389,919231299,1103329236,265913095,'GGLITCHER',435773595,736003449,1003121377,949709585,
  71.         933674871,1449911189,258688195,265293315,1230880483,892260150,2533527428,2297862957,1588725965,
  72.         1812212957,893350377,1702473314,1215691669,860594509,2116461106,2699922745,338787394,2781731664,
  73.         2231500330,334283059,2082142910,654094806,2231500330,654094806,743334292,334283059,2082142910,
  74.         2533527428,2656505560,556122490,924339757,144121562,2297862957,603291385,1030177093,183142252,
  75.         468018712,391089144,'NGRwingsEGR',2071274388,692083837,436447939,2979962272,1290419263,
  76.         340106355,844654533,1144419666,2984349070,705302406,1470848774,614032233,1102271169,798163149,
  77.         256251217,1047567668,343860759,495971354,1914668859,681311208,283364132,1836986828,1521668385,
  78.         1138145518,1155251570,142493403,1192214907,187944735,381659681,1083489617,1864632481,1296494908,
  79.         1634231515,927737980,295882826,407749940,709122469,450622618,257700160,1755675637,293965978,
  80.         1278102150,1947399124,1833385948,252266520,1338971957,598625751,965845438,838491143,314600371,
  81.         1794707397,1298467151,544291208,151476016,1493957906,195916147,410474991,912554197,478890315,
  82.         1088342507,1589396874,1846953343,1434166880,582904691,644271312,2142995292,869597342,1273944801,
  83.         701895896,803373182,595800581,307911366,1296208488,142657040,899856040,544462530,729631989,
  84.         300753631,2482117221,1747430851,899090278,2483763576,1505487022,719008519,1551788627,338871337,
  85.         634255007,539526132,2622961126,398455752,1504604335,697467525,550578451,1025751967,190785069,
  86.         1163789120,188256719,943961217,1764195391
  87.        
  88.     }
  89. local function check_glitcher(ob) -- Workspace:GetDescendants()
  90.     --[[
  91.         These scripts are too laggy, abusible and have too many versions of its self
  92.         but holy fuck.
  93.         here you go.
  94.    
  95.         List Rn
  96.        
  97.         Chaotic Glitcher
  98.         Galaxy Glitcher
  99.         NebGltichR
  100.         NGR
  101.         EGR
  102.         .. How did i lost half of my list wot.
  103.         StarGlitchEdit
  104.     --]]
  105.    
  106.  
  107.     if obj_check_one(ob)then
  108.         if Check_Name_Property_From_Table(ob,
  109.             {'Model','RemoteFunction','RemoteEvent','Humanoid'},
  110.             a_table_1
  111.             )then
  112.             return
  113.         elseif ob:IsA'Sound'then
  114.             if Find_Sub_String_In_Whole_String(ob.SoundId,a_table_1)then
  115.                 local plr = Get_Player_From_Character_Descendant(ob)
  116.                 if plr then
  117.                     plr:LoadCharacter()
  118.                 else
  119.                     ob:Destroy()
  120.                 end
  121.             end
  122.         elseif ob.Name=='FXFolder'and ob.Parent~='∞folder1'then
  123.             local op = ob.Parent
  124.             local folder = Instance.new("Folder",op)
  125.             folder.Name = '∞folder1'
  126.             for _,v in pairs(op:GetChildren())do
  127.                 if v~=folder then
  128.                     v.Parent = folder
  129.                 end
  130.             end
  131.            
  132.         end
  133.     end
  134. end
  135.  
  136. for _,v in pairs(workspace:GetDescendants())do
  137.     check_glitcher(v)
  138. end
  139. workspace.DescendantAdded:Connect(function(d)
  140.     wait(.1)
  141.     check_glitcher(d)
  142. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement