· 9 years ago · Oct 04, 2016, 04:06 PM
1----------------------
2-- EISS CLIENT SIDE --
3----------------------
4local ran,error = pcall(function()
5
6if not script.Name:sub(1,6)=="[EISS]" then script:Destroy() return end
7wait(0.1);script.Parent=nil
8pcall(function() game.StarterPlayer.StarterPlayerScripts[script.Name]:Destroy() end)
9--pcall(function() game:service("StarterGui"):SetCore("ChatMakeSystemMessage",{Text="Powered by Sceleratis' EISS"}) end)
10local RemoteName=script.Name:sub(7)
11local client=nil;client=client;client={}
12local Plugins={}
13local print=function(...) for i,v in pairs({...}) do print('[EISS] Client - '..tostring(v)) end end
14local cPcall=function(func,...) local function cour(...) coroutine.resume(coroutine.create(func),...) end local ran,error=pcall(cour,...) if error then print('ERROR: '..error) end end
15local Pcall=function(func,...) local ye,err=pcall(func,...) if err then print(err) end end
16local Routine=function(func,...) coroutine.resume(coroutine.create(func),...) end
17local parser=script:WaitForChild("Loadstring")
18local yloadstring=require(parser)
19parser:Destroy()
20local LoadStartTime=tick()
21local localContainer
22local service=setmetatable({
23 MarketPlace=game:service("MarketplaceService");
24 GamepassService=game:service("GamePassService");
25 ChatService=game:service("Chat");
26 LocalContainer=function() if not localContainer or not localContainer.Parent then localContainer=Instance.new("Camera",workspace) localContainer.Name=math.random(10000000,999999999) end return localContainer end;
27},{
28 __index=function(tab,index)
29 local serv
30 local ran,err=pcall(function() serv=game:service(index) end)
31 if ran then
32 tab[index]=serv
33 return serv
34 end
35 end
36})
37RemoteEvent=game:service('ReplicatedStorage'):WaitForChild(RemoteName)
38local localplayer=service.Players.LocalPlayer
39local playergui=localplayer:WaitForChild('PlayerGui')
40local playerlistenabled=service.StarterGui:GetCoreGuiEnabled('PlayerList')
41local chatenabled=service.StarterGui:GetCoreGuiEnabled('Chat')
42local mouse=localplayer:GetMouse()
43client.Debug=false
44local Effects={}
45local events={}
46local localSounds={}
47local loadingValue
48local RemoteEventEvent
49local UpdateThese={
50 'Prefix';
51 'AnyPrefix';
52 'SpecialPrefix';
53 'SplitKey';
54 'BatchKey';
55 'ConsoleKey';
56 'HelpGuiYPos';
57 'CodeName';
58 'AntiSpam';
59 'AntiCustomChatSpam';
60 'NotificationSound';
61 'DisplayAdvertisements';
62 'Advertisements';
63 'CustomChatType';
64 'Animations';
65 'MessageAnimations';
66 'version';
67 'donorgamepass';
68 'Font';
69 'RandiSpeed';
70 'Debug';
71 'Tablets';
72 'AllowedGuiList';
73 'AllowedToolsList';
74 'AntiBuildingTools';
75 'AntiTools';
76 'BatchKey';
77 'BetterTopbar';
78 'BetterTopbarColor';
79 'BetterTopbarTransparency';
80 'BetterTopbarText';
81 'Detection';
82 'MessageBlur';
83}
84Effects.glitching=false
85Effects.noclipin=false
86Effects.laggin=nil
87Effects.seizin=false
88Effects.effectin=false
89Effects.flyin=false
90Effects.loophealin=false
91Effects.setfps=false
92Effects.slidin=false
93Effects.flingin=false
94Effects.killin=false
95Effects.movehats=false
96client.Returns={}
97client.GUIs={}
98client.Notifications=true
99client.ClientInfo={}
100client.Detection=true
101--guiSettings.Font='Arial'
102--guiSettings.TextStrokeTransparency=0
103--guiSettings.PrimaryColor = Color3.new(0,0,0)
104--guiSettings.SecondaryColor = Color3.new(1,1,1)
105--guiSettings.TextColor = Color3.new(1,1,1)
106--guiSettings.TextStrokeColor = Color3.new(0,0,0)
107--guiSettings.Transparency = 0.5
108client.MaxNumberOfLogs = 1500
109client.Donor = false
110client.IsAdmin = false
111client.ConsoleKey = "'"
112client.Console = true
113client.CustomChatMode = 'Global'
114client.LocalChatCache = {
115 {player='System',message='Welcome! Here are some commands to help you with chatting:',mode='Private'};
116 {player='System',message='Click the G next to the chat bar to change mode (Global/Team/Local)',mode='Private'};
117 {player='System',message='You can send private messages using @playename message',mode='Private'};
118 {player='System',message='You can also ignore players using #ignore playename',mode='Private'};
119 {player='System',message='And of course you can unignore using #unignore playename',mode='Private'}
120}
121client.CustomChatType = 'Both'
122client.ChatTimer = 0.5
123client.KeyBindTimer = 0.5
124client.Muted = false
125client.IgnoreList = {}
126--guiSettings.Animations = true
127--guiSettings.MessageAnimations = true
128client.UpdatableSettings = false
129client.FoundCommands = {}
130client.TimerTable = {}
131client.KeyBinds = {}
132client.ListUpdate = {}
133client.commandWait = {}
134client.Trusted = false
135client.ListTopBarTransparencyOffset=0.5
136client.Fade=true
137chatPrevMsg = tick()
138chatCount = 0
139
140---- Client Only Functions ----
141
142client.Encrypt=function(str,key)
143 local keyBytes={}
144 local strBytes={}
145 local endStr=""
146 for i=1,#key do table.insert(keyBytes,string.byte(key:sub(i,i))) end
147 for i=1,#str do table.insert(strBytes,string.byte(str:sub(i,i))) end --Yes I know this is ugly, and no I couldn't just use :sub for everything instead of adding all bytes to tables, it started dropping characters.
148 for i=1,#strBytes do
149 if i%#keyBytes>0 then
150 if strBytes[i]+keyBytes[i%#keyBytes]>255 then
151 strBytes[i]=math.abs(strBytes[i]-keyBytes[i%#keyBytes])
152 else
153 strBytes[i]=math.abs(strBytes[i]+keyBytes[i%#keyBytes])
154 end
155 else
156 if strBytes[i]+keyBytes[1]>255 then
157 strBytes[i]=math.abs(strBytes[i]-keyBytes[1])
158 else
159 strBytes[i]=math.abs(strBytes[i]+keyBytes[1])
160 end
161 end
162 end
163 for i=1,#strBytes do endStr=endStr..string.char(strBytes[i]) end
164 return endStr
165end
166
167client.Decrypt=function(str,key)
168 local keyBytes={}
169 local strBytes={}
170 local endStr=""
171 for i=1,#key do table.insert(keyBytes,string.byte(key:sub(i,i))) end
172 for i=1,#str do table.insert(strBytes,string.byte(str:sub(i,i))) end
173 for i=1,#strBytes do
174 if i%#keyBytes>0 then
175 if strBytes[i]+keyBytes[i%#keyBytes]>255 then
176 strBytes[i]=math.abs(strBytes[i]-keyBytes[i%#keyBytes])
177 else
178 strBytes[i]=math.abs(keyBytes[i%#keyBytes]-strBytes[i])
179 end
180 else
181 if strBytes[i]+keyBytes[1]>255 then
182 strBytes[i]=math.abs(strBytes[i]-keyBytes[1])
183 else
184 strBytes[i]=math.abs(keyBytes[1]-strBytes[i])
185 end
186 end
187 end
188 for i=1,#strBytes do endStr=endStr..string.char(strBytes[i]) end
189 return endStr
190end
191
192client.RLocked=function(obj)
193 local ran,err=pcall(function() local bob=Instance.new("StringValue",obj) bob:Destroy() end)
194 if ran then
195 return false
196 else
197 return true
198 end
199end
200
201client.ObjRLocked=function(obj)
202 local ran,err=pcall(function() obj.Parent=obj.Parent end)
203 if ran then
204 return false
205 else
206 --if err:match("^Cannot change the Parent of type (.*)") then return false end
207 return true
208 end
209end
210
211function discClient()
212 cPcall(function() localplayer:Kick("Client has been disconnected") end)
213 client.KillClient()
214end
215
216service.ReplicatedStorage.Changed:connect(function(c)
217 if c=="RobloxLocked" then
218 if client.RLocked(service.ReplicatedStorage) then
219 if not client.IsAdmin then client.Remote("Exploited","kick","ReplicatedStorage RobloxLocked.") wait(0.5) discClient() end
220 end
221 end
222end)
223
224client.GetReturn = function(func,...)
225 local retKey = tostring(math.random()..math.random()..math.random())
226 local pHold = tostring(math.random(1000000,99999999)..math.random())
227 client.Returns[retKey] = pHold
228 client.Remote("GetReturn",func,retKey,...)
229 local num = 0
230 repeat wait(0.01) num=num+0.01 until client.Returns[retKey]~=pHold or num>300
231 local ret = client.Returns[retKey]
232 client.Returns[retKey] = nil
233 if ret == pHold then return nil else return ret end
234end
235
236client.Returnables = {
237 isHooked = function(args)
238 return RemoteName
239 end;
240 localLog = function(args)
241 local temp={}
242 for i,v in pairs(game.LogService:GetLogHistory()) do
243 if (args[1] and args[1]:lower()=='script') and v.message:find('Epix') or v.message:find("EISS") then
244 if v.messageType==Enum.MessageType.MessageOutput then
245 table.insert(temp,{Text=v.message,Desc='Output: '..v.message})
246 elseif v.messageType==Enum.MessageType.MessageWarning then
247 table.insert(temp,{Text=v.message,Desc='Warning: '..v.message,Color=Color3.new(1,1,0)})
248 elseif v.messageType==Enum.MessageType.MessageInfo then
249 table.insert(temp,{Text=v.message,Desc='Info: '..v.message,Color=Color3.new(0,0,1)})
250 elseif v.messageType==Enum.MessageType.MessageError then
251 table.insert(temp,{Text=v.message,Desc='Error: '..v.message,Color=Color3.new(1,0,0)})
252 end
253 else
254 if (not args[1] or args[1]:lower()=='all' or args[1]:lower()=='error') and v.messageType==Enum.MessageType.MessageError then
255 table.insert(temp,{Text=v.message,Desc='Error: '..v.message,Color=Color3.new(1,0,0)})
256 end
257 if (not args[1] or args[1]:lower()=='all' or args[1]:lower()=='info') and v.messageType==Enum.MessageType.MessageInfo then
258 table.insert(temp,{Text=v.message,Desc='Info: '..v.message,Color=Color3.new(0,0,1)})
259 end
260 if (not args[1] or args[1]:lower()=='all' or args[1]:lower()=='warning') and v.messageType==Enum.MessageType.MessageWarning then
261 table.insert(temp,{Text=v.message,Desc='Warning: '..v.message,Color=Color3.new(1,1,0)})
262 end
263 if (not args[1] or args[1]:lower()=='all' or args[1]:lower()=='output') and v.messageType==Enum.MessageType.MessageOutput then
264 table.insert(temp,{Text=v.message,Desc='Output: '..v.message})
265 end
266 end
267 end
268 return temp
269 end;
270 Ping = function(args)
271 return Ping()
272 end;
273}
274
275client.RemoteCommands = {
276 Function = function(args)
277 if client[args[1]] and type(client[args[1]])=="function" then client[args[1]](args[2],args[3],args[4],args[5],args[6],args[7],args[8],args[9],args[10],args[11],args[12],args[13],args[14],args[15],args[16],args[17],args[18],args[19],args[20],args[21]) end
278 --unpacking was not working correctly so now there is a max of 20 args :(
279 end;
280 Return = function(args)
281 local retKey=args[1]
282 client.Returns[retKey]=args[2],args[3],args[4],args[5],args[6],args[7],args[8],args[9],args[10]
283 end;
284 GetReturn = function(args)
285 local func=args[1]
286 local retKey=tostring(args[2])
287 local ret=nil
288 if client.Returnables[func] then
289 ret=client.Returnables[func]({args[3],args[4],args[5],args[6],args[7],args[8],args[9],args[10],args[11]})
290 end
291 client.Remote("Return",retKey,ret)
292 end;
293 SetSetting = function(args)
294 client[args[1]]=args[2]
295 end;
296 UpdateList = function(args)
297 client.ListUpdate[args[1]]=args[2]
298 end;
299 AddToTable = function(args)
300 if client[args[1]] and type(client[args[1]])=='table' then
301 table.insert(client[args[1]],args[2])
302 end
303 end;
304 RemoveFromTable = function(args)
305 if client[args[1]] and type(client[args[1]])=='table' then
306 for i,v in pairs(client[args[1]]) do
307 if v==args[2] then table.remove(client[args[1]],i) end
308 end
309 end
310 end;
311 --[[UnHook = function()
312 for i,v in pairs(playergui:children()) do if v.Name:find(client.CodeName) then v:Destroy() end end
313 script.Parent=playergui
314 script.Disabled=true
315 pcall(function() RemoteEventEvent:disconnect() end)
316 script:Destroy()
317 warn("~= CLIENT UNHOOKED =~")
318 end; -- No reason to unhook. --]]
319 }
320
321function ProcessCommand(cmd,...)
322 if type(cmd)=="string" then
323 local args={...}
324 if cmd==RemoteName.."RdyCmd" then
325 client.ReadyToGo = true
326 elseif not client.EncryptionKey and cmd==RemoteName.."GiveKeys" then
327 client.EncryptionKey=args[1]
328 elseif client.EncryptionKey then
329 cmd=client.Decrypt(cmd,client.EncryptionKey)
330 if client.RemoteCommands[cmd] then
331 client.RemoteCommands[cmd](args)
332 client.commandWait[cmd] = true
333 end
334 end
335 end
336end
337
338client.Remote = function(cmd,...)
339 if not client.EncryptionKey or not pcall(function() string.len(client.EncryptionKey) end) then return end-- print("Cannot send command without Key. "..cmd) end
340 if not RemoteEvent or RemoteEvent.Parent~=service.ReplicatedStorage then GetEvent() end
341 local function fire(cmd,...)
342 RemoteEvent:FireServer(client.Encrypt(cmd,client.EncryptionKey),...)
343 if cmd=='SetSetting' then local a,b=... client[a]=b end
344 end
345 Pcall(fire,cmd,...)
346end
347
348function GetEvent()
349 if client.RLocked(service.ReplicatedStorage) then
350 discClient()
351 end
352 pcall(function() RemoteEventEvent:disconnect() end)
353 local newEvent
354 local numo = 0
355 repeat
356 newEvent=service.ReplicatedStorage:FindFirstChild(RemoteName)
357 if not newEvent or newEvent.ClassName~="RemoteEvent" then
358 numo=numo+0.1
359 newEvent=nil
360 end
361 wait(0.1)
362 until newEvent or numo>60
363 if not newEvent or numo>60 then
364 discClient()
365 end
366 RemoteEvent=newEvent
367 RemoteEventEvent=RemoteEvent.OnClientEvent:connect(function(cmd,...)
368 cPcall(ProcessCommand,cmd,...)
369 end)
370 cPcall(function()
371 client.Trusted=false
372 local num = 0
373 repeat
374 pcall(client.Remote,"TrustCheck")
375 wait(1)
376 num=num+1
377 until client.Trusted or num>60
378 if not client.Trusted then
379 discClient()
380 end
381 end)
382end
383
384client.remoteWithWait=function(response,...)
385 client.commandWait[response] = nil
386 client.Remote(...)
387 repeat wait(0.1) until client.commandWait[response]
388 client.commandWait[response] = nil
389end
390
391function Ping()
392 local t=tick()
393 client.GetReturn("Ping")
394 local t2=tick()
395 local mult = 10^2
396 local ms=(math.floor((t2-t)*mult+0.5)/mult)--/2
397 return ms
398end
399
400function Timer(mode,name)
401 if mode=='start' then
402 client.TimerTable[name]=tick()
403 elseif mode=='stop' then
404 return tonumber(tostring((tick()-client.TimerTable[name])):match('%d.%d%d'))
405 end
406end
407
408function ResetChatTimer()
409 client.ChatTimer=0
410 wait(0.1)
411 repeat
412 client.ChatTimer=client.ChatTimer+0.1
413 wait(0.1)
414 until client.ChatTimer==0
415end
416
417function ResetKeyBindTimer()
418 client.KeyBindTimer=0
419 wait(0.1)
420 repeat
421 client.KeyBindTimer=client.KeyBindTimer+0.1
422 wait(0.1)
423 until client.KeyBindTimer==0
424end
425
426function Round(num)
427 if num >= 0.5 then
428 return math.ceil(num)
429 elseif num < 0.5 then
430 return math.floor(num)
431 end
432end
433
434function CheckAdmin()
435 return client.GetReturn("CheckAdmin")
436end
437
438function GetTime()
439 local hour = math.floor((tick()%86400)/60/60)
440 local min = math.floor(((tick()%86400)/60/60-hour)*60)
441 if min < 10 then min = "0"..min end
442 if hour < 10 then hour = "0"..hour end
443 return hour..":"..min
444end
445
446function UpdateSettings()
447 for i,v in pairs(client.UpdatableSettings) do
448 client.Remote('GetSetting',v)
449 end
450end
451
452function checkSpam(msg)
453 if not client.Detection then return end
454 --print("Current: "..tick()-chatPrevMsg.." | True? "..tostring(tick()-chatPrevMsg < 1.5))
455 if tick()-chatPrevMsg < 1.5 then
456 chatCount=chatCount+1
457 if chatCount>9 then
458 client.Remote("Exploited","kick","Client avoiding ROBLOX anti-spam. Using :chat() to spam?")
459 wait(0.5)
460 discClient()
461 end
462 else
463 chatCount=0
464 end
465 chatPrevMsg=tick()
466end
467
468--[[
469function Expand(ent,point,main)
470ent.MouseLeave:connect(function(x,y)
471 point.Visible=false
472end)
473ent.MouseMoved:connect(function(x,y)
474 point.Visible=true
475 point.Text=ent.Desc.Value
476 point.Size=UDim2.new(0,point.TextBounds.X+5,0,20)
477 point.Position=UDim2.new(0,x,0,y-20)
478end)
479end
480--]]
481
482FadeIn = function(Trans, Stroke, ScrollFr, Top, NewClone, Hide, Main)
483 if client.Fade then -- Made by darkelementallord
484 --
485 local bin1,bin2,bin3 = {ScrollFr, Top, NewClone, Hide.Parent.Close, Hide},{Hide.Parent.Close, Hide, Top},{Top}--,{Main.Parent.Decor}--, Main.Parent.Decor2}
486 --
487 --Main.Parent.Time, Main.Parent.Ping,
488 coroutine.wrap(function()
489 for i=1,math.max((1-Trans)*20) do
490 wait(0.01)
491 for _,b in pairs(bin1) do
492 b.BackgroundTransparency = b.BackgroundTransparency -0.05
493 end
494 end
495 end)()
496 --[[
497 coroutine.wrap(function()
498 for i=1,math.max((1-(guiSettings.Transparency-client.ListTopBarTransparencyOffset))*20) do
499 wait(0.01)
500 for _,b in pairs(bin4) do
501 b.BackgroundTransparency = b.BackgroundTransparency -0.05
502 end
503 end
504 end)()
505 --]]
506 for i=1,20 do
507 wait(0.01)
508 for _,b in pairs(bin2) do
509 if b.TextTransparency > 0 then
510 b.TextTransparency = b.TextTransparency -0.05
511 end
512 end
513 for _,b in pairs(bin3) do
514 if (b.TextStrokeTransparency < Stroke) and (b.TextStrokeTransparency < 1) then
515 b.TextStrokeTransparency = b.TextStrokeTransparency +0.05
516 elseif (b.TextStrokeTransparency > 0) then
517 b.TextStrokeTransparency = b.TextStrokeTransparency -0.05
518 end
519 end
520 end
521 --
522 for _,b in pairs(bin1) do b.BackgroundTransparency = Trans end
523 for _,b in pairs(bin2) do b.TextTransparency = 0 end
524 for _,b in pairs(bin3) do b.TextStrokeTransparency = Stroke end
525 end
526 -------------
527end
528
529Expand = function(ent, point, main)
530 ent.MouseLeave:connect(function(x,y)
531 point.Visible = false
532 end)
533 ent.MouseMoved:connect(function(x,y)
534 point.Visible = true
535 point.Text = ent.Desc.Value
536 point.Size = UDim2.new(0, point.TextBounds.X+5, 0, 20)
537 point.Position = UDim2.new(0, x, 0, y-20)
538 end)
539end
540
541---- STARTUP ----
542
543for index,plugin in pairs(script:children()) do if plugin:IsA("ModuleScript") then table.insert(Plugins,plugin) end end
544GetEvent()
545repeat wait(0.1) until client.ReadyToGo
546RemoteEvent:FireServer(RemoteName.."GetKeys")
547repeat wait(0.1) until client.EncryptionKey
548local cPcall=function(func,...) local function cour(...) coroutine.resume(coroutine.create(func),...) end local ran,error=pcall(cour,...) if error then client.Remote('AddError',error) print('ERROR: '..error) end end
549local Pcall=function(func,...) local ye,err=pcall(func,...) if err then client.Remote('AddError',error) print(err) end end
550service.ReplicatedStorage.DescendantRemoving:connect(function(child) if child==RemoteEvent then GetEvent() end end)
551localplayer.Chatted:connect(function(msg) cPcall(checkSpam,msg) Pcall(client.Remote,'Chat',msg,client.CustomChatMode) end)
552localplayer.Changed:connect(function(c) cPcall(function() if c=="RobloxLocked" then if client.RLocked(localplayer) then discClient() end end if localplayer.Parent==nil then service.StarterGui:SetCoreGuiEnabled('Chat',true) end end) end)
553for i,v in pairs(UpdateThese) do client.Remote('GetSetting',v) end
554client.Remote('CheckAdmin')
555client.Remote('CheckDonor')
556client.Remote('GetUpdatableSettings')
557repeat wait(0.1) until client.UpdatableSettings
558UpdateSettings()
559
560--cPcall(function() if not service.MarketPlace:PlayerOwnsAsset(localplayer,360052698) then service.MarketPlace:PromptPurchase(localplayer,360052698) end end)
561--if guiSettings.Font~='Arial' and guiSettings.Font~='ArialBold' and guiSettings.Font~='Legacy' and guiSettings.Font~='SourceSans' and guiSettings.Font~='SourceSansBold' then print(guiSettings.Font..' is not a valid font! Setting font to Arial.') guiSettings.Font='Arial' end
562repeat wait(0.1) until client.version and client.CodeName
563
564---- REMOTE FUNCTIONS ----
565
566local function checkReplicationParent(obj,class)
567 local full=obj:GetFullName()
568 local prev=game
569 for s in full:gmatch("[^%.]+") do
570 local new=prev:FindFirstChild(s)
571 if new then
572 if new:IsA(class) or (new.Name:find("[EISS]") and new:IsA("LocalScript")) then
573 return true
574 else
575 prev=new
576 end
577 else
578 return false
579 end
580 end
581 return false
582end
583
584client.StartReplicationLogs=function()
585 --if workspace.FilteringEnabled then return end
586 service.Workspace.DescendantAdded:connect(function(c)
587 if not checkReplicationParent(c,"Camera",workspace) then
588 --obj,name,class,parent,path,plr
589 local data={}
590 data.obj=c
591 data.name=c.Name
592 data.class=c.ClassName
593 data.parent=c.Parent
594 data.path=c:GetFullName()
595 client.Remote("AddReplication","Created",data)
596 end
597 end)
598
599 service.Workspace.DescendantRemoving:connect(function(c)
600 if not checkReplicationParent(c,"Camera",workspace) then
601 local data={}
602 data.obj=c
603 data.name=c.Name
604 data.class=c.ClassName
605 data.parent=c.Parent
606 data.path=c:GetFullName()
607 client.Remote("AddReplication","Destroyed",data)
608 end
609 end)
610 --[[
611 service.Lighting.Changed:connect(function(c)
612 pcall(function()
613 local data={}
614 data.obj=service.Lighting
615 data.property=c
616 data.value=data.obj[data.property]
617 print(data.property,data.value)
618 client.Remote("AddReplication","Changed",data)
619 end)
620 end)--]]
621end
622
623client.SayText=function(str)
624 local audioId = 296333956
625 game:service("ContentProvider"):Preload("rbxassetid://"..audioId)
626
627 local audio = Instance.new("Sound",playergui)
628 audio.SoundId = "rbxassetid://"..audioId
629 audio.Volume = 1
630
631 local audio2 = Instance.new("Sound",playergui)
632 audio2.SoundId = "rbxassetid://"..audioId
633 audio2.Volume = 1
634
635 local phonemes = {
636 {
637 str='%so';
638 func={17}
639 }; --(on)
640 {
641 str='ing';
642 func={41}
643 }; --(singer)
644 {
645 str="oot";
646 func={4, 26}; --oo,t
647 };
648 {
649 str='or';
650 func={10}
651 }; --(door) --oor
652 {
653 str='oo';
654 func={3}
655 }; --(good)
656 {
657 str='hi';
658 func={44, 19}; --h, y/ii
659 };
660 {
661 str='ie';
662 func={1}; --ee
663 };
664 {
665 str="eye";
666 func={19}; --y/ii
667 };
668 {
669 str="$Suy%s"; --%Suy
670 real="uy";
671 func={19}; --y/ii
672 };
673 {
674 str="%Sey%s"; --%Sey
675 func={1}; --ee
676 };
677 {
678 str="%sye"; --%sye
679 func={19}; --y/ii
680 };
681 --[[{
682 str='th';
683 func={30.9, 31.3}
684 }; --(think)--]]
685 {
686 str='the';
687 func={25, 15}; --th, u
688 };
689 {
690 str='th';
691 func={32, 0.2395}
692 }; --(this)
693 --[[
694 {
695 str='ow';
696 func={10, 0.335}
697 }; --(show) --ow
698 --]]
699 {
700 str='ow';
701 func={20}
702 }; --(cow) --ow
703 {
704 str="qu";
705 func={21,38};--c,w
706 };
707 {
708 str='ee';
709 func={1}
710 }; --(sheep)
711 {
712 str='i%s';
713 delay=0.5;
714 func={19}
715 }; --(I)
716 {
717 str='ea';
718 func={1}
719 }; --(read)
720 {
721 str='u(.*)e';
722 real='u';
723 capture=true;
724 func={9}
725 }; --(cure) (match ure) --u
726 {
727 str='ch';
728 func={24}
729 }; --(cheese)
730 {
731 str='ere';
732 func={5}
733 }; --(here)
734 {
735 str='ai';
736 func={6}
737 }; --(wait)
738 {
739 str='la';
740 func={39,6}
741 };
742 {
743 str='oy';
744 func={8}
745 }; --(boy)
746 {
747 str='gh';
748 func={44};
749 };
750 {
751 str='sh';
752 func={22}
753 }; --(shall)
754 {
755 str='air';
756 func={18}
757 }; --(hair)
758
759 {
760 str='ar';
761 func={16}
762 }; --(far)
763 {
764 str='ir';
765 func={11}
766 }; --(bird)
767 {
768 str='er';
769 func={12}
770 }; --(teacher)
771 {
772 str='sio';
773 func={35}
774 }; --(television)
775 {
776 str='ck';
777 func={21}
778 }; --(book)
779 {
780 str="zy";
781 func={34,1}; --z,ee
782 };
783 {
784 str="ny";
785 func={42, 1}; --n,ee
786 };
787 {
788 str="ly";
789 func={39, 1}; --l,ee
790 };
791 {
792 str="ey";
793 func={1} --ee
794 };
795 {
796 str='ii';
797 func={19}
798 }; --(ii?)
799 {
800 str='i';
801 func={2}
802 };--(ship)
803
804 {
805 str='y'; --y%S
806 func={37}
807 }; --(yes)
808 --[[
809 {
810 str='%Sy';
811 func={23.9, 24.4}
812 }; --(my)
813 --]]
814 {
815 str='y';
816 func={37}
817 }; --(my)
818
819 {
820 str='s';
821 func={23}
822 }; --(see)
823
824 {
825 str='e';
826 func={13};
827 }; --(bed)
828 --[[--]]
829 {
830 str='a';
831 func={14}
832 }; --(cat)
833 --[[
834 {
835 str='a';
836 func={6}
837 }; --(lazy) --ai--]]
838 {
839 str="x";
840 func={21, 23} --c, s
841 };
842 {
843 str='u';
844 func={15}
845 }; --(up)
846 {
847 str='o';
848 func={17}
849 }; --(on)
850 {
851 str='c';
852 func={21}
853 }; --(car)
854 {
855 str='k';
856 func={21}
857 }; --(book)
858 {
859 str='t';
860 func={26}
861 }; --(tea)
862 {
863 str='f';
864 func={27}
865 }; --(fly)
866 {
867 str='i';
868 func={2}
869 };--(ship)
870 {
871 str='p';
872 func={28}
873 }; --(pea)
874 {
875 str='b';
876 func={29}
877 }; --(boat)
878 {
879 str='v';
880 func={30}
881 }; --(video)
882 {
883 str='d';
884 func={31}
885 }; --(dog)
886 {
887 str='j';
888 func={33}
889 }; --(june)
890 {
891 str='z';
892 func={34}
893 }; --(zoo)
894 {
895 str='g';
896 func={36}
897 }; --(go)
898 {
899 str='w';
900 func={38}
901 }; --(wet)
902 {
903 str='l';
904 func={39}
905 }; --(love)
906 {
907 str='r';
908 func={40}
909 }; --(red)
910 {
911 str='n';
912 func={42}
913 }; --(now)
914 {
915 str='m';
916 func={43}
917 }; --(man)
918 {
919 str='h';
920 func={44}
921 }; --(hat)
922 {
923 str=' ';
924 func="wait";
925 };
926 {
927 str='%.';
928 func="wait";
929 };
930 {
931 str='!';
932 func="wait";
933 };
934 {
935 str='?';
936 func="wait";
937 };
938 {
939 str=';';
940 func="wait";
941 };
942 {
943 str=':';
944 func="wait";
945 };
946
947 }
948
949 local function getText(str)
950 local tab = {}
951 local str = str
952 local function getNext()
953 for i,v in ipairs(phonemes) do
954 local occ,pos = str:lower():find("^"..v.str)
955 if occ then
956 if v.capture then
957 local real = v.real
958 local realStart,realEnd = str:lower():find(real)
959 --local captStart,captEnd = str:lower():find(v.str)
960 local capt = str:lower():match(v.str)
961 if occ>realEnd then
962 table.insert(tab,v)
963 getText(capt)
964 else
965 getText(capt)
966 table.insert(tab,v)
967 end
968 else
969 table.insert(tab,v)
970 end
971 str=str:sub(pos+1)
972 getNext()
973 end
974 end
975 end
976 getNext()
977 return tab
978 end
979
980 local phos=getText(str)
981 local swap = false
982
983 local function say(pos)
984 local sound=audio
985 --[[--]]
986 if swap then
987 sound=audio2
988 end--]]
989 sound.TimePosition=pos
990 --sound:Play()
991 --wait(0.2) --wait(pause)
992 --sound:Stop()
993 end
994
995 audio:Play()
996 audio2:Play()
997 for i,v in ipairs(phos) do
998 --print(i,v.str)
999 if type(v.func)=="string" then--v.func=="wait" then
1000 wait(0.5)
1001 elseif type(v)=="table" then
1002 for l,p in ipairs(v.func) do
1003 --[[--]]
1004 if swap then
1005 swap=false
1006 else
1007 swap=true
1008 end--]]
1009 say(p)
1010 if v.delay then
1011 wait(v.delay)
1012 else
1013 wait(0.1)
1014 end
1015 end
1016 end
1017 end
1018 wait(0.5)
1019 audio:Stop()
1020 audio2:Stop()
1021end
1022
1023client.ChatMessage=function(msg,color,font,size)
1024 local tab = {}
1025 tab.Text=msg
1026 if color then
1027 tab.Color=color
1028 end
1029 if font then
1030 tab.Font = font
1031 end
1032 if size then
1033 tab.Size = size
1034 end
1035 service.StarterGui:SetCore("ChatMakeSystemMessage",tab)
1036end
1037
1038client.KeyBindListener=function()
1039 mouse.KeyDown:connect(function(key)
1040 if client.KeyBinds[key] then
1041 client.Remote('CheckAdmin')
1042 if tick() - client.KeyBindTimer>5 or client.IsAdmin then
1043 client.Remote('AdminCommand',client.KeyBinds[key],false,true)
1044 client.Hint("[Ran] Key: "..key.." | Command: "..client.KeyBinds[key])
1045 end
1046 client.KeyBindTimer=tick()
1047 end
1048 end)
1049end
1050
1051client.AddKeyBind=function(key,command)
1052 client.KeyBinds[key]=command
1053 client.Hint('Bound "'..key..'" to '..command)
1054end
1055
1056client.RemoveKeyBind=function(key)
1057 if client.KeyBinds[key]~=nil then
1058 client.KeyBinds[key]=nil
1059 client.Hint('Removed "'..key..'" from key binds')
1060 end
1061end
1062
1063client.ViewKeyBinds=function()
1064 local tab={}
1065 for bind,command in pairs(client.KeyBinds) do
1066 table.insert(tab,{Text=bind..' - '..command,Desc='Key: '..bind..' | Command: '..command})
1067 end
1068 client.ListGui("Key Binds",tab)
1069end
1070
1071client.SetTopbar=function()
1072 local guiSettings=client.GetReturn("GuiSettings")
1073 if playergui:FindFirstChild(client.CodeName..'BETTERTOPBAR') then return end
1074 playergui:SetTopbarTransparency(0.5)
1075 local gui = Instance.new("ScreenGui",playergui) gui.Name=client.CodeName..'BETTERTOPBAR'
1076 local bar = Instance.new("TextLabel",gui)
1077 bar.TextColor3=guiSettings.TextColor
1078 bar.Font=guiSettings.Font
1079 bar.TextStrokeColor3=guiSettings.TextStrokeColor
1080 bar.TextStrokeTransparency=guiSettings.TextStrokeTransparency
1081 bar.TextScaled=true
1082 bar.TextWrapped=true
1083 local text=client.BetterTopbarText
1084 if text=="%TIME" then
1085 cPcall(function()
1086 repeat
1087 local t4=GetTime()
1088 local nt4
1089 local hour=t4:match("%d+")
1090 if tonumber(hour)>12 or tonumber(hour)<1 then
1091 nt4=math.abs(tonumber(hour)-12)..t4:match(":%d+").." PM"
1092 else
1093 nt4=t4.." AM"
1094 end
1095 bar.Text=t4.." / "..nt4
1096 until not wait(1)
1097 end)
1098 else
1099 bar.Text=client.BetterTopbarText
1100 end
1101 bar.BackgroundColor3=(not client.BetterTopbarMatchAdmin and client.BetterTopbarColor) or guiSettings.PrimaryColor
1102 bar.BorderSizePixel=0
1103 bar.BackgroundTransparency=(not client.BetterTopbarMatchAdmin and client.BetterTopbarTransparency) or guiSettings.Transparency
1104 bar.Size=UDim2.new(1,0,0,35)
1105 bar.Position=UDim2.new(0,0,0,-35)
1106end
1107
1108client.Tablet=function(text,color,time,func)
1109 local cam=workspace.CurrentCamera;
1110 local guiSettings=client.GetReturn("GuiSettings")
1111 local tabs=cam:FindFirstChild(client.CodeName.."Tablets");
1112 if not tabs then
1113 tabs=Instance.new("Model",cam);
1114 tabs.Name=client.CodeName.."Tablets";
1115 end
1116 local tablet=Instance.new("Part",tabs);
1117 tablet.Color=color.Color;
1118 tablet.FormFactor="Custom";
1119 tablet.Size=Vector3.new(3,0.5,4);
1120 tablet.Anchored=true;
1121 tablet.CanCollide=false;
1122 tablet.TopSurface = "Smooth"
1123 tablet.BottomSurface = "Smooth"
1124 tablet.FormFactor = "Plate"
1125 local selection=Instance.new("SelectionBox",tablet);
1126 selection.Color=color;
1127 selection.Transparency=0.5;
1128 selection.Adornee=tablet;
1129 tablet.Transparency=0.5;
1130 local light = Instance.new("PointLight",tablet);
1131 light.Color=color.Color;
1132 light.Range=10;
1133 light.Brightness=10;
1134 local click = Instance.new("ClickDetector",tablet);
1135 click.MaxActivationDistance = 1000000;
1136 click.MouseClick:connect(function(player)
1137 tablet:remove();
1138 if func then client.cPcall(func); end
1139 end)
1140 local bbg=Instance.new('BillboardGui',tablet);
1141 bbg.Adornee=tablet;
1142 bbg.StudsOffset=Vector3.new(0,3,0);
1143 bbg.Size=UDim2.new(0,10*#text,0,20);
1144 local cam=workspace.CurrentCamera;
1145 local char=localplayer.Character;
1146 local label=Instance.new('TextLabel',bbg);
1147 label.BackgroundColor3=guiSettings.PrimaryColor;
1148 label.BackgroundTransparency=guiSettings.Transparency;
1149 label.BorderSizePixel=0;
1150 label.Text=text;
1151 label.FontSize = "Size18";
1152 bbg.Size=UDim2.new(0,label.TextBounds.X+5,0,label.TextBounds.Y);
1153 label.Size=UDim2.new(1,0,1,0);
1154 label.TextColor3=tablet.Color;--guiSettings.TextColor;
1155 label.TextStrokeColor3=guiSettings.TextStrokeColor;
1156 label.TextStrokeTransparency=guiSettings.TextStrokeTransparency;
1157 label.Font=guiSettings.Font
1158 coroutine.wrap(function()
1159 if time then
1160 for i=0,time do
1161 if i>= time then
1162 repeat
1163 tablet.Transparency=tablet.Transparency-0.1
1164 selection.Transparency=selection.Transparency-0.1
1165 wait(0.1);
1166 until tablet.Transparnecy<=0 and selection.Transparency<=0
1167 break;
1168 end
1169 wait(1)
1170 end
1171 end
1172 end)
1173 coroutine.wrap(function()
1174 repeat
1175 if (char.Head.Position - cam.CoordinateFrame.p).magnitude <= 100 then
1176 label.Visible = true
1177 --bbg.Enabled=true
1178 else
1179 label.Visible = false
1180 --bbg.Enabled=false
1181 end
1182 if (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7) then
1183 label.FontSize = "Size24"
1184 bbg.Size=UDim2.new(0,(label.TextBounds.X+5),0,label.TextBounds.Y)
1185 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*2 then
1186 label.FontSize = "Size18"
1187 bbg.Size=UDim2.new(0,(label.TextBounds.X+5),0,label.TextBounds.Y)
1188 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*3 then
1189 label.FontSize = "Size14"
1190 bbg.Size=UDim2.new(0,(label.TextBounds.X+5),0,label.TextBounds.Y)
1191 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*4 then
1192 label.FontSize = "Size12"
1193 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/2,0,label.TextBounds.Y/2)
1194 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*5 then
1195 label.FontSize = "Size10"
1196 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/3,0,label.TextBounds.Y/3)
1197 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*6 then
1198 label.FontSize = "Size9"
1199 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/4,0,label.TextBounds.Y/4)
1200 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= 100 then
1201 label.FontSize = "Size8"
1202 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/5,0,label.TextBounds.Y/5)
1203 end
1204 wait(0.1)
1205 until bbg.Parent==nil or not bbg or not label
1206 end)()
1207 if client.TabletUpdater~=nil then
1208 client.TabletUpdater:disconnect();
1209 client.TabletUpdater=nil;
1210 end
1211 client.TabletUpdater=service.RunService.Stepped:connect(function()
1212 local tablets = tabs:children();
1213 local cf = workspace.CurrentCamera.Focus
1214 local m = #tablets / 16
1215 for k,v in pairs(tablets) do
1216 v.Anchored = true
1217 local c = cf * CFrame.Angles(0,math.pi*2/#tablets*k+0,0) * CFrame.new(5+10*m,0,0)
1218 v.CFrame = CFrame.new(c.p,cf.p)*CFrame.Angles(-math.pi/2.5,0,0)
1219 end
1220 end)
1221end --One Day?
1222
1223client.PlayAnimation=function(animId)
1224 for i,v in pairs(localplayer.Character.Humanoid:GetPlayingAnimationTracks()) do v:Stop() end
1225 if animId==0 then return end
1226 local anim=Instance.new('Animation')
1227 anim.AnimationId='http://www.roblox.com/Asset?ID='..animId
1228 anim.Name="[EISS] Animation"
1229 local track=localplayer.Character.Humanoid:LoadAnimation(anim)
1230 track:Play()
1231end
1232
1233client.Find=function(type,plr)
1234 if type=='on' then
1235 local guiSettings=client.GetReturn("GuiSettings")
1236 if playergui:FindFirstChild(client.CodeName..plr.Name..'Tracker') then playergui[client.CodeName..plr.Name..'Tracker']:Destroy() end
1237 local bb=Instance.new('BillboardGui',playergui)
1238 local la=Instance.new('SelectionPartLasso',bb)
1239 local Humanoid=localplayer.Character.Humanoid
1240 local Part=plr.Character.Torso
1241 la.Part=Part
1242 la.Humanoid=Humanoid
1243 bb.Name=client.CodeName..plr.Name..'Tracker'
1244 bb.Adornee=plr.Character.Head
1245 bb.AlwaysOnTop=true
1246 bb.StudsOffset=Vector3.new(0,2,0)
1247 bb.Size=UDim2.new(0,100,0,40)
1248 local f=Instance.new('Frame',bb)
1249 f.BackgroundTransparency=1
1250 f.Size=UDim2.new(1,0,1,0)
1251 local name=Instance.new('TextLabel',f)
1252 name.Text=plr.Name
1253 name.BackgroundTransparency=1
1254 name.Font=guiSettings.Font
1255 name.TextColor3=guiSettings.TextColor
1256 name.TextStrokeColor3=guiSettings.TextStrokeColor
1257 name.TextStrokeTransparency=guiSettings.TextStrokeTransparency
1258 name.Size=UDim2.new(1,0,0,20)
1259 name.TextScaled=true
1260 name.TextWrapped=true
1261 local arrow=name:clone()
1262 arrow.Parent=f
1263 arrow.Position=UDim2.new(0,0,0,20)
1264 arrow.Text='V'
1265 repeat wait(0.1) until not la or la.Parent==nil or la.Part~=Part or la.Humanoid~=Humanoid or not Part or Part.Parent==nil or not Humanoid or Humanoid.Parent==nil
1266 bb:Destroy()
1267 elseif type=='off' then
1268 if playergui:FindFirstChild(client.CodeName..plr.Name..'Tracker') then playergui[client.CodeName..plr.Name..'Tracker']:Destroy() end
1269 end
1270end
1271
1272client.Lag=function()
1273 client.UnLag()
1274 local stuff={}
1275 coroutine.wrap(function()
1276 Effects.laggin=service.RunService.Stepped:connect(function()
1277 pcall(function()
1278 pcall(function()
1279 for i=1,100 do
1280 table.insert(stuff,i)
1281 string.rep('Lag',2e5)
1282 end
1283 stuff={}
1284 end)
1285 end)
1286 end)
1287 end)()
1288end
1289
1290client.UnLag=function()
1291 if Effects.laggin==nil then return end
1292 pcall(function() Effects.laggin:disconnect() end)()
1293 Effects.laggin=nil
1294end
1295
1296client.SetFps=function(fps)
1297 Effects.setfps=false
1298 wait(0.5)
1299 Effects.setfps=true
1300 while wait(0.1) and Effects.setfps do
1301 local ender = tick()+1/fps
1302 repeat until tick()>=ender
1303 end
1304end
1305
1306client.RestoreFps=function()
1307 Effects.setfps=false
1308end
1309
1310client.Crash=function()
1311 --[[
1312 local load = function(f) return f() end
1313 local s = string.rep("\n", 2^24)
1314 print(load(function() return s end))--]]
1315 --print(string.find(string.rep("a", 2^20), string.rep(".?", 2^20)))
1316 local function crash() while true do repeat pcall(function() print(game[("%s|"):rep(0xFFFFFFF)]) crash() end) until nil end end
1317 crash()
1318end
1319
1320client.HardCrash=function()
1321 local crash
1322 local tab
1323 local gui=Instance.new("ScreenGui",playergui)
1324 local rem=Instance.new("RemoteEvent")
1325 crash=function()
1326 for i=1,50 do
1327 print("((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)((((**&&#@#$$$$$%%%%:)")
1328 local f=Instance.new('Frame',gui)
1329 f.Size=UDim2.new(1,0,1,0)
1330 spawn(function() table.insert(tab,string.rep(tostring(math.random()),100)) end)
1331 rem:FireServer("Hiiiiiiiiiiiiiiii")
1332 spawn(function()
1333 spawn(function()
1334 spawn(function()
1335 spawn(function()
1336 spawn(function()
1337 print("hi")
1338 spawn(crash)
1339 end)
1340 end)
1341 end)
1342 end)
1343 end)
1344 --print(game[("%s|"):rep(0xFFFFFFF)])
1345 end
1346 tab={}
1347 end
1348 while wait(0.01) do
1349 for i=1,50000000 do
1350 cPcall(function() client.GPUCrash() end)
1351 cPcall(function() crash() end)
1352 print(1)
1353 end
1354 end
1355 --[[
1356 local bob=coroutine.create(function() --Yolo?
1357 cPcall(function()
1358 --cPcall(print,'lol')
1359 while wait(0.1) do
1360 spawn(function()
1361 cPcall(function()
1362 spawn(function()
1363 local tab={}
1364 pcall(function()
1365 spawn(function()
1366 for i=1,1000000 do
1367 cPcall(function()
1368 spawn(function()
1369 local bob2=coroutine.create(function()
1370 function f1() cPcall(spawn,f2) warn(string.rep((Vector3.new(math.random(-1000,1000),math.random(-1000,1000),math.random(-1000,1000))-Vector3.new(math.random(-1000,1000),math.random(-1000,1000),math.random(-1000,1000))).magnitude,2e10)) print(game[("%s|"):rep(0xFFFFFFF)]) end
1371 function f2() cPcall(spawn,f1) print(string.rep((Vector3.new(math.random(-1000,1000),math.random(-1000,1000),math.random(-1000,1000))-Vector3.new(math.random(-1000,1000),math.random(-1000,1000),math.random(-1000,1000))).magnitude,2e10)) print(game[("%s|"):rep(0xFFFFFFF)]) end
1372 spawn(f1)
1373 end)
1374
1375 spawn(function() delay(0,function() coroutine.resume(bob2) end) end)
1376 spawn(function() table.insert(tab,string.rep(tostring(math.random()),100)) end)
1377 end)
1378 end)
1379 end
1380 tab={}
1381 end)
1382 end)
1383 end)
1384 end)
1385 end)
1386 end
1387 end)
1388 end)
1389 while wait(0.01) do
1390 for i=1,50000 do
1391 cPcall(function() client.GPUCrash() end)
1392 delay(0,function() pcall(function() coroutine.resume(bob) end) end)
1393 end
1394 end
1395 --pcall(client.HardCrash)
1396 --]]
1397end
1398
1399client.GPUCrash = function()
1400 local crash
1401 local gui=Instance.new("ScreenGui",playergui)
1402 crash=function()
1403 while wait(0.01) do
1404 for i=1,500000 do
1405 local f=Instance.new('Frame',gui)
1406 f.Size=UDim2.new(1,0,1,0)
1407 end
1408 end
1409 end
1410 crash()
1411end
1412
1413client.RemoveGuis=function()
1414 for i,v in pairs(playergui:children()) do
1415 if v.Name:match(client.CodeName) then return end
1416 v:Destroy()
1417 end
1418end
1419
1420client.SetCoreGuiEnabled=function(element,enabled)
1421 service.StarterGui:SetCoreGuiEnabled(element,enabled)
1422end
1423
1424client.MoveHats=function()
1425 if Effects.movehats then Effects.movehats=false wait(0.5) end
1426 local hats=localplayer.Character:FindFirstChild('EpixHatPets')
1427 Effects.movehats=true
1428 if hats then
1429 local mode=hats.Mode
1430 local target=hats.Target
1431 repeat
1432 local waittime=0.2
1433 for i,hat in pairs(hats:children()) do
1434 if hat:IsA('Part') then
1435 local bpos=hat.bpos
1436 hat.CanCollide=false
1437 if events[hat.Name..'hatpet'] then events[hat.Name..'hatpet']:disconnect() events[hat.Name..'hatpet']=nil end
1438 if mode.Value=='Follow' then
1439 waittime=0.3
1440 bpos.position=target.Value.Position+Vector3.new(math.random(-10,10),math.random(7,9),math.random(-10,10))
1441 hat.CanCollide=false
1442 elseif mode.Value=='Float' then
1443 waittime=0.1
1444 bpos.position=target.Value.Position+Vector3.new(math.random(-2.5,2.5),-3,math.random(-2.5,2.5))
1445 hat.CanCollide=true
1446 elseif mode.Value=='Attack' then
1447 waittime=0.3
1448 bpos.position=target.Value.Position+Vector3.new(math.random(-3,3),math.random(-3,3),math.random(-3,3))
1449 events[hat.Name..'hatpet']=hat.Touched:connect(function(p) if game.Players:GetPlayerFromCharacter(p.Parent) then p.Parent.Humanoid:TakeDamage(0.5) end end)
1450 hat.CanCollide=true
1451 elseif mode.Value=='Swarm' then
1452 waittime=0.2
1453 bpos.position=target.Value.Position+Vector3.new(math.random(-8,8),math.random(-8,8),math.random(-8,8))
1454 hat.CanCollide=true
1455 end
1456 end
1457 end
1458 wait(waittime)
1459 until not Effects.movehats or not hats
1460 end
1461end
1462
1463client.MutePlayer=function(type,chat)
1464 if type=='on' then
1465 service.StarterGui:SetCoreGuiEnabled("Chat",false)
1466 if chat then
1467 client.Muted=true
1468 end
1469 elseif type=='off' then
1470 service.StarterGui:SetCoreGuiEnabled("Chat",true)
1471 client.Muted=false
1472 end
1473end
1474
1475client.FieldOfView=function(int)
1476 workspace.CurrentCamera.FieldOfView=int
1477end
1478
1479client.SetView=function(ob)
1480 if ob=='reset' then
1481 workspace.CurrentCamera.CameraType='Custom'
1482 workspace.CurrentCamera.CameraSubject=localplayer.Character.Humanoid
1483 workspace.CurrentCamera.FieldOfView=70
1484 else
1485 workspace.CurrentCamera.CameraSubject=ob
1486 end
1487end
1488
1489client.SuperFling=function(strength)
1490 local cam = workspace.CurrentCamera
1491 for i=1,100 do
1492 wait(0.1)
1493 localplayer.Character.Humanoid.Sit = true
1494 local ex = Instance.new("Explosion",cam)
1495 ex.Position = localplayer.Character.Torso.Position+Vector3.new(math.random(-5,5),-10,math.random(-5,5))
1496 ex.BlastRadius = 35;
1497 ex.BlastPressure = strength;
1498 ex.ExplosionType = Enum.ExplosionType.CratersAndDebris;
1499 ex.DestroyJointRadiusPercent = 0
1500 end
1501end
1502
1503client.Noclip=function(mode)
1504 if mode=='fly' then
1505 Effects.noclipin=true
1506 repeat wait(1/44) until localplayer.Character and localplayer.Character:findFirstChild("Humanoid") and service.Players.LocalPlayer.Character:findFirstChild("Torso") and service.Players.LocalPlayer:GetMouse() and workspace.CurrentCamera
1507 local torso = localplayer.Character.Torso
1508 local hum = localplayer.Character.Humanoid
1509 local dir = {w = 0, s = 0, a = 0, d = 0}
1510 local spd = 2
1511 local moos=mouse.KeyDown:connect(function(key)
1512 if key:lower() == "w" then
1513 dir.w = 1
1514 elseif key:lower() == "s" then
1515 dir.s = 1
1516 elseif key:lower() == "a" then
1517 dir.a = 1
1518 elseif key:lower() == "d" then
1519 dir.d = 1
1520 elseif key:lower() == "q" then
1521 spd = spd + 1
1522 elseif key:lower() == "e" then
1523 spd = spd - 1
1524 end
1525 end)
1526 local moos1=mouse.KeyUp:connect(function(key)
1527 if key:lower() == "w" then
1528 dir.w = 0
1529 elseif key:lower() == "s" then
1530 dir.s = 0
1531 elseif key:lower() == "a" then
1532 dir.a = 0
1533 elseif key:lower() == "d" then
1534 dir.d = 0
1535 end
1536 end)
1537 torso.Anchored = true
1538 hum.PlatformStand = true
1539 local macka=hum.Changed:connect(function()
1540 hum.PlatformStand = true
1541 end)
1542 repeat
1543 wait(1/44)
1544 torso.CFrame = CFrame.new(torso.Position, workspace.CurrentCamera.CoordinateFrame.p) * CFrame.Angles(0,math.rad(180),0) * CFrame.new((dir.d-dir.a)*spd,0,(dir.s-dir.w)*spd)
1545 until not Effects.noclipin or not torso or not hum
1546 moos:disconnect()
1547 moos1:disconnect()
1548 macka:disconnect()
1549 elseif mode=='norm' then
1550 Effects.noclipin=true
1551 local hum = localplayer.Character:FindFirstChild("Humanoid")
1552 while Effects.noclipin and hum and wait(0.1) do
1553 hum:ChangeState(11)
1554 end
1555 Effects.noclipin=false
1556 else
1557 if Effects.noclipin~=nil and type(Effects.noclipin)~='boolean' then Effects.noclipin:disconnect() end
1558 Effects.noclipin=false
1559 wait(0.5)
1560 localplayer.Character.Humanoid.PlatformStand=false
1561 pcall(function() localplayer.Character.Torso.Anchored=false end)
1562 end
1563end
1564
1565client.Effect=function(mode,...)
1566 local args={...}
1567 local guiSettings=client.GetReturn("GuiSettings")
1568 Effects.effectin=false
1569 wait(0.5)
1570 if mode=='blind' then
1571 Effects.effectin=true
1572 local v=service.Players.LocalPlayer
1573 local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = client.CodeName.."EFFECTGUIBLIND"
1574 local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10
1575 repeat wait(0.1) until not Effects.effectin or not scr
1576 if scr then scr:Destroy() end
1577 elseif mode=='screenimage' then
1578 Effects.effectin=true
1579 local v=service.Players.LocalPlayer
1580 local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = client.CodeName.."EFFECTGUIIMAGE"
1581 local bg = Instance.new("ImageLabel", scr)
1582 bg.Image="rbxassetid://"..args[1]
1583 bg.BackgroundColor3 = Color3.new(0,0,0)
1584 bg.BackgroundTransparency = 0
1585 bg.Size = UDim2.new(1,0,1,0)
1586 bg.Position = UDim2.new(0,0,0,0)
1587 bg.ZIndex = 10
1588 repeat wait(0.1) until not Effects.effectin or not scr
1589 if scr then scr:Destroy() end
1590 elseif mode=='trippy' then
1591 Effects.effectin=true
1592 local v=service.Players.LocalPlayer
1593 local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = client.CodeName.."EFFECTGUITRIPPY"
1594 local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10
1595 repeat wait(1/44)
1596 bg.BackgroundColor3 = Color3.new(math.random(255)/255,math.random(255)/255,math.random(255)/255)
1597 until not Effects.effectin
1598 if scr then scr:Destroy() end
1599 elseif mode=='loopheal' then
1600 Effects.loophealin=true
1601 local hum=localplayer.Character:FindFirstChild("Humanoid")
1602 if hum then
1603 repeat wait(0.1)
1604 hum.Health = hum.MaxHealth
1605 hum.Changed:connect(function()
1606 hum.Humanoid.Health = hum.MaxHealth
1607 end)
1608 until not Effects.loophealin or not hum or not hum.Parent
1609 end
1610 elseif mode=='unloopheal' then
1611 Effects.loophealin=false
1612 elseif mode=='loopkill' then
1613 Effects.killin=true
1614 local plr = localplayer
1615 local tab={...}
1616 local a=tab[1]
1617 for i = 1, a do
1618 if Effects.killin==false then return end
1619 repeat wait(0.1) until plr.Character:findFirstChild("Humanoid") and plr.Character.Humanoid.Health ~= 0
1620 plr.Character:BreakJoints()
1621 end
1622 Effects.killin=false
1623 elseif mode=='unloopkill' then
1624 Effects.killin=false
1625 elseif mode=='strobe' then
1626 Effects.effectin=true
1627 local v=service.Players.LocalPlayer
1628 local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = client.CodeName.."EFFECTGUISTROBE"
1629 local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10
1630 repeat wait(1/44)
1631 bg.BackgroundColor3 = Color3.new(1,1,1)
1632 wait(1/44)
1633 bg.BackgroundColor3 = Color3.new(0,0,0)
1634 until not Effects.effectin or not scr
1635 if scr then scr:Destroy() end
1636 elseif mode=='lifeoftheparty' then
1637 Effects.effectin=true
1638 local old = mouse.Icon
1639 mouse.Icon="rbxassetid://33410686"
1640 service.StarterGui:SetCoreGuiEnabled("All",false)
1641 local scr = Instance.new("ScreenGui", localplayer.PlayerGui) scr.Name = client.CodeName.."EFFECTGUIHELLO"
1642 local frame = Instance.new("Frame",scr)
1643 frame.BackgroundColor3=Color3.new(0,0,0)
1644 frame.Size=UDim2.new(1,0,1,50)
1645 frame.Position=UDim2.new(0,0,0,-50)
1646 local img = Instance.new("ImageLabel",frame)
1647 img.Position=UDim2.new(0,0,0,0)
1648 img.Size=UDim2.new(1,0,1,0)
1649 img.BorderSizePixel=0
1650 img.BackgroundColor3=Color3.new(0,0,0)
1651 local textures = {
1652 299733203;
1653 299733248;
1654 299733284;
1655 299733309;
1656 299733355;
1657 299733386;
1658 299733404;
1659 299733425;
1660 299733472;
1661 299733489;
1662 299733501;
1663 299733523;
1664 299733544;
1665 299733551;
1666 299733564;
1667 299733570;
1668 299733581;
1669 299733597;
1670 299733609;
1671 299733621;
1672 299733632;
1673 299733640;
1674 299733648;
1675 299733663;
1676 299733674;
1677 299733694;
1678
1679 }
1680 cPcall(client.PlayAudio,172906410,1,1,true)
1681 while Effects.effectin and scr.Parent do
1682 for i=1,#textures do
1683 img.Image = "rbxassetid://"..textures[i]
1684 wait(0.1)
1685 end
1686 end
1687 Pcall(client.StopAudio,172906410)
1688 if scr.Parent then scr:Destroy() end
1689 service.StarterGui:SetCoreGuiEnabled("All",true)
1690 mouse.Icon=old
1691 elseif mode=='spookygui' then
1692 Effects.effectin=true
1693 local scr = Instance.new("ScreenGui", localplayer.PlayerGui) scr.Name = client.CodeName.."EFFECTGUISPOOKY"
1694 local frame = Instance.new("Frame",scr)
1695 frame.BackgroundColor3=Color3.new(0,0,0)
1696 frame.Size=UDim2.new(1,0,1,50)
1697 frame.Position=UDim2.new(0,0,0,-50)
1698 local img = Instance.new("ImageLabel",frame)
1699 img.Position=UDim2.new(0,0,0,0)
1700 img.Size=UDim2.new(1,0,1,0)
1701 img.BorderSizePixel=0
1702 img.BackgroundColor3=Color3.new(0,0,0)
1703 local textures = {
1704 299735022;
1705 299735054;
1706 299735082;
1707 299735103;
1708 299735133;
1709 299735156;
1710 299735177;
1711 299735198;
1712 299735219;
1713 299735245;
1714 299735269;
1715 299735289;
1716 299735304;
1717 299735320;
1718 299735332;
1719 299735361;
1720 299735379;
1721 }
1722 cPcall(client.PlayAudio,174270407,1,1,true)
1723 while Effects.effectin and scr.Parent do
1724 for i=1,#textures do
1725 img.Image = "rbxassetid://"..textures[i]
1726 wait(0.1)
1727 end
1728 end
1729 Pcall(client.StopAudio,174270407)
1730 if scr and scr.Parent then scr:Destroy() end
1731 elseif mode=='rainbowify' then
1732 Effects.effectin=true
1733 repeat wait(0.1)
1734 local clr = BrickColor.random()
1735 for i, v in pairs(localplayer.Character:children()) do
1736 if v:IsA("BasePart") and v.Name~='HumanoidRootPart' and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then
1737 v.BrickColor = clr
1738 v.Reflectance = 0
1739 v.Transparency = 0
1740 elseif v:findFirstChild("NameTag") then
1741 v.Head.BrickColor = clr
1742 v.Head.Reflectance = 0
1743 v.Head.Transparency = 0
1744 v.Parent.Head.Transparency = 1
1745 end
1746 end
1747 until not Effects.effectin
1748 elseif mode=='flashish' then
1749 repeat wait(0.1)
1750 for i, v in pairs(localplayer.Character:children()) do
1751 if v:IsA("BasePart") and v.Name~='HumanoidRootPart' and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then
1752 v.BrickColor = BrickColor.new("Institutional white") v.Reflectance = 0 v.Transparency = 0
1753 elseif v:findFirstChild("NameTag") then
1754 v.Head.BrickColor = BrickColor.new("Institutional white")
1755 v.Head.Reflectance = 0 v.Head.Transparency = 0
1756 v.Parent.Head.Transparency = 1 end end
1757 wait(1/44)
1758 for i, v in pairs(service.Players.LocalPlayer.Character:children()) do
1759 if v:IsA("BasePart") and v.Name~='HumanoidRootPart' and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then
1760 v.BrickColor = BrickColor.new("Really black")
1761 v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then
1762 v.Head.BrickColor = BrickColor.new("Really black") v.Head.Reflectance = 0
1763 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end
1764 until not Effects.effectin
1765 elseif mode=='slip' then
1766 Effects.slidin=true
1767 local vel=Instance.new('BodyVelocity',localplayer.Character.Torso)
1768 vel.Name='Ice_Velocity'
1769 vel.maxForce=Vector3.new(100000000,0,100000000)
1770 repeat
1771 vel.velocity=Vector3.new(localplayer.Character.Torso.Velocity.X,0,localplayer.Character.Torso.Velocity.Z)
1772 wait(1/60)
1773 until not Effects.slidin
1774 if vel then vel:Destroy() end
1775 elseif mode=='unslip' then
1776 Effects.slidin=false
1777 elseif mode=='seizure' then
1778 Effects.seizin=true
1779 local char=localplayer.Character
1780 local origvel=char.Torso.Velocity
1781 local origrot=char.Torso.RotVelocity
1782 repeat wait(0.1)
1783 char.Humanoid.PlatformStand = true
1784 char.Torso.Velocity = Vector3.new(math.random(-10,10),-5,math.random(-10,10))
1785 char.Torso.RotVelocity = Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5))
1786 until not Effects.seizin
1787 char.Humanoid.PlatformStand = false
1788 char.Torso.Velocity = origvel
1789 char.Torso.RotVelocity = origrot
1790 elseif mode=='unseizure' then
1791 Effects.seizin=false
1792 elseif mode=='fly' then
1793 Effects.flyin=true
1794 localplayer.Character:WaitForChild("Torso")
1795 local torso = localplayer.Character.Torso
1796 local flying = true
1797 local speed=0
1798 local keys={a=false,d=false,w=false,s=false}
1799 local e1
1800 local e2
1801 local function start()
1802 local pos = Instance.new("BodyPosition",torso)
1803 local gyro = Instance.new("BodyGyro",torso)
1804 pos.Name="EPIXPOS"
1805 pos.maxForce = Vector3.new(math.huge, math.huge, math.huge)
1806 pos.position = torso.Position
1807 gyro.maxTorque = Vector3.new(9e9, 9e9, 9e9)
1808 gyro.cframe = torso.CFrame
1809 torso.Parent.Humanoid.Died:connect(function()
1810 if gyro then gyro:Destroy() end
1811 if pos then pos:Destroy() end
1812 flying=false
1813 localplayer.Character.Humanoid.PlatformStand=false
1814 speed=0
1815 end)
1816 repeat
1817 wait(0.1)
1818 localplayer.Character.Humanoid.PlatformStand=true
1819 local new=gyro.cframe - gyro.cframe.p + pos.position
1820 if not keys.w and not keys.s and not keys.a and not keys.d then
1821 speed=1
1822 end
1823 if keys.w then
1824 new = new + workspace.CurrentCamera.CoordinateFrame.lookVector * speed
1825 speed=speed+0.15
1826 end
1827 if keys.s then
1828 new = new - workspace.CurrentCamera.CoordinateFrame.lookVector * speed
1829 speed=speed+0.15
1830 end
1831 if keys.d then
1832 new = new * CFrame.new(speed,0,0)
1833 speed=speed+0.15
1834 end
1835 if keys.a then
1836 new = new * CFrame.new(-speed,0,0)
1837 speed=speed+0.15
1838 end
1839 if speed>10 then
1840 speed=10
1841 end
1842 pos.position=new.p
1843 if keys.w then
1844 gyro.cframe = workspace.CurrentCamera.CoordinateFrame*CFrame.Angles(-math.rad(speed*7.5),0,0)
1845 elseif keys.s then
1846 gyro.cframe = workspace.CurrentCamera.CoordinateFrame*CFrame.Angles(math.rad(speed*7.5),0,0)
1847 else
1848 gyro.cframe = workspace.CurrentCamera.CoordinateFrame
1849 end
1850 until not Effects.flyin or not flying or not gyro or not pos or not pos.Parent
1851 if gyro then gyro:Destroy() end
1852 if pos then pos:Destroy() end
1853 flying=false
1854 localplayer.Character.Humanoid.PlatformStand=false
1855 speed=0
1856 end
1857 e1=mouse.KeyDown:connect(function(key)
1858 if not Effects.flyin or not torso or not torso.Parent then Effects.flyin=false e1:disconnect() e2:disconnect() return end
1859 if key=="w" then
1860 keys.w=true
1861 elseif key=="s" then
1862 keys.s=true
1863 elseif key=="a" then
1864 keys.a=true
1865 elseif key=="d" then
1866 keys.d=true
1867 elseif key=="e" then
1868 if flying then
1869 flying=false
1870 else
1871 flying=true
1872 start()
1873 end
1874 end
1875 end)
1876 e2=mouse.KeyUp:connect(function(key)
1877 if not Effects.flyin then e1:disconnect() e2:disconnect() end
1878 if key=="w" then
1879 keys.w=false
1880 elseif key=="s" then
1881 keys.s=false
1882 elseif key=="a" then
1883 keys.a=false
1884 elseif key=="d" then
1885 keys.d=false
1886 end
1887 end)
1888 start()
1889 elseif mode=='unfly' then
1890 Effects.flyin=false
1891 elseif mode=='loopfling' then
1892 Effects.flingin=true
1893 local torso=localplayer.Character:findFirstChild("Torso")
1894 local hum=localplayer.Character:findFirstChild("Humanoid")
1895 if torso and hum then
1896 repeat
1897 local xran local zran
1898 repeat xran = math.random(-9999,9999) until math.abs(xran) >= 5555
1899 repeat zran = math.random(-9999,9999) until math.abs(zran) >= 5555
1900 hum.Sit = true torso.Velocity = Vector3.new(0,0,0)
1901 local frc = Instance.new("BodyForce", torso) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) service.Debris:AddItem(frc,.1)
1902 wait(1) until not Effects.flingin or not torso or not hum
1903 end
1904 elseif mode=='unloopfling' then
1905 Effects.flingin=false
1906 elseif mode=='dance' then
1907 Effects.effectin=true
1908 local anim=Instance.new('Animation',localplayer.Character)
1909 anim.AnimationId='http://www.roblox.com/Asset?ID=27789359'
1910 anim.Name='Dance'
1911 local human = localplayer.Character:FindFirstChild("Humanoid")
1912 local dancer = human:LoadAnimation(anim)
1913 dancer:Play()
1914 repeat wait(0.1) until not Effects.effectin
1915 dancer:Stop()
1916 dancer:Destroy()
1917 end
1918end
1919
1920client.LoadAnimation=function(id)
1921 local anim=Instance.new('Animation',localplayer.Character)
1922 anim.AnimationId='http://www.roblox.com/Asset?ID='..id
1923 anim.Name='Anim'
1924 local human = localplayer.Character:FindFirstChild("Humanoid")
1925 local anim = human:LoadAnimation(anim)
1926 anim:Play()
1927end
1928
1929client.ShowAd=function()
1930 service.AdService:ShowVideoAd()
1931end
1932
1933--[[
1934client.MoveCape=function()
1935 local p=localplayer.Character:FindFirstChild('EpicCape')
1936 if p then
1937 p.Anchored=false
1938 local torso=localplayer.Character:WaitForChild('Torso')
1939 local motor1 = Instance.new("Motor", p)
1940 motor1.Part0 = p
1941 motor1.Part1 = torso
1942 motor1.MaxVelocity = .01
1943 motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0)
1944 motor1.C1 = CFrame.new(0,1,torso.Size.Z/2)*CFrame.Angles(0,math.rad(90),0)--.45
1945 local wave = false
1946 repeat wait(1/44)
1947 local ang = 0.1
1948 local oldmag = torso.Velocity.magnitude
1949 local mv = .002
1950 if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end
1951 ang = ang + math.min(torso.Velocity.magnitude/11, .5)
1952 motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv
1953 motor1.DesiredAngle = -ang
1954 if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end
1955 repeat wait(0.1) until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag) >= (torso.Velocity.magnitude/10) + 1
1956 if torso.Velocity.magnitude < .1 then wait(.1) end
1957 until not p or p.Parent ~= torso.Parent
1958 end
1959end
1960--]]
1961
1962client.UnCape=function()
1963 pcall(function() service.LocalContainer().Epix_Cape:Destroy() end)
1964end
1965
1966client.DonorCape=function(material,color,decal,reflect)
1967 localplayer.Character:WaitForChild("Torso")
1968 local torso = localplayer.Character.Torso
1969 local p = Instance.new("Part",service.LocalContainer())
1970 p.Name = "Epix_Cape"
1971 p.Anchored = true
1972 p.Transparency=0.01
1973 p.Material=material
1974 p.CanCollide = false
1975 p.TopSurface = 0
1976 p.BottomSurface = 0
1977 p.BrickColor = BrickColor.new(color) or BrickColor.new("White")
1978 if reflect then
1979 p.Reflectance=reflect
1980 end
1981 if decal and decal~=0 then
1982 local dec = Instance.new("Decal", p)
1983 dec.Face = 2
1984 dec.Texture = "http://www.roblox.com/asset/?id="..decal
1985 dec.Transparency=0
1986 end
1987 p.formFactor = "Custom"
1988 p.Size = Vector3.new(.2,.2,.2)
1989 local msh = Instance.new("BlockMesh", p)
1990 msh.Scale = Vector3.new(9,17.5,.5)
1991 wait(0.1)
1992 p.Anchored=false
1993 local motor1 = Instance.new("Motor", p)
1994 motor1.Part0 = p
1995 motor1.Part1 = torso
1996 motor1.MaxVelocity = .01
1997 motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0)
1998 motor1.C1 = CFrame.new(0,1,torso.Size.Z/2)*CFrame.Angles(0,math.rad(90),0)--.45
1999 local wave = false
2000 repeat wait(1/44)
2001 local ang = 0.1
2002 local oldmag = torso.Velocity.magnitude
2003 local mv = .002
2004 if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end
2005 ang = ang + math.min(torso.Velocity.magnitude/11, .5)
2006 motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv
2007 motor1.DesiredAngle = -ang
2008 if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end
2009 repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag) >= (torso.Velocity.magnitude/10) + 1
2010 if torso.Velocity.magnitude < .1 then wait(.1) end
2011 until p.Parent ~= service.LocalContainer() or p.Parent==nil or not p
2012end
2013
2014client.LaunchAnti=function(mode)
2015 if mode=='speed' then
2016 while wait(1) do
2017 cPcall(function()
2018 if select(2,pcall(workspace.GetRealPhysicsFPS)):match('GetRealPhysicsFPS') then
2019 if workspace:GetRealPhysicsFPS() > tonumber(client.RandiSpeed) then
2020 client.Remote('Exploited','kick','Speed exploiting')
2021 end
2022 else
2023 client.Remote('Exploited','kick','Method change detected.')
2024 end
2025 end)
2026 end
2027 elseif mode=='locklighting' then
2028 local lightSets = client.GetReturn("Setting","LightingSettings")
2029 service.Lighting.Changed:connect(function(c)
2030 if lightSets[c]~=nil then
2031 service.Lighting[c]=lightSets[c]
2032 local data={}
2033 data.Property=c
2034 client.Remote("AddReplication","LChanged",data)
2035 end
2036 end)
2037 elseif mode=='nameid' then
2038 while wait(10) do
2039 if tostring(localplayer.userId)~=client.Decrypt(client.RealID,"UserID") or tostring(localplayer.Name)~=client.Decrypt(client.RealName,"UserName") then
2040 client.Remote('Exploited','log [Local kick]','Local name/userID does not match real name/userID')
2041 wait(0.1)
2042 discClient()
2043 end
2044 end
2045 elseif mode=='gui' then
2046 cPcall(function()
2047 for i,g in pairs(playergui:children()) do
2048 if g:IsA("PlayerGui") and not g.Name:find(client.CodeName) then
2049 local good=false
2050 for i,v in pairs(client.AllowedGuiList) do
2051 if g.Name==v then
2052 good=true
2053 end
2054 end
2055 if not good then g:Destroy() client.Remote("Exploited","log","GUI detected") end
2056 end
2057 end
2058 end)
2059 playergui.ChildAdded:connect(function(g)
2060 cPcall(function()
2061 if g:IsA("PlayerGui") and not g.Name:find(client.CodeName) then
2062 local good=false
2063 for i,v in pairs(client.AllowedGuiList) do
2064 if g.Name==v then
2065 good=true
2066 end
2067 end
2068 if not good then g:Destroy() client.Remote("Exploited","log","Building tools detected") end
2069 end
2070 end)
2071 end)
2072 elseif mode=='tool' then
2073 localplayer:WaitForChild("Backpack")
2074 cPcall(function()
2075 for i,t in pairs(localplayer.Backpack:children()) do
2076 client.Remote("GetSetting","AntiBuildingTools")
2077 client.Remote("GetSetting","AntiTools")
2078 client.Remote("GetSetting","AllowedToolsList")
2079 if (t:IsA("Tool") or t:IsA("HopperBin")) and not t:FindFirstChild(client.CodeName..t.Name) then
2080 if client.AntiBuildingTools and t:IsA("HopperBin") and (t.BinType==Enum.BinType.Grab or t.BinType==Enum.BinType.Clone or t.BinType==Enum.BinType.Hammer or t.BinType==Enum.BinType.GameTool) then
2081 t.Active=false
2082 t:Destroy()
2083 client.Remote("Exploited","log","Building tools detected")
2084 end
2085 if client.AntiTools then
2086 local good=false
2087 for i,v in pairs(client.AllowedToolsList) do
2088 if t.Name==v then
2089 good=true
2090 end
2091 end
2092 if not good then t:Destroy() client.Remote("Exploited","log","Tool detected") end
2093 end
2094 end
2095 end
2096 end)
2097 localplayer.Backpack.ChildAdded:connect(function(t)
2098 cPcall(function()
2099 client.Remote("GetSetting","AntiBuildingTools")
2100 client.Remote("GetSetting","AntiTools")
2101 client.Remote("GetSetting","AllowedToolsList")
2102 if (t:IsA("Tool") or t:IsA("HopperBin")) and not t:FindFirstChild(client.CodeName..t.Name) then
2103 if client.AntiBuildingTools and t:IsA("HopperBin") and (t.BinType==Enum.BinType.Grab or t.BinType==Enum.BinType.Clone or t.BinType==Enum.BinType.Hammer or t.BinType==Enum.BinType.GameTool) then
2104 t:Destroy()
2105 client.Remote("Exploited","log","Building tools detected")
2106 end
2107 if client.AntiTools then
2108 local good=false
2109 for i,v in pairs(client.AllowedToolsList) do
2110 if t.Name==v then
2111 good=true
2112 end
2113 end
2114 if not good then t:Destroy() client.Remote("Exploited","log","Tool detected") end
2115 end
2116 end
2117 end)
2118 end)
2119 elseif mode=='ce' then
2120 for i,v in pairs(game.LogService:GetLogHistory()) do
2121 for k,m in pairs(v) do
2122 if type(m)=='string' and m:lower():find('program files') and m:lower():find('cheat engine') and m:lower():find('failed to resolve texture format') then
2123 client.Remote('Exploited','kick','Cheat Engine installation detected.')
2124 end
2125 end
2126 end
2127 elseif mode=='humanoidstate' then
2128 wait(1)
2129 local humanoid=localplayer.Character:WaitForChild("Humanoid")
2130 local event
2131 local doing=true
2132 event=humanoid.StateChanged:connect(function(old,new)
2133 if not doing then event:disconnect() end
2134 if new==Enum.HumanoidStateType.StrafingNoPhysics and doing then
2135 client.Remote("Exploited","kill","Noclipping.")
2136 doing=false
2137 event:disconnect()
2138 end
2139 end)
2140 while humanoid and humanoid.Parent and humanoid.Parent.Parent and doing and wait(0.1) do
2141 if humanoid:GetState()==Enum.HumanoidStateType.StrafingNoPhysics and doing then
2142 client.Remote("Exploited","kill","Noclipping.")
2143 doing=false
2144 end
2145 end
2146 elseif mode=='paranoid' then
2147 wait(1)
2148 local char = localplayer.Character
2149 local torso = char:WaitForChild("Torso")
2150 local humPart = char:WaitForChild("HumanoidRootPart")
2151 local hum = char:WaitForChild("Humanoid")
2152 while torso and humPart and torso.Parent==char and humPart.Parent==char and char.Parent~=nil and hum.Health>0 and hum and hum.Parent and wait(1) do
2153 if (humPart.Position-torso.Position).magnitude>10 and hum and hum.Health>0 then
2154 client.Remote("Exploited","kill","Paranoid detected.")
2155 end
2156 end
2157 elseif mode=='detection' then
2158 local lookFor={'stigma','sevenscript',"a".."ssh".."ax",'elysian','current identity is 0'}
2159 local function check(Message)
2160 for i,v in pairs(lookFor) do
2161 if Message:lower():find(v:lower()) then
2162 return true
2163 end
2164 end
2165 end
2166 local function logFind(str)
2167 for i,v in pairs(game.LogService:GetLogHistory()) do
2168 if v.message==str then
2169 return true
2170 end
2171 end
2172 end
2173 service.LogService.MessageOut:connect(function(Message, Type)
2174 if check(Message) then client.Remote('Exploited','crash','Exploit detected. '..Message) end
2175 end)
2176 --[[
2177 local errEvent
2178 local kicking=false
2179 errEvent=service.ScriptContext.Error:connect(function(Message, Trace, Script)
2180 if not kicking and (not Script or ((not Trace or Trace==""))) then
2181 local tab=service.LogService:GetLogHistory()
2182 local continue=false
2183 if Script then
2184 for i,v in pairs(tab) do
2185 if v.message==Message and tab[i+1] and tab[i+1].message==Trace then
2186 continue=true
2187 end
2188 end
2189 else
2190 continue=true
2191 end
2192 if continue then
2193 if tostring(Trace):find("CoreGui") or tostring(Trace):find("PlayerScripts") or tostring(Trace):match("^(%S*)%.(%S*)") then return end
2194 client.Remote("Exploited","kick","Exploit detected. Traceless/Scriptless script.")
2195 localplayer:Kick(tostring((Script and Script:GetFullName()) or Script).. " | "..tostring(Trace))errEvent:disconnect() --Seems to have problems sometimes. Hopefully people who get wrongfully kicked will send a screenshot.
2196 kicking=true
2197 end
2198 end
2199 end)--]]
2200
2201 service.NetworkClient.ChildRemoved:connect(function(child)
2202 wait(30)
2203 client.KillClient()
2204 end)
2205
2206 local function chkObj(item)
2207 if client.ObjRLocked(item) then
2208 local cont=true
2209 local ran,failz=pcall(function()
2210 local checks={
2211 service.Workspace;
2212 service.Players;
2213 service.ReplicatedStorage;
2214 service.ReplicatedFirst;
2215 service.Lighting;
2216 service.SoundService;
2217 --service.StarterGui;
2218 service.StarterPack;
2219 service.StarterPlayer;
2220 service.Teams;
2221 service.HttpService;
2222 }
2223 for i,v in pairs(checks) do
2224 if item:IsDescendantOf(v) then cont=false end
2225 end
2226 end)
2227 if cont then
2228 local cont=false
2229 local testName=tostring(math.random()..math.random())
2230 local ran,err=pcall(function()
2231 local test=item[testName]
2232 end)
2233 if err then
2234 local class=err:match(testName.." is not a valid member of (.*)")
2235 local checks={
2236 "Script";
2237 "LocalScript";
2238 "CoreScript";
2239 "ScreenGui";
2240 "Frame";
2241 "TextLabel";
2242 "TextButton";
2243 "ImageLabel";
2244 "TextBox";
2245 "ImageButton";
2246 }
2247 for i,v in pairs(checks) do
2248 if class==v then
2249 cont = true
2250 end
2251 end
2252 end
2253 if cont then
2254 local testName=tostring(math.random()..math.random())
2255 local ye,err=pcall(function()
2256 game:GetService("GuiService"):AddSelectionParent(testName, item) -- Christbru figured out the detection method
2257 game:GetService("GuiService"):RemoveSelectionGroup(testName)
2258 end)
2259 if err and err:find(testName) and err:find("GuiService:") then return true end
2260 wait(0.5)
2261 for i,v in pairs(service.LogService:GetLogHistory()) do
2262 if v.message:find(testName) and v.message:find("GuiService:") then
2263 return true
2264 end
2265 end
2266 end
2267 end
2268 end
2269 end
2270 local doingCrash=false
2271 game.DescendantAdded:connect(function(c)
2272 if chkObj(c) and type(c)=="userdata" and not doingCrash then
2273 doingCrash=true
2274 client.Remote("Exploited","crash","Exploit Detected.")
2275 wait(0.1)
2276 client.KillClient()
2277 end
2278 end)
2279 while wait(10) do
2280 for i,v in pairs(service.LogService:GetLogHistory()) do
2281 if check(v.message) then
2282 client.Remote('Exploited','crash','Exploit detected.')
2283 wait(0.1)
2284 client.KillClient()
2285 end
2286 end
2287 --[[
2288 for i,v in pairs(workspace:children()) do
2289 if v.Name:find("qORBp") then
2290 local player=v.Name:match("^(.*)'s")
2291 print(player)
2292 if player==localplayer.Name then
2293 client.Remote("Exploited","kick","qORBp Detected")
2294 end
2295 end
2296 end
2297 --]] --Can be abused by exploiters by just changing the qorbs name :l
2298 if not select(2,pcall(workspace.GetRealPhysicsFPS)):match('GetRealPhysicsFPS') then client.Remote("Exploited","crash","Exploit detected.") wait(0.5) client.KillClient() end
2299 local ran,err=pcall(function() local func,err=loadstring("print('LOADSTRING TEST')") end)
2300 if ran then client.Remote('Exploited','crash','Exploit detected. Loadstring usable.') wait(0.5) client.KillClient() end
2301 local ran,err=pcall(function() game:GetService("CoreGui").RobloxLocked=true end)
2302 if ran then client.Remote('Exploited','crash','Exploit detected. RobloxLocked usable.') wait(0.5) client.KillClient() end
2303 wait(15)
2304 end
2305 elseif mode=="antideletetool" then
2306 Effects.AntiDeleteTool = true
2307 local name = math.random(1000,999999).."b"
2308 local part=Instance.new("Part")
2309 part.Name=name
2310 part.CanCollide=false
2311 part.Anchored=true
2312 part.Size=Vector3.new(1000,1000,10)
2313 part.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-11)
2314 part.Parent=workspace.CurrentCamera
2315 part.Transparency=1
2316 local cam=workspace.CurrentCamera
2317 local event
2318 cam.Changed:connect(function(p)
2319 if cam.Parent~=workspace then
2320 event:disconnect()
2321 Effects.AntiDeleteTool=false
2322 client.LaunchAnti("antideletetool")
2323 end
2324 end)
2325 event=cam.ChildRemoved:connect(function(c)
2326 if (c==part or not part or not part.Parent or part.Parent~=workspace.CurrentCamera) and Effects.AntiDeleteTool then
2327 part=Instance.new("Part")
2328 part.Name=name
2329 part.CanCollide=false
2330 part.Anchored=true
2331 part.Size=Vector3.new(1000,1000,10)
2332 part.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-11)
2333 part.Parent=workspace.CurrentCamera
2334 part.Transparency=1
2335 client.Remote("Exploited","kick","Exploit detected. Building Tools/Delete tool.")
2336 end
2337 end)
2338 while Effects.AntiDeleteTool and wait(0.1) and cam do
2339 local part=workspace.CurrentCamera:WaitForChild(name)
2340 part.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-11)
2341 end
2342 event:disconnect()
2343 part:Destroy()
2344 elseif mode=='god' then
2345 local humanoid=localplayer.Character:WaitForChild('Humanoid')
2346 local bob=true localplayer.Character.Humanoid.Died:connect(function() bob=false end)
2347 local moos=localplayer.Character.Humanoid.Changed:connect(function(c)
2348 if not bob or humanoid==nil then moos:disconnect() return end
2349 if tostring(localplayer.Character.Humanoid.Health)=="-1.#IND" then
2350 client.Remote('Exploited','kick','Infinite Health [Godded]')
2351 end
2352 end)
2353 localplayer.Character.Humanoid.Health=localplayer.Character.Humanoid.Health-1
2354 elseif mode=='selection' then
2355 game:GetService("Selection").SelectionChanged:connect(function() client.Remote('Exploited','kick','Selection was changed.') end)
2356 end
2357end
2358
2359client.setEffectVal=function(val,value)
2360 Effects[val]=value
2361end
2362
2363client.setCamProperty=function(prop,value)
2364 local cam=workspace.CurrentCamera
2365 if cam[prop] then
2366 cam[prop]=value
2367 end
2368end
2369
2370client.Nilify=function()
2371LocalPlayer=localplayer
2372Camera=workspace.CurrentCamera
2373LocalPlayer.Parent=nil
2374if LocalPlayer.Character then LocalPlayer.Character:Destroy() end
2375LocalPlayer.Character = nil
2376Camera.CameraType='Custom'
2377Camera.CameraSubject=nil
2378function make()
2379f = Instance.new("Part",workspace)
2380f.Name = 'Epix Probe '..LocalPlayer.Name
2381f.Anchored = true
2382f.Locked = true
2383f.Size = Vector3.new(1,1,1)
2384f.Transparency = 0.5
2385f.FormFactor = "Custom"
2386f.BrickColor = BrickColor.new("Really black")
2387f.Material = "Plastic"
2388f.Shape = "Ball"
2389f.TopSurface = "Smooth"
2390f.BottomSurface = "Smooth"
2391f.Reflectance = 0
2392f.CanCollide = false
2393light = Instance.new('PointLight',f)
2394light.Range = 20
2395light.Brightness = 1
2396light.Color = Color3.new(1,1,1)
2397light.Enabled = true
2398coroutine.wrap(function()
2399while f:IsDescendantOf(workspace) and not LocalPlayer.Character and wait(0.1) do
2400f.CFrame = Camera.Focus
2401end
2402f:Destroy()
2403end)()
2404end
2405make()
2406coroutine.wrap(function()
2407workspace.ChildRemoved:connect(function(c)
2408if not f or f.Parent~=workspace or not f:IsDescendantOf(workspace) or c==f then
2409make()
2410end
2411end)
2412end)()
2413coroutine.wrap(function()
2414LocalPlayer.Chatted:connect(function(msg)
2415if msg:lower()=='poff' then
2416light.Enabled=false
2417f.Transparency=1
2418elseif msg:lower()=='pon' then
2419light.Enabled=true
2420f.Transparency=0.5
2421end
2422if light.Enabled==true then
2423service.ChatService:Chat(f,LocalPlayer.Name..': '..msg,Enum.ChatColor.Red)
2424end
2425end)
2426end)()
2427end
2428
2429client.Drug=function()
2430 local v=localplayer
2431 coroutine.wrap(function()
2432 local msgs={{Msg='We need more..... philosophy... ya know?',Color=Enum.ChatColor.Green},{Msg='OH MY GOD STOP TRYING TO EAT MY SOUL',Color=Enum.ChatColor.Red},{Msg='I.... CANT.... FEEL.... MY FACE',Color=Enum.ChatColor.Red},{Msg='DO YOU SEE THE TURTLE?!?!',Color=Enum.ChatColor.Red},{Msg='Omg puff the magic dragon!!!!',Color=Enum.ChatColor.Green},{Msg='Omg double wat',Color=Enum.ChatColor.Blue},{Msg='WHO STOLE MY LEGS',Color=Enum.ChatColor.Red},{Msg='I... I think I might be dead....',Color=Enum.ChatColor.Blue},{Msg="I'M GOING TO EAT YOUR FACE",Color=Enum.ChatColor.Red},{Msg='Hey... Like... What if, like, listen, are you listening? What if.. like.. earth.. was a ball?',Color=Enum.ChatColor.Green},{Msg='WHY IS EVERYBODY TALKING SO LOUD AHHHHHH',Color=Enum.ChatColor.Red},{Msg='Woooo man do you see the elephent... theres an elephent man..its... PURPLE OHMY GOD ITS A SIGN FROM LIKE THE WARDROBE..',Color=Enum.ChatColor.Blue}}
2433 local chat=service.ChatService
2434 coroutine.wrap(function()
2435 local val=Instance.new('StringValue',v.Character.Head)
2436 local old=math.random()
2437 coroutine.wrap(function()
2438 while v and v.Character and v.Character.Head and val and val.Parent==v.Character.Head and v.Character.Humanoid.Health>0 do
2439 local new=math.random(1,#msgs)
2440 for k,m in pairs(msgs) do
2441 if new==k then
2442 if old~=new then
2443 old=new
2444 print(m.Msg)
2445 chat:Chat(v.Character.Head,m.Msg,m.Color)
2446 end
2447 end
2448 end
2449 wait(5)
2450 end
2451 end)()
2452 v.Character.Humanoid.WalkSpeed=-16
2453 local startspaz=false
2454 coroutine.wrap(function()
2455 local hum=service.Players.LocalPlayer.Character.Humanoid
2456 repeat
2457 wait(0.1)
2458 workspace.CurrentCamera.FieldOfView=math.random(20,80)
2459 service.Players.LocalPlayer.Character.Humanoid.Health=service.Players.LocalPlayer.Character.Humanoid.Health-0.5
2460 if startspaz then
2461 service.Players.LocalPlayer.Character.Humanoid.PlatformStand = true
2462 service.Players.LocalPlayer.Character.Torso.Velocity = Vector3.new(math.random(-10,10),-5,math.random(-10,10))
2463 service.Players.LocalPlayer.Character.Torso.RotVelocity = Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5))
2464 end
2465 until not hum or not hum.Parent or hum.Health<=0 or not service.Players.LocalPlayer.Character:FindFirstChild('Torso')
2466 workspace.CurrentCamera.FieldOfView=70
2467 end)()
2468 wait(10)
2469 coroutine.wrap(function()
2470 local torso = service.Players.LocalPlayer.Character:findFirstChild("Torso")
2471 local bg = Instance.new("BodyGyro", torso)
2472 bg.Name = "SPINNER"
2473 bg.maxTorque = Vector3.new(0,math.huge,0)
2474 bg.P = 11111
2475 bg.cframe = torso.CFrame
2476 repeat wait(1/44)
2477 bg.cframe = bg.cframe * CFrame.Angles(0,math.rad(30),0)
2478 until not bg or bg.Parent ~= torso
2479 end)()
2480 wait(20)
2481 startspaz=true
2482 end)()
2483end)()
2484end
2485
2486client.Glitch=function(type,int)
2487 if type=='off' then
2488 Effects.glitching=false
2489 else
2490 Effects.glitching=false
2491 wait(0.5)
2492 local char=localplayer.Character
2493 local torso=char:FindFirstChild('Torso')
2494 local posed=false
2495 Effects.glitching=true
2496 --repeat
2497 Effects.glitchrun=service.RunService.RenderStepped:connect(function()
2498 if not Effects.glitching then Effects.glitchrun:disconnect() end
2499 if posed then
2500 if type=='ghost' then
2501 torso.CFrame=torso.CFrame+Vector3.new(((tonumber(int) or 100)*2),0,0)
2502 elseif type=='trippy' then
2503 torso.CFrame=torso.CFrame*CFrame.new(((tonumber(int) or 100)*2),0,0)
2504 elseif type=='vibrate' then
2505 local num=math.random(1,4)
2506 if num==1 then
2507 torso.CFrame=torso.CFrame*CFrame.new(((tonumber(int)*2) or 100),0,0)
2508 elseif num==2 then
2509 torso.CFrame=torso.CFrame*CFrame.new(-((tonumber(int)*2) or 100),0,0)
2510 elseif num==3 then
2511 torso.CFrame=torso.CFrame*CFrame.new(0,0,-((tonumber(int)*2) or 100))
2512 elseif num==4 then
2513 torso.CFrame=torso.CFrame*CFrame.new(0,0,((tonumber(int)*2) or 100))
2514 end
2515 end
2516 posed=false
2517 else
2518 if type=='ghost' then
2519 torso.CFrame=torso.CFrame+Vector3.new(-((tonumber(int)*2) or 100),0,0)
2520 elseif type=='trippy' then
2521 torso.CFrame=torso.CFrame*CFrame.new(-((tonumber(int)*2) or 100),0,0)
2522 elseif type=='vibrate' then
2523 local num=math.random(1,4)
2524 if num==1 then
2525 torso.CFrame=torso.CFrame*CFrame.new(((tonumber(int)*2) or 100),0,0)
2526 elseif num==2 then
2527 torso.CFrame=torso.CFrame*CFrame.new(-((tonumber(int)*2) or 100),0,0)
2528 elseif num==3 then
2529 torso.CFrame=torso.CFrame*CFrame.new(0,0,-((tonumber(int)*2) or 100))
2530 elseif num==4 then
2531 torso.CFrame=torso.CFrame*CFrame.new(0,0,((tonumber(int)*2) or 100))
2532 end
2533 end
2534 posed=true
2535 end
2536 --wait(1/100)
2537 end)
2538 --until not Effects.glitching
2539 end
2540end
2541
2542client.PlayAudio=function(audioId,volume,pitch,looped)
2543 if localSounds[tostring(audioId)] then localSounds[tostring(audioId)]:Stop() localSounds[tostring(audioId)]:Destroy() localSounds[tostring(audioId)]=nil end
2544 local sound=Instance.new("Sound")
2545 sound.SoundId="rbxassetid://"..audioId
2546 if looped then sound.Looped=true end
2547 if volume then sound.Volume=volume end
2548 if pitch then sound.Pitch=pitch end
2549 sound.Name="[EISS] LOCAL SOUND "..audioId
2550 sound.Parent=service.LocalContainer()
2551 localSounds[tostring(audioId)]=sound
2552 sound:Play()
2553 wait(1)
2554 repeat wait(0.1) until not sound.IsPlaying
2555 sound:Destroy()
2556 localSounds[tostring(audioId)]=nil
2557end
2558
2559client.StopAudio=function(audioId)
2560 if localSounds[tostring(audioId)] then
2561 localSounds[tostring(audioId)]:Stop()
2562 localSounds[tostring(audioId)]:Destroy()
2563 localSounds[tostring(audioId)]=nil
2564 end
2565end
2566
2567client.KillLocalAudio=function()
2568 for i,v in pairs(localSounds) do
2569 v:Stop()
2570 v:Destroy()
2571 table.remove(localSounds,i)
2572 end
2573end
2574
2575client.Phase=function(mode)
2576 local cam=workspace.CurrentCamera
2577 local char=localplayer.Character
2578 if mode then
2579 for a, obj in pairs(localplayer.Character:children()) do if obj.Name~='HumanoidRootPart' then if obj:IsA("BasePart") then obj.Transparency = 0 if obj:findFirstChild("face") then obj.face.Transparency = 0 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 0 end end end
2580 char.Parent=cam
2581 else
2582 char.Parent=workspace
2583 end
2584end
2585
2586client.KillClient=function()
2587 while true do client.Crash() end
2588end
2589
2590client.MainScrollGui = function()
2591 local guiSettings=client.GetReturn("GuiSettings")
2592 local scr = Instance.new("ScreenGui")
2593 scr.Name = client.CodeName.."ScrollGUI"
2594 --
2595 local check = Instance.new("BoolValue",scr)
2596 check.Name = "Check"
2597 --
2598 local info = Instance.new("TextLabel",scr)
2599 info.BackgroundTransparency = guiSettings.Transparency-0.2
2600 info.BorderSizePixel = 0
2601 info.BackgroundColor3 = guiSettings.PrimaryColor
2602 info.TextColor3 = guiSettings.TextColor
2603 info.TextStrokeColor3 = guiSettings.TextStrokeColor
2604 info.TextStrokeTransparency = guiSettings.TextStrokeTransparency
2605 info.Font = guiSettings.Font
2606 info.Text = ""
2607 info.FontSize = "Size18"
2608 info.Size=UDim2.new(0, info.TextBounds.X+5, 0, 20)
2609 info.Position = UDim2.new(1, 0, 0, 10)
2610 info.Visible = false
2611 info.ZIndex = 10
2612 --
2613 local drag = Instance.new("TextButton", scr)
2614 drag.Draggable = true
2615 drag.BackgroundTransparency = 1
2616 drag.Size = UDim2.new(0, 405, 0, 30)
2617 drag.Name = "Drag"
2618 drag.Position = UDim2.new(0, -400, 0.5, -160)
2619 --
2620 coroutine.wrap(function()
2621 repeat wait(0.1) until (check and check.Value) and (drag.Parent.Parent.Name == "PlayerGui")
2622 wait(0.1)
2623 --
2624 if guiSettings.Animations then
2625 drag:TweenPosition(UDim2.new(0, 35, 0.5, -160), "Out", "Sine", 0.5)
2626 else
2627 drag.Position = UDim2.new(0, 35, 0.5, -160)
2628 end
2629 end)()
2630 --
2631 drag.AutoButtonColor = false
2632 drag.Text = ""
2633 drag.ZIndex = 1
2634 --
2635 local main = Instance.new("Frame", drag)
2636 main.Size = UDim2.new(1, 0, 0, 400)
2637 main.ClipsDescendants = true
2638 main.BackgroundTransparency = 1--guiSettings.Transparency
2639 main.BackgroundColor3 = guiSettings.PrimaryColor
2640 main.BorderSizePixel = 0
2641 --
2642 local cmf = Instance.new("ScrollingFrame", main)
2643 cmf.Position = UDim2.new(0, 0, 0, 30)
2644 cmf.Size = UDim2.new(1, 0, 1, -30)
2645 cmf.BorderSizePixel = 0
2646 cmf.BackgroundColor3 = guiSettings.PrimaryColor
2647 cmf.ZIndex = 8
2648 cmf.ScrollBarThickness = 2
2649 cmf.CanvasSize = UDim2.new(0, 0, #cmf:children()/20, 0)
2650 cmf.BackgroundTransparency = 1--guiSettings.Transparency
2651 cmf.BottomImage = "http://roblox.com/asset?id=158348114"
2652 cmf.MidImage = "http://roblox.com/asset?id=158348114"
2653 cmf.TopImage = "http://roblox.com/asset?id=158348114"
2654 --
2655 local top = Instance.new("TextLabel", drag)
2656 top.Position = UDim2.new(0, 0, 0, 0)
2657 top.Size = UDim2.new(1, 0, 0, 30)
2658 top.BackgroundColor3 = guiSettings.PrimaryColor
2659 top.BackgroundTransparency = 1--guiSettings.Transparency
2660 top.Text = ""
2661 top.BorderSizePixel = 0
2662 top.ZIndex = 9
2663 top.TextColor3 = guiSettings.TextColor
2664 top.TextStrokeTransparency = guiSettings.TextStrokeTransparency
2665 top.TextStrokeColor3 = guiSettings.TextStrokeColor
2666 top.Font = guiSettings.Font
2667 top.FontSize = "Size18"
2668 --
2669 local cls = Instance.new("TextButton", drag)
2670 cls.Name = "Close"
2671 cls.Style = "Custom"
2672 cls.Size = UDim2.new(0, 20, 0, 20)
2673 cls.Position = UDim2.new(1, -25, 0, 5)
2674 cls.ZIndex = 10
2675 cls.Font = guiSettings.Font
2676 cls.FontSize = "Size18"
2677 cls.BackgroundColor3 = guiSettings.PrimaryColor
2678 cls.BorderSizePixel = 0
2679 cls.TextColor3 = guiSettings.TextColor--guiSettings.SecondaryColor
2680 cls.BackgroundTransparency = guiSettings.Transparency
2681 cls.Text = "X"
2682 --
2683 cls.MouseButton1Click:connect(function()
2684 if guiSettings.Animations then
2685 drag.Draggable = false
2686 drag:TweenPosition(UDim2.new(0, -drag.Size.X.Offset, drag.Position.Y.Scale, drag.Position.Y.Offset), "Out", "Sine", 0.5, true)
2687 wait(0.5)
2688 scr:Destroy()
2689 else
2690 scr:Destroy()
2691 end
2692 end)
2693 --
2694 local hide = Instance.new("TextButton", drag)
2695 hide.Name = "Hide"
2696 hide.Style = "Custom"
2697 hide.Size = UDim2.new(0, 20, 0, 20)
2698 hide.Position = UDim2.new(1,-50, 0, 5)
2699 hide.ZIndex = 10
2700 hide.Font = guiSettings.Font
2701 hide.FontSize = "Size18"
2702 hide.Text = "-"
2703 hide.BackgroundColor3 = guiSettings.PrimaryColor
2704 hide.BorderSizePixel = 0
2705 hide.TextColor3 = guiSettings.TextColor--guiSettings.SecondaryColor
2706 hide.BackgroundTransparency = guiSettings.Transparency
2707 --
2708 hide.MouseButton1Click:connect(function()
2709 if main.Visible then
2710 main.Visible = false
2711 hide.Text = "+"
2712 else
2713 main.Visible = true
2714 hide.Text = "-"
2715 end
2716 end)
2717 --
2718 local ent = Instance.new("TextLabel")
2719 ent.BackgroundTransparency = 1
2720 ent.Font = guiSettings.Font
2721 ent.FontSize = "Size18"
2722 ent.ZIndex = 8
2723 ent.Text = ""
2724 ent.Size = UDim2.new(1, -2, 0, 20)
2725 ent.TextColor3 = guiSettings.TextColor
2726 ent.TextStrokeColor3 = guiSettings.TextStrokeColor
2727 ent.TextStrokeTransparency = guiSettings.TextStrokeTransparency
2728 ent.TextXAlignment = "Left"
2729 ent.TextYAlignment = "Top"
2730 --
2731 local desc = Instance.new("StringValue",ent)
2732 desc.Name = "Desc"
2733 --
2734 local num = 0
2735 --
2736 if client.Fade then
2737 cmf.Transparency = 1
2738 top.Transparency = 1
2739 main.Transparency = 1
2740 cls.Transparency = 1
2741 hide.Transparency = 1
2742 end
2743
2744 local drag2 = Instance.new("Frame",main)
2745 drag2.Size = UDim2.new(0,20,0,20)
2746 drag2.Draggable = true
2747 drag2.Active = true
2748 drag2.BackgroundTransparency=1
2749 drag2.Position = UDim2.new(1,-20,1,-20)
2750 local fakeDrag=Instance.new("ImageLabel",main)
2751 fakeDrag.Size=UDim2.new(0,20,0,20)
2752 fakeDrag.Position=UDim2.new(1,-20,1,-20)
2753 fakeDrag.BackgroundTransparency=1
2754 fakeDrag.Image="rbxassetid://334991942"
2755 fakeDrag.ZIndex=1
2756
2757 local mouse=game.Players.LocalPlayer:GetMouse()
2758 local nx,ny=405,400
2759 local dragging=false
2760 local defx,defy=405,400
2761 local topText=""
2762 mouse.Move:connect(function(x,y)
2763 if dragging then
2764 nx=defx+(drag2.Position.X.Offset+20)
2765 ny=defy+(drag2.Position.Y.Offset+20)
2766 if nx<230 then nx=230 end
2767 if ny<200 then ny=200 end
2768 drag.Size=UDim2.new(0, nx, 0, 30)
2769 main.Size=UDim2.new(1, 0, 0, ny)
2770 if nx<350 then
2771 if topText=="" then
2772 topText=top.Text
2773 end
2774 top.Text=""
2775 else
2776 if topText~="" then
2777 top.Text=topText
2778 topText=""
2779 end
2780 end
2781 end
2782 end)
2783 drag2.DragBegin:connect(function(init)
2784 dragging=true
2785 end)
2786 drag2.DragStopped:connect(function(x,y)
2787 dragging=false
2788 defx=nx
2789 defy=ny
2790 drag2.Position=UDim2.new(1,-20,1,-20)
2791 cmf.CanvasSize = UDim2.new(0, 0, 0, (#cmf:children())*20)
2792 end)
2793 return scr, cmf, ent, num, top, main, info, cls, hide
2794 --
2795end
2796--
2797
2798client.RemoveNotification=function(name)
2799 local holder=playergui:FindFirstChild(client.CodeName.."EpixNotifcations")
2800 if holder then
2801 holder=holder.frame
2802 local card=holder:FindFirstChild(name)
2803 if card then
2804 card:Destroy()
2805 for i,v in pairs(holder:children()) do
2806 v.Position=UDim2.new(0,2,0,(100*(i-1)))
2807 end
2808 holder.CanvasSize=UDim2.new(0,0,0,(#holder:children()*100))
2809 end
2810 end
2811end
2812function _getenv()
2813 local env={}
2814 setmetatable(env,{
2815 __index=function(tab,ind)
2816 local e=getfenv()
2817 if e[ind] then
2818 return e[ind]
2819 end
2820 end
2821 })
2822 env.localplayer=localplayer
2823 env.client=client
2824 env.RemoteEvent=RemoteEvent
2825 env.print=print
2826 env.service=service
2827 env.RemoteName=RemoteName
2828 env.cPcall=cPcall
2829 env.Pcall=Pcall
2830 env.playergui=playergui
2831 env.playerlistenabled=playerlistenabled
2832 env.chatenabled=chatenabled
2833 env.mouse=mouse
2834 env.Effects=Effects
2835 env.events=events
2836 env.localSounds=localSounds
2837 return env
2838end
2839
2840client.Notify=function(name,text,time,clickfunc,closefunc,ignorefunc)
2841 local guiSettings=client.GetReturn("GuiSettings")
2842 if clickfunc and type(clickfunc)=="string" then
2843 clickfunc=yloadstring(clickfunc,_getenv())
2844 end
2845 if closefunc and type(closefunc)=="string" then
2846 closefunc=yloadstring(closefunc,_getenv())
2847 end
2848 if ignorefunc and type(ignorefunc)=="string" then
2849 ignorefunc=yloadstring(ignorefunc,_getenv())
2850 end
2851 local holder=playergui:FindFirstChild(client.CodeName.."EpixNotifcations")
2852 if not holder then
2853 holder=Instance.new("ScreenGui",playergui)
2854 holder.Name=client.CodeName.."EpixNotifcations"
2855 local frame=Instance.new("ScrollingFrame",holder)
2856 frame.Name='frame'
2857 frame.BackgroundTransparency=1
2858 frame.BorderSizePixel=0
2859 frame.BackgroundColor3=guiSettings.PrimaryColor
2860 frame.Position=UDim2.new(1,-205,1,-(75*3+25))
2861 frame.Size=UDim2.new(0,200,0,75*3)
2862 --frame.BottomImage='http://roblox.com/asset?id=158348114'
2863 --frame.MidImage='http://roblox.com/asset?id=158348114'
2864 --frame.TopImage='http://roblox.com/asset?id=158348114'
2865 frame.ScrollBarThickness=5
2866 frame.ClipsDescendants=false
2867 end
2868 local function moveGuis(holder,mod)
2869 local holdstuff={}
2870 for i,v in pairs(holder:children()) do
2871 table.insert(holdstuff,1,v)
2872 end
2873 for i,v in pairs(holdstuff) do
2874 v.Position=UDim2.new(0,0,1,-75*(i+mod))
2875 end
2876 holder.CanvasSize=UDim2.new(0,0,0,(#holder:children()*75))
2877 if holder.CanvasSize.Y.Offset-holder.AbsoluteWindowSize.Y>0 then
2878 holder.CanvasPosition=Vector2.new(0,holder.CanvasSize.Y.Offset-holder.AbsoluteWindowSize.Y)
2879 end
2880 end
2881 holder=holder.frame
2882 local frame=Instance.new("Frame")
2883 frame.Name=name
2884 frame.Position=UDim2.new(1,0,1,-75)
2885 frame.Size=UDim2.new(1,-10,0,70)
2886 frame.BackgroundTransparency=guiSettings.Transparency
2887 frame.BackgroundColor3=guiSettings.PrimaryColor
2888 frame.BorderSizePixel=0
2889 --frame.Style="DropShadow"
2890 local close=Instance.new("TextButton",frame)
2891 close.BorderSizePixel=0
2892 close.Position=UDim2.new(1,-15,0,5)
2893 close.Size=UDim2.new(0,10,0,10)
2894 close.TextStrokeTransparency=guiSettings.TextStrokeTransparency
2895 close.Font=guiSettings.Font
2896 close.FontSize="Size18"
2897 close.BackgroundColor3=guiSettings.PrimaryColor
2898 close.TextScaled=true
2899 close.TextStrokeColor3=guiSettings.TextStrokeColor
2900 close.TextColor3=guiSettings.TextColor
2901 close.Text="X"
2902 close.BackgroundTransparency=1
2903 local main=Instance.new("TextButton",frame)
2904 main.BackgroundTransparency=1
2905 main.TextStrokeTransparency=guiSettings.TextStrokeTransparency
2906 main.TextStrokeColor3=guiSettings.TextStrokeColor
2907 main.TextColor3=guiSettings.TextColor
2908 main.TextScaled=true
2909 main.Position=UDim2.new(0,5,0,15)
2910 main.Size=UDim2.new(1,-10,1,-17)
2911 main.Text=text
2912 main.MouseButton1Click:connect(function()
2913 if frame and frame.Parent then
2914 if clickfunc then
2915 clickfunc()
2916 end
2917 frame:Destroy()
2918 moveGuis(holder,0)
2919 end
2920 end)
2921 close.MouseButton1Click:connect(function()
2922 if frame and frame.Parent then
2923 if closefunc then
2924 cPcall(closefunc)
2925 end
2926 frame:Destroy()
2927 moveGuis(holder,0)
2928 end
2929 end)
2930 local title=Instance.new("TextLabel",frame)
2931 title.BackgroundTransparency=1
2932 title.Size=UDim2.new(1,-40,0,15)
2933 title.Text=name
2934 title.Size=UDim2.new(0,title.TextBounds.X,0,10)
2935 title.Position=UDim2.new(0.5,-title.TextBounds.X/2,0,5)
2936 title.TextColor3=guiSettings.TextColor
2937 title.TextStrokeTransparency=guiSettings.TextStrokeTransparency
2938 title.TextStrokeColor3=guiSettings.TextStrokeColor
2939 title.BorderSizePixel=0
2940
2941 moveGuis(holder,1)
2942 frame.Parent=holder
2943 frame:TweenPosition(UDim2.new(0,0,1,-75),'Out','Linear',0.2)
2944 coroutine.wrap(function()
2945 local sound=Instance.new("Sound",workspace)
2946 sound.SoundId='http://www.roblox.com/asset/?id='..client.NotificationSound
2947 sound.Volume=1
2948 wait(0.1)
2949 sound:Play()
2950 sound:Destroy()
2951 end)()
2952 if time then
2953 local timer=Instance.new("TextLabel",frame)
2954 timer.BackgroundTransparency=1
2955 timer.Position=UDim2.new(0,5,0,5)
2956 timer.TextColor3=guiSettings.TextColor
2957 timer.TextStrokeTransparency=guiSettings.TextStrokeTransparency
2958 timer.TextStrokeColor3=guiSettings.TextStrokeColor
2959 timer.BorderSizePixel=0
2960 cPcall(function()
2961 repeat
2962 timer.Text=time
2963 timer.Size=UDim2.new(0,timer.TextBounds.X,0,10)
2964 wait(1)
2965 time=time-1
2966 until time<=0 or not frame or not frame.Parent
2967 if frame and frame.Parent then
2968 if ignorefunc then
2969 cPcall(ignorefunc)
2970 end
2971 frame:Destroy()
2972 moveGuis(holder,0)
2973 end
2974 end)
2975 end
2976end
2977
2978client.ReportNotify=function(p,p2,msg)
2979 local scr=Instance.new('ScreenGui',playergui) scr.Name=client.CodeName..p.Name..'ReportGui'
2980 local frame=Instance.new('Frame',scr)
2981 local label=Instance.new('TextLabel',frame)
2982 local yes=Instance.new('TextButton',frame)
2983 local no=Instance.new('TextButton',frame)
2984 local guiSettings=client.GetReturn("GuiSettings")
2985 frame.BackgroundColor3=guiSettings.PrimaryColor
2986 frame.BorderSizePixel=0
2987 frame.BackgroundTransparency=guiSettings.Transparency
2988 frame.BorderSizePixel=0
2989 frame.Position=UDim2.new(1,260,1,-250)
2990 frame.Size=UDim2.new(0,300,0,200)
2991 if guiSettings.Animations then
2992 frame:TweenPosition(UDim2.new(1,-350,1,-250),'Out','Elastic',1)
2993 else
2994 frame.Position=UDim2.new(1,-350,1,-250)
2995 end
2996 frame.ClipsDescendants=true
2997 label.BackgroundTransparency=1
2998 label.BorderSizePixel=0
2999 label.Position=UDim2.new(0,0,0,0)
3000 label.Size=UDim2.new(1,0,0,120)
3001 label.TextColor3=guiSettings.TextColor
3002 label.ClipsDescendants=false
3003 label.FontSize='Size24'
3004 label.Font=guiSettings.Font
3005 label.TextXAlignment='Center'
3006 label.TextYAlignment='Center'
3007 label.Text=p.Name.."'s Report for "..p2.Name..": "..msg
3008 label.Name='Label'
3009 label.TextScaled=true
3010 label.TextWrapped=true
3011 frame.Draggable=true
3012 frame.Active=true
3013 label.Draggable=false
3014 yes.BackgroundColor3=Color3.new(0,1,0)
3015 yes.TextColor3=guiSettings.TextColor
3016 yes.Text='Teleport'
3017 yes.Font=guiSettings.Font
3018 yes.FontSize='Size24'
3019 yes.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3020 yes.Name='yes'
3021 no.Font=guiSettings.Font
3022 no.FontSize='Size36'
3023 no.BackgroundColor3=Color3.new(1, 0, 0)
3024 no.TextColor3=guiSettings.TextColor
3025 no.Text='Busy'
3026 no.Name='no'
3027 no.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3028 yes.Size=UDim2.new(0,100,0,50)
3029 yes.Position=UDim2.new(0,20,0,130)
3030 no.Size=UDim2.new(0,100,0,50)
3031 no.Position=UDim2.new(0,180,0,130)
3032 no.MouseButton1Click:connect(function()
3033 scr:Destroy()
3034 end)
3035 yes.MouseButton1Click:connect(function()
3036 client.Remote("AdminCommand",client.Prefix.."to"..client.SplitKey..p2.Name)
3037 end)
3038end
3039
3040client.AddPlayerToList=function(p,type)
3041 client.Remote('CheckAdmin')
3042 local scr=playergui:FindFirstChild(client.CodeName..'CUSTOMLEADERBOARD')
3043 if not scr then return end
3044 local guiSettings=client.GetReturn("GuiSettings")
3045 local main=scr.ListDrag.ScrollingFrame
3046 if main:FindFirstChild(p.Name) then return end
3047 local f=Instance.new('Frame',main)
3048 f.Name=p.Name
3049 f.BackgroundTransparency=1--guiSettings.Transparency
3050 f.BorderSizePixel=0
3051 f.BackgroundColor3=guiSettings.PrimaryColor
3052 f.BorderSizePixel=0
3053 f.Size=UDim2.new(1,0,0,20)
3054 f.Position=UDim2.new(0,0,0,20*(#main:children()-1))
3055 local ico=Instance.new('ImageLabel',f)
3056 ico.Size=UDim2.new(0,20,0,20)
3057 ico.BackgroundTransparency=1
3058 ico.BorderSizePixel=0
3059 if type=='Scripter' then
3060 ico.Image='http://www.roblox.com/asset/?id=113059239'
3061 elseif localplayer:IsFriendsWith(p.userId) and p~=localplayer then
3062 ico.Image='http://www.roblox.com/asset/?id=99749771'
3063 elseif type=='Admin' then
3064 ico.Image='http://www.roblox.com/asset/?id=99727663'
3065 elseif type=='BC' then
3066 ico.Image='rbxasset://textures/ui/TinyBcIcon.png'
3067 elseif type=='TBC' then
3068 ico.Image='rbxasset://textures/ui/TinyTbcIcon.png'
3069 elseif type=='OBC' then
3070 ico.Image='rbxasset://textures/ui/TinyObcIcon.png'
3071 else
3072 ico.Visible=false
3073 end
3074 local l=Instance.new('TextButton',f)
3075 l.Text=p.Name
3076 for i,v in pairs(service.Teams:children()) do
3077 if p.TeamColor==v.TeamColor then
3078 l.Text=p.Name..' ['..v.Name..']'
3079 end
3080 end
3081 l.BackgroundTransparency=1
3082 l.TextColor3=p.TeamColor.Color
3083 l.Font=guiSettings.Font
3084 l.TextXAlignment='Left'
3085 l.TextScaled=true
3086 l.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3087 l.TextStrokeColor3=guiSettings.TextStrokeColor
3088 if ico.Visible==true then
3089 l.Size=UDim2.new(1,-20,1,0)
3090 l.Position=UDim2.new(0,20,0,0)
3091 else
3092 l.Size=UDim2.new(1,0,1,0)
3093 end
3094 l.MouseButton1Click:connect(function()
3095 client.Remote('CheckAdmin')
3096 local menu=f:FindFirstChild('Menu')
3097 if not menu then
3098 local menu=Instance.new('Frame',f)
3099 menu.Name='Menu'
3100 menu.Size=UDim2.new(0,50,0,100)
3101 menu.Position=UDim2.new(0,-50,0,0)
3102 menu.BackgroundColor3=guiSettings.PrimaryColor
3103 menu.BackgroundTransparency=guiSettings.Transparency
3104 menu.BorderSizePixel=0
3105 menu.Visible=true--false
3106 local report=Instance.new('TextButton',menu)
3107 report.BackgroundTransparency=1
3108 report.TextColor3=guiSettings.TextColor
3109 report.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3110 report.TextStrokeColor3=guiSettings.TextStrokeColor
3111 report.Text='Report'
3112 report.Font=guiSettings.Font
3113 report.TextScaled=true
3114 report.Size=UDim2.new(1,0,0,10)
3115 report.Position=UDim2.new(0,0,0,10*(#menu:children()-1))
3116 report.MouseButton1Click:connect(function()
3117 menu.Visible=false
3118 local rmain=Instance.new('Frame',scr)
3119 rmain.Size=UDim2.new(0,300,0,350)
3120 rmain.Position=UDim2.new(0.5,-150,1,175)
3121 if guiSettings.Animations then
3122 rmain:TweenPosition(UDim2.new(0.5,-150,0,50),'Out','Elastic',1)
3123 else
3124 rmain.Position=UDim2.new(0.5,-150,0,50)
3125 end
3126 rmain.BackgroundColor3=guiSettings.PrimaryColor
3127 rmain.BorderSizePixel=0
3128 rmain.Draggable=true
3129 rmain.Active=true
3130 rmain.BackgroundTransparency=guiSettings.Transparency
3131 local rl=Instance.new('TextLabel',rmain)
3132 rl.BackgroundTransparency=1
3133 rl.Text='Report '..p.Name
3134 rl.TextColor3=guiSettings.TextColor
3135 rl.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3136 rl.TextScaled=true
3137 rl.TextStrokeColor3=guiSettings.TextStrokeColor
3138 rl.Size=UDim2.new(1,0,0,50)
3139 local rd=Instance.new('TextBox',rmain)
3140 rd.Size=UDim2.new(1,-10,1,-110)
3141 rd.Position=UDim2.new(0,5,0,55)
3142 rd.BackgroundColor3=guiSettings.PrimaryColor
3143 rd.BorderSizePixel=0
3144 rd.TextColor3=guiSettings.TextColor
3145 rd.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3146 rd.TextStrokeColor3=guiSettings.TextStrokeColor
3147 rd.TextScaled=true
3148 rd.Font=guiSettings.Font
3149 rd.BackgroundTransparency=0.8
3150 rd.Text='Please enter your reason for reporting '..p.Name..' here.'
3151 local rb=Instance.new('TextButton',rmain)
3152 rb.BackgroundColor3=guiSettings.PrimaryColor
3153 rb.BackgroundTransparency=0.8
3154 rb.BorderSizePixel=0
3155 rb.TextColor3=guiSettings.TextColor
3156 rb.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3157 rb.TextStrokeColor3=guiSettings.TextStrokeColor
3158 rb.Font=guiSettings.Font
3159 rb.Text='Submit'
3160 rb.TextScaled=true
3161 rb.Size=UDim2.new(1,-10,0,40)
3162 rb.Position=UDim2.new(0,5,1,-47)
3163 rb.MouseButton1Click:connect(function()
3164 rmain:Destroy()
3165 if rd.Text~='' and rd.Text~='Please enter your reason for reporting '..p.Name..' here.' then
3166 client.Remote('SubmitReport',p,rd.Text)
3167 end
3168 end)
3169 end)
3170 if client.IsAdmin then
3171 local ban=report:clone()
3172 ban.Parent=menu
3173 ban.Text='Ban'
3174 ban.Position=UDim2.new(0,0,0,10*(#menu:children()-1))
3175 ban.MouseButton1Click:connect(function()
3176 menu.Visible=false
3177 client.Remote('Chat',client.Prefix..'ban'..client.SplitKey..p.Name,client.CustomChatMode)
3178 end)
3179 local kick=report:clone()
3180 kick.Parent=menu
3181 kick.Text='Kick'
3182 kick.Position=UDim2.new(0,0,0,10*(#menu:children()-1))
3183 kick.MouseButton1Click:connect(function()
3184 menu.Visible=false
3185 client.Remote('Chat',client.Prefix..'kick'..client.SplitKey..p.Name,client.CustomChatMode)
3186 end)
3187 local mute=report:clone()
3188 mute.Parent=menu
3189 mute.Text='Mute'
3190 mute.Position=UDim2.new(0,0,0,10*(#menu:children()-1))
3191 mute.MouseButton1Click:connect(function()
3192 menu.Visible=false
3193 if mute.Text=='Mute' then
3194 client.Remote('AdminCommand',client.Prefix..'mute'..client.SplitKey..p.Name,false,true)
3195 mute.Text='UnMute'
3196 else
3197 client.Remote('AdminCommand',client.Prefix..'unmute'..client.SplitKey..p.Name,false,true)
3198 mute.Text='Mute'
3199 end
3200 end)
3201 end
3202 if playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT') then
3203 local ignore=report:clone()
3204 ignore.Parent=menu
3205 ignore.Text='Ignore'
3206 ignore.Position=UDim2.new(0,0,0,10*(#menu:children()-1))
3207 ignore.MouseButton1Click:connect(function()
3208 menu.Visible=false
3209 if ignore.Text=='Ignore' then
3210 table.insert(client.IgnoreList,p.Name)
3211 ignore.Text='UnIgnore'
3212 else
3213 for i,v in pairs(client.IgnoreList) do
3214 if v==p.Name then
3215 table.remove(client.IgnoreList,i)
3216 end
3217 end
3218 ignore.Text='Ignore'
3219 end
3220 end)
3221 end
3222 menu.Size=UDim2.new(0,50,0,10*(#menu:children()))
3223 elseif menu then
3224 if menu.Visible then
3225 menu.Visible=false
3226 else
3227 menu.Visible=true
3228 end
3229 end
3230 end)
3231
3232 if #main:children()<=10 then
3233 main.Size=UDim2.new(0,200,0,20*(#main:children()))
3234 end--else
3235 main.CanvasSize=UDim2.new(0,0,#main:children()/20,0)
3236 --end
3237end
3238
3239client.RemovePlayerFromList=function(p)
3240 if not p:IsA('Player') then return end
3241 local scr=playergui:FindFirstChild(client.CodeName..'CUSTOMLEADERBOARD')
3242 if not scr then return end
3243 local main=scr.ListDrag.ScrollingFrame
3244 if main:FindFirstChild(p.Name) then
3245 main[p.Name]:Destroy()
3246 for i,v in pairs(main:children()) do
3247 v.Position=UDim2.new(0,0,0,20*(i-1))
3248 end
3249 main.CanvasSize=UDim2.new(0,0,#main:children()/20,0)
3250 main.Size=UDim2.new(0,200,0,20*(#main:children()))
3251 end
3252end
3253
3254client.CustomLeaderboard=function()
3255 if playergui:FindFirstChild(client.CodeName..'CUSTOMLEADERBOARD') then return end
3256 service.StarterGui:SetCoreGuiEnabled('PlayerList',false)
3257 playerlistenabled=false
3258 local scr=Instance.new('ScreenGui',playergui) scr.Name=client.CodeName..'CUSTOMLEADERBOARD'
3259 local listdrag=Instance.new('TextLabel',scr)
3260 local toggle=Instance.new('TextButton',listdrag)
3261 local main=Instance.new('ScrollingFrame',listdrag)
3262 local guiSettings=client.GetReturn("GuiSettings")
3263 main.BackgroundColor3=guiSettings.PrimaryColor
3264 main.BackgroundTransparency=guiSettings.Transparency
3265 --main.BorderSizePixel=0
3266 main.BorderSizePixel=0
3267 main.Size=UDim2.new(0,200,0,20)
3268 main.Position=UDim2.new(0,0,0,15)
3269 main.ClipsDescendants=false
3270 listdrag.BackgroundColor3=guiSettings.PrimaryColor
3271 listdrag.BorderSizePixel=0
3272 listdrag.BackgroundTransparency=guiSettings.Transparency
3273 listdrag.Position=UDim2.new(1,-210,0,10)
3274 listdrag.Size=UDim2.new(0,80,0,15)
3275 listdrag.Draggable=true
3276 listdrag.Active=true
3277 listdrag.Text='Player List'
3278 listdrag.Font=guiSettings.Font
3279 listdrag.TextColor3=guiSettings.TextColor
3280 listdrag.TextStrokeColor3=guiSettings.TextStrokeColor
3281 listdrag.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3282 listdrag.TextScaled=true
3283 listdrag.TextWrapped=true
3284 listdrag.Name='ListDrag'
3285 listdrag.ZIndex=10
3286 toggle.BackgroundColor3=guiSettings.PrimaryColor
3287 toggle.BorderSizePixel=0
3288 toggle.BackgroundTransparency=guiSettings.Transparency
3289 toggle.Position=UDim2.new(0,80,0,0)
3290 toggle.Size=UDim2.new(0,15,0,15)
3291 toggle.Active=true
3292 toggle.Text='-'
3293 toggle.Font=guiSettings.Font
3294 toggle.TextColor3=guiSettings.TextColor
3295 toggle.TextStrokeColor3=guiSettings.TextStrokeColor
3296 toggle.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3297 toggle.TextScaled=true
3298 toggle.TextWrapped=true
3299 toggle.Name='Toggle'
3300 toggle.MouseButton1Click:connect(function()
3301 if main.Visible==true then
3302 main.Visible=false
3303 toggle.Text='+'
3304 else
3305 main.Visible=true
3306 toggle.Text='-'
3307 end
3308 end)
3309 client.Remote('GetCurrentPlayerList')
3310end
3311
3312client.CustomChatGui=function()
3313 if client.CustomChatType~='Both' and client.CustomChatType~='Classic' and client.CustomChatType~='Bubbles' then client.CustomChatType='Both' end
3314 if playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT') then return end
3315 cPcall(function() repeat service.StarterGui:SetCoreGuiEnabled('Chat',false) wait(0.1) until not service.StarterGui:GetCoreGuiEnabled('Chat') end)
3316 local gui=Instance.new('ScreenGui',playergui) gui.Name=client.CodeName..'CUSTOMCHAT'
3317 local chatdrag=Instance.new('TextLabel',gui)
3318 local toggle=Instance.new('TextButton',chatdrag)
3319 local chatwindow=Instance.new('Frame',chatdrag)
3320 local cbut=Instance.new('TextButton',chatdrag)
3321 local bardrag=Instance.new("TextLabel",chatdrag)
3322 local chatbar=Instance.new('TextBox',bardrag)
3323 bardrag.Size=UDim2.new(0,300,0,20)
3324 local guiSettings=client.GetReturn("GuiSettings")
3325 bardrag.BackgroundTransparency=guiSettings.Transparency
3326 bardrag.BackgroundColor3=guiSettings.PrimaryColor
3327 bardrag.TextColor3=guiSettings.TextColor
3328 bardrag.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3329 bardrag.TextStrokeColor3=guiSettings.TextStrokeColor
3330 bardrag.Font=guiSettings.Font
3331 bardrag.TextScaled=true
3332 --bardrag.Draggable=true
3333 bardrag.TextWrapped=true
3334 bardrag.Active=true
3335 bardrag.BorderSizePixel=0
3336 bardrag.Text=""--"Drag"
3337 bardrag.Name="BarDrag"
3338 bardrag.Font=guiSettings.Font
3339 bardrag.Position=UDim2.new(1,40,0,0)
3340 bardrag.TextXAlignment='Left'
3341 bardrag.ZIndex=10
3342 cbut.Name='Mode'
3343 cbut.ZIndex=9
3344 cbut.Size=UDim2.new(0,20,0,20)
3345 cbut.Position=UDim2.new(0,40,0,0)
3346 cbut.BackgroundColor3=guiSettings.PrimaryColor
3347 cbut.BackgroundTransparency=guiSettings.Transparency
3348 cbut.BorderSizePixel=0
3349 cbut.Font=guiSettings.Font--todo
3350 cbut.Text='G'
3351 cbut.TextColor3=guiSettings.TextColor
3352 cbut.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3353 cbut.TextStrokeColor3=guiSettings.TextStrokeColor
3354 --cbut.TextScaled=true
3355 --cbut.TextWrapped=true
3356 cbut.FontSize="Size14"
3357 if client.CustomChatMode=='Global' then
3358 cbut.Text='G'
3359 elseif client.CustomChatMode=='Team' then
3360 cbut.Text='T'
3361 elseif client.CustomChatMode=='Local' then
3362 cbut.Text='L'
3363 elseif client.CustomChatMOde=='Admin' then
3364 cbut.Text='A'
3365 end
3366 cbut.MouseButton1Click:connect(function()
3367 service.StarterGui:SetCoreGuiEnabled('Chat',false)
3368 client.Remote('CheckAdmin')
3369 if client.CustomChatMode=='Global' then
3370 client.CustomChatMode='Team'
3371 chatdrag.Text=client.CustomChatMode
3372 cbut.Text='T'
3373 elseif client.CustomChatMode=='Team' then
3374 client.CustomChatMode='Local'
3375 chatdrag.Text=client.CustomChatMode
3376 cbut.Text='L'
3377 elseif client.CustomChatMode=='Local' then
3378 if client.IsAdmin then
3379 client.CustomChatMode='Admin'
3380 cbut.Text='A'
3381 else
3382 client.CustomChatMode='Global'
3383 cbut.Text='G'
3384 end
3385 chatdrag.Text=client.CustomChatMode
3386 elseif client.CustomChatMode=='Admin' then
3387 client.CustomChatMode='Global'
3388 cbut.Text='G'
3389 chatdrag.Text=client.CustomChatMode
3390 end
3391 end)
3392 chatbar.BackgroundColor3=guiSettings.PrimaryColor
3393 chatbar.BorderSizePixel=0
3394 chatbar.TextColor3=guiSettings.TextColor
3395 chatbar.BackgroundTransparency=1--guiSettings.Transparency
3396 chatbar.Position=UDim2.new(0,2.5,0,1)--1,-20)--67
3397 chatbar.Size=UDim2.new(1,-2.5,1,-3)
3398 chatbar.Font=guiSettings.Font
3399 chatbar.Text='Click here or press the \'/\' key to chat'
3400 chatbar.TextColor3=guiSettings.TextColor
3401 chatbar.TextScaled=true
3402 chatbar.TextWrapped=true
3403 --chatbar.FontSize="Size18"
3404 chatbar.TextStrokeColor3=guiSettings.TextStrokeColor
3405 chatbar.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3406 chatbar.TextXAlignment='Left'
3407 chatbar.ClearTextOnFocus=false
3408 chatbar.ZIndex=10
3409 chatbar.FocusLost:connect(function(enterPressed)
3410 if enterPressed then
3411 if chatbar.Text~='' and ((tick()-client.ChatTimer>=0.5 and client.AntiCustomChatSpam) or not client.AntiCustomChatSpam) then
3412 if not client.Muted then
3413 client.Remote('Chat',chatbar.Text,client.CustomChatMode)
3414 end
3415 chatbar.Text='Click here or press the \'/\' key to chat'
3416 end
3417 client.ChatTimer=tick()
3418 elseif #chatbar.Text==0 then
3419 chatbar.Text='Click here or press the \'/\' key to chat'
3420 end
3421 end)
3422 chatbar.Focused:connect(function()
3423 if chatbar.Text=='Click here or press the \'/\' key to chat' then
3424 chatbar.Text=''
3425 end
3426 end)
3427 service.UserInputService.InputBegan:connect(function(InputObject)
3428 if InputObject.UserInputType==Enum.UserInputType.Keyboard and InputObject.KeyCode == Enum.KeyCode.Slash then
3429 if chatbar.Text=='Click here or press the \'/\' key to chat' then chatbar.Text='' end
3430 chatbar:CaptureFocus()
3431 end
3432 end)
3433 --[[local box=Instance.new("Frame",chatbar)
3434 box.BackgroundColor3=guiSettings.PrimaryColor
3435 box.BorderSizePixel=0
3436 box.BackgroundTransparency=guiSettings.Transparency
3437 box.Size=UDim2.new(0,70,0,70)
3438 box.Position=UDim2.new(0,-70,0,-40)--]]
3439 chatdrag.BackgroundColor3=guiSettings.PrimaryColor
3440 chatdrag.BorderSizePixel=0
3441 chatdrag.BackgroundTransparency=guiSettings.Transparency
3442 chatdrag.Position=UDim2.new(0,10,0,10)
3443 chatdrag.Size=UDim2.new(0,40,0,20)
3444 chatdrag.Draggable=true
3445 chatdrag.Active=true
3446 chatdrag.Text=client.CustomChatMode
3447 chatdrag.Font=guiSettings.Font
3448 chatdrag.TextColor3=guiSettings.TextColor
3449 chatdrag.TextStrokeColor3=guiSettings.TextStrokeColor
3450 chatdrag.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3451 --chatdrag.TextScaled=true
3452 --chatdrag.TextWrapped=true
3453 chatdrag.FontSize="Size14"
3454 chatdrag.Name='ChatDrag'
3455 chatdrag.ZIndex=9
3456 toggle.BackgroundColor3=guiSettings.PrimaryColor
3457 toggle.BorderSizePixel=0
3458 toggle.BackgroundTransparency=guiSettings.Transparency
3459 toggle.Position=UDim2.new(0,60,0,0)
3460 toggle.Size=UDim2.new(0,20,0,20)
3461 toggle.Active=true
3462 toggle.Text='-'
3463 toggle.Font=guiSettings.Font
3464 toggle.TextColor3=guiSettings.TextColor
3465 toggle.TextStrokeColor3=guiSettings.TextStrokeColor
3466 toggle.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3467 --toggle.TextScaled=true
3468 --toggle.TextWrapped=true
3469 toggle.FontSize="Size24"
3470 toggle.Name='Toggle'
3471 toggle.ZIndex=9
3472 toggle.MouseButton1Click:connect(function()
3473 if chatwindow.Visible==true then
3474 chatwindow.Visible=false
3475 toggle.Text='+'
3476 --bardrag.Position=UDim2.new(0,0,1,0)
3477 else
3478 chatwindow.Visible=true
3479 toggle.Text='-'
3480 --bardrag.Position=UDim2.new(0,0,0,150)
3481 end
3482 end)
3483 chatwindow.Position=UDim2.new(0,0,0,20)
3484 chatwindow.Size=UDim2.new(0,700,0,150)
3485 chatwindow.BorderSizePixel=0
3486 chatwindow.Name='ChatWindow'
3487 chatwindow.BackgroundTransparency=1
3488 if client.CustomChatType=='Bubbles' then
3489 chatwindow.Visible=false
3490 toggle.Visible=false
3491 chatwindow.Visible=false
3492 chatdrag.Visible=false
3493 end
3494 --[[service.StarterGui:SetCoreGuiEnabled("Health",false)
3495 local hFrame = Instance.new("Frame",bardrag)
3496 hFrame.ZIndex=10
3497 hFrame.BackgroundColor3=guiSettings.PrimaryColor
3498 hFrame.BackgroundTransparency=guiSettings.Transparency
3499 hFrame.BorderSizePixel=0
3500 hFrame.Position=UDim2.new(0,30,0,0)
3501 hFrame.Size=UDim2.new(0,150,0,20)
3502 hBar=Instance.new("Frame",hFrame)
3503 hBar.ZIndex=11
3504 hBar.BackgroundColor3=Color3.new(0,1,0)
3505 hBar.BackgroundTransparency=guiSettings.Transparency
3506 hBar.BorderSizePixel=0
3507 hBar.Position=UDim2.new(0,0,0,2)
3508 hBar.Size=UDim2.new(1,-2,1,-3)
3509 --cPcall(function()
3510 local hum=localplayer.Character:WaitForChild("Humanoid")
3511 local changer;
3512 hBar.Size=UDim2.new(0,(148*(hum.Health/hum.MaxHealth)*100)/100,1,-3)
3513 --while hum and hum.Parent and wait(0.1) do--
3514 changer=hum.Changed:connect(function(p)
3515 if not hum or not hum.Parent then changer:disconnect() return end
3516 hBar.Size=UDim2.new(0,(148*(hum.Health/hum.MaxHealth)*100)/100,1,-3)
3517 if (hum.Health/hum.MaxHealth)*100 >= 50 then
3518 hBar.BackgroundColor3=Color3.new(0,1,0)
3519 elseif (hum.Health/hum.MaxHealth)*100 < 50 then
3520 hBar.BackgroundColor3=Color3.new(1,1,0)
3521 if (hum.Health/hum.MaxHealth)*100 < 25 then
3522 hBar.BackgroundColor3=Color3.new(1,0,0)
3523 end
3524 end
3525 end)
3526 --end--]]
3527 for i,v in pairs(client.LocalChatCache) do
3528 local frame=Instance.new('Frame',chatwindow)
3529 local label=Instance.new('TextLabel',frame)
3530 frame.BackgroundTransparency=1
3531 frame.Size=UDim2.new(1,0,0,20)
3532 frame.Position=UDim2.new(0,0,0,20*(#chatwindow:children()-1))
3533 frame.ZIndex=9
3534 label.BackgroundColor3=guiSettings.PrimaryColor
3535 label.BackgroundTransparency=1--guiSettings.Transparency--1
3536 label.BorderSizePixel=0
3537 label.Text=v.message
3538 label.Font=guiSettings.Font
3539 label.TextColor3=guiSettings.TextColor
3540 label.TextStrokeColor3=guiSettings.TextStrokeColor
3541 label.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3542 --label.TextScaled=true
3543 label.FontSize='Size14'
3544 label.TextWrapped=true
3545 label.TextXAlignment='Left'
3546 label.ZIndex=9
3547 local name=label:clone()
3548 name.Parent=frame
3549 name.Position=UDim2.new(0,0,0,0)
3550 name.Text=v.player..':'
3551 name.ZIndex=9
3552 if #v.message>100 then
3553 label.Text=v.message:sub(0,100)
3554 local frame=Instance.new('Frame',chatwindow)
3555 frame.BackgroundTransparency=1
3556 frame.Size=UDim2.new(1,0,0,20)
3557 frame.Position=UDim2.new(0,0,0,20*(#chatwindow:children()-1))
3558 frame.ZIndex=10
3559 local label=label:clone()
3560 label.Parent=frame
3561 label.Text=v.message:sub(100,200)
3562 if #v.message>=200 then
3563 label.Text=label.Text.."..."
3564 end
3565 label.Size=UDim2.new(0,(label.TextBounds.X+2),1,0)
3566 --label.Position=UDim2.new(0,(name.TextBounds.X+2),0,0)
3567 end
3568 if v.mode=='Local' then
3569 name.TextColor3=Color3.new(154/255,154/255,154/255)
3570 elseif v.mode=='Global' then
3571 name.TextColor3=Color3.new(0,1,1)
3572 elseif v.mode=='Team' then
3573 name.TextColor3=Color3.new(0,1,0)
3574 elseif v.mode=='Admin' then
3575 name.TextColor3=Color3.new(1,1,0)
3576 elseif v.mode=='Private' then
3577 name.TextColor3=Color3.new(170/255,0,1)
3578 elseif v.mode=='Nil' then
3579 name.TextColor3=Color3.new(1,1,1)
3580 name.Text='[NIL]'..name.Text
3581 end
3582 label.Size=UDim2.new(0,(label.TextBounds.X+2),1,0)
3583 label.Position=UDim2.new(0,(name.TextBounds.X+2),0,0)
3584 name.Size=UDim2.new(0,(name.TextBounds.X+2),1,0)
3585 end
3586end
3587client.RemoveCustomChat=function()
3588 local chat=playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT')
3589 if chat then chat:Destroy() service.StarterGui:SetCoreGuiEnabled('Chat',true) end
3590end
3591client.SendToChat=function(player,message,mode)
3592 if #message==0 then return end
3593 if client.SeparatedChannels and mode~=client.CustomChatMode then return end
3594 for i,v in pairs(client.IgnoreList) do if player.Name==v then return end end
3595 if message:sub(1,2)=='/e' then return end
3596 local chat=playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT')
3597 if not chat then return end
3598 local guiSettings=client.GetReturn("GuiSettings")
3599 local chatwindow=chat.ChatDrag.ChatWindow
3600 if #client.LocalChatCache==10 then table.remove(client.LocalChatCache,1) end
3601 client.LocalChatCache[#client.LocalChatCache+1]={player=player.Name,message=message,mode=mode}
3602 if #chatwindow:children()==10 then chatwindow:children()[1]:Destroy() for h,l in pairs(chatwindow:children()) do l.Position=UDim2.new(0,0,0,20*(h-1)) end end
3603 local frame=Instance.new('Frame',chatwindow)
3604 local label=Instance.new('TextLabel',frame)
3605 frame.BackgroundTransparency=1
3606 frame.Size=UDim2.new(1,0,0,20)
3607 frame.Position=UDim2.new(0,0,0,20*(#chatwindow:children()-1))
3608 frame.ZIndex=9
3609 label.BackgroundColor3=guiSettings.PrimaryColor
3610 label.BackgroundTransparency=1--guiSettings.Transparency--1
3611 label.BorderSizePixel=0
3612 label.Text=message
3613 label.Font=guiSettings.Font
3614 label.TextColor3=guiSettings.TextColor
3615 label.TextStrokeColor3=guiSettings.TextStrokeColor
3616 label.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3617 label.ZIndex=9
3618 --label.TextScaled=true
3619 label.FontSize='Size14'
3620 label.TextWrapped=true
3621 label.TextXAlignment='Left'
3622 local name=label:clone()
3623 name.Parent=frame
3624 name.Position=UDim2.new(0,0,0,0)
3625 name.Text=player.Name..':'
3626 name.ZIndex=9
3627 if #message>100 then
3628 label.Text=message:sub(0,100)
3629 local frame=Instance.new('Frame',chatwindow)
3630 frame.BackgroundTransparency=1
3631 frame.Size=UDim2.new(1,0,0,20)
3632 frame.Position=UDim2.new(0,0,0,20*(#chatwindow:children()-1))
3633 frame.ZIndex=10
3634 local label=label:clone()
3635 label.Parent=frame
3636 label.Text=message:sub(100,200)
3637 if #message>=200 then
3638 label.Text=label.Text.."..."
3639 end
3640 label.Size=UDim2.new(0,(label.TextBounds.X+2),1,0)
3641 --label.Position=UDim2.new(0,(name.TextBounds.X+2),0,0)
3642 end
3643 if mode=='Local' then
3644 name.TextColor3=Color3.new(154/255,154/255,154/255)
3645 elseif mode=='Global' then
3646 name.TextColor3=Color3.new(0,1,1)
3647 elseif mode=='Team' then
3648 name.TextColor3=Color3.new(0,1,0)
3649 elseif mode=='Admin' then
3650 name.TextColor3=Color3.new(1,1,0)
3651 elseif mode=='Private' then
3652 name.TextColor3=Color3.new(170/255,0,1)
3653 elseif mode=='Nil' then
3654 name.TextColor3=Color3.new(1,1,1)
3655 name.Text='[NIL]'..name.Text
3656 end
3657 label.Size=UDim2.new(0,(label.TextBounds.X+2),1,0)
3658 label.Position=UDim2.new(0,(name.TextBounds.X+2),0,0)
3659 name.Size=UDim2.new(0,(name.TextBounds.X+2),1,0)
3660 if client.CustomChatType=='Both' or client.CustomChatType=='Bubbles' then
3661 for i,v in pairs(playergui:children()) do
3662 if v.Name==client.CodeName..player.Name..'BubbleChatFrame' then
3663 v.StudsOffset=Vector3.new(0,v.StudsOffset.Y+1,0)
3664 end
3665 end
3666 local bbg=Instance.new('BillboardGui',playergui)
3667 bbg.Name=client.CodeName..player.Name..'BubbleChatFrame'
3668 bbg.Adornee=player.Character.Head
3669 bbg.StudsOffset=Vector3.new(0,3,0)
3670 --if #message<30 then
3671 bbg.Size=UDim2.new(0,10*#label.Text,0,20)
3672 --elseif #message>=30 and #message<60 then
3673 -- bbg.Size=UDim2.new(0,10*#label.Text,0,40)
3674 --elseif #message>=60 and #message<90 then
3675 -- bbg.Size=UDim2.new(0,10*#label.Text,0,60)
3676 --elseif #message>=90 then
3677 -- bbg.Size=UDim2.new(0,10*#label.Text,0,80)
3678 --end
3679 local cam=workspace.CurrentCamera
3680 local char=player.Character
3681 local label=Instance.new('TextLabel',bbg)
3682 label.BackgroundColor3=guiSettings.PrimaryColor
3683 label.BackgroundTransparency=guiSettings.Transparency
3684 label.BorderSizePixel=0
3685 label.Text=message:sub(0,100)
3686 label.FontSize = "Size18"
3687 bbg.Size=UDim2.new(0,label.TextBounds.X+5,0,label.TextBounds.Y)
3688 label.Size=UDim2.new(1,0,1,0)
3689 --label.Text=''
3690 label.TextColor3=guiSettings.TextColor
3691 label.TextStrokeColor3=guiSettings.TextStrokeColor
3692 label.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3693 --label.TextScaled=true
3694 label.TextWrapped=true
3695 label.Font=guiSettings.Font
3696 --message=message:sub(0,100)
3697 cPcall(function()
3698 --wait((#message/5)+5)
3699 wait(5)
3700 if bbg and bbg.Name~='RemovingBillboardGui' then
3701 bbg.Name='RemovingBillboardGui'
3702 local run=true
3703 cPcall(function() wait(1) run=false end)
3704 while run and bbg and bbg.Parent and bbg:FindFirstChild("TextLabel") and wait(0.1) do
3705 bbg.StudsOffset=Vector3.new(0,bbg.StudsOffset.Y+0.1,0)
3706 bbg.TextLabel.BackgroundTransparency=bbg.TextLabel.BackgroundTransparency+0.1
3707 bbg.TextLabel.TextTransparency=bbg.TextLabel.TextTransparency+0.1
3708 bbg.TextLabel.TextStrokeTransparency=bbg.TextLabel.TextStrokeTransparency+0.1
3709 end
3710 bbg:Destroy()
3711 end
3712 end)
3713-- coroutine.wrap(function()
3714-- for i = 1, #message do
3715-- label.Text = label.Text .. message:sub(i,i)
3716-- wait(0.1)
3717-- end
3718-- end)()
3719 coroutine.wrap(function()
3720 repeat
3721 if (char.Head.Position - cam.CoordinateFrame.p).magnitude <= 100 then
3722 label.Visible = true
3723 --bbg.Enabled=true
3724 else
3725 label.Visible = false
3726 --bbg.Enabled=false
3727 end
3728 if (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7) then
3729 label.FontSize = "Size24"
3730 bbg.Size=UDim2.new(0,(label.TextBounds.X+5),0,label.TextBounds.Y)
3731 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*2 then
3732 label.FontSize = "Size18"
3733 bbg.Size=UDim2.new(0,(label.TextBounds.X+5),0,label.TextBounds.Y)
3734 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*3 then
3735 label.FontSize = "Size14"
3736 bbg.Size=UDim2.new(0,(label.TextBounds.X+5),0,label.TextBounds.Y)
3737 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*4 then
3738 label.FontSize = "Size12"
3739 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/2,0,label.TextBounds.Y/2)
3740 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*5 then
3741 label.FontSize = "Size10"
3742 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/3,0,label.TextBounds.Y/3)
3743 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= (100/7)*6 then
3744 label.FontSize = "Size9"
3745 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/4,0,label.TextBounds.Y/4)
3746 elseif (char.Head.Position - cam.CoordinateFrame.p).magnitude <= 100 then
3747 label.FontSize = "Size8"
3748 bbg.Size=UDim2.new(0,(label.TextBounds.X+5)/5,0,label.TextBounds.Y/5)
3749 end
3750 wait(0.1)
3751 until bbg.Parent==nil or not bbg or not label
3752 end)()
3753 end
3754end
3755
3756client.ListGui = function(_Name, Tab, Update, LoadTime) --LoadTime = Time it will take for each item, per item
3757 local Plr = localplayer
3758 local guiSettings=client.GetReturn("GuiSettings")
3759 --
3760 if Plr.PlayerGui:findFirstChild(client.CodeName.._Name.."GUI") then return end
3761 --
3762 local Screen, ScrollFr, NewCloneBar, Number, Top, Main, Point, NewClone, Hide = client.MainScrollGui()
3763 --
3764 Screen.Name = client.CodeName.._Name.."GUI"
3765 Top.Text = _Name
3766 --
3767 if Screen:FindFirstChild("Check") then
3768 Screen.Parent = Plr.PlayerGui
3769 Screen.Check.Value = true
3770 else
3771 client.OutputGui("Error while loading the GUI, please try again")
3772 end
3773 -------------
3774 local LogGuiInfo = function(Type)
3775 ----
3776 local NewNumber = 0
3777 for i,v in pairs(Tab) do
3778 if NewNumber <= client["MaxNumberOfLogs"] and (v.Filter and v.Filter:lower():find(Type:lower())) or (((type(v) == "table" and v.Text:lower():find(Type:lower()) or (type(v) == "string" and v:lower():find(Type:lower())))) or Type:lower() == "all") then
3779 ----
3780 local NewClone = NewCloneBar:Clone()
3781 Expand(NewClone, Point, ScrollFr, Main)
3782 NewClone.Parent = ScrollFr
3783 ----
3784 if client.Fade and not (type(LoadTime)=="boolean" and LoadTime==false) then -- Dark"s doin"
3785 wait(LoadTime or (0.01))
3786 coroutine.wrap(function()
3787 NewClone.TextTransparency = 1
3788 NewClone.TextStrokeTransparency = 1
3789 for i=1,10 do
3790 if NewClone then
3791 NewClone.TextTransparency = NewClone.TextTransparency -0.1
3792 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-guiSettings.TextStrokeTransparency)/10)
3793 wait(0.01)
3794 end
3795 end
3796 end)()
3797 end
3798 ----
3799 if type(v) == "table" then
3800 if v.Desc and v.Text then
3801 NewClone.Text = v.Text
3802 NewClone:WaitForChild("Desc")
3803 NewClone.Desc.Value = v.Desc
3804 if v.Color then
3805 NewClone.TextColor3=v.Color
3806 end
3807 end
3808 elseif type(v) == "string" then
3809 NewClone.Text = v
3810 NewClone:WaitForChild("Desc")
3811 NewClone.Desc.Value = NewClone.Text
3812 end
3813 ----
3814 NewClone.Position = UDim2.new(0, 0, 0, NewNumber*20)
3815 NewClone.TextScaled = true
3816 NewClone.FontSize = "Size24"
3817 NewClone.Font = guiSettings.Font
3818 NewNumber = NewNumber +1
3819 ----
3820 ScrollFr.CanvasSize = UDim2.new(0, 0, (NewNumber+1)/20, 0)
3821 ----
3822 end
3823 ScrollFr.CanvasSize = UDim2.new(0, 0, (NewNumber+1)/20, 0)
3824 end
3825 ----
3826 if ScrollFr:FindFirstChild("Counter") then ScrollFr.Counter:Destroy() end
3827 ----
3828 local NewClone = NewCloneBar:Clone()
3829 Expand(NewClone, Point, ScrollFr, Main)
3830 NewClone.Parent = ScrollFr
3831 NewClone.Name = "Counter"
3832 NewClone.Text = (NewNumber).." Item(s)"
3833 NewClone.Position = UDim2.new(0, 0, 0, NewNumber*20)
3834 NewClone.Desc.Value = "There are "..(NewNumber).." items currently being displayed."
3835 NewClone.TextScaled = true
3836 NewClone.FontSize = "Size24"
3837 NewClone.Font = guiSettings.Font
3838 ScrollFr.CanvasSize = UDim2.new(0, 0, 0, (#ScrollFr:children())*20)
3839 --[[if client.Fade then -- Dark"s doin"
3840 wait(0.1)
3841 coroutine.wrap(function()
3842 wait(0.4)
3843 NewClone.TextTransparency = 1
3844 NewClone.TextStrokeTransparency = 1
3845 for i=1,10 do
3846 if NewClone then
3847 NewClone.TextTransparency = NewClone.TextTransparency -0.1
3848 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-guiSettings.TextStrokeTransparency)/10)
3849 wait(0.1)
3850 end
3851 end
3852 end)()
3853 end--]]
3854 end
3855
3856 local b = Instance.new("TextBox",Main.Parent)
3857 b.Size = UDim2.new(0, 130, 0, 20)
3858 b.Position = UDim2.new(0, 5, 0, 5)
3859 b.BackgroundColor3 = guiSettings.SecondaryColor--guiSettings.PrimaryColor
3860 b.BorderColor3 = guiSettings.SecondaryColor
3861 b.BackgroundTransparency = 0.8--guiSettings.Transparency
3862 b.TextColor3 = guiSettings.TextColor
3863 b.BorderSizePixel = 0
3864 b.TextStrokeTransparency = 1--guiSettings.TextStrokeTransparency
3865 b.TextStrokeColor3 = guiSettings.TextStrokeColor
3866 b.Text = "Search"
3867 b.ZIndex = 9
3868 b.Font = guiSettings.Font
3869 b.TextScaled = true
3870 b.TextWrapped = true
3871 b.ClearTextOnFocus=true
3872 ----
3873 b.FocusLost:connect(function(enterPressed)
3874 if enterPressed and (b.Text ~= "Search" and b.Text ~= "" or string.len(b.Text) > 0) then
3875 ScrollFr:ClearAllChildren()
3876 LogGuiInfo(b.Text)
3877 elseif enterPressed and (b.Text=="" or string.len(b.Text)==0 or b.Text:lower()=="all") then
3878 ScrollFr:ClearAllChildren()
3879 LogGuiInfo("all")
3880 b.Text="Search"
3881 end
3882 end)
3883 ----
3884 b.InputBegan:connect(function(t)
3885 Main.Parent.Draggable=false
3886 end)
3887 b.InputEnded:connect(function(t)
3888 Main.Parent.Draggable=true
3889 end)
3890 ----
3891 local Refresh = Instance.new("TextButton", Main.Parent)
3892 Refresh.Style = "Custom"
3893 Refresh.Size = UDim2.new(0,20,0,20)
3894 Refresh.Position = UDim2.new(1,-75,0,5)
3895 Refresh.ZIndex = 10
3896 Refresh.Font = guiSettings.Font
3897 Refresh.FontSize = "Size18"
3898 Refresh.Text = "R"
3899 Refresh.BackgroundColor3=guiSettings.PrimaryColor
3900 Refresh.BorderSizePixel=0
3901 Refresh.TextColor3 = guiSettings.TextColor--guiSettings.SecondaryColor
3902 Refresh.BackgroundTransparency = guiSettings.Transparency
3903 ----
3904 Refresh.Visible = false --For now, mouahahahah
3905 ----
3906 if Update then Refresh.Visible = true client.ListUpdate[Update] = Tab end
3907 Refresh.MouseButton1Click:connect(function()
3908 --client.Remote("UpdateList",Update)
3909 --waitForCommand("UpdateList")
3910 Tab = client.GetReturn("UpdateList",Update)
3911 if (b.Text ~= "Search" and b.Text ~= "") then
3912 ScrollFr:ClearAllChildren()
3913 LogGuiInfo(b.Text)
3914 else
3915 ScrollFr:ClearAllChildren()
3916 LogGuiInfo("all")
3917 end--]]
3918 end)
3919
3920 -------------
3921 coroutine.wrap(function() if client.Fade then wait(0.5) end LogGuiInfo("all") end)()
3922 -------------
3923 FadeIn(guiSettings.Transparency,guiSettings.TextStrokeTransparency, ScrollFr, Top, NewClone, Hide, Main) -- Made by darkelementallord
3924end
3925--]]
3926
3927--[[
3928 local data={}
3929 data.PrimaryColor=server.PrimaryColor
3930 data.SecondaryColor=server.SecondaryColor
3931 data.Font=server.Font
3932 data.TextColor=server.TextColor
3933 data.TextStrokeTransparency=server.TextStrokeTransparency
3934 data.TextStrokeColor=server.TextStrokeColor
3935 data.Transparency=server.Transparency
3936 data.Animations=server.Animations
3937 data.MessageAnimations=server.MessageAnimations
3938 data.HelpGuiYPosScale=server.HelpGuiYPosScale
3939 data.HelpGuiYPosOffset=server.HelpGuiYPosOffset
3940 return data
3941--]]
3942
3943client.ShowNotif=function(str)
3944 local name=client.CodeName.."NOTIF"
3945 if type(str)=="string" then
3946 if not playergui:FindFirstChild(name) then
3947 local guiSettings=client.GetReturn("GuiSettings")
3948 local gui=Instance.new("ScreenGui",playergui)
3949 gui.Name=name
3950 local label=Instance.new("TextLabel",gui)
3951 label.Name="LABEL"
3952 label.Size=UDim2.new(1,0,0,30)
3953 label.Text=str
3954 label.Font=guiSettings.Font
3955 label.FontSize="Size18"
3956 label.BackgroundTransparency=guiSettings.Transparency
3957 label.TextColor3=guiSettings.TextColor
3958 label.BackgroundColor3=guiSettings.PrimaryColor
3959 label.BorderSizePixel=0
3960 label.TextStrokeTransparency=guiSettings.TextStrokeTransparency
3961 label.TextStrokeColor3=guiSettings.TextStrokeColor
3962 label.BackgroundTransparency=guiSettings.Transparency
3963 label.TextWrapped=true
3964 end
3965 else
3966 if playergui:FindFirstChild(name) then
3967 playergui:FindFirstChild(name):Destroy()
3968 end
3969 end
3970end
3971
3972client.Hint=function(str, time)
3973 if not playergui:FindFirstChild(client.CodeName..'HINTS') then
3974 local g=Instance.new('ScreenGui',playergui)
3975 local f=Instance.new('Frame',g)
3976 g.Name=client.CodeName..'HINTS'
3977 f.Size=UDim2.new(1,0,0,100)
3978 f.BackgroundTransparency=1
3979 end
3980 local frame=playergui[client.CodeName..'HINTS'].Frame
3981 local guiSettings=client.GetReturn("GuiSettings")
3982 if #frame:children()==6 then
3983 frame:children()[1]:Destroy()
3984 for h,l in pairs(frame:children()) do
3985 l.Position=UDim2.new(0,0,0,23*(h-1))
3986 end
3987 end
3988 --local scr = Instance.new("ScreenGui") scr.Name = client.CodeName.."HintGUI"
3989 local bg = Instance.new("Frame")
3990 bg.Name = "bg"
3991 bg.BackgroundColor3 = guiSettings.PrimaryColor
3992 bg.BorderSizePixel=0
3993 bg.BorderColor3 = guiSettings.SecondaryColor
3994 bg.BackgroundTransparency = guiSettings.Transparency
3995 bg.Size = UDim2.new(1,0,0,23)
3996 bg.ClipsDescendants=true
3997 bg.ZIndex = 8
3998 local msg = Instance.new("TextLabel", bg)
3999 msg.BackgroundTransparency = 1
4000 msg.ZIndex = 9
4001 msg.Name = "msg"
4002 msg.Position = UDim2.new(0,0,0)
4003 msg.Size = UDim2.new(1,0,1,0)
4004 msg.TextWrapped=true
4005 --msg.TextScaled=true
4006 msg.Font = guiSettings.Font
4007 msg.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4008 msg.TextStrokeColor3=guiSettings.TextStrokeColor
4009 msg.Text = str
4010 msg.FontSize = "Size18"
4011 msg.TextColor3 = guiSettings.TextColor
4012 bg.Position = UDim2.new(0,0,0,23*(#frame:children()))
4013 bg.Parent=frame
4014 --bg:TweenPosition(UDim2.new(0,0,0,bg.Position.Y.Offset),'Out','Linear',0.1)
4015 if not time then wait((#str/19)+2.5) else wait(time) end
4016 bg:Destroy()
4017 for h,l in pairs(frame:children()) do
4018 --if guiSettings.Animations then
4019 -- l:TweenPosition(UDim2.new(0,0,0,23*(h-1)),'Out','Linear',0.1)
4020 --else
4021 l.Position=UDim2.new(0,0,0,23*(h-1))
4022 --end
4023 end
4024end
4025
4026client.Message=function(ttl, str, scroll, time)
4027local scr = Instance.new("ScreenGui") scr.Name = client.CodeName.."MessageGUI"
4028local bg = Instance.new("Frame", scr)
4029local guiSettings=client.GetReturn("GuiSettings")
4030bg.Name = "bg"
4031bg.BackgroundColor3 = guiSettings.PrimaryColor
4032bg.BorderSizePixel = 0
4033bg.BackgroundTransparency = 0
4034bg.Size = UDim2.new(1,0,1,0)
4035bg.Position = UDim2.new(0,0,-1,0)--UDim2.new(-1,0,1,0)
4036bg.ZIndex = 8
4037local title = Instance.new("TextLabel", bg)
4038title.Name = "title"
4039title.BackgroundTransparency = 1
4040title.BorderSizePixel = 0
4041title.Size = UDim2.new(1,0,0,10)
4042title.Position = UDim2.new(0,0,0,20)
4043title.ZIndex = 9
4044title.Font = guiSettings.Font
4045title.FontSize = "Size36"
4046title.Text = ttl
4047title.TextYAlignment = "Top"
4048title.TextColor3 = guiSettings.TextColor
4049title.TextStrokeColor3 = guiSettings.TextStrokeColor
4050title.TextStrokeTransparency=1--guiSettings.TextStrokeTransparency
4051title.TextTransparency=1
4052local msg = title:clone()
4053msg.Parent = bg
4054msg.Name = "msg"
4055msg.Position = UDim2.new(.0625,0,0)
4056msg.Size = UDim2.new(.875,0,1,0)
4057msg.Font = guiSettings.Font
4058msg.Text = ""
4059msg.FontSize = "Size24"
4060msg.TextYAlignment = "Center"
4061msg.TextColor3=guiSettings.TextColor
4062msg.TextStrokeColor3=guiSettings.TextStrokeColor
4063msg.TextWrapped = true
4064msg.TextTransparency=1
4065msg.TextStrokeTransparency=1
4066bg.ClipsDescendants=true
4067bg.BackgroundTransparency=1--guiSettings.Transparency
4068scr.Parent = playergui
4069bg.Position=UDim2.new(0,0,0,0)
4070local qual=tonumber(tostring(UserSettings().GameSettings.SavedQualityLevel):match('QualityLevel(%d+)'))
4071local blur
4072if client.MessageBlur and (not qual or qual>=8) then
4073 blur=true
4074else
4075 blur=false
4076end
4077local pa
4078if blur then
4079 pa=Instance.new("Part",workspace.CurrentCamera)
4080 pa.Name="EISS_WINDOW_BLUR"
4081 pa.Material="Neon"
4082 pa.BrickColor=BrickColor.new(guiSettings.PrimaryColor)
4083 pa.Transparency=1
4084 pa.CanCollide=false
4085 pa.Anchored=true
4086 pa.FormFactor="Custom"
4087 pa.Size=Vector3.new(100,100,0)
4088 cPcall(function()
4089 while pa and pa.Parent and wait(1/40) do
4090 pa.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-2.5)*CFrame.Angles(12.6,0,0)
4091 end
4092 end)
4093end
4094
4095cPcall(function()
4096 repeat
4097 if bg.Transparency>guiSettings.Transparency and bg.Transparency<=1 then
4098 local num = bg.Transparency-0.02
4099 if num<0 then
4100 if blur and pa then pa.Transparency=guiSettings.Transparency end
4101 bg.Transparency=guiSettings.Transparency
4102 return
4103 end
4104 if blur and pa then pa.Transparency=num end
4105 bg.Transparency=num
4106 end
4107 if title.TextTransparency>0 and title.TextTransparency<=1 then
4108 local num=title.TextTransparency-0.04
4109 if num<0 then
4110 title.TextTransparency=0
4111 msg.TextTransparency=0
4112 return
4113 end
4114 title.TextTransparency=num
4115 msg.TextTransparency=num
4116 end
4117 if msg.TextStrokeTransparency>guiSettings.TextStrokeTransparency and msg.TextStrokeTransparency<=1 then
4118 local num=title.TextStrokeTransparency-0.02
4119 if num<0 then
4120 title.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4121 msg.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4122 return
4123 end
4124 title.TextStrokeTransparency=num
4125 msg.TextStrokeTransparency=num
4126 end
4127 wait(0.01)
4128 until title.TextTransparency<=0 and bg.Transparency<=guiSettings.Transparency and title.TextStrokeTransparency<=guiSettings.TextStrokeTransparency
4129 title.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4130 msg.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4131 title.TextTransparency=0
4132 msg.TextTransparenc=1
4133 if blur and pa then pa.Transparency=guiSettings.Transparency end
4134 bg.Transparency=guiSettings.Transparency
4135end)
4136if scroll then
4137 if not time then
4138 for i = 1, #str do msg.Text = msg.Text .. str:sub(i,i)
4139 wait(1/19)
4140 end
4141 wait(2.5)
4142 else
4143 for i = 1, #str do
4144 msg.Text = msg.Text .. str:sub(i,i)
4145 wait(1/19)
4146 end
4147 wait(time-(#str/19))
4148 end
4149elseif not time then
4150 msg.Text = str
4151 wait((#str/19)+2.5)
4152else
4153 msg.Text = str
4154 wait(time)
4155end
4156
4157cPcall(function()
4158 repeat
4159 if bg.Transparency<1 then
4160 if blur and pa then pa.Transparency=pa.Transparency+0.02 end
4161 bg.Transparency=bg.Transparency+0.02
4162 end
4163 if title.TextTransparency<1 then
4164 title.TextTransparency=title.TextTransparency+0.04
4165 msg.TextTransparency=msg.TextTransparency+0.04
4166 end
4167 if msg.TextStrokeTransparency<1 then
4168 title.TextStrokeTransparency=title.TextStrokeTransparency+0.02
4169 msg.TextStrokeTransparency=msg.TextStrokeTransparency+0.02
4170 end
4171 wait(0.01)
4172 until title.TextTransparency>=1 and bg.Transparency>=1 and title.TextStrokeTransparency>=1
4173 if scr then scr:Destroy() end if blur and pa then pa:Destroy() end
4174end)
4175end
4176
4177client.BlurScreen=function(on,trans)
4178 local guiSettings=client.GetReturn("GuiSettings")
4179 local exists = workspace.CurrentCamera:FindFirstChild("EISS_WINDOW_FUNC_BLUR")
4180 if exists then exists:Destroy() end
4181 if on then
4182 pa=Instance.new("Part",workspace.CurrentCamera)
4183 pa.Name="EISS_WINDOW_FUNC_BLUR"
4184 pa.Material="Neon"
4185 pa.BrickColor=BrickColor.new(guiSettings.PrimaryColor)
4186 pa.Transparency=trans or 0.5
4187 pa.CanCollide=false
4188 pa.Anchored=true
4189 pa.FormFactor="Custom"
4190 pa.Size=Vector3.new(100,100,0)
4191 cPcall(function()
4192 while pa and pa.Parent and wait(1/40) do
4193 pa.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-2.5)*CFrame.Angles(12.6,0,0)
4194 end
4195 end)
4196 else
4197 for i,v in pairs(workspace.CurrentCamera:children()) do
4198 if v.Name=="EISS_WINDOW_FUNC_BLUR" then
4199 v:Destroy()
4200 end
4201 end
4202 end
4203end
4204
4205client.AdminChat=function()
4206 local plr=localplayer
4207 if plr.PlayerGui:FindFirstChild(client.CodeName..'adminchat') then return end
4208 local g=Instance.new('ScreenGui',plr.PlayerGui) g.Name=client.CodeName..'adminchat'
4209 local f=Instance.new('Frame',g)
4210 local cf=Instance.new('Frame',f)
4211 local bar=Instance.new('TextBox',f)
4212 local title=Instance.new('TextLabel',f)
4213 local cbut=Instance.new('TextButton',f)
4214 local close=Instance.new('TextButton',f)
4215 local guiSettings=client.GetReturn("GuiSettings")
4216 f.BackgroundColor3=guiSettings.PrimaryColor
4217 f.BorderSizePixel=0
4218 f.BackgroundTransparency=guiSettings.Transparency
4219 f.Position=UDim2.new(0,5,1,-250)
4220 f.Size=UDim2.new(0,300,0,150)
4221 f.ClipsDescendants=true
4222 f.Draggable=true
4223 f.Active=true
4224 cf.BackgroundColor3=guiSettings.PrimaryColor
4225 cf.BorderSizePixel=0
4226 cf.BackgroundTransparency=guiSettings.Transparency
4227 cf.Position=UDim2.new(0,0,0,20)
4228 cf.Size=UDim2.new(0,300,0,105)
4229 cf.ClipsDescendants=true
4230 bar.BackgroundColor3=guiSettings.PrimaryColor
4231 bar.BorderSizePixel=0
4232 bar.BackgroundTransparency=guiSettings.Transparency
4233 bar.Position=UDim2.new(0,2,0,130)
4234 bar.Size=UDim2.new(0,248,0,18)
4235 bar.Font=guiSettings.Font
4236 bar.Text='Type here then press "Chat" or Enter'
4237 bar.TextScaled=true
4238 bar.TextWrapped=true
4239 bar.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4240 bar.TextStrokeColor3=guiSettings.TextStrokeColor
4241 bar.TextColor3=guiSettings.TextColor
4242 title.BackgroundTransparency=1
4243 title.Size=UDim2.new(0,300,0,15)
4244 title.Font=guiSettings.Font
4245 title.Text='Admin Chat'
4246 title.TextColor3=guiSettings.TextColor
4247 title.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4248 title.TextStrokeColor3=guiSettings.TextStrokeColor
4249 title.TextScaled=true
4250 title.TextWrapped=true
4251 cbut.BackgroundColor3=guiSettings.PrimaryColor
4252 cbut.BackgroundTransparency=guiSettings.Transparency
4253 cbut.BorderSizePixel=0
4254 cbut.Position=UDim2.new(0,253,0,130)
4255 cbut.Size=UDim2.new(0,45,0,18)
4256 cbut.Font=guiSettings.Font
4257 cbut.Text='Chat'
4258 cbut.TextColor3=guiSettings.TextColor
4259 cbut.TextScaled=true
4260 cbut.TextWrapped=true
4261 cbut.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4262 cbut.TextStrokeColor3=guiSettings.TextStrokeColor
4263 close.BackgroundColor3=guiSettings.PrimaryColor
4264 close.BorderColor3=guiSettings.PrimaryColor
4265 close.BackgroundTransparency=0.5
4266 close.Position=UDim2.new(1,-20,0,2)
4267 close.Size=UDim2.new(0,15,0,15)
4268 close.Font=guiSettings.Font
4269 close.Text='X'
4270 close.TextColor3=guiSettings.TextColor
4271 close.TextScaled=true
4272 close.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4273 close.TextStrokeColor3=guiSettings.TextStrokeColor
4274 close.MouseButton1Click:connect(function() g:Destroy() end)
4275 cbut.MouseButton1Click:connect(function()
4276 if bar.Text~='' and bar.Text~='Type here then press "Chat" or Enter' then
4277 client.Remote('AdminChat',plr.Name..': '..bar.Text)
4278 bar.Text='Type here then press "Chat" or Enter'
4279 elseif bar.Text=='' then
4280 bar.Text='Type here then press "Chat" or Enter'
4281 end
4282 end)
4283 bar.FocusLost:connect(function(enterPressed)
4284 if enterPressed then
4285 if bar.Text~='' and bar.Text~='Type here then press "Chat" or Enter' then
4286 client.Remote('AdminChat',plr.Name..': '..bar.Text)
4287 bar.Text='Type here then press "Chat" or Enter'
4288 elseif bar.Text=='' then
4289 bar.Text='Type here then press "Chat" or Enter'
4290 end
4291 end
4292 end)
4293end
4294
4295client.UpdateAdminChat=function(text)
4296 local v=localplayer
4297 if playergui:FindFirstChild(client.CodeName..'adminchat') then
4298 local gui=playergui:FindFirstChild(client.CodeName..'adminchat')
4299 local frame=v.PlayerGui:FindFirstChild(client.CodeName..'adminchat').Frame.Frame
4300 if #frame:children()>=5 then
4301 frame:children()[1]:Destroy()
4302 for h,l in pairs(frame:children()) do
4303 l.Position=UDim2.new(0,0,0,20*(h-1))
4304 end
4305 end
4306 local guiSettings=client.GetReturn("GuiSettings")
4307 local ent = Instance.new("TextLabel")
4308 ent.BackgroundTransparency = 1
4309 ent.Font = guiSettings.Font
4310 ent.FontSize = "Size18"
4311 ent.ZIndex = 8
4312 ent.Text = ""
4313 ent.TextColor3 = guiSettings.TextColor
4314 ent.TextStrokeColor3 = guiSettings.TextStrokeColor
4315 ent.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4316 ent.TextXAlignment = "Left"
4317 ent.TextYAlignment = "Top"
4318 local cl = ent:Clone()
4319 cl.Parent = frame
4320 cl.Text = text
4321 cl.Position = UDim2.new(0,0,0,20*(#frame:children()-1))
4322 cl.Size=UDim2.new(0,300,0,20)
4323 cl.TextScaled=true
4324 cl.FontSize='Size24'
4325 cl.Font=guiSettings.Font
4326 end
4327end
4328
4329client.AlertGui=function(msg)
4330 if playergui:FindFirstChild(client.CodeName..'ALERT') then return end
4331 local scr=Instance.new('ScreenGui') scr.Name=client.CodeName..'ALERT'
4332 local main=Instance.new('Frame',scr)
4333 local guiSettings=client.GetReturn("GuiSettings")
4334 main.BackgroundTransparency=guiSettings.Transparency
4335 main.BackgroundColor3=guiSettings.PrimaryColor
4336 main.BorderSizePixel=0
4337 main.Size=UDim2.new(0.5,0,0.5,0)
4338 main.Position=UDim2.new(0.25,0,0.25,0)
4339 local label=Instance.new('TextLabel',main)
4340 label.Size=UDim2.new(1,0,1,-20)
4341 label.BackgroundTransparency=1
4342 label.TextScaled=true
4343 label.Font=guiSettings.Font
4344 label.Text=''--msg
4345 label.TextColor3=guiSettings.TextColor
4346 label.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4347 label.TextStrokeColor3=guiSettings.TextStrokeColor
4348 local button=Instance.new('TextButton',main)
4349 button.BackgroundTransparency=guiSettings.Transparency
4350 button.BackgroundColor3=guiSettings.PrimaryColor--PrimaryColor
4351 --button.BorderSizePixel=0
4352 button.Font=guiSettings.Font
4353 button.BorderSizePixel=0
4354 button.TextColor3=guiSettings.TextColor
4355 button.TextScaled=true
4356 button.Position=UDim2.new(0,5,1,-25)
4357 button.Size=UDim2.new(1,-10,0,20)
4358 button.Text='Ok'
4359 button.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4360 button.TextStrokeColor3=guiSettings.TextStrokeColor
4361 scr.Parent=playergui
4362 local alarm=Instance.new('Sound',main)
4363 alarm.Volume=1
4364 alarm.Looped=true
4365 alarm.SoundId='http://www.roblox.com/asset/?id=138081509'
4366 alarm:Play()
4367 button.MouseButton1Click:connect(function()
4368 alarm:Stop()
4369 scr:Destroy()
4370 end)
4371 for i=1,#msg do
4372 label.Text=msg:sub(1,i)
4373 wait(0.1)
4374 end
4375end
4376
4377client.CmdBar=function()
4378local plr=localplayer
4379if plr.PlayerGui:FindFirstChild(client.CodeName..'CMDBAR') then return end
4380local scr=Instance.new("ScreenGui",plr.PlayerGui) scr.Name = client.CodeName.."CMDBAR"
4381local frame=Instance.new('Frame',scr)
4382local label=Instance.new('TextLabel',frame)
4383local button=Instance.new('TextButton',frame)
4384local box=Instance.new("TextBox", frame)
4385local cls = Instance.new("TextButton", frame)
4386local guiSettings=client.GetReturn("GuiSettings")
4387cls.Style = "Custom"
4388cls.Size = UDim2.new(0,15,0,15)
4389cls.Position = UDim2.new(1,-20,0,2)
4390cls.ZIndex = 10
4391cls.Font = guiSettings.Font
4392cls.FontSize = "Size14"
4393cls.Text = "X"
4394cls.TextWrapped=false
4395cls.TextScaled=false
4396cls.BackgroundColor3=guiSettings.PrimaryColor
4397cls.BorderSizePixel=0
4398cls.TextColor3=guiSettings.TextColor
4399cls.BackgroundTransparency=guiSettings.Transparency
4400cls.MouseButton1Click:connect(function() scr:Destroy() end)
4401box.TextColor3 = guiSettings.TextColor
4402box.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4403box.TextStrokeColor3=guiSettings.TextStrokeColor
4404frame.BackgroundColor3=guiSettings.PrimaryColor
4405frame.BackgroundTransparency=guiSettings.Transparency
4406--frame.BorderSizePixel=0
4407frame.BorderSizePixel=0
4408frame.Position=UDim2.new(1,260,1,-150)
4409frame.Size=UDim2.new(0,260,0,130)
4410frame.ClipsDescendants=true
4411frame.ZIndex=10
4412label.BackgroundTransparency=1
4413label.BorderSizePixel=0
4414label.Position=UDim2.new(0,125,0,8)
4415label.Size=UDim2.new(0,5,0,5)
4416label.TextColor3=guiSettings.TextColor
4417label.ClipsDescendants=false
4418label.FontSize='Size24'
4419label.Font=guiSettings.Font
4420label.TextXAlignment='Center'
4421label.TextYAlignment='Center'
4422label.Text='Command Box'
4423label.ZIndex=10
4424label.TextColor3=guiSettings.TextColor
4425label.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4426label.TextStrokeColor3=guiSettings.TextStrokeColor
4427frame.Draggable=true
4428frame.Active=true
4429label.Draggable=false
4430box.Draggable=false
4431button.Draggable=false
4432button.Position=UDim2.new(0,5,0,105)
4433button.Size=UDim2.new(0,250,0,20)
4434button.BackgroundTransparency=guiSettings.Transparency
4435button.TextColor3=guiSettings.TextColor
4436button.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4437button.TextStrokeColor3=guiSettings.TextStrokeColor
4438button.BackgroundColor3=guiSettings.PrimaryColor
4439button.FontSize='Size18'
4440button.Font=guiSettings.Font
4441button.Text='Execute'
4442button.BorderSizePixel=0
4443button.ZIndex=10
4444box.BackgroundColor3=guiSettings.PrimaryColor
4445box.BackgroundTransparency=guiSettings.Transparency
4446--box.BorderSizePixel=0
4447box.BorderSizePixel=0
4448box.ClearTextOnFocus=true
4449box.Position=UDim2.new(0,0,1,-110)
4450box.Size=UDim2.new(1,0,0,80)
4451box.ClipsDescendants=false
4452box.Font='Arial'
4453box.FontSize='Size14'
4454box.Text='Type a command then press Execute'
4455box.TextWrapped=true
4456box.TextXAlignment='Center'
4457box.TextYAlignment='Center'
4458box.TextScaled=true
4459box.MultiLine=true
4460box.ZIndex=10
4461button.MouseButton1Down:connect(function()
4462 if box.Text and box.Text~="Type a command then press Execute" then
4463 client.Remote('AdminCommand',box.Text,false,true)
4464 box.Text = "Type a command then press Execute"
4465 end
4466end)
4467wait(0.1)
4468if guiSettings.Animations then
4469 frame:TweenPosition(UDim2.new(1,-280,1,-150),'Out','Elastic',1)
4470else
4471 frame.Position=UDim2.new(1,-280,1,-150)
4472end
4473end
4474
4475client.HelpInfoGui=function()
4476 local guiSettings=client.GetReturn("GuiSettings")
4477 if playergui:FindFirstChild(client.CodeName.."HELPGUI") then return end
4478 local scr=Instance.new('ScreenGui',playergui) scr.Name=client.CodeName.."HELPGUI"
4479 local tog=Instance.new('TextButton',scr)
4480 local main=Instance.new('Frame',tog)
4481 local opened=false
4482 tog.MouseButton1Click:connect(function()
4483 if opened then
4484 if guiSettings.Animations then
4485 tog:TweenPosition(UDim2.new(0,0,0.5,-(main.Size.Y.Offset/2)),'Out','Quad',1,true,function()
4486 tog:TweenPosition(UDim2.new(0,0,guiSettings.HelpGuiYPosScale,guiSettings.HelpGuiYPosOffset),'Out','Quad',0.3,true)
4487 end)
4488 else
4489 tog.Position=UDim2.new(0,0,guiSettings.HelpGuiYPosScale,guiSettings.HelpGuiYPosOffset)
4490 end
4491 opened=false
4492 else
4493 if guiSettings.Animations then
4494 tog:TweenPosition(UDim2.new(0,0,0.5,-(main.Size.Y.Offset/2)),'Out','Quad',0.3,true,function()
4495 tog:TweenPosition(UDim2.new(0.5,200,0.5,-(main.Size.Y.Offset/2)),'Out','Quad',1,true)
4496 end)
4497 else
4498 tog.Position=UDim2.new(0.5,200,0.5,-(main.Size.Y.Offset/2))
4499 end
4500 opened=true
4501 end
4502 end)
4503 tog.BackgroundTransparency=guiSettings.Transparency
4504 tog.BackgroundColor3=guiSettings.PrimaryColor
4505 tog.BorderSizePixel=0
4506 tog.Position=UDim2.new(0,0,guiSettings.HelpGuiYPosScale,guiSettings.HelpGuiYPosOffset)
4507 tog.Size=UDim2.new(0,30,0,20)
4508 tog.Font=guiSettings.Font
4509 tog.FontSize='Size14'
4510 tog.Text='Help'
4511 tog.TextColor3=guiSettings.TextColor
4512 tog.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4513 tog.TextStrokeColor3=guiSettings.TextStrokeColor
4514 tog.TextScaled=false
4515 tog.TextWrapped=true
4516 main.BackgroundColor3=guiSettings.PrimaryColor
4517 main.BackgroundTransparency=guiSettings.Transparency
4518 main.BorderSizePixel=0
4519 main.Position=UDim2.new(0,-400,0,0)
4520 main.Size=UDim2.new(0,400,0,100)
4521 local img=Instance.new('ImageButton',main)
4522 img.BackgroundTransparency=1
4523 img.Image='rbxassetid://208591786'--208595242'--195459914'--155386507'
4524 img.Position=UDim2.new(0,300,0,5)
4525 img.Size=UDim2.new(0,90,0,90)
4526 img.MouseButton1Click:connect(function()
4527 client.Remote('AdminCommand',client.AnyPrefix..'getscript')
4528 end)
4529 local t1=Instance.new('TextButton',main)
4530 t1.BackgroundTransparency=1
4531 t1.Position=UDim2.new(0,10,0,30)
4532 t1.Size=UDim2.new(0,144,0,10)
4533 t1.TextColor3=guiSettings.TextColor
4534 t1.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4535 t1.Font=guiSettings.Font
4536 t1.FontSize='Size14'
4537 t1.TextStrokeColor3=guiSettings.TextStrokeColor
4538 t1.Text='To view commands say '..client.Prefix..'cmds or click here.'
4539 t1.Size=UDim2.new(0,t1.TextBounds.X,0,10)
4540 t1.MouseButton1Up:connect(function()
4541 client.Remote('AdminCommand',client.Prefix..'cmds')
4542 end)
4543 local t2=t1:clone() t2.Parent=main
4544 t2.Position=UDim2.new(0,10,0,50)
4545 t2.Text='To view usage info say :usage or click here.'
4546 t2.Size=UDim2.new(0,t2.TextBounds.X,0,10)
4547 local t3=t1:clone() t3.Parent=main
4548 t3.Position=UDim2.new(0,10,0,70)
4549 t3.Text='To donate or change your cape click here.'
4550 t3.Size=UDim2.new(0,t3.TextBounds.X,0,10)
4551 t2.MouseButton1Up:connect(function()
4552 client.Remote('AdminCommand',client.Prefix..'usage')
4553 end)
4554 t3.MouseButton1Up:connect(function()
4555 client.Remote('AdminCommand',client.AnyPrefix..'donate')
4556 end)
4557 if client.Console then
4558 local t4=t1:clone() t4.Parent=main
4559 t4.Position=UDim2.new(0,10,0,90)
4560 t4.Text='To open the console press '..client.ConsoleKey
4561 t4.Size=UDim2.new(0,t4.TextBounds.X,0,10)
4562 main.Size=UDim2.new(0,400,0,110)
4563 img.Size=UDim2.new(0,90,0,100)
4564 end
4565 if client.DisplayAdvertisements and #client.Advertisements>0 then
4566 main.Size=UDim2.new(0,400,0,200)
4567 local ad=Instance.new("ImageButton",main)
4568 ad.Size=UDim2.new(0,390,0,90)
4569 ad.Position=UDim2.new(0,5,1,-95)
4570 ad.BorderColor3=guiSettings.PrimaryColor
4571 local advert
4572 cPcall(function()
4573 while main and main.Parent do
4574 advert=client.Advertisements[math.random(1,#client.Advertisements)]
4575 if advert then
4576 ad.Image="rbxassetid://"..advert.Advert
4577 wait(10)
4578 else
4579 client.client.Remote("GetSetting","Advertisements")
4580 wait(1)
4581 end
4582 end
4583 end)
4584 ad.MouseButton1Click:connect(function()
4585 if not advert or not advert.Action then return end
4586 local action=advert.Action
4587 if action:lower():match("teleport:(.*)") then
4588 if main:FindFirstChild("AdvertTeleport") then main.AdvertTeleport:Destroy() end
4589 local id = action:lower():match("teleport:(.*)")
4590 id=id:match('(.%d%S+)')
4591 id=id:match("^%s*(.-)%s*$")
4592 id=tonumber(id)
4593 if id then
4594 local adframe=Instance.new("Frame",main)
4595 adframe.Name="AdvertTeleport"
4596 adframe.BackgroundColor3=guiSettings.PrimaryColor
4597 adframe.Transparency=guiSettings.Transparency
4598 adframe.BorderSizePixel=0
4599 adframe.Size=UDim2.new(0,390,0,90)
4600 adframe.Position=UDim2.new(0,5,1,-95)
4601 local teleport=Instance.new("TextButton",adframe)
4602 teleport.BackgroundColor3=Color3.new(0,170/255,0)
4603 teleport.BorderSizePixel=0
4604 teleport.Position=UDim2.new(0,20,0,20)
4605 teleport.Size=UDim2.new(0,150,0,50)
4606 teleport.Font="ArialBold"
4607 teleport.FontSize="Size36"
4608 teleport.TextColor3=guiSettings.TextColor
4609 teleport.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4610 teleport.Text="Teleport"
4611 teleport.MouseButton1Click:connect(function()
4612 service.TeleportService:Teleport(id)
4613 end)
4614 local cancel=teleport:clone()
4615 cancel.Parent=adframe
4616 cancel.BackgroundColor3=Color3.new(170/255,0,0)
4617 cancel.Text="Cancel"
4618 cancel.Position=UDim2.new(1,-170,0,20)
4619 cancel.MouseButton1Click:connect(function()
4620 adframe:Destroy()
4621 end)
4622 end
4623 elseif action:lower():match("purchase:(.*)") then
4624 local id = action:lower():match("purchase:(.*)")
4625 id=id:match('(.%d%S+)')
4626 id=id:match("^%s*(.-)%s*$")
4627 id=tonumber(id)
4628 if id then
4629 service.MarketPlace:PromptPurchase(localplayer,id)
4630 end
4631 end
4632 end)
4633 end
4634 local name=t1:clone() name.Parent=main
4635 name.Position=UDim2.new(0,150,0,0)
4636 name.Size=UDim2.new(0,100,0,20)
4637 name.Text="E.I.S.S. | By Sceleratis"
4638 local pt=t1:clone() pt.Parent=main
4639 pt.Position=UDim2.new(0,10,0,0)
4640 pt.Size=UDim2.new(0,90,0,20)
4641 pt.Text='Time | Ping | FPS'
4642 pt.TextXAlignment='Left'
4643 repeat
4644 pt.Text=GetTime()..' | '..Ping()..' | '..Round(workspace:GetRealPhysicsFPS())
4645 wait(60)
4646 until (not pt) or (not pt.Parent)
4647end
4648
4649client.Cameras=function()
4650 local plr=localplayer
4651 if plr.PlayerGui:FindFirstChild(client.CodeName.."CAMERAGUI") then return end
4652 local scr, cmf, ent, Number, top, main, point, NewClone, Hide = client.MainScrollGui() scr.Name = client.CodeName.."CAMERAGUI" scr.Parent = plr.PlayerGui
4653 if scr:FindFirstChild("Check") then
4654 scr.Parent = playergui
4655 scr.Check.Value = true
4656 else
4657 client.OutputGui("Error while loading the GUI, please try again")
4658 end
4659 top.Text='Cameras'
4660 local guiSettings=client.GetReturn("GuiSettings")
4661 local num=0
4662 local function GrabCams(p)
4663 num=0
4664 client.Remote('GetSetting','cameras')
4665 wait(0.5)
4666 repeat wait(0.1) until client['cameras']
4667 for i,v in pairs(client.cameras) do
4668 if (p=='all' or v.Name:lower():find(p)) then
4669 local cl = ent:clone()
4670 Expand(cl,point,cmf)
4671 cl.Parent = cmf
4672 cl.Text = num.." | "..v.Name
4673 cl.Desc.Value=cl.Text
4674 cl.Position = UDim2.new(0,0,0,num*20)
4675 --cl.Size=UDim2.new(0,300,0,20)
4676 cl.TextScaled=true
4677 cl.FontSize='Size24'
4678 cl.Font=guiSettings.Font
4679 cmf.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
4680 local kill = Instance.new("TextButton", cl)
4681 kill.Style = "Custom"
4682 kill.Size = UDim2.new(0,15,0,15)
4683 kill.TextScaled=true
4684 kill.Position = UDim2.new(1,-50,0,0)
4685 kill.ZIndex = 2
4686 kill.Font = guiSettings.Font
4687 kill.FontSize = "Size18"
4688 kill.Text = "X"
4689 kill.BackgroundColor3=guiSettings.PrimaryColor
4690 kill.BorderSizePixel=0
4691 kill.TextColor3=guiSettings.TextColor
4692 kill.BackgroundTransparency=guiSettings.Transparency
4693 kill.MouseButton1Click:connect(function() client.Remote('TableRemove','cameras',i) client.Remote('Destroy',v) wait(0.5) cmf:ClearAllChildren() GrabCams('all') end)
4694 local view = Instance.new("TextButton", cl)
4695 view.Style = "Custom"
4696 view.Size = UDim2.new(0,15,0,15)
4697 view.TextScaled=true
4698 view.Position = UDim2.new(1,-25,0,0)
4699 view.ZIndex = 2
4700 view.Font = guiSettings.Font
4701 view.FontSize = "Size18"
4702 view.Text = "V"
4703 view.BackgroundColor3=guiSettings.PrimaryColor
4704 view.BorderSizePixel=0
4705 view.TextColor3=guiSettings.TextColor
4706 view.BackgroundTransparency=guiSettings.Transparency
4707 view.MouseButton1Click:connect(function()
4708 local cam=workspace:FindFirstChild(v.Name)
4709 workspace.CurrentCamera.CameraType='Custom'
4710 workspace.CurrentCamera.CameraSubject=cam
4711 workspace.CurrentCamera.CoordinateFrame=CFrame.new(cam.Position)
4712 workspace.CurrentCamera.Focus=cam.CFrame
4713 workspace.CurrentCamera.FieldOfView=80
4714 end)
4715 num = num +1
4716 end
4717 end
4718 if cmf:FindFirstChild('Counter') then cmf.Counter:Destroy() end
4719 local cl = ent:Clone()
4720 Expand(cl,point,cmf,main)
4721 cl.Parent = cmf
4722 cl.Name='Counter'
4723 cl.Text=(num)..' Item(s)'
4724 cl.Position = UDim2.new(0,0,0,num*20)
4725 cl.Desc.Value='There are '..(num)..' items currently being displayed.'
4726 cl.TextScaled=true
4727 cl.FontSize='Size24'
4728 cl.Font=guiSettings.Font
4729 cmf.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
4730 end
4731 local refresh = Instance.new("TextButton", main.Parent)
4732 refresh.Visible = true
4733 refresh.Style = "Custom"
4734 refresh.Size = UDim2.new(0,20,0,20)
4735 refresh.Position = UDim2.new(1,-100,0,5)
4736 refresh.ZIndex = 10
4737 refresh.Font = guiSettings.Font
4738 refresh.FontSize = "Size18"
4739 refresh.Text = "R"
4740 refresh.BackgroundColor3=guiSettings.PrimaryColor
4741 refresh.BorderSizePixel=0
4742 refresh.TextColor3=guiSettings.TextColor
4743 refresh.BackgroundTransparency=guiSettings.Transparency
4744 refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() GrabCams('all') end)
4745 local reset = Instance.new("TextButton", main.Parent)
4746 reset.Style = "Custom"
4747 reset.Size = UDim2.new(0,20,0,20)
4748 reset.Position = UDim2.new(1,-75,0,5)
4749 reset.ZIndex = 10
4750 reset.Font = guiSettings.Font
4751 reset.FontSize = "Size18"
4752 reset.Text = "V"
4753 reset.BackgroundColor3=guiSettings.PrimaryColor
4754 reset.BorderSizePixel=0
4755 reset.TextColor3=guiSettings.TextColor
4756 reset.BackgroundTransparency=guiSettings.Transparency
4757 reset.MouseButton1Click:connect(function()
4758 workspace.CurrentCamera.CameraType='Custom'
4759 workspace.CurrentCamera.CameraSubject=localplayer.Character.Humanoid
4760 workspace.CurrentCamera.FieldOfView=70
4761 end)
4762 local b=Instance.new('TextBox',main.Parent)
4763 b.Size=UDim2.new(0,130,0,20)
4764 b.Position = UDim2.new(0, 5, 0, 5)
4765 b.BackgroundColor3=guiSettings.SecondaryColor--PrimaryColor
4766 b.BackgroundTransparency=guiSettings.Transparency
4767 b.TextColor3=guiSettings.TextColor
4768 b.BorderSizePixel=0
4769 b.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4770 b.TextStrokeColor3=guiSettings.TextStrokeColor
4771 b.Text=''
4772 b.ZIndex=9
4773 b.Font=guiSettings.Font
4774 b.TextScaled=true
4775 b.TextWrapped=true
4776 b.FocusLost:connect(function(enterPressed)
4777 if enterPressed and (b.Text~='' or string.len(b.Text)>0) then
4778 cmf:ClearAllChildren()
4779 num=0
4780 GrabCams(b.Text)
4781 elseif enterPressed and (b.Text=='' or string.len(b.Text)==0) then
4782 cmf:ClearAllChildren()
4783 num=0
4784 GrabCams('all')
4785 end
4786 end)
4787 b.InputBegan:connect(function(t)
4788 main.Parent.Draggable=false
4789 end)
4790 b.InputEnded:connect(function(t)
4791 main.Parent.Draggable=true
4792 end)
4793 FadeIn(guiSettings.Transparency,guiSettings.TextStrokeTransparency, cmf, top, NewClone, Hide, main) -- Made by darkelementallord
4794 GrabCams('all')
4795end
4796
4797client.EditTable=function(tab,name)
4798 local plr=localplayer
4799 local guiSettings=client.GetReturn("GuiSettings")
4800 if plr.PlayerGui:findFirstChild(client.CodeName..name..'TABLEEDIT') then return end
4801 local scr, cmf, ent, Number, top, main, point, NewClone, Hide = client.MainScrollGui() scr.Name = client.CodeName..name..'TABLEEDIT' scr.Parent = plr.PlayerGui
4802 if scr:FindFirstChild("Check") then
4803 scr.Parent = playergui
4804 scr.Check.Value = true
4805 else
4806 client.OutputGui("Error while loading the GUI, please try again")
4807 end
4808 top.Text=name
4809 local num=0
4810 local function GrabTable()
4811 client.Remote('GetSetting',name)
4812 cmf:ClearAllChildren()
4813 num=0
4814 for i,v in pairs(tab) do
4815 local cl = ent:clone()
4816 Expand(cl,point,cmf)
4817 cl.Parent = cmf
4818 if type(v)=='string' then
4819 cl.Text = v
4820 elseif type(v)~='string' then
4821 cl.Text = "Currently only supports strings, please edit this table from studio."
4822 end
4823 cl.Desc.Value=cl.Text
4824 cl.Position = UDim2.new(0,0,0,num*20)
4825 --cl.Size=UDim2.new(0,300,0,20)
4826 cl.TextScaled=true
4827 cl.FontSize='Size24'
4828 cl.Font=guiSettings.Font
4829 cmf.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
4830 local kill = Instance.new("TextButton", cl)
4831 kill.Style = "Custom"
4832 kill.TextScaled=true
4833 kill.Position = UDim2.new(0,335,0,0)
4834 kill.Size = UDim2.new(0,40,0,15)
4835 kill.ZIndex = 2
4836 kill.Font = guiSettings.Font
4837 kill.FontSize = "Size18"
4838 kill.Text = "Remove"
4839 kill.BackgroundColor3=guiSettings.PrimaryColor
4840 kill.BorderSizePixel=0
4841 kill.TextColor3=guiSettings.TextColor
4842 kill.BackgroundTransparency=guiSettings.Transparency
4843 kill.MouseButton1Click:connect(function() client.Remote('SaveTableRemove',name,i) table.remove(tab,i) GrabTable() end)
4844 num = num +1
4845 end
4846 end
4847 local refresh = Instance.new("TextButton", main.Parent)
4848 refresh.Visible = false --For now, mouahahahah
4849 refresh.Style = "Custom"
4850 refresh.Size = UDim2.new(0,20,0,20)
4851 refresh.Position = UDim2.new(1,-75,0,5)
4852 refresh.ZIndex = 10
4853 refresh.Font = guiSettings.Font
4854 refresh.FontSize = "Size18"
4855 refresh.Text = "R"
4856 refresh.BackgroundColor3=guiSettings.PrimaryColor
4857 refresh.BorderSizePixel=0
4858 refresh.TextColor3=guiSettings.TextColor
4859 refresh.BackgroundTransparency=guiSettings.Transparency
4860 refresh.MouseButton1Click:connect(function() GrabTable() end)
4861 local b=Instance.new('TextBox',main.Parent)
4862 b.Size=UDim2.new(0,130,0,20)
4863 b.Position = UDim2.new(0, 5, 0, 5)
4864 b.BackgroundColor3=guiSettings.SecondaryColor--PrimaryColor
4865 b.BackgroundTransparency=guiSettings.Transparency
4866 b.TextColor3=guiSettings.TextColor
4867 b.BorderSizePixel=0
4868 b.TextStrokeTransparency=guiSettings.TextStrokeTransparency
4869 b.TextStrokeColor3=guiSettings.TextStrokeColor
4870 b.Text='Add Item'
4871 b.ZIndex=9
4872 b.Font=guiSettings.Font
4873 b.TextScaled=true
4874 b.TextWrapped=true
4875 b.FocusLost:connect(function(enterPressed)
4876 if enterPressed and b.Text~="Add Item" then
4877 table.insert(tab,b.Text)
4878 client.Remote('SaveTableAdd',name,b.Text)
4879 b.Text="Add Item"
4880 GrabTable()
4881 end
4882 end)
4883 FadeIn(guiSettings.Transparency,guiSettings.TextStrokeTransparency, cmf, top, NewClone, Hide, main) -- Made by darkelementallord
4884 GrabTable()
4885end
4886
4887client.CreateCard = function()
4888 local guiSettings=client.GetReturn("GuiSettings")
4889 local NewGuiPart1 = Instance.new("ScreenGui")
4890 NewGuiPart1.Name = client.CodeName.."CARDGUI"
4891 -------
4892 local NewGuiPart2 = Instance.new("Frame")
4893 NewGuiPart2.BackgroundColor3 = guiSettings.PrimaryColor
4894 NewGuiPart2.BackgroundTransparency = guiSettings.Transparency
4895 NewGuiPart2.BorderSizePixel = 0
4896 NewGuiPart2.Position = UDim2.new(0.5, -200, 0.5, -150)
4897 NewGuiPart2.Size = UDim2.new(0, 400, 0, 300)
4898 NewGuiPart2.Parent = NewGuiPart1
4899 -------
4900 local NewGuiPart3 = Instance.new("TextLabel")
4901 NewGuiPart3.BackgroundTransparency = 1
4902 NewGuiPart3.Name = "ListName"
4903 NewGuiPart3.Position = UDim2.new(0, 10, 0, 10)
4904 NewGuiPart3.Size = UDim2.new(0, 80, 0, 30)
4905 NewGuiPart3.Font = guiSettings.Font
4906 NewGuiPart3.Text = "List Name:"
4907 NewGuiPart3.TextColor3 = guiSettings.SecondaryColor
4908 NewGuiPart3.TextXAlignment = Enum.TextXAlignment.Right
4909 NewGuiPart3.Parent = NewGuiPart2
4910 NewGuiPart3.TextWrapped = true
4911 NewGuiPart3.FontSize = "Size14"
4912 -------
4913 local NewGuiPart4 = Instance.new("TextBox")
4914 NewGuiPart4.BackgroundTransparency = guiSettings.Transparency
4915 NewGuiPart4.BorderSizePixel = 0
4916 NewGuiPart4.Name = "ListNameBox"
4917 NewGuiPart4.Position = UDim2.new(0, 100, 0, 10)
4918 NewGuiPart4.Size = UDim2.new(1, -110, 0, 30)
4919 NewGuiPart4.Font = guiSettings.Font
4920 NewGuiPart4.FontSize = Enum.FontSize.Size18
4921 NewGuiPart4.Text = ""
4922 NewGuiPart4.TextColor3 = guiSettings.PrimaryColor
4923 NewGuiPart4.Parent = NewGuiPart2
4924 NewGuiPart4.TextWrapped = true
4925 NewGuiPart4.FontSize = "Size14"
4926 -------
4927 local NewGuiPart5 = Instance.new("TextBox")
4928 NewGuiPart5.BackgroundTransparency = guiSettings.Transparency
4929 NewGuiPart5.BorderSizePixel = 0
4930 NewGuiPart5.Name = "CardNameBox"
4931 NewGuiPart5.Position = UDim2.new(0, 100, 0, 50)
4932 NewGuiPart5.Size = UDim2.new(1, -110, 0, 30)
4933 NewGuiPart5.Font = guiSettings.Font
4934 NewGuiPart5.FontSize = Enum.FontSize.Size18
4935 NewGuiPart5.Text = ""
4936 NewGuiPart5.TextColor3 = guiSettings.PrimaryColor
4937 NewGuiPart5.Parent = NewGuiPart2
4938 NewGuiPart5.TextWrapped = true
4939 NewGuiPart5.FontSize = "Size14"
4940 -------
4941 local NewGuiPart6 = Instance.new("TextLabel")
4942 NewGuiPart6.BackgroundTransparency = 1
4943 NewGuiPart6.Name = "CardDesc"
4944 NewGuiPart6.Position = UDim2.new(0, 10, 0, 90)
4945 NewGuiPart6.Size = UDim2.new(0, 80, 0, 30)
4946 NewGuiPart6.Font = guiSettings.Font
4947 NewGuiPart6.Text = "Card Desc:"
4948 NewGuiPart6.TextColor3 = guiSettings.SecondaryColor
4949 NewGuiPart6.TextXAlignment = Enum.TextXAlignment.Right
4950 NewGuiPart6.Parent = NewGuiPart2
4951 NewGuiPart6.TextWrapped = true
4952 NewGuiPart6.FontSize = "Size14"
4953 -------
4954 local NewGuiPart7 = Instance.new("TextLabel")
4955 NewGuiPart7.BackgroundTransparency = 1
4956 NewGuiPart7.Name = "CardName"
4957 NewGuiPart7.Position = UDim2.new(0, 10, 0, 50)
4958 NewGuiPart7.Size = UDim2.new(0, 80, 0, 30)
4959 NewGuiPart7.Font = Enum.Font.Arial
4960 NewGuiPart7.Text = "Card Name:"
4961 NewGuiPart7.TextColor3 = guiSettings.SecondaryColor
4962 NewGuiPart7.TextXAlignment = Enum.TextXAlignment.Right
4963 NewGuiPart7.Parent = NewGuiPart2
4964 NewGuiPart7.TextWrapped = true
4965 NewGuiPart7.FontSize = "Size14"
4966 -------
4967 local NewGuiPart8 = Instance.new("TextBox")
4968 NewGuiPart8.BackgroundTransparency = guiSettings.Transparency
4969 NewGuiPart8.BorderSizePixel = 0
4970 NewGuiPart8.Name = "CardDescBox"
4971 NewGuiPart8.Position = UDim2.new(0, 100, 0, 90)
4972 NewGuiPart8.Size = UDim2.new(1, -110, 1, -100)
4973 NewGuiPart8.Font = guiSettings.Font
4974 NewGuiPart8.FontSize = Enum.FontSize.Size18
4975 NewGuiPart8.Text = ""
4976 NewGuiPart8.TextColor3 = guiSettings.PrimaryColor
4977 NewGuiPart8.TextStrokeColor3 = guiSettings.SecondaryColor
4978 NewGuiPart8.TextXAlignment = Enum.TextXAlignment.Left
4979 NewGuiPart8.TextYAlignment = Enum.TextYAlignment.Top
4980 NewGuiPart8.Parent = NewGuiPart2
4981 NewGuiPart8.TextWrapped = true
4982 NewGuiPart8.FontSize = "Size14"
4983 -------
4984 local NewGuiPart9 = Instance.new("TextButton")
4985 NewGuiPart9.Active = true
4986 NewGuiPart9.BackgroundTransparency = guiSettings.Transparency
4987 NewGuiPart9.BorderSizePixel = 0
4988 NewGuiPart9.Name = "Make"
4989 NewGuiPart9.Position = UDim2.new(0, 10, 1, -40)
4990 NewGuiPart9.Selectable = true
4991 NewGuiPart9.Size = UDim2.new(0, 80, 0, 30)
4992 NewGuiPart9.Style = Enum.ButtonStyle.Custom
4993 NewGuiPart9.Font = guiSettings.Font
4994 NewGuiPart9.FontSize = Enum.FontSize.Size18
4995 NewGuiPart9.Text = "Create"
4996 NewGuiPart9.TextColor3 = guiSettings.PrimaryColor
4997 NewGuiPart9.Parent = NewGuiPart2
4998 NewGuiPart9.TextWrapped = true
4999 NewGuiPart9.FontSize = "Size14"
5000 NewGuiPart9.MouseButton1Down:connect(function()
5001 NewGuiPart1:Destroy()
5002 client.Remote("TrelloOperation","MakeCard",NewGuiPart4.Text,NewGuiPart5.Text,NewGuiPart8.Text)
5003 end)
5004 NewGuiPart1.Parent = localplayer.PlayerGui
5005end
5006
5007client.Settings = function(Settings,Descriptions) --Credit to darkelemental lord for making the new settings gui :)
5008 local LoadTime = 0.03
5009 local Plr = localplayer
5010 if Plr.PlayerGui:findFirstChild(client.CodeName.."SETTINGSGUI") then return end
5011 local Scr, cmf, ent, Number, top, main, point, NewClone, Hide = client.MainScrollGui() Scr.Name = client.CodeName.."SETTINGSGUI" Scr.Parent = Plr.PlayerGui
5012 if Scr:FindFirstChild("Check") then
5013 Scr.Parent = playergui
5014 Scr.Check.Value = true
5015 else
5016 client.OutputGui("Error while loading the GUI, please try again")
5017 end
5018 --
5019 ent.Size = UDim2.new(0, 235, 0, 25)
5020 --
5021 FadeIn(0.5,0, cmf, top, NewClone, Hide, main) -- Made by darkelementallord
5022 --
5023 local ClearChildren = function(Obj)
5024 for _,p in pairs(Obj:GetChildren()) do
5025 if (p ~= ent) then
5026 p:Destroy()
5027 end
5028 end
5029 end
5030 local CreateSettings = function(Query)
5031 --DECOR--
5032 local Decor = Instance.new("Frame",cmf)
5033 Decor.Name = "Decor"
5034 Decor.BackgroundColor3 = Color3.new(1,1,1)
5035 Decor.Transparency = 0.5
5036 Decor.BorderSizePixel = 0
5037 Decor.Position = UDim2.new(0, 245, 0, 25)
5038 Decor.Size = UDim2.new(0, 2, 1, -25)
5039
5040 ---------
5041 top.Text = "Settings"
5042 --TABLE_LIST--
5043 local Create_Setting_Table = function(S_Name, S_Table)
5044 --
5045 local Scr, cmf, ent, Number, top, main, point, NewClone, Hide = client.MainScrollGui()
5046 Scr.Name = client.CodeName..S_Name:upper()
5047 Scr.Parent = Plr.PlayerGui
5048 --
5049 ent.Size = UDim2.new(0, 205, 0.5, -1)
5050 --DECOR--
5051 local Decor = Instance.new("Frame",cmf)
5052 Decor.Name = "Decor"
5053 Decor.BackgroundColor3 = Color3.new(1,1,1)
5054 Decor.Transparency = 0.5
5055 Decor.BorderSizePixel = 0
5056 Decor.Position = UDim2.new(0, 210, 0, 0)
5057 Decor.Size = UDim2.new(0, 2, 1, -25)
5058 Decor.ZIndex = 9
5059 ---------
5060 top.Text = S_Name
5061 --
5062 local Create_Item = function(Item)
5063 --
5064 local Name = Item
5065 local ID = "?"
5066 --
5067 if Item:match("$group=") then
5068 Name = "Group"
5069 ID = Item:match("$group=(%d+)")
5070 elseif Item:match("(.*)=(%d+)") then
5071 Name,ID = Item:match("(.+)=(%d+)")
5072 end
5073 --
5074 local Int = Instance.new("Frame",cmf)
5075 Int.BackgroundTransparency = 1
5076 Int.Name = "Interact"
5077 Int.Size = UDim2.new(0, 205, 0, 42)
5078 Int.ZIndex = 9
5079 --
5080 local TL = ent:clone()
5081 TL.Parent = Int
5082 TL.FontSize = Enum.FontSize.Size18
5083 TL.TextScaled = true
5084 TL.Text = "Name: "..Name
5085 TL.Name = "PlayerName"
5086 TL.ZIndex = 9
5087 --
5088 if TL:FindFirstChild("Desc") then
5089 TL.Desc.Value = "Player Name"
5090 Expand(TL, point, cmf)
5091 end
5092 --
5093 local TL1 = ent:clone()
5094 TL1.Parent = Int
5095 TL1.Position = UDim2.new(0, 0, 1, -21)
5096 TL1.FontSize = Enum.FontSize.Size18
5097 TL1.TextScaled = true
5098 TL1.Text = "ID: "..ID
5099 TL1.Name = "PlayerID"
5100 TL1.ZIndex = 9
5101 --
5102 if TL1:FindFirstChild("Desc") then
5103 TL1.Desc.Value = "Player ID"
5104 Expand(TL1, point, cmf)
5105 end
5106 --
5107 local EditName = Instance.new("TextBox",TL)
5108 EditName.Name = "EditName"
5109 EditName.BackgroundTransparency = 0.5
5110 EditName.BackgroundColor3 = Color3.new(1,1,1)
5111 EditName.BorderSizePixel = 0
5112 EditName.Size = UDim2.new(0, 173, 1, 0)
5113 EditName.Position = UDim2.new(1, 15, 0, 0)
5114 EditName.Font = "Arial"
5115 EditName.TextScaled = true
5116 EditName.ClearTextOnFocus = false
5117 EditName.Text = Name
5118 EditName.TextColor3 = Color3.new(1,1,1)
5119 EditName.TextStrokeColor3 = Color3.new(0,0,0)
5120 EditName.TextStrokeTransparency = 0.5
5121 EditName.ZIndex = 9
5122 --
5123 local EditID = Instance.new("TextBox",TL1)
5124 EditID.Name = "EditID"
5125 EditID.BackgroundTransparency = 0.5
5126 EditID.BackgroundColor3 = Color3.new(1,1,1)
5127 EditID.BorderSizePixel = 0
5128 EditID.Size = UDim2.new(0, 150, 1, 0)
5129 EditID.Position = UDim2.new(1, 15, 0, 0)
5130 EditID.Font = "Arial"
5131 EditID.TextScaled = true
5132 EditID.ClearTextOnFocus = false
5133 EditID.ZIndex = 9
5134 EditID.Text = ID
5135 EditID.TextColor3 = Color3.new(1,1,1)
5136 EditID.TextStrokeColor3 = Color3.new(0,0,0)
5137 EditID.TextStrokeTransparency = 0.5
5138 --
5139 local Remove = Instance.new("TextButton",EditID)
5140 Remove.Name = "Remove"
5141 Remove.Size = UDim2.new(0, 21, 1, 0)
5142 Remove.Position = UDim2.new(1, 2, 0, 0)
5143 Remove.BackgroundColor3 = Color3.new(1,1,1)
5144 Remove.BackgroundTransparency = 0.5
5145 Remove.BorderSizePixel = 0
5146 Remove.Text = "X"
5147 Remove.TextScaled = true
5148 Remove.TextColor3 = Color3.new(1,1,1)
5149 Remove.TextStrokeColor3 = Color3.new(0,0,0)
5150 Remove.TextStrokeTransparency = 0.5
5151 Remove.Font = "Arial"
5152 Remove.ZIndex = 9
5153 --
5154 if client.Fade then
5155 local ToTransparent = {TL, EditName, EditID, Remove}
5156 for _,p in pairs(ToTransparent) do
5157 p.BackgroundTransparency = 1
5158 p.TextTransparency = 1
5159 p.TextStrokeTransparency = 1
5160 end
5161 end
5162 --
5163 return TL, TL1, Int, EditName, EditID, Remove
5164 --
5165 end
5166 --
5167 Scr.Drag:TweenPosition(UDim2.new(0, 35, 0.5, -160), "Out", "Sine", 0.5, true)
5168 --
5169 FadeIn(0.5,0.5, cmf, top, NewClone, Hide, main) -- Made by darkelementallord
5170 --
5171 local Hook = function(TL, TL1, EditName, EditID, Remove, pos)
5172 EditName.FocusLost:connect(function(Enter)
5173 if Enter then
5174 local info=EditName.Text
5175 if TL1.Text~="ID: ?" then
5176 info=info.."="..TL1.Text:sub(5)
5177 end
5178 if #EditName.Text==0 then return end
5179 if pos then
5180 client.Remote("SaveTableUpdateItem",S_Name,pos,info)
5181 S_Table[pos]=info
5182 else
5183 client.Remote("SaveTableAdd",S_Name,info)
5184 table.insert(S_Table,info)
5185 pos=#S_Table
5186 end
5187 TL.Text = "Name: "..EditName.Text
5188 else
5189 EditName.Text = TL.Text:sub(7)
5190 end
5191 end)
5192 --
5193 EditID.FocusLost:connect(function(Enter)
5194 if Enter then
5195 local info=TL.Text:sub(7).."="..EditID.Text
5196 if #EditID.Text==0 or not tonumber(EditID.Text) then return end
5197 if pos then
5198 client.Remote("SaveTableUpdateItem",S_Name,pos,info)
5199 S_Table[pos]=info
5200 else
5201 client.Remote("SaveTableAdd",S_Name,info)
5202 table.insert(S_Table,info)
5203 pos=#S_Table
5204 end
5205 TL1.Text = "ID: "..EditID.Text
5206 else
5207 EditID.Text = TL1.Text:sub(5)
5208 end
5209 end)
5210 --
5211 Remove.MouseButton1Down:connect(function()
5212 if pos then
5213 client.Remote("SaveTableRemove",S_Name,pos)
5214 table.remove(S_Table,pos)
5215 end
5216 --Repositioning--
5217 Remove.Parent.Parent.Parent:Destroy()
5218 local GuiPart,Num = cmf:GetChildren(),0
5219 for i=1,#GuiPart do
5220 --
5221 if (GuiPart[i] ~= ent) and (GuiPart[i] ~= Decor) and (GuiPart[i].Name ~= "ADD") then
5222 --
5223 GuiPart[i].Position = UDim2.new(0, 5, 0, (44*Num)) --Might want to test this... -Dark
5224 Num = Num +1
5225 --
5226 end
5227 end
5228 cmf.CanvasSize = UDim2.new(0, 0, 0, 44*(#cmf:GetChildren()-1)-19)
5229 -----------------
5230 end)
5231 end
5232 --
5233 local Add = Instance.new("TextButton",cmf)
5234 Add.Name = "ADD"
5235 Add.Text = "Add to list"
5236 Add.Size = UDim2.new(0.8, 0, 0, 20)
5237 Add.Position = UDim2.new(0.1, 0, 1, -22)
5238 Add.TextColor3 = Color3.new(1,1,1)
5239 Add.TextStrokeTransparency = 0.5
5240 Add.BackgroundColor3 = Color3.new(1,1,1)
5241 Add.BackgroundTransparency = 0.5
5242 Add.TextStrokeColor3 = Color3.new(0,0,0)
5243 Add.BorderSizePixel = 0
5244 Add.Font = "Arial"
5245 Add.TextScaled = true
5246 Add.ZIndex = 9
5247 --
5248 Add.MouseButton1Down:connect(function()
5249 --
5250 local TL, TL1, Int, EditName, EditID, Remove = Create_Item("UNKNOWN")
5251 --
5252 Hook(TL, TL1, EditName, EditID, Remove)
5253 --
5254 Int.Position = UDim2.new(0, 5, 0, 44*(#cmf:GetChildren()-2)-44)
5255 cmf.CanvasSize = UDim2.new(0, 0, 0, 44*(#cmf:GetChildren()-1)-19)
5256 --
5257 if client.Fade then -- Dark's doin"
5258 wait(LoadTime)
5259 coroutine.wrap(function()
5260 local Bin,Bin2 = {TL,TL1},{EditName, EditID, Remove}
5261 for i=1,10 do
5262 wait(0.1)
5263 for _,NewClone in pairs(Bin) do
5264 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5265 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5266 end
5267 for _,NewClone in pairs(Bin2) do
5268 NewClone.BackgroundTransparency = NewClone.BackgroundTransparency -((1-0.5)/10)
5269 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5270 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5271 end
5272 end
5273 end)()
5274 end
5275 --
5276 end)
5277 --
5278 for pos,Names in pairs(S_Table) do
5279 --
5280 local TL, TL1, Int, EditName, EditID, Remove = Create_Item(Names)
5281 --
5282 Hook(TL, TL1, EditName, EditID, Remove, pos)
5283 --
5284 Int.Position = UDim2.new(0, 5, 0, 44*(#cmf:GetChildren()-2)-44)
5285 cmf.CanvasSize = UDim2.new(0, 0, 0, 44*(#cmf:GetChildren()-1)-19)
5286 --
5287 if client.Fade then -- Dark's doin"
5288 wait(LoadTime)
5289 coroutine.wrap(function()
5290 local Bin,Bin2 = {TL,TL1},{EditName, EditID, Remove}
5291 for i=1,10 do
5292 wait(0.1)
5293 for _,NewClone in pairs(Bin) do
5294 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5295 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5296 end
5297 for _,NewClone in pairs(Bin2) do
5298 NewClone.BackgroundTransparency = NewClone.BackgroundTransparency -((1-0.5)/10)
5299 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5300 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5301 end
5302 end
5303 end)()
5304 end
5305 --
5306 end
5307 --
5308 end
5309 --BOOL--
5310 local Create_Boolean = function(S_Name, S_Value)
5311 --
5312 local TL = ent:clone()
5313 TL.FontSize = Enum.FontSize.Size18
5314 TL.TextScaled = false
5315 TL.TextWrapped = true
5316 TL.Text = S_Name
5317 TL.Name = S_Name
5318 TL.ZIndex = 9
5319 --
5320 if TL:FindFirstChild("Desc") and Descriptions[S_Name] then
5321 TL.Desc.Value = Descriptions[S_Name]
5322 Expand(TL, point, cmf)
5323 elseif TL:FindFirstChild("Desc") then
5324 TL.Desc.Value = TL.Name.." [NO DESCRIPTION]"
5325 Expand(TL, point, cmf)
5326 end
5327 --
5328 local Int = Instance.new("Frame",TL)
5329 Int.BackgroundTransparency = 1
5330 Int.Name = "Interact"
5331 Int.Size = UDim2.new(0, 145, 1, 0)
5332 Int.Position = UDim2.new(1, 15, 0, 0)
5333 Int.ZIndex = 9
5334 --
5335 local Left = Instance.new("Frame",Int)
5336 Left.Name = "Left"
5337 Left.BackgroundColor3 = Color3.new(1,1,1)
5338 Left.BackgroundTransparency = 0.5+0.2
5339 Left.BorderSizePixel = 0
5340 Left.Size = UDim2.new(0, 0, 1, 0)
5341 Left.ZIndex = 9
5342 --
5343 local Right = Instance.new("Frame",Int)
5344 Right.Name = "Right"
5345 Right.BackgroundColor3 = Color3.new(1,1,1)
5346 Right.BackgroundTransparency = 0.5+0.2
5347 Right.BorderSizePixel = 0
5348 Right.Size = UDim2.new(0, 0, 1, 0)
5349 Right.Position = UDim2.new(1, 0, 0, 0)
5350 Right.ZIndex = 9
5351 --
5352 local Click = Instance.new("TextButton",Int)
5353 Click.Name = "Click"
5354 Click.BorderSizePixel = 0
5355 Click.BackgroundTransparency = 0.5
5356 Click.BackgroundColor3 = Color3.new(0,0,0)
5357 Click.Size = UDim2.new(0.5, 0, 1, 0)
5358 Click.Font = "Arial"
5359 Click.FontSize = Enum.FontSize.Size24
5360 Click.Text = "ON"
5361 Click.TextColor3 = Color3.new(1,1,1)
5362 Click.TextStrokeColor3 = Color3.new(0,0,0)
5363 Click.TextStrokeTransparency = 0.5
5364 Click.ZIndex = 9
5365 --
5366 if S_Value then
5367 Right.Position = UDim2.new(0.5, 0, 0, 0)
5368 Right.Size = UDim2.new(0.5, 0, 1, 0)
5369 else
5370 Click.Text = "OFF"
5371 Left.Size = UDim2.new(0.5, 0, 1, 0)
5372 Click.Position = UDim2.new(0.5, 0, 0, 0)
5373 end
5374 --
5375 if client.Fade then
5376 local ToTransparent = {TL, Click, Right, Left}
5377 for _,p in pairs(ToTransparent) do
5378 p.BackgroundTransparency = 1
5379 if p.ClassName:match("Text") then
5380 p.TextTransparency = 1
5381 p.TextStrokeTransparency = 1
5382 end
5383 end
5384 end
5385 --
5386 return TL, Int, Click, Left, Right
5387 --
5388 end
5389 --STRING--
5390 local Create_String = function(S_Name, S_Value)
5391 --
5392 local TL = ent:clone()
5393 TL.FontSize = Enum.FontSize.Size18
5394 TL.TextScaled = false
5395 TL.TextWrapped = true
5396 TL.Text = S_Name
5397 TL.Name = S_Name
5398 TL.ZIndex = 9
5399 --
5400 if TL:FindFirstChild("Desc") and Descriptions[S_Name] then
5401 TL.Desc.Value = Descriptions[S_Name]
5402 Expand(TL, point, cmf)
5403 elseif TL:FindFirstChild("Desc") then
5404 TL.Desc.Value = TL.Name.." [NO DESCRIPTION]"
5405 Expand(TL, point, cmf)
5406 end
5407 --
5408 local Int = Instance.new("Frame",TL)
5409 Int.BackgroundTransparency = 1
5410 Int.Name = "Interact"
5411 Int.Size = UDim2.new(0, 145, 1, 0)
5412 Int.Position = UDim2.new(1, 15, 0, 0)
5413 Int.ZIndex = 9
5414 --
5415 local Edit = Instance.new("TextBox",Int)
5416 Edit.Name = "Edit"
5417 Edit.BackgroundTransparency = 0.5
5418 Edit.BackgroundColor3 = Color3.new(0,0,0)
5419 Edit.BorderSizePixel = 0
5420 Edit.Size = UDim2.new(1, 0, 1, 0)
5421 Edit.Font = "Arial"
5422 Edit.TextScaled = true
5423 Edit.Text = S_Value
5424 Edit.TextColor3 = Color3.new(1,1,1)
5425 Edit.TextStrokeColor3 = Color3.new(0,0,0)
5426 Edit.TextStrokeTransparency = 0.5
5427 Edit.ZIndex = 9
5428 --
5429 if client.Fade then
5430 local ToTransparent = {TL, Edit}
5431 for _,p in pairs(ToTransparent) do
5432 p.BackgroundTransparency = 1
5433 if p.ClassName:match("Text") then
5434 p.TextTransparency = 1
5435 p.TextStrokeTransparency = 1
5436 end
5437 end
5438 end
5439 --
5440 return TL, Int, Edit
5441 --
5442 end
5443 --NUMBER--
5444 local Create_Number = function(S_Name, S_Value)
5445 --
5446 local TL = ent:clone()
5447 TL.FontSize = Enum.FontSize.Size18
5448 TL.TextScaled = false
5449 TL.TextWrapped = true
5450 TL.Text = S_Name
5451 TL.Name = S_Name
5452 TL.ZIndex = 9
5453 --
5454 if TL:FindFirstChild("Desc") and Descriptions[S_Name] then
5455 TL.Desc.Value = Descriptions[S_Name]
5456 Expand(TL, point, cmf)
5457 elseif TL:FindFirstChild("Desc") then
5458 TL.Desc.Value = TL.Name.." [NO DESCRIPTION]"
5459 Expand(TL, point, cmf)
5460 end
5461 --
5462 local Int = Instance.new("Frame",TL)
5463 Int.BackgroundTransparency = 1
5464 Int.Name = "Interact"
5465 Int.Size = UDim2.new(0, 145, 1, 0)
5466 Int.Position = UDim2.new(1, 15, 0, 0)
5467 Int.ZIndex = 9
5468 --
5469 local Edit = Instance.new("TextBox",Int)
5470 Edit.Name = "Edit"
5471 Edit.BackgroundTransparency = 0.5
5472 Edit.BorderSizePixel = 0
5473 Edit.BackgroundColor3 = Color3.new(0,0,0)
5474 Edit.Size = UDim2.new(1, -16, 1, 0)
5475 Edit.Font = "Arial"
5476 Edit.TextScaled = true
5477 Edit.Text = S_Value
5478 Edit.TextColor3 = Color3.new(1,1,1)
5479 Edit.TextStrokeColor3 = Color3.new(0,0,0)
5480 Edit.TextStrokeTransparency = 0.5
5481 Edit.ZIndex = 9
5482 --
5483 local Up = Instance.new("TextButton",Int)
5484 Up.Name = "UP"
5485 Up.Text = "+"
5486 Up.Size = UDim2.new(0, 15, 0.5, -1)
5487 Up.Position = UDim2.new(1, -15, 0, 0)
5488 Up.BackgroundColor3 = Color3.new(0,0,0)
5489 Up.TextColor3 = Color3.new(1,1,1)
5490 Up.BackgroundTransparency = 0.5
5491 Up.BorderSizePixel = 0
5492 Up.Font = "Arial"
5493 Up.FontSize = Enum.FontSize.Size14
5494 Up.TextStrokeColor3 = Color3.new(0,0,0)
5495 Up.TextStrokeTransparency = 0.5
5496 Up.ZIndex = 9
5497 --
5498 local Down = Instance.new("TextButton",Int)
5499 Down.Name = "Down"
5500 Down.Text = "-"
5501 Down.Size = UDim2.new(0, 15, 0.5, -1)
5502 Down.Position = UDim2.new(1, -15, 0.5, 1)
5503 Down.BackgroundColor3 = Color3.new(0,0,0)
5504 Down.TextColor3 = Color3.new(1,1,1)
5505 Down.BackgroundTransparency = 0.5
5506 Down.BorderSizePixel = 0
5507 Down.Font = "Arial"
5508 Down.FontSize = Enum.FontSize.Size14
5509 Down.TextStrokeColor3 = Color3.new(0,0,0)
5510 Down.TextStrokeTransparency = 0.5
5511 Down.ZIndex = 9
5512 --
5513 if client.Fade then
5514 local ToTransparent = {TL, Edit, Up, Down}
5515 for _,p in pairs(ToTransparent) do
5516 p.BackgroundTransparency = 1
5517 if p.ClassName:match("Text") then
5518 p.TextTransparency = 1
5519 p.TextStrokeTransparency = 1
5520 end
5521 end
5522 end
5523 --
5524 return TL, Int, Edit, Up, Down
5525 --
5526 end
5527 --TABLE--
5528 local Create_Table = function(S_Name, S_Value)
5529 --
5530 local TL = ent:clone()
5531 TL.FontSize = Enum.FontSize.Size18
5532 TL.TextScaled = false
5533 TL.TextWrapped = true
5534 TL.Text = S_Name
5535 TL.Name = S_Name
5536 TL.ZIndex = 9
5537 --
5538 if TL:FindFirstChild("Desc") and Descriptions[S_Name] then
5539 TL.Desc.Value = Descriptions[S_Name]
5540 Expand(TL, point, cmf)
5541 elseif TL:FindFirstChild("Desc") then
5542 TL.Desc.Value = TL.Name.." [NO DESCRIPTION]"
5543 Expand(TL, point, cmf)
5544 end
5545 --
5546 local Int = Instance.new("Frame",TL)
5547 Int.BackgroundTransparency = 1
5548 Int.Name = "Interact"
5549 Int.Size = UDim2.new(0, 145, 1, 0)
5550 Int.Position = UDim2.new(1, 15, 0, 0)
5551 Int.ZIndex = 9
5552 --
5553 local Click = Instance.new("TextButton",Int)
5554 Click.Name = "Click"
5555 Click.BackgroundTransparency = 0.5
5556 Click.BackgroundColor3 = Color3.new(0,0,0)
5557 Click.BorderSizePixel = 0
5558 Click.Size = UDim2.new(1, 0, 1, 0)
5559 Click.Font = "Arial"
5560 Click.TextScaled = true
5561 Click.Text = "Click to open"
5562 Click.TextColor3 = Color3.new(1,1,1)
5563 Click.TextStrokeColor3 = Color3.new(0,0,0)
5564 Click.TextStrokeTransparency = 0.5
5565 Click.ZIndex = 9
5566 --
5567 if client.Fade then
5568 local ToTransparent = {TL, Click}
5569 for _,p in pairs(ToTransparent) do
5570 p.BackgroundTransparency = 1
5571 if p.ClassName:match("Text") then
5572 p.TextTransparency = 1
5573 p.TextStrokeTransparency = 1
5574 end
5575 end
5576 end
5577 --
5578 return TL, Int, Click
5579 --
5580 end
5581 --
5582 local ClearAll = Instance.new("TextButton",cmf)
5583 ClearAll.Size = UDim2.new(0.8, 0, 0, 20)
5584 ClearAll.Position = UDim2.new(0.1, 0, 0, 2)
5585 ClearAll.Text = "Clear Saved Settings"
5586 ClearAll.TextScaled = true
5587 ClearAll.TextColor3 = Color3.new(1,1,1)
5588 ClearAll.TextStrokeColor3 = Color3.new(0,0,0)
5589 ClearAll.TextStrokeTransparency = 0.5
5590 ClearAll.BackgroundTransparency = 0.5
5591 ClearAll.Font = "Arial"
5592 ClearAll.BackgroundColor3 = Color3.new(1,1,1)
5593 ClearAll.BorderSizePixel = 0
5594 ClearAll.ZIndex = 9
5595 --
5596 ClearAll.MouseButton1Down:connect(function()
5597 client.Remote("ClearSavedSettings")
5598 end)
5599 --
5600 local SettingsToDisplay = Settings
5601 --
5602 if Query then
5603 --
5604 local NewSettings = {}
5605 for _Set,_Val in pairs(SettingsToDisplay) do
5606 if tostring(_Set):lower():match(Query:lower()) then
5607 NewSettings[_Set]=_Val
5608 end
5609 end
5610 --
5611 SettingsToDisplay = NewSettings
5612 --
5613 end
5614 --
5615 for SettingName,SettingValue in pairs(SettingsToDisplay) do
5616 --
5617 SettingName = tostring(SettingName)
5618 --
5619 if (not tostring(Settings[SettingName])) then
5620 client.OutputGui("Unable to find the setting: '"..SettingName.."'")
5621 end
5622 --
5623 if type(Settings[SettingName]) == "string" then
5624 --
5625 local TL, Int, Edit = Create_String(SettingName, Settings[SettingName])
5626 --
5627 Edit.FocusLost:connect(function(Enter)
5628 if Enter and (Edit.Text ~= Settings[SettingName]) then
5629 client.Remote("SaveSetSetting", SettingName, Edit.Text)
5630 Settings[SettingName] = Edit.Text
5631 else
5632 Edit.Text = Settings[SettingName]
5633 end
5634 end)
5635 --
5636 TL.Parent = cmf
5637 --
5638 TL.Position = UDim2.new(0, 5, 0, ((#cmf:GetChildren()-1)*30)-20)
5639 cmf.CanvasSize = UDim2.new(0, 0, 0, ((#cmf:GetChildren()-1)*30)-20)
5640 --
5641 if client.Fade then -- Dark's doin'
5642 wait(LoadTime)
5643 coroutine.wrap(function()
5644 local Bin,Bin2 = {TL},{Edit}
5645 for i=1,10 do
5646 wait(0.1)
5647 for _,NewClone in pairs(Bin) do
5648 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5649 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5650 end
5651 for _,NewClone in pairs(Bin2) do
5652 NewClone.BackgroundTransparency = NewClone.BackgroundTransparency -((1-0.5)/10)
5653 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5654 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5655 end
5656 end
5657 end)()
5658 end
5659 --
5660 elseif type(Settings[SettingName]) == "boolean" then
5661 --
5662 local TL, Int, Click, Left, Right = Create_Boolean(SettingName, Settings[SettingName])
5663 --
5664 Click.MouseButton1Down:connect(function()
5665 if Settings[SettingName] then
5666 --
5667 client.Remote("SaveSetSetting", SettingName, false)
5668 Settings[SettingName] = false
5669 --
5670 Left:TweenSize(UDim2.new(0.5, 0, 1, 0), "Out", "Sine", 0.3, true)
5671 Right:TweenSizeAndPosition(UDim2.new(0, 0, 1, 0), UDim2.new(1, 0, 0, 0), "Out", "Sine", 0.3, true)
5672 Click:TweenPosition(UDim2.new(0.5, 0, 0, 0), "Out", "Sine", 0.3, true)
5673 --
5674 Click.Text = "OFF"
5675 --
5676 else
5677 --
5678 client.Remote("SaveSetSetting", SettingName, true)
5679 Settings[SettingName] = true
5680 --
5681 Left:TweenSize(UDim2.new(0, 0, 1, 0), "Out", "Sine", 0.3, true)
5682 Right:TweenSizeAndPosition(UDim2.new(0.5, 0, 1, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Sine", 0.3, true)
5683 Click:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Sine", 0.3, true)
5684 --
5685 Click.Text = "ON"
5686 --
5687 end
5688 end)
5689 --
5690 TL.Parent = cmf
5691 --
5692 TL.Position = UDim2.new(0, 5, 0, ((#cmf:GetChildren()-1)*30)-20)
5693 cmf.CanvasSize = UDim2.new(0, 0, 0, ((#cmf:GetChildren()-1)*30)-20)
5694 --
5695 if client.Fade then -- Dark's doin'
5696 wait(LoadTime)
5697 coroutine.wrap(function()
5698 local Bin,Bin2 = {TL},{Click, Left, Right}
5699 for i=1,10 do
5700 wait(0.1)
5701 for _,NewClone in pairs(Bin) do
5702 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5703 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5704 end
5705 for _,NewClone in pairs(Bin2) do
5706 NewClone.BackgroundTransparency = NewClone.BackgroundTransparency -((1-0.5)/10)
5707 if (not NewClone:IsA("Frame")) then
5708 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5709 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5710 end
5711 end
5712 end
5713 end)()
5714 end
5715 --
5716 elseif type(Settings[SettingName]) == "number" then
5717 --
5718 local TL, Int, Edit, Up, Down = Create_Number(SettingName, Settings[SettingName])
5719 --
5720 local Inc = 1
5721 --if tonumber(Edit.Text) and (tonumber(Edit.Text) <= 1) and (tonumber(Edit.Text) >= 0) then
5722 --Inc = 0.1
5723 --end
5724 --
5725 Edit.FocusLost:connect(function(Enter)
5726 --
5727 --[[
5728 if Inc and (Inc == 0.1) and tonumber(Edit.Text) then
5729 if (tonumber(Edit.Text) < 0) then
5730 Edit.Text = "0"
5731 elseif (tonumber(Edit.Text) > 1) then
5732 Edit.Text = "1"
5733 end
5734 end--]]
5735 --
5736 if tonumber(Edit.Text) and (tonumber(Edit.Text) ~= Settings[SettingName]) then
5737 client.Remote("SaveSetSetting", SettingName, tonumber(Edit.Text))
5738 Settings[SettingName] = tonumber(Edit.Text)
5739 else
5740 Edit.Text = tostring(Settings[SettingName])
5741 end
5742 --
5743 end)
5744 --
5745 Up.MouseButton1Down:connect(function() if tonumber(Edit.Text) then Edit.Text = tostring(tonumber(Edit.Text)+1) client.Remote("SaveSetSetting", SettingName, tonumber(Edit.Text)) Settings[SettingName] = tonumber(Edit.Text) end end)
5746 Down.MouseButton1Down:connect(function() if tonumber(Edit.Text) then Edit.Text = tostring(tonumber(Edit.Text)-1) client.Remote("SaveSetSetting", SettingName, tonumber(Edit.Text)) Settings[SettingName] = tonumber(Edit.Text) end end)
5747 --
5748 TL.Parent = cmf
5749 --
5750 TL.Position = UDim2.new(0, 5, 0, ((#cmf:GetChildren()-1)*30)-20)
5751 cmf.CanvasSize = UDim2.new(0, 0, 0, ((#cmf:GetChildren()-1)*30)-20)
5752 --
5753 if client.Fade then -- Dark's doin'
5754 wait(LoadTime)
5755 coroutine.wrap(function()
5756 local Bin,Bin2 = {TL},{Edit, Up, Down}
5757 for i=1,10 do
5758 wait(0.1)
5759 for _,NewClone in pairs(Bin) do
5760 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5761 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5762 end
5763 for _,NewClone in pairs(Bin2) do
5764 NewClone.BackgroundTransparency = NewClone.BackgroundTransparency -((1-0.5)/10)
5765 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5766 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5767 end
5768 end
5769 end)()
5770 end
5771 --
5772 elseif type(Settings[SettingName]) == "table" then
5773 --
5774 local TL, Int, Click = Create_Table(SettingName, Settings[SettingName])
5775 --
5776 Click.MouseButton1Down:connect(function()
5777 --
5778 if (not Plr.PlayerGui:FindFirstChild(client.CodeName..SettingName:upper())) then
5779 if (SettingName == "Owners") or (SettingName == "Admins") or (SettingName == "Mods") or (SettingName == "BanList") then
5780 --
5781 Create_Setting_Table(SettingName, Settings[SettingName])
5782 --
5783 else
5784 --
5785 client.EditTable(Settings[SettingName], SettingName)
5786 --
5787 end
5788 else
5789
5790 end
5791 --
5792 end)
5793 --
5794 TL.Parent = cmf
5795 --
5796 TL.Position = UDim2.new(0, 5, 0, ((#cmf:GetChildren()-1)*30)-20)
5797 cmf.CanvasSize = UDim2.new(0, 0, 0, ((#cmf:GetChildren()-1)*30)-20)
5798 --
5799 if client.Fade then -- Dark's doin'
5800 wait(LoadTime)
5801 coroutine.wrap(function()
5802 local Bin,Bin2 = {TL},{Click}
5803 for i=1,10 do
5804 wait(0.1)
5805 for _,NewClone in pairs(Bin) do
5806 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5807 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5808 end
5809 for _,NewClone in pairs(Bin2) do
5810 NewClone.BackgroundTransparency = NewClone.BackgroundTransparency -((1-0.5)/10)
5811 NewClone.TextTransparency = NewClone.TextTransparency -0.1
5812 NewClone.TextStrokeTransparency = NewClone.TextStrokeTransparency -((1-0.5)/10)
5813 end
5814 end
5815 end)()
5816 end
5817 --
5818 end
5819 --
5820 end
5821 --
5822 end
5823 --
5824 local Search = Instance.new("TextBox",main.Parent)
5825 Search.Size = UDim2.new(0, 130, 0, 20)
5826 Search.Position = UDim2.new(0, 5, 0, 5)
5827 Search.BackgroundColor3 = Color3.new(1,1,1)--Color3.new(0,0,0)
5828 Search.BorderColor3 = Color3.new(1,1,1)
5829 Search.BackgroundTransparency = 0.8--0.5
5830 Search.TextColor3 = Color3.new(1,1,1)
5831 Search.BorderSizePixel = 0
5832 Search.TextStrokeTransparency = 1--0.5
5833 Search.TextStrokeColor3 = Color3.new(0,0,0)
5834 Search.Text = "Search"
5835 Search.ZIndex = 9
5836 Search.Font = "Arial"
5837 Search.TextScaled = true
5838 Search.ClearTextOnFocus = true
5839 --
5840 Search.FocusLost:connect(function(enter)
5841 if enter then
5842 if (Search.Text == "") or (Search.Text == " ") or (Search.Text == "Search") then
5843 ClearChildren(cmf)
5844 CreateSettings()
5845 else
5846 ClearChildren(cmf)
5847 CreateSettings(Search.Text)
5848 end
5849 else
5850 Search.Text = "Search"
5851 end
5852 end)
5853 --
5854 CreateSettings()
5855 --
5856end
5857
5858client.Explorer=function()
5859 local plr=localplayer
5860 if plr.PlayerGui:findFirstChild(client.CodeName.."EXPLORERGUI") then return end
5861 local Screen, ScrollFr, NewCloneBar, Number, Top, Main, Point, NewClone, Hide = client.MainScrollGui()
5862 Screen.Name = client.CodeName.."EXPLORERGUI"
5863 Screen.Parent = plr.PlayerGui
5864 if Screen:FindFirstChild("Check") then
5865 Screen.Parent = playergui
5866 Screen.Check.Value = true
5867 else
5868 client.OutputGui("Error while loading the GUI, please try again")
5869 end
5870 Top.Text='Explorer'
5871 local parent=game
5872 local guiSettings=client.GetReturn("GuiSettings")
5873 local makegui
5874 local GrabChildren
5875 local num=0
5876 makegui=function(v)
5877 local cl = NewCloneBar:clone()
5878 Expand(cl,Point,ScrollFr,Main)
5879 cl.Parent = ScrollFr
5880 cl.Text = v.Name
5881 cl.BorderSizePixel=1
5882 cl.BackgroundTransparency=0.9
5883 cl.BackgroundColor3=guiSettings.PrimaryColor
5884 cl.BorderColor3=guiSettings.SecondaryColor
5885 cl.Position = UDim2.new(0,0,0,num*20)
5886 cl.Desc.Value='ClassName: '..v.ClassName
5887 cl.Size=UDim2.new(1,0,0,20)
5888 cl.TextScaled=true
5889 cl.FontSize='Size24'
5890 cl.Font=guiSettings.Font
5891 local kill = Instance.new("TextButton", cl)
5892 kill.Style = "Custom"
5893 kill.Size = UDim2.new(0,20,0,14)
5894 kill.TextScaled=true
5895 kill.Position = UDim2.new(1,-75,0,2)
5896 kill.ZIndex=8
5897 kill.Font = guiSettings.Font
5898 kill.FontSize = "Size18"
5899 kill.Text = "X"
5900 kill.BackgroundColor3=guiSettings.PrimaryColor
5901 kill.BorderSizePixel=0
5902 kill.TextColor3=guiSettings.TextColor
5903 kill.BackgroundTransparency=guiSettings.Transparency
5904 kill.MouseButton1Click:connect(function() v:Destroy() ScrollFr:ClearAllChildren() GrabChildren() end)
5905 local name = Instance.new("TextButton", cl)
5906 name.Style = "Custom"
5907 name.Size = UDim2.new(0,20,0,14)
5908 name.TextScaled=true
5909 name.Position = UDim2.new(1,-50,0,2)
5910 name.ZIndex=10
5911 name.Font = guiSettings.Font
5912 name.FontSize = "Size18"
5913 name.Text = "R"
5914 name.BackgroundColor3=guiSettings.PrimaryColor
5915 name.BorderSizePixel=0
5916 name.TextColor3=guiSettings.TextColor
5917 name.BackgroundTransparency=guiSettings.Transparency
5918 name.MouseButton1Click:connect(function()
5919 if cl:FindFirstChild('Rename') then
5920 cl.Rename:Destroy()
5921 else
5922 local l=Instance.new('TextBox',cl)
5923 l.Name='Rename'
5924 l.ZIndex=8
5925 l.BackgroundColor3=guiSettings.SecondaryColor
5926 l.TextScaled=true
5927 l.TextXAlignment='Left'
5928 l.BorderSizePixel=0
5929 l.TextColor3=guiSettings.TextColor
5930 l.Font=guiSettings.Font
5931 l.TextStrokeTransparency=guiSettings.TextStrokeTransparency
5932 l.TextStrokeColor3=guiSettings.TextStrokeColor
5933 l.Text=v.Name
5934 l.Size=UDim2.new(1,-80,1,0)
5935 l.Position=UDim2.new(0,0,0,0)
5936 l.FocusLost:connect(function(enterPressed)
5937 if enterPressed then
5938 v.Name=l.Text
5939 cl.Text=v.Name
5940 l:Destroy()
5941 end
5942 end)
5943 end
5944 end)
5945 if #v:children()>0 then
5946 local move = Instance.new("TextButton", cl)
5947 move.Style = "Custom"
5948 move.Size = UDim2.new(0,20,0,14)
5949 move.TextScaled=true
5950 move.Position = UDim2.new(1,-25,0,2)
5951 move.ZIndex = 8
5952 move.Font = guiSettings.Font
5953 move.FontSize = "Size18"
5954 move.Text = "+"
5955 move.BackgroundColor3=guiSettings.PrimaryColor
5956 move.BorderSizePixel=0
5957 move.TextColor3=guiSettings.TextColor
5958 move.BackgroundTransparency=guiSettings.Transparency
5959 move.MouseButton1Click:connect(function() parent=v ScrollFr:ClearAllChildren() GrabChildren() end)
5960 end
5961 num = num +1
5962 end
5963 GrabChildren=function()
5964 num=0
5965 if parent==game then
5966 local gamestuff={game:service('StarterPack'),game:service('ReplicatedStorage'),game:service('ReplicatedFirst'),game:service('Lighting'),workspace,game.StarterPack,service.StarterGui,service.Players,game:service('SoundService'),game:service('Teams')}
5967 for k,s in pairs(gamestuff)do
5968 if s and s.Name and s.Parent==game then
5969 makegui(s)
5970 end
5971 end
5972 for l,m in pairs(game:GetChildren()) do
5973 coroutine.wrap(function()
5974 pcall(function()
5975 if m and m.Name and m.ClassName and (m.ClassName=='Model' or m.ClassName=='Script' or m.ClassName=='LocalScript') then
5976 makegui(m)
5977 end
5978 end)
5979 end)()
5980 end
5981 else
5982 for i,v in pairs(parent:GetChildren()) do
5983 makegui(v)
5984 end
5985 end
5986 if ScrollFr:FindFirstChild('Counter') then ScrollFr.Counter:Destroy() end
5987 local cl = NewCloneBar:Clone()
5988 Expand(cl,Point,ScrollFr,Main)
5989 cl.Parent = ScrollFr
5990 cl.Name='Counter'
5991 cl.Text=(num)..' Item(s)'
5992 cl.Position = UDim2.new(0,0,0,num*20)
5993 cl.Desc.Value='There are '..(num)..' items currently being displayed.'
5994 cl.TextScaled=true
5995 cl.FontSize='Size24'
5996 cl.Font=guiSettings.Font
5997 ScrollFr.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
5998 end
5999 local back = Instance.new("TextButton", Main.Parent)
6000 back.Style = "Custom"
6001 back.Size = UDim2.new(0,20,0,20)
6002 back.Position = UDim2.new(1,-75,0,5)
6003 back.ZIndex = 10
6004 back.Font = guiSettings.Font
6005 back.FontSize = "Size18"
6006 back.Text = "^"
6007 back.BackgroundColor3=guiSettings.PrimaryColor
6008 back.BorderSizePixel=0
6009 back.TextColor3=guiSettings.TextColor
6010 back.BackgroundTransparency=guiSettings.Transparency
6011 back.MouseButton1Click:connect(function() if parent~=game then parent=parent.Parent end ScrollFr:ClearAllChildren() GrabChildren() end)
6012 local refresh = Instance.new("TextButton", Main.Parent)
6013 refresh.Visible = true --For now, mouahahahah
6014 refresh.Style = "Custom"
6015 refresh.Size = UDim2.new(0,20,0,20)
6016 refresh.Position = UDim2.new(1,-100,0,5)
6017 refresh.ZIndex = 10
6018 refresh.Font = guiSettings.Font
6019 refresh.FontSize = "Size18"
6020 refresh.Text = "R"
6021 refresh.BackgroundColor3=guiSettings.PrimaryColor
6022 refresh.BorderSizePixel=0
6023 refresh.TextColor3=guiSettings.TextColor
6024 refresh.BackgroundTransparency=guiSettings.Transparency
6025 refresh.MouseButton1Click:connect(function() ScrollFr:ClearAllChildren() GrabChildren() end)
6026 local b=Instance.new('TextBox',Main.Parent)
6027 b.Size=UDim2.new(0,130,0,20)
6028 b.Position = UDim2.new(0, 5, 0, 5)
6029 b.BackgroundColor3=guiSettings.SecondaryColor--PrimaryColor
6030 b.BackgroundTransparency=0.9--guiSettings.Transparency
6031 b.TextColor3=guiSettings.TextColor
6032 b.BorderSizePixel=0
6033 b.TextStrokeTransparency=1--guiSettings.TextStrokeTransparency
6034 b.TextStrokeColor3=guiSettings.TextStrokeColor
6035 b.Text=''
6036 b.ZIndex=9
6037 b.Font=guiSettings.Font
6038 b.TextScaled=true
6039 b.TextWrapped=true
6040 b.FocusLost:connect(function(enterPressed)
6041 if enterPressed and (b.Text~='' or string.len(b.Text)>0) and parent~=game then
6042 ScrollFr:ClearAllChildren()
6043 num=0
6044 for k,l in pairs(parent:GetChildren()) do
6045 if l and (l.Name:lower():sub(1,#b.Text)==b.Text and b.Text~='all') then
6046 makegui(l)
6047 end
6048 end
6049 if ScrollFr:FindFirstChild('Counter') then ScrollFr.Counter:Destroy() end
6050 local cl = NewClone:Clone()
6051 Expand(cl,Point,ScrollFr,Main)
6052 cl.Parent = ScrollFr
6053 cl.Name='Counter'
6054 cl.Text=(num)..' Item(s)'
6055 cl.Position = UDim2.new(0,0,0,num*20)
6056 cl.Desc.Value='There are '..(num)..' items currently being displayed.'
6057 cl.TextScaled=true
6058 cl.FontSize='Size24'
6059 cl.Font=guiSettings.Font
6060 ScrollFr.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
6061 elseif enterPressed and (b.Text=='' or string.len(b.Text)==0 or b.Text=='all') and parent~=game then
6062 ScrollFr:ClearAllChildren()
6063 GrabChildren()
6064 end
6065 end)
6066
6067 b.InputBegan:connect(function(t)
6068 Main.Parent.Draggable=false
6069 end)
6070 b.InputEnded:connect(function(t)
6071 Main.Parent.Draggable=true
6072 end)
6073 FadeIn(guiSettings.Transparency,guiSettings.TextStrokeTransparency, ScrollFr, Top, NewClone, Hide, Main) -- Made by darkelementallord
6074 GrabChildren()
6075end
6076
6077client.BubbleChat=function(color)
6078 if color=='off' then
6079 if playergui:FindFirstChild(client.CodeName..'BUBBLECHATGUI') then
6080 playergui[client.CodeName..'BUBBLECHATGUI']:Destroy()
6081 end
6082 else
6083 if playergui:FindFirstChild(client.CodeName..'BUBBLECHATGUI') then playergui[client.CodeName..'BUBBLECHATGUI']:Destroy() end
6084 local scr=Instance.new('ScreenGui',playergui) scr.Name=client.CodeName..'BUBBLECHATGUI'
6085 local b=Instance.new('TextBox',scr)
6086 local guiSettings=client.GetReturn("GuiSettings")
6087 b.BackgroundTransparency=guiSettings.Transparency
6088 b.BackgroundColor3=guiSettings.PrimaryColor
6089 b.BorderSizePixel=0
6090 b.TextColor3=guiSettings.TextColor
6091 b.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6092 b.TextScaled=true
6093 b.TextStrokeColor3=guiSettings.TextStrokeColor
6094 b.Text='Click here or press ";" to chat'
6095 b.Size=UDim2.new(0,150,0,20)
6096 b.Position=UDim2.new(0,5,1,-150)
6097 b.FocusLost:connect(function(enterPressed)
6098 if enterPressed and localplayer.Character:FindFirstChild('Head') and color and b.Text~='Click here or press ";" to chat' then
6099 service.ChatService:Chat(localplayer.Character.Head,b.Text,color)
6100 b.Text='Click here or press ";" to chat'
6101 end
6102 end)
6103 mouse.KeyDown:connect(function(key)
6104 if key==';' then
6105 b:CaptureFocus()
6106 end
6107 end)
6108 end
6109end
6110 --[[
6111client.PromptPlaceTeleport=function(msg,placeid)
6112local player=localplayer
6113local scr=Instance.new("ScreenGui",player.PlayerGui)
6114scr.Name = client.CodeName.."TELEPORTGUI"
6115local frame=Instance.new('Frame',scr)
6116local label=Instance.new('TextLabel',frame)
6117local yes=Instance.new('TextButton',frame)
6118local no=Instance.new('TextButton',frame)
6119frame.BackgroundColor3=guiSettings.PrimaryColor
6120frame.BorderSizePixel=0
6121frame.BackgroundTransparency=guiSettings.Transparency
6122frame.BorderSizePixel=0
6123frame.Position=UDim2.new(1,260,1,-150)
6124frame.Size=UDim2.new(0,260,0,130)
6125frame.ClipsDescendants=true
6126label.BackgroundTransparency=1
6127label.BorderSizePixel=0
6128label.Position=UDim2.new(0,125,0,8)
6129label.Size=UDim2.new(0,5,0,5)
6130label.TextColor3=guiSettings.TextColor
6131label.ClipsDescendants=false
6132label.FontSize='Size24'
6133label.Font=guiSettings.Font
6134label.TextXAlignment='Center'
6135label.TextYAlignment='Center'
6136label.Text=msg
6137frame.Draggable=true
6138frame.Active=true
6139label.Draggable=false
6140yes.BackgroundColor3=Color3.new(0,1,0)
6141yes.TextColor3=guiSettings.TextColor
6142yes.Text='Yes'
6143yes.Font=guiSettings.Font
6144yes.FontSize='Size36'
6145no.Font=guiSettings.Font
6146no.FontSize='Size36'
6147no.BackgroundColor3=Color3.new(1, 0, 0)
6148no.TextColor3=guiSettings.TextColor
6149no.Text='No'
6150yes.Size=UDim2.new(0,100,0,50)
6151yes.Position=UDim2.new(0,20,0,50)
6152no.Size=UDim2.new(0,100,0,50)
6153no.Position=UDim2.new(0,140,0,50)
6154yes.MouseButton1Down:connect(function()
6155service.TeleportService:Teleport(placeid)
6156scr:Destroy()
6157end)
6158no.MouseButton1Down:connect(function()
6159scr:Destroy()
6160end)
6161wait(0.1)
6162if guiSettings.Animations then
6163 frame:TweenPosition(UDim2.new(1,-280,1,-150),'Out','Elastic',1)
6164else
6165 frame.Position=UDim2.new(1,-280,1,-150)
6166end
6167end
6168--]]
6169
6170--[[
6171client.DonorEvent=function(desc)
6172 local prize=desc:match("Prize: (.*); Place:")
6173 local place=desc:match("Place: (.*);")
6174 if game.PlaceId==tonumber(place) then return end
6175 local g=Instance.new('ScreenGui',playergui) g.Name=client.CodeName..'DONOREVENT'
6176 local f=Instance.new('Frame',g)
6177 local l=Instance.new('TextLabel',f)
6178 local m=Instance.new('TextButton',f)
6179 local b=Instance.new('TextButton',f)
6180 f.BackgroundColor3=guiSettings.PrimaryColor
6181 f.BackgroundTransparency=guiSettings.Transparency
6182 f.BorderSizePixel=0
6183 f.Position=UDim2.new(0.5,-150,0,-200)
6184 if guiSettings.Animations then
6185 f:TweenPosition(UDim2.new(0.5,-150,0.5,-100),'Out','Elastic',1)
6186 else
6187 f.Position=UDim2.new(0.5,-150,0.5,-100)
6188 end
6189 f.Size=UDim2.new(0,300,0,200)
6190 f.ClipsDescendants=true
6191 f.Draggable=true
6192 f.Active=true
6193 l.BackgroundTransparency=1
6194 l.Size=UDim2.new(0,290,0,30)
6195 l.Position=UDim2.new(0,5,0,0)
6196 l.Font=guiSettings.Font
6197 l.Text="Donor Event!"
6198 l.TextColor3=guiSettings.TextColor
6199 l.TextScaled=true
6200 l.TextStrokeTransparency=1--guiSettings.TextStrokeTransparency
6201 l.TextStrokeColor3=guiSettings.TextStrokeColor
6202 m.BackgroundTransparency=0.5
6203 m.BackgroundColor3=guiSettings.PrimaryColor
6204 m.BorderSizePixel=0
6205 m.Position=UDim2.new(0,0,0,35)
6206 m.Size=UDim2.new(0,300,0,100)
6207 m.Font=guiSettings.Font
6208 m.Text="Prize: "..prize.."\n Place: "..place.."\n Click to Teleport"
6209 m.TextColor3=guiSettings.TextColor
6210 m.TextScaled=true
6211 m.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6212 m.TextStrokeColor3=guiSettings.TextStrokeColor
6213 m.MouseButton1Click:connect(function()
6214 service.TeleportService:Teleport(place)
6215 end)
6216 b.BackgroundColor3=guiSettings.PrimaryColor
6217 b.BorderColor3=guiSettings.PrimaryColor
6218 b.BackgroundTransparency=guiSettings.Transparency
6219 b.Position=UDim2.new(0,50,0,143)
6220 b.Size=UDim2.new(0,200,0,50)
6221 b.Font=guiSettings.Font
6222 b.Text='Close'
6223 b.TextColor3=guiSettings.TextColor
6224 b.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6225 b.TextStrokeColor3=guiSettings.TextStrokeColor
6226 b.TextScaled=true
6227 b.MouseButton1Click:connect(function() g:Destroy() end)
6228end
6229--]]
6230
6231client.PrivateMessage=function(from,message,player)
6232local g=Instance.new('ScreenGui',playergui) g.Name=client.CodeName..'PMGUI'
6233local f=Instance.new('Frame',g)
6234f.Visible=false
6235local l=Instance.new('TextLabel',f)
6236local m=Instance.new('TextLabel',f)
6237local b=Instance.new('TextButton',f)
6238local tb=Instance.new('TextBox',f)
6239local reply=Instance.new('TextButton',f)
6240local guiSettings=client.GetReturn("GuiSettings")
6241if player then
6242 tb.Visible=true
6243 reply.Visible=true
6244else
6245 tb.Visible=false
6246 reply.Visible=false
6247end
6248f.BackgroundColor3=guiSettings.PrimaryColor
6249f.BackgroundTransparency=guiSettings.Transparency
6250f.BorderSizePixel=0
6251f.Position=UDim2.new(0.5,-150,0,-200)
6252if guiSettings.Animations then
6253 f:TweenPosition(UDim2.new(0.5,-150,0.5,-100),'Out','Elastic',1)
6254else
6255 f.Position=UDim2.new(0.5,-150,0.5,-100)
6256end
6257f.Size=UDim2.new(0,300,0,200)
6258f.ClipsDescendants=true
6259f.Draggable=true
6260f.Active=true
6261l.BackgroundTransparency=1
6262l.Size=UDim2.new(0,290,0,30)
6263l.Position=UDim2.new(0,5,0,0)
6264l.Font=guiSettings.Font
6265l.Text=from
6266l.TextColor3=guiSettings.TextColor
6267l.TextScaled=true
6268l.TextStrokeTransparency=1--guiSettings.TextStrokeTransparency
6269l.TextStrokeColor3=guiSettings.TextStrokeColor
6270m.BackgroundTransparency=0.5
6271m.BackgroundColor3=guiSettings.PrimaryColor
6272m.BorderSizePixel=0
6273m.Position=UDim2.new(0,0,0,35)
6274m.Size=UDim2.new(0,300,0,100)
6275m.Font=guiSettings.Font
6276m.Text=message
6277m.TextColor3=guiSettings.TextColor
6278m.TextScaled=true
6279m.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6280m.TextStrokeColor3=guiSettings.TextStrokeColor
6281tb.BackgroundTransparency=0.5
6282tb.BackgroundColor3=guiSettings.PrimaryColor
6283tb.BorderSizePixel=0
6284tb.Position=UDim2.new(0,0,1,-63)
6285tb.Size=UDim2.new(0,300,0,25)
6286tb.Font=guiSettings.Font
6287tb.Text='Enter Text Here Then Click Reply'
6288tb.TextColor3=guiSettings.TextColor
6289tb.TextScaled=true
6290tb.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6291tb.TextStrokeColor3=guiSettings.TextStrokeColor
6292b.BackgroundColor3=guiSettings.PrimaryColor
6293b.BorderColor3=guiSettings.PrimaryColor
6294b.BackgroundTransparency=guiSettings.Transparency
6295b.Position=UDim2.new(0,50,0,143)
6296b.Size=UDim2.new(0,200,0,50)
6297if player then
6298 b.Position=UDim2.new(0,10,1,-30)
6299 b.Size=UDim2.new(0,100,0,20)
6300end
6301b.Font=guiSettings.Font
6302b.Text='Close'
6303b.TextColor3=guiSettings.TextColor
6304b.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6305b.TextStrokeColor3=guiSettings.TextStrokeColor
6306b.TextScaled=true
6307b.MouseButton1Click:connect(function() g:Destroy() end)
6308reply.BackgroundColor3=guiSettings.PrimaryColor
6309reply.BorderColor3=guiSettings.PrimaryColor
6310reply.BackgroundTransparency=guiSettings.Transparency
6311reply.Position=UDim2.new(1,-110,1,-30)
6312reply.Size=UDim2.new(0,100,0,20)
6313reply.Font=guiSettings.Font
6314reply.Text='Reply'
6315reply.TextColor3=guiSettings.TextColor
6316reply.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6317reply.TextStrokeColor3=guiSettings.TextStrokeColor
6318reply.TextScaled=true
6319reply.MouseButton1Click:connect(function()
6320 if tb.Text~='Enter Text Here Then Click Reply' and #tb.Text>0 then
6321 g:Destroy()
6322 client.Remote('PrivateMessage','Reply from '..localplayer.Name,player,tb.Text,localplayer)
6323 else
6324 tb.Text='Enter Text Here Then Click Reply'
6325 end
6326end)
6327if player then
6328 client.Notify("New Message","New "..from..". Click to here to view.",false,
6329 function() f.Visible=true end,function() g:Destroy() end,function() g:Destroy() end)
6330else
6331 f.Visible=true
6332end
6333end
6334
6335client.VoteResults=function(question,Yes,No,idk,YesNum,NoNum,IdkNum)
6336local plr=localplayer
6337local gui=Instance.new('ScreenGui',plr.PlayerGui)
6338gui.Name=client.CodeName..'RESULTS'
6339local frame=Instance.new('Frame',gui)
6340local guiSettings=client.GetReturn("GuiSettings")
6341frame.BackgroundColor3=guiSettings.PrimaryColor
6342frame.BackgroundTransparency=guiSettings.Transparency
6343frame.Position=UDim2.new(0,400,0,50)
6344frame.Size=UDim2.new(0,200,0,100)
6345frame.Draggable=true
6346frame.Active=true
6347local nyes=Instance.new('TextLabel',frame)
6348nyes.BackgroundTransparency=1
6349nyes.Position=UDim2.new(0,10,0,50)
6350nyes.Size=UDim2.new(0,70,0,10)
6351nyes.Font=guiSettings.Font
6352nyes.FontSize='Size14'
6353nyes.TextColor3=Color3.new(0,1,0)
6354nyes.Text='Number of Yes:'
6355nyes.TextScaled=true
6356nyes.TextWrapped=true
6357local nno=Instance.new('TextLabel',frame)
6358nno.BackgroundTransparency=1
6359nno.Position=UDim2.new(0,120,0,50)
6360nno.Size=UDim2.new(0,70,0,10)
6361nno.Font=guiSettings.Font
6362nno.FontSize='Size14'
6363nno.TextColor3=Color3.new(1,0,0)
6364nno.Text='Number of No:'
6365nno.TextScaled=true
6366nno.TextWrapped=true
6367local qr=Instance.new('TextLabel',frame)
6368qr.Position=UDim2.new(0,5,0,5)
6369qr.Size=UDim2.new(0,190,0,35)
6370qr.BackgroundTransparency=1
6371qr.Font=guiSettings.Font
6372qr.Text='Results For: '..question
6373qr.TextColor3=Color3.new(1,1,1)
6374qr.TextScaled=true
6375qr.TextWrapped=true
6376local yes=Instance.new('TextLabel',frame)
6377yes.BackgroundTransparency=1
6378yes.Position=UDim2.new(0,10,0,70)
6379yes.Size=UDim2.new(0,70,0,20)
6380yes.Font=guiSettings.Font
6381yes.FontSize='Size14'
6382yes.Text=YesNum.." | "..Yes.."%"
6383yes.TextColor3=Color3.new(0,1,0)
6384yes.TextWrapped=false
6385local none=Instance.new('TextLabel',frame)
6386none.BackgroundTransparency=1
6387none.Font=guiSettings.Font
6388none.FontSize='Size14'
6389none.TextColor3=Color3.new(70/255,70/255,70/255)
6390none.Text=IdkNum.." | "..idk.."%"
6391none.Position=UDim2.new(0,65,0,70)
6392none.Size=UDim2.new(0,70,0,20)
6393none.TextWrapped=false
6394local no=Instance.new('TextLabel',frame)
6395no.BackgroundTransparency=1
6396no.Position=UDim2.new(0,120,0,70)
6397no.Size=UDim2.new(0,70,0,20)
6398no.Font=guiSettings.Font
6399no.FontSize='Size14'
6400no.Text=NoNum.." | "..No.."%"
6401no.TextColor3=Color3.new(1,0,0)
6402no.TextWrapped=false
6403wait(10)
6404gui:remove()
6405end
6406
6407client.VoteQuestion=function(tname,question,Time)
6408local guiz=Instance.new('ScreenGui')
6409guiz.Name=client.CodeName..'VOTE'
6410guiz.Parent=playergui
6411local frame=Instance.new('Frame',guiz)
6412local yes=Instance.new('TextButton',frame)
6413local no=Instance.new('TextButton',frame)
6414local q=Instance.new('TextLabel',frame)
6415local t=Instance.new('TextLabel',frame)
6416frame.Position=UDim2.new(0.5,-150,0.5,-100)
6417frame.Size=UDim2.new(0,300,0,200)
6418local guiSettings=client.GetReturn("GuiSettings")
6419frame.BackgroundTransparency=guiSettings.Transparency
6420frame.BackgroundColor3=guiSettings.PrimaryColor
6421frame.Draggable=true
6422frame.Active=true
6423yes.Position=UDim2.new(0,20,0,130)
6424yes.Size=UDim2.new(0,100,0,50)
6425yes.BackgroundColor3=Color3.new(0,85,0)
6426yes.Font=guiSettings.Font
6427yes.FontSize='Size14'
6428yes.Text='Yes'
6429yes.TextColor3=Color3.new(1,1,1)
6430yes.TextScaled=true
6431yes.TextWrapped=true
6432no.Position=UDim2.new(0,180,0,130)
6433no.Size=UDim2.new(0,100,0,50)
6434no.BackgroundColor3=Color3.new(170,0,0)
6435no.Font=guiSettings.Font
6436no.FontSize='Size14'
6437no.Text='No'
6438no.TextColor3=Color3.new(1,1,1)
6439no.TextScaled=true
6440no.TextWrapped=true
6441q.Position=UDim2.new(0,10,0,25)
6442q.Size=UDim2.new(0,280,0,90)
6443q.BackgroundTransparency=1
6444q.Text=question
6445q.Font=guiSettings.Font
6446q.TextColor3=guiSettings.TextColor
6447q.TextWrapped=true
6448q.TextScaled=true
6449t.Position=UDim2.new(0,10,0,10)
6450t.Size=UDim2.new(0,280,0,10)
6451t.BackgroundTransparency=1
6452t.TextColor3=guiSettings.TextColor
6453t.TextWrapped=false
6454t.TextScaled=false
6455t.Font=guiSettings.Font
6456t.FontSize='Size14'
6457t.Text='Time Left: '..tostring(Time)..' second(s)'
6458yes.MouseButton1Click:connect(function()
6459 guiz:Destroy()
6460 client.Remote('PlaceVote',tname,'yes')
6461end)
6462no.MouseButton1Click:connect(function()
6463 guiz:Destroy()
6464 client.Remote('PlaceVote',tname,'no')
6465end)
6466for i = 0,Time do
6467 t.Text = "Time left: "..Time-i.." second(s)"
6468 wait(1)
6469end
6470if guiz ~= nil then guiz:Destroy() end
6471end
6472
6473client.PingGui=function()
6474 local plr=localplayer
6475 if plr.PlayerGui:FindFirstChild(client.CodeName..'PING') then plr.PlayerGui[client.CodeName..'PING']:Destroy() end
6476 local g=Instance.new('ScreenGui',plr.PlayerGui) g.Name=client.CodeName..'PING'
6477 local f=Instance.new('Frame',g)
6478 local button=Instance.new('TextButton',f)
6479 local title=Instance.new('TextLabel',f)
6480 local ping=Instance.new('TextLabel',f)
6481 local guiSettings=client.GetReturn("GuiSettings")
6482 f.BackgroundColor3=guiSettings.PrimaryColor
6483 f.BorderSizePixel=0
6484 f.BackgroundTransparency=guiSettings.Transparency
6485 f.Draggable=true
6486 f.Active=true
6487 f.Position=UDim2.new(0.5,-50,0,50)
6488 f.Size=UDim2.new(0,100,0,50)
6489 button.BackgroundColor3=guiSettings.PrimaryColor
6490 button.BorderColor3=guiSettings.PrimaryColor
6491 button.BackgroundTransparency=0.5
6492 button.Position=UDim2.new(0,85,0,2)
6493 button.Size=UDim2.new(0,13,0,13)
6494 button.Font=guiSettings.Font
6495 button.Text='X'
6496 button.TextColor3=guiSettings.TextColor
6497 button.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6498 button.TextStrokeColor3=guiSettings.TextStrokeColor
6499 title.Text='Ping'
6500 title.Font=guiSettings.Font
6501 title.TextColor3=guiSettings.TextColor
6502 title.TextStrokeColor3=guiSettings.TextStrokeColor
6503 title.BackgroundTransparency=1
6504 title.Position=UDim2.new(0,5,0,0)
6505 title.Size=UDim2.new(0,90,0,15)
6506 ping.BackgroundColor3=guiSettings.PrimaryColor
6507 ping.BorderSizePixel=0
6508 ping.BackgroundTransparency=guiSettings.Transparency
6509 ping.Position=UDim2.new(0,0,0,20)
6510 ping.Size=UDim2.new(0,100,0,30)
6511 ping.Font=guiSettings.Font
6512 ping.TextStrokeColor3=guiSettings.TextStrokeColor
6513 ping.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6514 ping.TextColor3=guiSettings.TextColor
6515 ping.Text='Sending...'
6516 coroutine.wrap(function()
6517 repeat
6518 ping.Text=Ping()
6519 wait(1)
6520 until not g or not g.Parent or not ping or not ping.Parent
6521 end)()
6522 ping.TextScaled=true
6523 ping.TextWrapped=true
6524 title.TextScaled=true
6525 title.TextWrapped=true
6526 button.TextScaled=true
6527 button.TextWrapped=true
6528 title.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6529 button.MouseButton1Click:connect(function()
6530 pcall(function() g:Destroy() end)
6531 end)
6532end
6533
6534client.RequestSolved=function(plr)
6535 client.RemoveNotification(plr.Name.." HQ")
6536end
6537
6538--[[
6539client.OutputGui=function(msg)
6540local plr=localplayer
6541local scr = Instance.new("ScreenGui", plr.PlayerGui)
6542scr.Name=client.CodeName..'OUTPUT'
6543local main = Instance.new("Frame", scr)
6544main.Size = UDim2.new(1,0,1,0)
6545main.BorderSizePixel = 0
6546main.BackgroundTransparency = 1
6547main.ZIndex = 8
6548local err = Instance.new("TextLabel", main)
6549err.Text=msg
6550err.BackgroundColor3 = Color3.new(0,0,0)
6551err.BackgroundTransparency = .3
6552err.TextScaled=true
6553err.TextWrapped=true
6554err.BorderSizePixel = 0
6555err.Size = UDim2.new(1,0,0,40)
6556err.Position = UDim2.new(0,0,.5,-20)
6557err.ZIndex = 9 err.Font = guiSettings.Font
6558err.FontSize = "Size24"
6559err.TextColor3 = Color3.new(1,1,1)
6560err.TextStrokeColor3 = Color3.new(1,1,1)
6561err.TextStrokeTransparency = .8
6562wait(5)
6563scr:Destroy()
6564end
6565--]]
6566
6567client.OutputGui = function(msg) --Made by darkelementallord :)
6568 wait(math.random())
6569 local Plr = localplayer
6570 for i,p in pairs(Plr.PlayerGui:GetChildren()) do
6571 if p.Name == client.CodeName.."OUTPUT" then
6572 p.Main.Position = UDim2.new(0, 0, 0.35, p.Main.Position.Y.Offset+50)
6573 --p.Main:TweenPosition(UDim2.new(0, 0, 0.35, p.Main.Position.Y.Offset +50), "Out", "Sine", 0.1, true)
6574 end
6575 end
6576 local guiSettings=client.GetReturn("GuiSettings")
6577 local scr = Instance.new("ScreenGui",Plr.PlayerGui)
6578 scr.Name = client.CodeName.."OUTPUT"
6579 local main = Instance.new("Frame",scr)
6580 main.Name = "Main"
6581 main.Size = UDim2.new(1, 0, 0, 50)
6582 main.Position = UDim2.new(0, 0, 0.5, -25)
6583 main.ZIndex = 10
6584 main.BackgroundColor3 = guiSettings.PrimaryColor--Color3.new(0, 0, 0)
6585 main.BorderSizePixel = 0
6586 main.BackgroundTransparency = 0.5
6587 local t1 = Instance.new("TextLabel",main)
6588 t1.Size = UDim2.new(1, 0, 0, 20)
6589 t1.BackgroundTransparency = 1
6590 t1.Text = "ERROR MESSAGE"
6591 t1.Font = guiSettings.Font
6592 t1.TextScaled = true
6593 t1.TextColor3 = guiSettings.TextColor--Color3.new(1, 1, 1)
6594 t1.TextStrokeTransparency = guiSettings.TextStrokeTransparency
6595 t1.ZIndex = 10
6596 local t2 = t1:clone()
6597 t2.Parent = main
6598 t2.Name = "MESSAGE"
6599 t2.Text = msg
6600 t2.Font = guiSettings.Font
6601 t2.Position = UDim2.new(0, 0, 0, 25)
6602 main:TweenPosition(UDim2.new(0, 0, 0.35, 0), "Out", "Sine", 0.1, true)
6603 coroutine.resume(coroutine.create(function()
6604 wait((5))
6605 for i=1,20 do
6606 wait(0.1)
6607 for _,GuiPart in pairs(main:GetChildren()) do
6608 GuiPart.TextTransparency = GuiPart.TextTransparency +0.02
6609 GuiPart.TextStrokeTransparency = GuiPart.TextStrokeTransparency +0.02
6610 end
6611 main.BackgroundTransparency = main.BackgroundTransparency +0.025
6612 end
6613 scr:Destroy()
6614 end))
6615end
6616
6617client.RemoveMessage=function()
6618 local v=localplayer
6619 for q,ms in pairs(v.PlayerGui:children()) do
6620 if ms.Name == client.CodeName.."MessageGUI" then
6621 ms:Destroy()
6622 elseif ms.Name == client.CodeName.."HintGUI" then
6623 ms:Destroy()
6624 end
6625 end
6626end
6627
6628client.RequestHelp=function(plr)
6629 client.Notify(plr.Name.." HQ",plr.Name.." needs help! Click to teleport.",20,
6630 function()
6631 client.Remote('HelpRespond',plr.Name,true)
6632 if localplayer.Character.Humanoid.Sit==true then
6633 localplayer.Character.Humanoid.Sit=false
6634 wait(0.5)
6635 end
6636 localplayer.Character.Torso.CFrame = plr.Character.Torso.CFrame + Vector3.new(math.random(-1,1),0,math.random(-1,1))
6637 end,
6638 function()
6639 client.Remote('HelpRespond',plr.Name,false)
6640 end
6641 )
6642end
6643
6644client.ServerDetails=function(serverInfo)
6645--local serverInfo=client.GetReturn("ServerDetails")
6646--client.remoteWithWait('SetSetting','GetServerInfo')
6647--repeat wait(0.1) until client.ServerInfo.Cameras
6648local plr=localplayer
6649if plr.PlayerGui:findFirstChild(client.CodeName.."DETAILSGUI") then return end
6650local scr, cmf, ent, Number, top, main, point, NewClone, Hide = client.MainScrollGui() scr.Name = client.CodeName.."DETAILSGUI" scr.Parent = plr.PlayerGui
6651if scr:FindFirstChild("Check") then
6652 scr.Parent = playergui
6653 scr.Check.Value = true
6654else
6655 client.OutputGui("Error while loading the GUI, please try again")
6656end
6657local guiSettings=client.GetReturn("GuiSettings")
6658local num=0
6659top.Text='Information'
6660local cl = ent:Clone()
6661cl.Parent = cmf
6662Expand(cl,point,cmf,main)
6663cl.Desc.Value='Creator of this place'
6664cl.Text = 'Owner: '..serverInfo.PlaceOwner
6665cl.Position = UDim2.new(0,0,0,num*20)
6666--cl.Size=UDim2.new(0,370,0,20)
6667cl.TextScaled=true
6668cl.FontSize='Size24'
6669cl.Font=guiSettings.Font
6670num = num +1
6671local cl = ent:Clone()
6672cl.Parent = cmf
6673cl.Text = 'Place: '..serverInfo.PlaceName
6674Expand(cl,point,cmf,main)
6675cl.Desc.Value='Name of this place'
6676cl.Position = UDim2.new(0,0,0,num*20)
6677--cl.Size=UDim2.new(0,370,0,20)
6678cl.TextScaled=true
6679cl.FontSize='Size24'
6680cl.Font=guiSettings.Font
6681num = num +1
6682local cl = ent:Clone()
6683cl.Parent = cmf
6684cl.Text = 'Players: '..#service.Players:children()
6685Expand(cl,point,cmf,main)
6686cl.Desc.Value='Amount of players currently in the server'
6687cl.Position = UDim2.new(0,0,0,num*20)
6688--cl.Size=UDim2.new(0,370,0,20)
6689cl.TextScaled=true
6690cl.FontSize='Size24'
6691cl.Font=guiSettings.Font
6692num = num +1
6693local cl = ent:Clone()
6694cl.Parent = cmf
6695cl.Text = 'Nil Players: '..serverInfo.NilPlayers
6696Expand(cl,point,cmf,main)
6697cl.Desc.Value='Amount of nil players currently in the server'
6698cl.Position = UDim2.new(0,0,0,num*20)
6699--cl.Size=UDim2.new(0,370,0,20)
6700cl.TextScaled=true
6701cl.FontSize='Size24'
6702cl.Font=guiSettings.Font
6703num = num +1
6704local cl = ent:Clone()
6705cl.Parent = cmf
6706coroutine.wrap(function()
6707repeat
6708cl.Text='Client FPS: '..Round(workspace:GetRealPhysicsFPS())
6709wait(1)
6710until cl.Parent==nil
6711end)()
6712Expand(cl,point,cmf,main)
6713cl.Desc.Value='Your client\'s frames per second at the time the :details command was ran'
6714cl.Position = UDim2.new(0,0,0,num*20)
6715--cl.Size=UDim2.new(0,370,0,20)
6716cl.TextScaled=true
6717cl.FontSize='Size24'
6718cl.Font=guiSettings.Font
6719num = num +1
6720local cl = ent:Clone()
6721cl.Parent = cmf
6722cl.Text='Server Speed: '..serverInfo.ServerSpeed
6723Expand(cl,point,cmf,main)
6724cl.Desc.Value='Server speed at the time the :details commands was ran'
6725cl.Position = UDim2.new(0,0,0,num*20)
6726--cl.Size=UDim2.new(0,370,0,20)
6727cl.TextScaled=true
6728cl.FontSize='Size24'
6729cl.Font=guiSettings.Font
6730num = num +1
6731local cl = ent:Clone()
6732cl.Parent = cmf
6733cl.Text='Your Ping: '..Ping()..'s'
6734Expand(cl,point,cmf,main)
6735cl.Desc.Value='Your ping at the time the :details command was ran'
6736cl.Position = UDim2.new(0,0,0,num*20)
6737--cl.Size=UDim2.new(0,370,0,20)
6738cl.TextScaled=true
6739cl.FontSize='Size24'
6740cl.Font=guiSettings.Font
6741num = num +1
6742local cl = ent:Clone()
6743cl.Parent = cmf
6744cl.Text='Workspace objects: '..#workspace:children()
6745Expand(cl,point,cmf,main)
6746cl.Desc.Value='Amount of objects in workspace when command was ran'
6747cl.Position = UDim2.new(0,0,0,num*20)
6748--cl.Size=UDim2.new(0,370,0,20)
6749cl.TextScaled=true
6750cl.FontSize='Size24'
6751cl.Font=guiSettings.Font
6752num = num +1
6753local cl = ent:Clone()
6754cl.Parent = cmf
6755cl.Text='Owner Id: '..game.CreatorId
6756cl.Position = UDim2.new(0,0,0,num*20)
6757--cl.Size=UDim2.new(0,370,0,20)
6758cl.TextScaled=true
6759cl.FontSize='Size24'
6760cl.Font=guiSettings.Font
6761num = num +1
6762local cl = ent:Clone()
6763cl.Parent = cmf
6764cl.Text='Place Id: '.. game.PlaceId
6765Expand(cl,point,cmf,main)
6766cl.Desc.Value='This place\'s ID'
6767cl.Position = UDim2.new(0,0,0,num*20)
6768--cl.Size=UDim2.new(0,370,0,20)
6769cl.TextScaled=true
6770cl.FontSize='Size24'
6771cl.Font=guiSettings.Font
6772num = num +1
6773local cl = ent:Clone()
6774cl.Parent = cmf
6775cl.Text='Place version: '..game.PlaceVersion
6776Expand(cl,point,cmf,main)
6777cl.Desc.Value='Current version of this place'
6778cl.Position = UDim2.new(0,0,0,num*20)
6779--cl.Size=UDim2.new(0,370,0,20)
6780cl.TextScaled=true
6781cl.FontSize='Size24'
6782cl.Font=guiSettings.Font
6783num = num +1
6784local cl = ent:Clone()
6785cl.Parent = cmf
6786cl.Text='Script version: '..serverInfo.AdminVersion
6787Expand(cl,point,cmf,main)
6788cl.Desc.Value='Version of the script in this place'
6789cl.Position = UDim2.new(0,0,0,num*20)
6790--cl.Size=UDim2.new(0,370,0,20)
6791cl.TextScaled=true
6792cl.FontSize='Size24'
6793cl.Font=guiSettings.Font
6794num = num +1
6795local cl = ent:Clone()
6796cl.Parent = cmf
6797cl.Text='Server Start Time: '..serverInfo.ServerStartTime
6798Expand(cl,point,cmf,main)
6799cl.Desc.Value='Time when the server started'
6800cl.Position = UDim2.new(0,0,0,num*20)
6801--cl.Size=UDim2.new(0,370,0,20)
6802cl.TextScaled=true
6803cl.FontSize='Size24'
6804cl.Font=guiSettings.Font
6805num = num +1
6806local cl = ent:Clone()
6807cl.Parent = cmf
6808cl.Text='Server Time: '..serverInfo.CurrentTime
6809Expand(cl,point,cmf,main)
6810cl.Desc.Value='Server time at the time the command was ran'
6811cl.Position = UDim2.new(0,0,0,num*20)
6812--cl.Size=UDim2.new(0,370,0,20)
6813cl.TextScaled=true
6814cl.FontSize='Size24'
6815cl.Font=guiSettings.Font
6816num = num +1
6817local cl = ent:Clone()
6818cl.Parent = cmf
6819cl.Text='Server Age: '..serverInfo.ServerAge
6820Expand(cl,point,cmf,main)
6821cl.Desc.Value='Age of the server'
6822cl.Position = UDim2.new(0,0,0,num*20)
6823--cl.Size=UDim2.new(0,370,0,20)
6824cl.TextScaled=true
6825cl.FontSize='Size24'
6826cl.Font=guiSettings.Font
6827num = num +1
6828local cl = ent:Clone()
6829cl.Parent = cmf
6830coroutine.wrap(function()
6831repeat
6832cl.Text='Local Time: '..GetTime()
6833wait(1)
6834until cl.Parent==nil
6835end)()
6836Expand(cl,point,cmf,main)
6837cl.Desc.Value='Your current time'
6838cl.Position = UDim2.new(0,0,0,num*20)
6839--cl.Size=UDim2.new(0,370,0,20)
6840cl.TextScaled=true
6841cl.FontSize='Size24'
6842cl.Font=guiSettings.Font
6843num = num +1
6844local cl = ent:Clone()
6845cl.Parent = cmf
6846coroutine.wrap(function()
6847repeat
6848cl.Text='TimeOfDay: '..service.Lighting.TimeOfDay
6849wait(1)
6850until cl.Parent==nil
6851end)()
6852Expand(cl,point,cmf,main)
6853cl.Desc.Value='Current Lighting TimeOfDay'
6854cl.Position = UDim2.new(0,0,0,num*20)
6855--cl.Size=UDim2.new(0,370,0,20)
6856cl.TextScaled=true
6857cl.FontSize='Size24'
6858cl.Font=guiSettings.Font
6859num = num +1
6860local cl = ent:Clone()
6861cl.Parent = cmf
6862cl.Text='Non-Admins In-Game: '..serverInfo.NonAdmins
6863Expand(cl,point,cmf,main)
6864cl.Desc.Value='Non-Admins in-game when the command was ran'
6865cl.Position = UDim2.new(0,0,0,num*20)
6866--cl.Size=UDim2.new(0,370,0,20)
6867cl.TextScaled=true
6868cl.FontSize='Size24'
6869cl.Font=guiSettings.Font
6870num = num +1
6871local cl = ent:Clone()
6872cl.Parent = cmf
6873cl.Text='Admins In-Game: '..serverInfo.Admins
6874Expand(cl,point,cmf,main)
6875cl.Desc.Value='Admins in-game when the command was ran'
6876cl.Position = UDim2.new(0,0,0,num*20)
6877--cl.Size=UDim2.new(0,370,0,20)
6878cl.TextScaled=true
6879cl.FontSize='Size24'
6880cl.Font=guiSettings.Font
6881num = num +1
6882local cl = ent:Clone()
6883cl.Parent = cmf
6884cl.Text='Admin objects: '..serverInfo.Objects
6885Expand(cl,point,cmf,main)
6886cl.Desc.Value='Number of admin objects at the time the command was ran'
6887cl.Position = UDim2.new(0,0,0,num*20)
6888--cl.Size=UDim2.new(0,370,0,20)
6889cl.TextScaled=true
6890cl.FontSize='Size24'
6891cl.Font=guiSettings.Font
6892num = num +1
6893local cl = ent:Clone()
6894cl.Parent = cmf
6895cl.Text='Admin cameras: '..serverInfo.Cameras
6896Expand(cl,point,cmf,main)
6897cl.Desc.Value='Number of cameras when the command was ran'
6898cl.Position = UDim2.new(0,0,0,num*20)
6899--cl.Size=UDim2.new(0,370,0,20)
6900cl.TextScaled=true
6901cl.FontSize='Size24'
6902cl.Font=guiSettings.Font
6903num = num +1
6904local cl = ent:Clone()
6905cl.Parent = cmf
6906cl.Text='Http: '..serverInfo.Http
6907Expand(cl,point,cmf,main)
6908cl.Desc.Value='Shows if Http is enabled or disabled'
6909cl.Position = UDim2.new(0,0,0,num*20)
6910--cl.Size=UDim2.new(0,370,0,20)
6911cl.TextScaled=true
6912cl.FontSize='Size24'
6913cl.Font=guiSettings.Font
6914num = num +1
6915local cl = ent:Clone()
6916cl.Parent = cmf
6917cl.Text='Filtering: '..serverInfo.Filtering
6918Expand(cl,point,cmf,main)
6919cl.Desc.Value='Shows if Filtering is enabled or disabled'
6920cl.Position = UDim2.new(0,0,0,num*20)
6921--cl.Size=UDim2.new(0,370,0,20)
6922cl.TextScaled=true
6923cl.FontSize='Size24'
6924cl.Font=guiSettings.Font
6925num = num +1
6926local cl = ent:Clone()
6927cl.Parent = cmf
6928cl.Text='Streaming: '..serverInfo.Streaming
6929Expand(cl,point,cmf,main)
6930cl.Desc.Value='Shows if Streaming is enabled or disabled'
6931cl.Position = UDim2.new(0,0,0,num*20)
6932--cl.Size=UDim2.new(0,370,0,20)
6933cl.TextScaled=true
6934cl.FontSize='Size24'
6935cl.Font=guiSettings.Font
6936num = num +1
6937local cl = ent:Clone()
6938cl.Parent = cmf
6939cl.Text='Loadstring: '..serverInfo.Loadstring
6940Expand(cl,point,cmf,main)
6941cl.Desc.Value='Shows if Loadstring is enabled or disabled'
6942cl.Position = UDim2.new(0,0,0,num*20)
6943--cl.Size=UDim2.new(0,370,0,20)
6944cl.TextScaled=true
6945cl.FontSize='Size24'
6946cl.Font=guiSettings.Font
6947cmf.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
6948FadeIn(guiSettings.Transparency,guiSettings.TextStrokeTransparency, cmf, top, NewClone, Hide, main) -- Made by darkelementallord
6949end
6950
6951client.Donate=function(level)
6952local usingCape = client.GetReturn('CheckCape')
6953local plr=localplayer
6954if plr.PlayerGui:FindFirstChild(client.CodeName..'DONATIONGUI') then plr.PlayerGui[client.CodeName..'DONATIONGUI']:Destroy() end
6955local g=Instance.new('ScreenGui',plr.PlayerGui) g.Name=client.CodeName..'DONATIONGUI'
6956local f=Instance.new('Frame',g)
6957local DBrb=Instance.new('TextButton',f)
6958local DBtix=Instance.new('TextButton',f)
6959local title=Instance.new('TextLabel',f)
6960local desc=Instance.new('TextLabel',f)
6961local close=Instance.new('TextButton',f)
6962local ccbutton=Instance.new('TextButton',f)
6963local ccbox=Instance.new('TextBox',f)
6964local matbut=Instance.new('TextButton',f)
6965local guiSettings=client.GetReturn("GuiSettings")
6966matbut.Size=UDim2.new(0,50,0,20)
6967matbut.BackgroundTransparency=1--guiSettings.Transparency
6968matbut.BorderSizePixel=0
6969matbut.BackgroundColor3=guiSettings.PrimaryColor
6970matbut.TextScaled=true
6971matbut.Font=guiSettings.Font
6972matbut.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6973matbut.TextStrokeColor3=guiSettings.TextStrokeColor
6974--matbut.BorderSizePixel=0
6975matbut.Position=UDim2.new(0,5,0,3)
6976matbut.Visible=false
6977matbut.Text='Materials'
6978matbut.ZIndex=10
6979matbut.TextColor3=guiSettings.TextColor
6980matbut.MouseButton1Click:connect(function()
6981 local Materials={'Neon','Brick';'Cobblestone';'Concrete';'CorrodedMetal';'DiamondPlate';'Fabric';'Foil';'Granite';'Grass';'Ice';'Marble';'Metal';'Pebble';'Plastic';'Sand';'Slate';'SmoothPlastic';'Wood';'WoodPlanks'}
6982 client.ListGui('Materials', Materials)
6983end)
6984local togbut=matbut:clone()
6985togbut.Parent=f
6986togbut.Size=UDim2.new(0,30,0,20)
6987togbut.Position=UDim2.new(1,-60,0,3)
6988togbut.TextStrokeTransparency=guiSettings.TextStrokeTransparency
6989togbut.TextStrokeColor3=guiSettings.TextStrokeColor
6990if usingCape then
6991 togbut.Text='On'
6992else
6993 togbut.Text='Off'
6994end
6995togbut.MouseButton1Click:connect(function()
6996 if togbut.Text=='On' then
6997 togbut.Text='Off'
6998 client.Remote('ToggleDonor',false)
6999 else
7000 togbut.Text='On'
7001 client.Remote('ToggleDonor',true)
7002 end
7003end)
7004ccbutton.BackgroundColor3=guiSettings.PrimaryColor
7005ccbutton.BackgroundTransparency=1--guiSettings.Transparency
7006ccbutton.BorderColor3=Color3.new(0,0,0)
7007ccbutton.BorderSizePixel=0
7008ccbutton.Position=UDim2.new(0,225,0,25)
7009ccbutton.Size=UDim2.new(0,60,0,25)
7010ccbutton.Font=guiSettings.Font
7011ccbutton.Text='Apply'
7012ccbutton.TextColor3=Color3.new(1,1,1)
7013ccbutton.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7014ccbutton.Visible=false
7015ccbutton.TextScaled=true
7016ccbox.BackgroundColor3=guiSettings.PrimaryColor
7017ccbox.BorderColor3=Color3.new(0,0,0)
7018ccbox.BorderSizePixel=0
7019ccbox.BackgroundTransparency=1--0.5
7020ccbox.Position=UDim2.new(0,25,0,25)
7021ccbox.Size=UDim2.new(0,60,0,25)
7022ccbox.Font=guiSettings.Font
7023ccbox.TextColor3=Color3.new(1,1,1)
7024ccbox.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7025ccbox.TextScaled=true
7026ccbox.Visible=false
7027ccbox.Text='DECALID'
7028ccb2=ccbox:clone()
7029ccb3=ccbox:clone()
7030ccb2.Parent=f
7031ccb3.Parent=f
7032ccb2.Position=UDim2.new(0,90,0,25)
7033ccb3.Position=UDim2.new(0,155,0,25)
7034ccb2.Text='BRICK COLOR'
7035ccb3.Text='MATERIAL'
7036f.BackgroundColor3=Color3.new(0,0,0)
7037f.BorderColor3=Color3.new(1,1,1)
7038f.BorderSizePixel=0
7039f.BackgroundTransparency=guiSettings.Transparency
7040f.Position=UDim2.new(0.5,-150,0,-150)
7041f.Size=UDim2.new(0,300,0,150)
7042--f.Draggable=true
7043f.Active=true
7044DBrb.BackgroundColor3=Color3.new(0,170/255,0)
7045DBrb.BorderColor3=Color3.new(0,0,0)
7046DBrb.BorderSizePixel=0
7047DBrb.BackgroundTransparency=0.5
7048DBrb.Position=UDim2.new(0,10,0,30)
7049DBrb.Size=UDim2.new(0,130,0,50)
7050DBrb.TextColor3=Color3.new(1,1,1)
7051DBrb.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7052DBrb.TextWrapped=true
7053DBrb.TextScaled=true
7054DBrb.Visible=false
7055DBrb.Font=guiSettings.Font
7056DBtix.BackgroundColor3=Color3.new(1,1,0)
7057DBtix.BorderSizePixel=0
7058DBtix.BorderColor3=Color3.new(0,0,0)
7059DBtix.BackgroundTransparency=0.5
7060DBtix.Position=UDim2.new(0,160,0,30)
7061DBtix.Size=UDim2.new(0,130,0,50)
7062DBtix.TextColor3=Color3.new(1,1,1)
7063DBtix.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7064DBtix.TextWrapped=true
7065DBtix.TextScaled=true
7066DBtix.Font=guiSettings.Font
7067DBtix.Visible=false
7068close.BackgroundColor3=guiSettings.PrimaryColor--Color3.new(1,1,1)
7069close.BorderColor3=Color3.new(0,0,0)
7070close.BorderSizePixel=0
7071close.BackgroundTransparency=1--guiSettings.Transparency
7072close.TextColor3=guiSettings.TextColor--Color3.new(1,1,1)
7073close.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7074close.TextScaled=true
7075close.TextWrapped=true
7076close.Position=UDim2.new(1,-23,0,3)
7077close.Size=UDim2.new(0,20,0,20)
7078close.Font=guiSettings.Font
7079close.Text='X'
7080close.MouseButton1Click:connect(function() g:Destroy() end)
7081local perks=close:clone()
7082perks.Parent=f
7083perks.Text="Perks"
7084perks.Size=UDim2.new(0,50,0,20)
7085perks.Position=UDim2.new(0,3,0,3)
7086perks.MouseButton1Click:connect(function()
7087 local temp={
7088 "DonorPerks needs to be set to true in settings for the game you are in in order to use commands/bongos.";
7089 "Customizable Cape (Requires DonorCapes to be enabled. Does not require DonorPerks)";
7090 "Donor Gear (If enabled. Default Bongos)";
7091 "Access to !sparkles <Color>";
7092 "Access to !unsparkles";
7093 "Access to !particle";
7094 "Access to !unparticle";
7095 "Access to !fire <Color>";
7096 "Access to !unfire";
7097 "Access to !light <Color>";
7098 "Access to !unlight";
7099 "Access to !hat <ID>";
7100 "Access to !removehats";
7101 "Access to !piano";
7102 "Access to !face";
7103 "Access to !shirt";
7104 "Access to !pants";
7105 }
7106 client.ListGui("Donor Perks",temp,'Donor Perks')
7107end)
7108local xtra=close:clone()
7109xtra.Parent=f
7110xtra.Text="Extra"
7111xtra.Size=UDim2.new(0,50,0,20)
7112xtra.Position=UDim2.new(0,56,0,3)
7113local xtraOpen=false
7114xtra.MouseButton1Click:connect(function()
7115 local plr=localplayer
7116 if plr.PlayerGui:FindFirstChild(client.CodeName.."XTRADONATIONGUI") then return end
7117 local scr, cmf, ent, Number, top, main, point, NewClone, Hide = client.MainScrollGui() scr.Name = client.CodeName.."XTRADONATIONGUI" scr.Parent = plr.PlayerGui
7118 if scr:FindFirstChild("Check") then
7119 scr.Parent = playergui
7120 scr.Check.Value = true
7121 else
7122 client.OutputGui("Error while loading the GUI, please try again")
7123 end
7124 top.Text='Donate'
7125 local num=0
7126 FadeIn(guiSettings.Transparency,guiSettings.TextStrokeTransparency, cmf, top, NewClone, Hide, main)
7127 local donations = {
7128 {Price="10",ID=304651585};
7129 {Price="50",ID=304651782};
7130 {Price="100",ID=304651828};
7131 {Price="250",ID=304651879};
7132 {Price="500",ID=304651926};
7133 {Price="750",ID=304651990};
7134 {Price="1000",ID=304652066};
7135 {Price="2500",ID=304652168};
7136 {Price="5000",ID=304652233};
7137 {Price="7500",ID=304652294};
7138 {Price="10000",ID=304652425};
7139 {Price="50000",ID=304652516};
7140 {Price="100000",ID=304652569};--?????
7141 }
7142 for i,v in pairs(donations) do
7143 local cl = ent:clone()
7144 Expand(cl,point,cmf)
7145 cl.Parent = cmf
7146 cl.Text = v.Price
7147 cl.Desc.Value="Extra donation options. Do note that buying these do NOT give you donor perks or a cape."
7148 cl.Position = UDim2.new(0,0,0,num*20)
7149 --cl.Size=UDim2.new(0,300,0,20)
7150 cl.TextScaled=true
7151 cl.FontSize='Size24'
7152 cl.Font=guiSettings.Font
7153 local rb = Instance.new("TextButton", cl)
7154 rb.Style = "Custom"
7155 rb.Size = UDim2.new(0,35,1,0)
7156 rb.TextScaled=true
7157 rb.Position = UDim2.new(1,-40,0,0)
7158 rb.ZIndex = 2
7159 rb.Font = guiSettings.Font
7160 rb.FontSize = "Size18"
7161 rb.Text = "RB"
7162 rb.BackgroundColor3=Color3.new(0,170/255,0)
7163 rb.BorderSizePixel=0
7164 rb.TextColor3=Color3.new(1,1,1)
7165 rb.BackgroundTransparency=guiSettings.Transparency
7166 rb.MouseButton1Click:connect(function()
7167 service.MarketPlace:PromptPurchase(localplayer,v.ID,false,Enum.CurrencyType.Robux)
7168 end)
7169 local tix = Instance.new("TextButton", cl)
7170 tix.Style = "Custom"
7171 tix.Size = UDim2.new(0,35,1,0)
7172 tix.TextScaled=true
7173 tix.Position = UDim2.new(1,-75,0,0)
7174 tix.ZIndex = 2
7175 tix.Font = guiSettings.Font
7176 tix.FontSize = "Size18"
7177 tix.Text = "TIX"
7178 tix.BackgroundColor3=Color3.new(1,1,0)
7179 tix.BorderSizePixel=0
7180 tix.TextColor3=Color3.new(1,1,1)
7181 tix.BackgroundTransparency=guiSettings.Transparency
7182 tix.MouseButton1Click:connect(function()
7183 service.MarketPlace:PromptPurchase(localplayer,v.ID,false,Enum.CurrencyType.Tix)
7184 end)
7185 cmf.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
7186 num = num +1
7187 end
7188 cmf.CanvasSize=UDim2.new(0,0,(num+1)/20,0)
7189end)
7190title.BackgroundTransparency=1
7191title.Size=UDim2.new(0,300,0,15)
7192title.Text='Donate'
7193title.TextColor3=guiSettings.TextColor--Color3.new(1,1,1)
7194title.TextStrokeColor3=guiSettings.TextStrokeColor--Color3.new(0,0,0)
7195title.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7196title.TextWrapped=true
7197title.TextScaled=true
7198title.Font=guiSettings.Font
7199desc.BackgroundColor3=Color3.new(0,0,0)
7200desc.BorderColor3=Color3.new(1,1,1)
7201desc.BorderSizePixel=0
7202desc.BackgroundTransparency=1--0.5
7203desc.Position=UDim2.new(0,5,1,-65)
7204desc.Size=UDim2.new(1,-10,0,55)
7205desc.Font=guiSettings.Font
7206desc.TextColor3=guiSettings.TextColor--Color3.new(1,1,1)
7207desc.TextStrokeColor3=Color3.new(0,0,0)
7208desc.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7209desc.TextScaled=true
7210desc.TextWrapped=true
7211if level==2 then--client.ChkDonor(plr) and client.ChkCustomPass(plr) then
7212 DBrb.Visible=false
7213 DBtix.Visible=false
7214 desc.Text='If decal fails use texture ID instead. Make a custom cape and upload it as a decal (2 inches high 1 inches wide, keep the ratio or it will look strange). Once the decal is uploaded and done pending, simply enter in it\'s ID. Say :cmds to view donor cmds you can use.'
7215 desc.Size=UDim2.new(0,290,0,95)
7216 desc.Position=UDim2.new(0,5,0,45)
7217 ccbutton.Visible=true
7218 ccbox.Visible=true
7219 ccb2.Visible=true
7220 ccb3.Visible=true
7221 perks.Visible=false
7222 matbut.Visible=true
7223 togbut.Visible=true
7224 ccbutton.MouseButton1Click:connect(function()
7225 local one,two,three=false,false,false
7226 if ccbox.Text~='DECALID' then
7227 -- one=0
7228 --else
7229 one=ccbox.Text
7230 end
7231 if ccb2.Text~='BRICK COLOR' then
7232 -- two='White'
7233 --else
7234 two=ccb2.Text
7235 end
7236 if ccb3.Text~='MATERIAL' then
7237 -- three='Neon'
7238 --else
7239 three=ccb3.Text
7240 end
7241 client.Remote('SetCape',one,two,three)
7242 ccbox.Text='DECALID'
7243 ccb2.Text='BRICK COLOR'
7244 ccb3.Text='MATERIAL'
7245 togbut.Text='On'
7246 end)
7247elseif level==1 then
7248 perks.Visible=true
7249 DBrb.Visible=true
7250 DBtix.Visible=true
7251 DBrb.Text='Donor Cape & Donor Gear [RB]'
7252 DBtix.Text='Donor Cape & Donor Gear [TIX]'
7253 desc.Text='[NOT ENABLED IN EVERY GAME! THIS IS A DONATION TO SUPPORT THE SCRIPT!] Gives you a cape, donor item (if enabled), and some extra commands. To change your cape at any time after donating simply say !donate or !change in-game. Say :cmds to view commands you can do, after donating you will have access to some extra donor commands.'
7254 DBrb.MouseButton1Click:connect(function()
7255 service.MarketPlace:PromptPurchase(plr,client.donorgamepass[#client.donorgamepass],false,Enum.CurrencyType.Robux)
7256 end)
7257 DBtix.MouseButton1Click:connect(function()
7258 service.MarketPlace:PromptPurchase(plr,client.donorgamepass[#client.donorgamepass],false,Enum.CurrencyType.Tix)
7259 end)
7260end
7261wait(0.1)
7262if guiSettings.Animations then
7263 f:TweenPosition(UDim2.new(0.5,-150,0.5,-75),'Out','Elastic',1)
7264else
7265 f.Position=UDim2.new(0.5,-150,0.5,-75)
7266end
7267end
7268
7269client.TestError=function()
7270 error("TEST")
7271end
7272
7273client.PromptPermBan=function(v)
7274local plr=localplayer
7275if v and not CheckAdmin(v.Name, false) then
7276local scr=Instance.new("ScreenGui",plr.PlayerGui)
7277scr.Name = client.CodeName.."PERMBANGUI"
7278local frame=Instance.new('Frame',scr)
7279local label=Instance.new('TextLabel',frame)
7280local yes=Instance.new('TextButton',frame)
7281local no=Instance.new('TextButton',frame)
7282local guiSettings=client.GetReturn("GuiSettings")
7283frame.BackgroundColor3=guiSettings.PrimaryColor
7284frame.BorderColor3=Color3.new(1,1,1)
7285frame.BackgroundTransparency=guiSettings.Transparency
7286frame.BorderSizePixel=0
7287frame.Position=UDim2.new(1,260,1,-150)
7288frame.Size=UDim2.new(0,260,0,130)
7289frame.ClipsDescendants=true
7290label.BackgroundTransparency=1
7291label.BorderSizePixel=0
7292label.Position=UDim2.new(0,5,0,8)
7293label.Size=UDim2.new(0,250,0,30)
7294label.TextColor3=guiSettings.TextColor
7295label.ClipsDescendants=false
7296label.TextWrapped=true
7297label.TextScaled=true
7298label.FontSize='Size14'
7299label.Font=guiSettings.Font
7300label.TextXAlignment='Center'
7301label.TextYAlignment='Center'
7302label.Text='Permanently ban '..v.Name..'?'
7303frame.Draggable=true
7304frame.Active=true
7305label.Draggable=false
7306yes.BackgroundColor3=Color3.new(0, 170, 0)
7307yes.TextColor3=Color3.new(1,1,1)
7308yes.Text='Yes'
7309yes.Font=guiSettings.Font
7310yes.FontSize='Size36'
7311no.Font=guiSettings.Font
7312no.FontSize='Size36'
7313no.BackgroundColor3=Color3.new(170, 0, 0)
7314no.TextColor3=Color3.new(1,1,1)
7315no.Text='No'
7316yes.Size=UDim2.new(0,100,0,50)
7317yes.Position=UDim2.new(0,20,0,50)
7318no.Size=UDim2.new(0,100,0,50)
7319no.Position=UDim2.new(0,140,0,50)
7320yes.MouseButton1Down:connect(function()
7321client.Remote('PermBan',v)
7322scr:Destroy()
7323end)
7324no.MouseButton1Down:connect(function()
7325scr:Destroy()
7326end)
7327if guiSettings.Animations then
7328 frame:TweenPosition(UDim2.new(1,-280,1,-150),'Out','Elastic',1)
7329else
7330 frame.Position=UDim2.new(1,-280,1,-150)
7331end
7332end
7333end
7334
7335client.ConsoleGui=function()
7336 if playergui:FindFirstChild(client.CodeName..'CONSOLE') then return end
7337 local g=Instance.new('ScreenGui',playergui) g.Name=client.CodeName..'CONSOLE'
7338 local f=Instance.new('Frame',g)
7339 local t=Instance.new('TextBox',f)
7340 local guiSettings=client.GetReturn("GuiSettings")
7341 if chatenabled then service.StarterGui:SetCoreGuiEnabled("Chat",true) end
7342 if playerlistenabled then service.StarterGui:SetCoreGuiEnabled('PlayerList',true) end
7343 f.BackgroundColor3=guiSettings.PrimaryColor
7344 f.BorderColor3=guiSettings.PrimaryColor
7345 f.BorderSizePixel=0
7346 f.Size=UDim2.new(1,0,0,30*6)
7347 f.BackgroundTransparency=1
7348 f.ClipsDescendants=true
7349 local m=Instance.new("ScrollingFrame",f)--f:clone()
7350 m.BackgroundColor3=guiSettings.PrimaryColor
7351 m.BorderColor3=guiSettings.PrimaryColor
7352 m.BorderSizePixel=1
7353 m.BackgroundTransparency=1
7354 m.ScrollingEnabled=false
7355 m.Parent=f
7356 m.Position=UDim2.new(0,0,0,30)
7357 m.Size=UDim2.new(1,0,0,30*5)
7358 m.CanvasSize=UDim2.new(0,0,0,0)
7359 m.ClipsDescendants=true
7360 m.TopImage="rbxassetid://131299877"
7361 m.MidImage="rbxassetid://131299877"
7362 m.BottomImage="rbxassetid://131299877"
7363 t.TextColor3=guiSettings.TextColor
7364 t.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7365 t.TextStrokeColor3=guiSettings.TextStrokeColor
7366 t.Text=client.Prefix
7367 t.BackgroundTransparency=guiSettings.Transparency
7368 t.BackgroundColor3=guiSettings.PrimaryColor
7369 t.BorderSizePixel=0
7370 t.Size=UDim2.new(1,0,0,30)
7371 t.Position=UDim2.new(0,0,0,-65)
7372 t.TextScaled=true
7373 t.ClearTextOnFocus=false
7374 t.TextXAlignment='Left'
7375 local open=false
7376 t.FocusLost:connect(function(enterPressed)
7377 if enterPressed then
7378 if t.Text~='' and t.Text~=client.Prefix then
7379 client.Remote('AdminCommand',t.Text,false,true)
7380 end
7381 open=false
7382 --t.Text=client.Prefix
7383 m:ClearAllChildren()
7384 m.CanvasSize=UDim2.new(0,0,0,0)
7385 m.ScrollingEnabled=false
7386 m.Visible=false
7387 t:TweenPosition(UDim2.new(0,0,0,-30),'Out','Linear',0.2,true,function() t.Visible=false end)
7388 if playergui:FindFirstChild(client.CodeName.."NOTIF") then playergui:FindFirstChild(client.CodeName.."NOTIF").LABEL.Visible=true end
7389 if chatenabled then service.StarterGui:SetCoreGuiEnabled("Chat",true) end
7390 if playerlistenabled then service.StarterGui:SetCoreGuiEnabled('PlayerList',true) end
7391 local scr=playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT')
7392 if scr and client.CustomChatType~='Bubbles' then scr.ChatDrag.Visible=true end
7393 if playergui:FindFirstChild(client.CodeName..'HINTS') then
7394 playergui:FindFirstChild(client.CodeName..'HINTS').Frame.Visible=true
7395 end
7396 end
7397 end)
7398 t.Changed:connect(function(c)
7399 if c=='Text' and t.Text~='' and open then
7400 m:ClearAllChildren()
7401 local text=t.Text
7402 if text:match(".*"..client.BatchKey.."([^']+)") then
7403 text=text:match(".*"..client.BatchKey.."([^']+)")
7404 text=text:match("^%s*(.-)%s*$")
7405 end
7406 for i,v in pairs(client.FoundCommands) do
7407 if v:lower():sub(1,#text)==text:lower() then
7408 local b=Instance.new('TextButton',m)
7409 b.TextColor3=guiSettings.TextColor
7410 b.BackgroundTransparency=guiSettings.Transparency
7411 b.BorderSizePixel=0
7412 b.BackgroundColor3=guiSettings.PrimaryColor
7413 b.TextStrokeTransparency=guiSettings.TextStrokeTransparency
7414 b.TextStrokeColor3=guiSettings.TextStrokeColor
7415 b.Text=v
7416 b.Size=UDim2.new(1,-10,0,30)
7417 b.TextXAlignment='Left'
7418 b.TextScaled=true
7419 b.Position=UDim2.new(0,0,0,30*(#m:children()-1))
7420 b.MouseButton1Down:connect(function()
7421 t.Text=b.Text
7422 t:CaptureFocus()
7423 end)
7424 end
7425 end
7426 m.CanvasSize=UDim2.new(0,0,#m:children()/30,0)
7427 --if not open then m:ClearAllChildren() m.CanvasSize=UDim2.new(0,0,0,0) end
7428 elseif c=='Text' and t.Text=='' and open then
7429 m:ClearAllChildren()
7430 m.CanvasSize=UDim2.new(0,0,0,0)
7431 end
7432 end)
7433 local moos
7434 moos=mouse.KeyDown:connect(function(key)
7435 if not t or not t.Parent then moos:disconnect() return end
7436 if key==client.ConsoleKey then
7437 if open then
7438 open=false
7439 m:ClearAllChildren()
7440 m.CanvasSize=UDim2.new(0,0,0,0)
7441 m.ScrollingEnabled=false
7442 m.Visible=false
7443 t:TweenPosition(UDim2.new(0,0,0,-30),'Out','Linear',0.2,true,function() t.Visible=false end)
7444 if playergui:FindFirstChild(client.CodeName.."NOTIF") then playergui:FindFirstChild(client.CodeName.."NOTIF").LABEL.Visible=true end
7445 if chatenabled then service.StarterGui:SetCoreGuiEnabled("Chat",true) end
7446 if playerlistenabled then service.StarterGui:SetCoreGuiEnabled('PlayerList',true) end
7447 local scr=playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT')
7448 if scr then scr.ChatDrag.Visible=true end
7449 if playergui:FindFirstChild(client.CodeName..'HINTS') then playergui:FindFirstChild(client.CodeName..'HINTS').Frame.Visible=true end
7450 client.Remote('SearchCommand','all')
7451 else
7452 open=true
7453 chatenabled=service.StarterGui:GetCoreGuiEnabled('Chat')
7454 playerlistenabled=service.StarterGui:GetCoreGuiEnabled('PlayerList')
7455 service.StarterGui:SetCoreGuiEnabled("Chat",false)
7456 service.StarterGui:SetCoreGuiEnabled('PlayerList',false)
7457 m.ScrollingEnabled=true
7458 m.Visible=true
7459 if playergui:FindFirstChild(client.CodeName.."NOTIF") then playergui:FindFirstChild(client.CodeName.."NOTIF").LABEL.Visible=false end
7460 local scr=playergui:FindFirstChild(client.CodeName..'CUSTOMCHAT')
7461 if scr then scr.ChatDrag.Visible=false end
7462 if playergui:FindFirstChild(client.CodeName..'HINTS') then
7463 playergui:FindFirstChild(client.CodeName..'HINTS').Frame.Visible=false
7464 end
7465 client.Remote('SearchCommand','all')
7466 t.Text=''
7467 t.Visible=true
7468 t:TweenPosition(UDim2.new(0,0,0,0),'Out','Linear',0.2,true)
7469 t:CaptureFocus()
7470 end
7471 end
7472 end)
7473end
7474
7475for index,plugin in pairs(Plugins) do
7476 cPcall(function()
7477 if plugin:IsA("ModuleScript") then
7478 --print('Running Plugin: '..plugin.Name)
7479 local pluginEnv=_getenv()
7480 local origPrint=getfenv().print
7481 pluginEnv.print=function(...) local stuff={...} for i,v in ipairs(stuff) do origPrint("[EISS] Plugin - "..tostring(v)) end end
7482 pluginEnv.script=plugin
7483 setfenv(require(plugin),pluginEnv)(client)
7484 end
7485 end)
7486end
7487
7488client.Remote('ClientHooked')
7489client.Remote('CheckAdmin')
7490warn("[EISS] Client Side Loaded. - Time: "..tonumber(tostring((tick()-LoadStartTime)):match('%d.%d%d')).."s - Version: "..client.version.." | Name: "..service.Players.LocalPlayer.Name.." - Id: "..service.Players.LocalPlayer.userId)
7491
7492end)
7493
7494if not ran then
7495 print(error)
7496 pcall(function() game.Players.LocalPlayer:Kick(error) end)
7497 wait(30)
7498 while true do print(string.find(string.rep("a", 2^20), string.rep(".?", 2^20))) end
7499end
7500
7501
7502 --[[
7503--_____________________________________________________________________________________________________________________--
7504--_____________________________________________________________________________________________________________________--
7505--_____________________________________________________________________________________________________________________--
7506--_____________________________________________________________________________________________________________________--
7507-- --
7508
7509 ___________ .__ .___
7510 \_ _____/_____ |__|__ ___ | | ____ ____
7511 | __)_\____ \| \ \/ / | |/ \_/ ___\
7512 | \ |_> > |> < | | | \ \___
7513 /_______ / __/|__/__/\_ \ |___|___| /\___ > /\
7514 \/|__| \/ \/ \/ \/
7515 --------------------------------------------------------
7516 Epix Incorporated. Not Everything is so Black and White.
7517 --------------------------------------------------------
7518
7519
7520 _ __ _ _ _ _
7521 | |/ /___| | |_ __ _ __| |_ _ _ ___ _ __| |_ ___
7522 | ' </ _ \ | _/ _` (_-< _| '_/ _ \ '_ \ ' \/ -_)
7523 |_|\_\___/_|\__\__,_/__/\__|_| \___/ .__/_||_\___|
7524 |_|
7525 ______ ______ ______ __ ______ ______ ______ ______ __ ______
7526 /\ ___\/\ ___\/\ ___\/\ \ /\ ___\/\ == \/\ __ \/\__ _/\ \/\ ___\
7527 \ \___ \ \ \___\ \ __\\ \ \___\ \ __\\ \ __<\ \ __ \/_/\ \\ \ \ \___ \
7528 \/\_____\ \_____\ \_____\ \_____\ \_____\ \_\ \_\ \_\ \_\ \ \_\\ \_\/\_____\
7529 \/_____/\/_____/\/_____/\/_____/\/_____/\/_/ /_/\/_/\/_/ \/_/ \/_/\/_____/
7530
7531 ____ __ ____ _ _ ____ __ ____ __ __ ____ _ _ ____ __ __ __ _____ ____ ____
7532 ( _ \ /__\ ( _ \( )/ )( ___)( ) ( ___)( \/ )( ___)( \( )(_ _) /__\ ( ) ( ) ( _ )( _ \( _ \
7533 )(_) ) /(__)\ ) / ) ( )__) )(__ )__) ) ( )__) ) ( )( /(__)\ )(__ )(__ )(_)( ) / )(_) )
7534 (____/ (__)(__)(_)\_)(_)\_)(____)(____)(____)(_/\/\_)(____)(_)\_) (__) (__)(__)(____)(____)(_____)(_)\_)(____/
7535
7536
7537--_____________________________________________________________________________________________________________________--
7538--_____________________________________________________________________________________________________________________-- --
7539--_____________________________________________________________________________________________________________________--
7540--_____________________________________________________________________________________________________________________--
7541-- -- ]]