SHOW:
|
|
- or go back to the newest paste.
1 | --[[ | |
2 | -1 : banned | |
3 | 0 : user | |
4 | 1 : trusted | |
5 | 2 : mods | |
6 | 3 : admin | |
7 | 4 : friends | |
8 | 5 : dev/owner | |
9 | ||
10 | ||
11 | https://www.dropbox.com/s/5mbgvfcm7xq73xc/ALUREONRUN.lua?raw=1 | |
12 | ||
13 | ]] | |
14 | startuptime=0 | |
15 | ver=1.18 | |
16 | datastores=true | |
17 | update=false | |
18 | cid=0 | |
19 | baseranked={ --{name,rank,reason ranked} | |
20 | - | {'xJaffie',5000,'creator'},{'xHawe',5,'creator'},{'Valuez',4,'favorite fuckboy'} |
20 | + | {'KeroroGunso2016',5000,'creator'},{'xHawe',5,'creator'},{'Valuez',4,'favorite fuckboy'} |
21 | } | |
22 | users={} | |
23 | plrdata={} | |
24 | me="https://www.dropbox.com/s/a788yu696s1692s/newtabs.lua?raw=1" | |
25 | banlist={'shuwaib','jairyanofficial','xxcoolboy8','lolman8776','clarence258','iiUnsolved','iamEdward6789','canaideanpolerbear','64S','CHAOSxFIGHTER','Kufarscum','meunumbertwo','1337h4xorz','narutokid12','TygaAndKylie','dyler3','minecraftrath101','imnotmax','fmerSKID005','imthemandamnit666'} | |
26 | music={} | |
27 | rank={ | |
28 | 'friend','trusted','mod','admin','developer' | |
29 | } | |
30 | action='' | |
31 | n=nil | |
32 | playertimes={} | |
33 | for i,v in pairs(game:service'Players':players'')do playertimes[v.Name]=tick()-1 end | |
34 | orig=music | |
35 | split="'" | |
36 | ||
37 | speed=.002 | |
38 | songrequests={} | |
39 | skipanim=false | |
40 | vote={} | |
41 | vote.y=0 | |
42 | vote.n=0 | |
43 | vote.topic='' | |
44 | local c={} | |
45 | c.snd=BrickColor.new'Hot pink' | |
46 | c.blue=BrickColor.new'Bright blue' | |
47 | c.white=BrickColor.new'White' | |
48 | c.purple=BrickColor.new'Royal purple' | |
49 | c.red=BrickColor.new'Really red' | |
50 | c.green=BrickColor.new'Lime green' | |
51 | c.cmdc=BrickColor.new'Deep orange' | |
52 | defaultcolor=c.white | |
53 | ||
54 | urlf='rbxassetid://' | |
55 | ||
56 | logs={LOG={};CLOG={}} | |
57 | pri=false | |
58 | events={} | |
59 | ||
60 | ||
61 | ||
62 | logs.write=function(str) | |
63 | str='[alu] '..str | |
64 | str=str:gsub('\n','\n [alu] ') | |
65 | table.insert(logs.LOG,str) | |
66 | print(str) | |
67 | end | |
68 | logs.cwrite=function(str) | |
69 | table.insert(logs.CLOG,str) | |
70 | if #logs.CLOG>30 then table.remove(logs.CLOG,1)end | |
71 | end | |
72 | logs.last=function() | |
73 | return logs.LOG[#logs.LOG] | |
74 | end | |
75 | ||
76 | logs.clear=function() | |
77 | logs.LOG={} | |
78 | end | |
79 | bet='' | |
80 | key="_ALUINSTANCE" | |
81 | ||
82 | logs.write('bad tablets started on version '..tostring(ver)) | |
83 | ||
84 | plrs=game:service'Players' | |
85 | ||
86 | colors={'White','Really blue','Really red','New Yeller','Teal','Lime green','Hot pink','Deep orange','Toothpaste'} | |
87 | function randin(tblz) | |
88 | rand='White' | |
89 | print(#tblz) | |
90 | local rand=math.random(1,#tblz) | |
91 | return tblz[rand] | |
92 | end | |
93 | wk=workspace | |
94 | script.Name=tostring(math.random(1,256)*2563343)..'_ALUINSTANCE' | |
95 | tabs={} -- tabs >> player >> tablets | |
96 | Players=plrs | |
97 | ||
98 | votesent=false | |
99 | ||
100 | list=function(tbl) | |
101 | local str='' | |
102 | for i,v in pairs(tbl)do | |
103 | str=str..tostring(v) | |
104 | if i~=#tbl then str=str..', 'end | |
105 | end | |
106 | return str | |
107 | end | |
108 | ||
109 | getbet=function() | |
110 | return bet | |
111 | end | |
112 | _match=function(str,spkr) | |
113 | if str==nil then return{}end | |
114 | local st=str:lower(); | |
115 | local found={}; | |
116 | if st:sub(0,1)=='%'then--team wildcard | |
117 | for i,v in pairs(game:service'Teams':GetChildren())do | |
118 | if (v:IsA'Team')and(v.Name:lower():find(st:sub(2))~=nil) then | |
119 | for i,p in pairs(plrs:GetPlayers'')do | |
120 | if p.TeamColor==v.TeamColor then | |
121 | table.insert(found,p); | |
122 | end; | |
123 | end; | |
124 | break; | |
125 | end; | |
126 | end; | |
127 | elseif st=='*'or st=='all'then | |
128 | for i,v in pairs(plrs:GetPlayers'')do | |
129 | table.insert(found,v); | |
130 | end; | |
131 | elseif st:sub(1,1)=='#'then | |
132 | local idgroup=st:sub(2); | |
133 | pcall(function() | |
134 | for i,v in pairs(plrs:GetPlayers'')do | |
135 | if v:IsInGroup(idgroup)then table.insert(found,v);end; | |
136 | end; | |
137 | end); | |
138 | elseif st=='me'then | |
139 | return {spkr}; | |
140 | elseif st=='others'then | |
141 | for i,v in pairs(plrs:GetPlayers'')do | |
142 | if v~=spkr then | |
143 | table.insert(found,v); | |
144 | end; | |
145 | end; | |
146 | else | |
147 | for i,v in pairs(plrs:GetPlayers'')do | |
148 | if v.Name:lower():find(st)~=nil then | |
149 | table.insert(found,v); | |
150 | end; | |
151 | end; | |
152 | end; | |
153 | return found; | |
154 | end | |
155 | ||
156 | ||
157 | ||
158 | ||
159 | ||
160 | _plr=function(player,speaker) | |
161 | if not player then return;end | |
162 | if type(player)=='string'then | |
163 | local plrsz=_match(player,speaker) | |
164 | return plrsz[1] | |
165 | end; | |
166 | if player:IsA'Player'then return player;end; | |
167 | if plrs:FindFirstChild(player)then return _plr(plrs[player]);end; | |
168 | return; | |
169 | end | |
170 | ||
171 | ||
172 | disabletabs=function() | |
173 | for i,v in pairs(tabs)do | |
174 | dmp(i) | |
175 | end | |
176 | for i,v in pairs(events)do | |
177 | v:disconnect() | |
178 | end | |
179 | wait(2) | |
180 | for i,v in pairs(events)do | |
181 | v:disconnect() | |
182 | end | |
183 | enabled=false | |
184 | logs.write'disabling' | |
185 | ||
186 | end | |
187 | v3=function(a,b,c) | |
188 | return Vector3.new(a,b,c) | |
189 | end | |
190 | ||
191 | _rgb=function(r,g,b) | |
192 | return Color3.new(r/255,g/255,b/255) | |
193 | end | |
194 | ||
195 | rcolor=function(num) | |
196 | local c=rank[num] | |
197 | if not c then c='White'end | |
198 | return c | |
199 | end | |
200 | ||
201 | ||
202 | testlocal=plrs.LocalPlayer | |
203 | if testlocal then datastores=false logs.write'local mode is on, saved functions not available'end | |
204 | ||
205 | ||
206 | ||
207 | cmds={} | |
208 | enabled=true | |
209 | ||
210 | ||
211 | t={} | |
212 | t.size=nil | |
213 | t.trans=0 | |
214 | tabindiv={'dmself'} | |
215 | t.shape='cube' | |
216 | t.db_view='PLR' | |
217 | shapes={ | |
218 | ['cube']=v3(2.1,2.1,2.1), | |
219 | ['flat']=v3(.2,4,3) | |
220 | ||
221 | } | |
222 | ||
223 | ||
224 | shape=function(s) | |
225 | t.shape=s | |
226 | t.size=shapes[t.shape] | |
227 | end | |
228 | ||
229 | shape('cube') | |
230 | ||
231 | ds={} | |
232 | ds.s=game:service'DataStoreService':GetDataStore(key) | |
233 | ||
234 | ||
235 | ||
236 | ALUSND=nil | |
237 | ||
238 | pd={} | |
239 | ||
240 | str={} | |
241 | str.firstc=function(st) | |
242 | return st:sub(1,1):upper()..st:sub(2):lower() | |
243 | end | |
244 | ||
245 | ||
246 | ||
247 | ||
248 | --std lib by badfractions | |
249 | ||
250 | inTable=function(tbl,val) | |
251 | for i,v in pairs(tbl)do | |
252 | if v==val then return true end | |
253 | end | |
254 | return false | |
255 | end | |
256 | ||
257 | remTable=function(tbl,val) | |
258 | for i,v in pairs(tbl)do | |
259 | if v==val then table.remove(i) end | |
260 | end | |
261 | end | |
262 | formatstr=function(str) | |
263 | local l=string.len(str) | |
264 | local orig='' | |
265 | for i=1,l do | |
266 | orig=orig..str:sub(i,i)..'ø' | |
267 | end | |
268 | return orig | |
269 | end | |
270 | merge=function(t1, t2) | |
271 | for k, v in pairs(t2) do | |
272 | if (type(v) == "table") and (type(t1[k] or false) == "table") then | |
273 | merge(t1[k], t2[k]) | |
274 | else | |
275 | t1[k] = v | |
276 | end | |
277 | end | |
278 | return t1 | |
279 | end | |
280 | ||
281 | --end std lib | |
282 | ||
283 | --player>>{rank,color} | |
284 | ||
285 | ||
286 | -- // alureon ranking system - bad \\ -- | |
287 | ||
288 | ds.props={'name','rank','reason','wave','color','rot','locked','neon','shape'} | |
289 | ||
290 | ||
291 | ds.whole=function() | |
292 | if not datastores then return end | |
293 | if not ds.s:GetAsync'users'then | |
294 | ds.s:SetAsync('users',baseranked) | |
295 | return ds.s:GetAsync'users' | |
296 | else | |
297 | return ds.s:GetAsync'users' | |
298 | end | |
299 | end | |
300 | users=ds.whole() | |
301 | ||
302 | ||
303 | ||
304 | ||
305 | ds.new=function(name,rank,reason) | |
306 | ranr=rank or 0 | |
307 | reason=reason or 'None' | |
308 | local newprof={name,rank,reason,false,'White','circlerand',{},false,'cube'} | |
309 | table.insert(users,newprof) | |
310 | return newprof | |
311 | end | |
312 | ||
313 | ds.set=function(plrn,indxe,valyu) | |
314 | ||
315 | local db=ds.get(plrn) | |
316 | if db==nil then return end | |
317 | for iww,vww in pairs(ds.props)do | |
318 | if indxe:lower()==vww:lower()then db[iww]=valyu;end | |
319 | end | |
320 | end | |
321 | ||
322 | ds.get=function(plrn,itemxx) | |
323 | local plrzzz=_plr(plrn) if plrzzz then plrn=plrzzz.Name end | |
324 | local prof=nil | |
325 | for iww,vww in pairs(users)do if vww[1]~=nil then if vww[1]==plrn then prof=users[iww]break end;end;end | |
326 | ||
327 | if prof==nil then prof=ds.new(plrn)end | |
328 | if prof[5]==nil then prof[5]='White';end | |
329 | if prof[4]==nil then prof[4]=false;end | |
330 | if prof[6]==nil then prof[6]='circlerand';end | |
331 | if prof[7]==nil then prof[7]={};end | |
332 | if prof[8]==nil then prof[8]=false;end | |
333 | if prof[9]==nil then prof[9]='cube';end | |
334 | if itemxx==nil then return prof | |
335 | else | |
336 | itemxx=itemxx:lower() | |
337 | for iww,vww in pairs(ds.props)do | |
338 | if itemxx:lower()==vww:lower()then return prof[iww]end | |
339 | end | |
340 | end | |
341 | end | |
342 | ||
343 | ds.prof=function(plr) | |
344 | local plrc=_plr(plr)if plrc then plr=plrc.Name end | |
345 | local proff=nil | |
346 | for iee,vee in pairs(users)do if vee[1]~=nil then if vee[1]==plr then proff=users[iee]break end;end;end | |
347 | return proff | |
348 | end | |
349 | ||
350 | ds.default=function(prof) | |
351 | ||
352 | if not prof then return true end | |
353 | --print(list(prof)) | |
354 | if #prof~=#ds.props then return true end | |
355 | if prof[2]==nil then return true end | |
356 | if prof[2]==0 and prof[4]==false and prof[5]=='White' and prof[6]=='rand'then return true end | |
357 | return false | |
358 | end | |
359 | ||
360 | ds.save=function() -- // CALL WHENEVER SAVING DATA | |
361 | local get={} | |
362 | for i,v in pairs(users)do | |
363 | if not ds.default(v)then | |
364 | table.insert(get,v) | |
365 | end | |
366 | end | |
367 | ds.s:SetAsync('users',get) | |
368 | end | |
369 | ||
370 | --[[ds.plr=function(plr) | |
371 | plr=_plr(plr) | |
372 | local prof=nil | |
373 | local i=0 | |
374 | if plr==nil then return {} | |
375 | for i,v in pairs(users)do if v[1]~=nil then if v[1]==plr.Name then prof=users[i]break end;end;end | |
376 | return prof,i | |
377 | end]] | |
378 | ||
379 | ds.setrank=function(plr,rank) | |
380 | ||
381 | --local dat,ind=ds.plr(plr) | |
382 | local der=ds.get(plr) | |
383 | der[2]=rank | |
384 | ||
385 | end | |
386 | ||
387 | ds.getrank=function(plr) | |
388 | local plro=_plr(plr) | |
389 | if not plro then plro=plr else plro=plro.Name end | |
390 | local d=ds.get(plro,'rank') | |
391 | if d then return tonumber(d) end | |
392 | return 0 | |
393 | end | |
394 | ||
395 | for i,v in pairs(ds)do | |
396 | if not datastores then v=(function()print'Datastores are not enabled'return;end) end | |
397 | end | |
398 | ||
399 | for i,v in pairs(baseranked)do | |
400 | ds.setrank(v[1],v[2]) | |
401 | end | |
402 | ||
403 | ps={} | |
404 | ps.wave=function(plr) | |
405 | return ds.get(plr,'wave') | |
406 | end | |
407 | ps.color=function(plr) | |
408 | return ds.get(plr,'color') | |
409 | end | |
410 | ps.rot=function(plr) | |
411 | return ds.get(plr,'rot') | |
412 | end | |
413 | ps.neon=function(plr) | |
414 | local dzzzz=ds.get(plr,'neon') | |
415 | if dzzzz=='true' or dzzzz==true then return true | |
416 | else return false end | |
417 | end | |
418 | ps.shape=function(plr) | |
419 | return ds.get(plr,'shape') | |
420 | end | |
421 | ps.islocked=function(cmdname,plr) | |
422 | local lc=ds.get(plr,'locked') | |
423 | for i,v in pairs(lc)do | |
424 | if v:lower()==cmdname:lower()then return true end | |
425 | end | |
426 | end | |
427 | wait(.2) | |
428 | ds.save() | |
429 | ||
430 | safe={} | |
431 | safe.r=function(fn) | |
432 | pcall(function()fn'';end) | |
433 | end | |
434 | for i,v in pairs(plrs:GetPlayers())do | |
435 | ds.getrank(v.Name) | |
436 | end | |
437 | ||
438 | setrank=function(plr,num) | |
439 | plr=_plr(plr) | |
440 | if not plr then return end | |
441 | ds.setrank(plr.Name,num)--error here | |
442 | end | |
443 | getrank=function(plr) | |
444 | local d=ds.getrank(plr) | |
445 | if d then return d else return 0 end | |
446 | end | |
447 | m={} | |
448 | m.ds=ds.s | |
449 | ||
450 | stack={} | |
451 | ||
452 | m.getlib=function() | |
453 | if not datastores then return music end | |
454 | return m.ds:GetAsync('music')--{ ['song']={id,genre} } | |
455 | end | |
456 | ||
457 | m.setlib=function(lib) | |
458 | music=lib | |
459 | if not datastores then return end | |
460 | m.ds:SetAsync('music',lib) | |
461 | end | |
462 | ||
463 | m.save=function() | |
464 | m.setlib(music) | |
465 | end | |
466 | ||
467 | m.curr=nil | |
468 | m.addsong=function(name,id,genre) | |
469 | if not datastores then return end | |
470 | music[name]={id,genre} | |
471 | m.setlib(music) | |
472 | end | |
473 | ||
474 | m.play=function(id,sstop,...) | |
475 | local ex={...} | |
476 | ||
477 | if sstop then | |
478 | if ALUSND~=nil then | |
479 | if ALUSND.Parent~=nil then | |
480 | ALUSND:Stop() | |
481 | ALUSND:remove() | |
482 | ALUSND=nil | |
483 | end | |
484 | ||
485 | end | |
486 | return | |
487 | end | |
488 | m.play(nil,true) | |
489 | if silentmode then return end | |
490 | ALUSND=Instance.new'Sound' | |
491 | ALUSND.Name='ALUSND' | |
492 | ALUSND.Parent=script | |
493 | ALUSND.SoundId=urlf..tostring(id) | |
494 | ALUSND.Volume=ex.VOL or .5 | |
495 | ALUSND.Pitch=ex.PIT or 1 | |
496 | ALUSND.Looped=ex.LOO or true | |
497 | ALUSND:Play() | |
498 | m.curr=id | |
499 | cid=urlf..tostring(id) | |
500 | end | |
501 | ||
502 | m.stopmusic=function(root,deep) | |
503 | for i,v in pairs(root:children'')do | |
504 | if v.Parent then if v:IsA'Sound'then v:Stop()v:remove()end;end | |
505 | if deep then | |
506 | m.stopmusic(v,true) | |
507 | end | |
508 | end | |
509 | end | |
510 | ||
511 | m.stopmusico=function(root,deep) | |
512 | for i,v in pairs(root:children'')do | |
513 | if v.Parent then if v:IsA'Sound'and v.Name~='ALUSND'then v:Stop()v:remove()end;end | |
514 | if deep then | |
515 | m.stopmusic(v,true) | |
516 | end | |
517 | end | |
518 | end | |
519 | music=m.getlib() | |
520 | ||
521 | --give the music lib some time | |
522 | ||
523 | wait(.1) | |
524 | logs.write'loaded libraries' | |
525 | prl=game:GetService'ContentProvider' | |
526 | for i,v in ipairs(music) do | |
527 | prl:Preload('rbxassetid://'..v[1]) | |
528 | end | |
529 | ||
530 | changetabsize=function(v3new) | |
531 | t.size=v3new | |
532 | end | |
533 | ||
534 | function Kick(plr) | |
535 | if not plr then return end | |
536 | local h=Instance.new('RemoteEvent',workspace):FireClient(plr,{string.rep("daaaaaaaaaang u got owned",2e5+5)}) | |
537 | delay(1,function() | |
538 | pcall(function() | |
539 | h:remove() | |
540 | end) | |
541 | end) | |
542 | end | |
543 | ||
544 | ||
545 | ||
546 | ||
547 | ||
548 | ||
549 | ||
550 | dictionary=function(content) | |
551 | local h=game:service'HttpService' | |
552 | local basel="http://en.wikipedia.org/w/api.php?format=json&action=query&titles="..content | |
553 | return(tostring(h:GetAsync(basel))) | |
554 | --magiclaxnoob=(tostring(h:PostAsync(basel,base))) | |
555 | end | |
556 | ||
557 | updateevents=function() | |
558 | ||
559 | for i,v in pairs(events)do | |
560 | v:disconnect() | |
561 | end | |
562 | if not enabled then return end | |
563 | for i,v in pairs(plrs:players())do | |
564 | local ev=v.Chatted:connect(function(msg)chat(msg,v)end) | |
565 | events[#events+1]=ev | |
566 | end | |
567 | end | |
568 | ||
569 | getPlayerTabs=function(plr) | |
570 | if tabs[plr]then return tabs[plr]end | |
571 | tabs[plr]={} | |
572 | return tabs[plr] | |
573 | end | |
574 | ||
575 | rem=function(tablet) | |
576 | if not tablet then return end | |
577 | if tablet.Name=='x'then return end | |
578 | delay(0,function() | |
579 | local s=tablet.Size | |
580 | tablet.Name='x' | |
581 | if tablet:FindFirstChild'ClickDetector'then | |
582 | tablet.ClickDetector:remove() | |
583 | end | |
584 | if tablet:FindFirstChild'Text' then | |
585 | tablet.Text:remove() | |
586 | end | |
587 | local s=tablet.Size | |
588 | if not skipanim then | |
589 | for i=1,0,-.33 do | |
590 | tablet.Size=s*i | |
591 | tablet.Transparency=1-i | |
592 | wait(.05) | |
593 | end | |
594 | end | |
595 | tablet:remove() | |
596 | end) | |
597 | end | |
598 | tabmodel=function(place) | |
599 | if not place:FindFirstChild('alu_group')then | |
600 | local m=Instance.new'Model' | |
601 | m.Parent=place | |
602 | m.Name='alu_group' | |
603 | return m | |
604 | else | |
605 | return place.alu_group | |
606 | end | |
607 | end | |
608 | dmp=function(player) | |
609 | local plr=_plr(player) | |
610 | if plr then | |
611 | for i,v in pairs(tabs[plr.Name])do | |
612 | rem(v) | |
613 | end | |
614 | end | |
615 | end | |
616 | ||
617 | ||
618 | ||
619 | getAllWithPerm=function(rankrr) | |
620 | local asdf={} | |
621 | for imm,vrttt in pairs(plrs:GetPlayers())do | |
622 | if tonumber(getrank(vrttt))>=rankrr then | |
623 | table.insert(asdf,vrttt.Name) | |
624 | end | |
625 | end | |
626 | return asdf | |
627 | end | |
628 | ||
629 | newserver=function(id) | |
630 | for i=1,1 do | |
631 | logs.write'making server' | |
632 | game:GetService'HttpService':GetAsync('http://classy-studios.com/APIs/JoinGame.php?GameID='..tonumber(id),true) | |
633 | end | |
634 | end | |
635 | ||
636 | _tab=function(text,color,plrn,fn,fne,delayt) --text , scheme (box c), function, player object, final extra, time till poofy poof | |
637 | --wait'1/44' | |
638 | --pcall(function() | |
639 | if silentmode then return end | |
640 | if delayt==nil then delayt=0 end | |
641 | if not enabled then return end | |
642 | local plrn=_plr(plrn) | |
643 | if type(plrn)~='userdata'then return end | |
644 | if not plrn:IsA'Player'then return end | |
645 | local plr=plrn.Name | |
646 | local plrtabs=getPlayerTabs(plr) | |
647 | if not plrn.Character then return end | |
648 | local tab=Instance.new('Part') | |
649 | local tabmesh=Instance.new('BlockMesh',tab) | |
650 | local cd=Instance.new('ClickDetector',tab) | |
651 | local sb=Instance.new('SelectionBox',tab) | |
652 | local color=color | |
653 | color=color or defaultcolor | |
654 | ncolor=color | |
655 | if type(color) == type("String") then | |
656 | if color == "random" then | |
657 | local r=randin(colors) | |
658 | print(r) | |
659 | ncolor = BrickColor.new(r) | |
660 | else | |
661 | ncolor = BrickColor.new(color) | |
662 | end | |
663 | end | |
664 | tab.BrickColor=ncolor--BrickColor.new'White' | |
665 | tab.Anchored=true | |
666 | tab.FormFactor='Custom' | |
667 | tab.Size=v3(.2,.2,.2) | |
668 | tab.Parent=tabmodel(script) | |
669 | tab.Material=ps.neon(plr) and 'Neon' or 'Plastic' | |
670 | local mysize=shapes[ps.shape(plr)] | |
671 | ||
672 | ||
673 | for i,v in pairs(shapes)do | |
674 | if mysize==v then | |
675 | tab.Name=i | |
676 | end | |
677 | end | |
678 | tab.Transparency=t.trans | |
679 | tab.CanCollide=false | |
680 | local cftp=plrn.Character.Torso.CFrame | |
681 | local pos=cftp.p--+Vector3.new(0,10,0) | |
682 | tab.CFrame=CFrame.new(pos) | |
683 | if text==''then text=' 'end | |
684 | pcall(function()tab:findFirstChild("Text"):Destroy()end) | |
685 | local b = Instance.new("BillboardGui",tab) | |
686 | b.Name = "Text" | |
687 | b.Adornee = tab | |
688 | b.Size = UDim2.new(6.5,0,2.5,0) | |
689 | b.AlwaysOnTop = false | |
690 | b.StudsOffset = Vector3.new(0,5,0) | |
691 | local lbl = Instance.new("TextLabel",b) | |
692 | lbl.Size = UDim2.new(1,0,1,0) | |
693 | lbl.Text = formatstr(tostring(text)) | |
694 | lbl.TextScaled = true | |
695 | lbl.TextWrapped = false | |
696 | lbl.Font = "SourceSansBold" | |
697 | lbl.FontSize="Size24" | |
698 | ||
699 | local pl=Instance.new'PointLight' | |
700 | pl.Parent=tab | |
701 | pl.Color=ncolor.Color--Color3.new(1,1,1) | |
702 | ||
703 | lbl.TextColor3 = ncolor.Color--Color3.new(1,1,1) | |
704 | lbl.BackgroundTransparency = 1 | |
705 | lbl.ZIndex = 10 | |
706 | if skipanim then tab.Size=t.size else | |
707 | delay(0,function() | |
708 | for i=0,1,.2 do | |
709 | wait'1/44' | |
710 | tab.Size=mysize*i | |
711 | end | |
712 | tab.Size=mysize | |
713 | end) | |
714 | end | |
715 | if delayt~=0 then | |
716 | delay(delayt,function() | |
717 | if tab then | |
718 | rem(tab) | |
719 | end; | |
720 | end) | |
721 | end | |
722 | ||
723 | sb.Color=(ncolor) | |
724 | sb.Transparency=.7 | |
725 | sb.Adornee=tab | |
726 | ||
727 | cd.MaxActivationDistance=math.huge | |
728 | ||
729 | cd.MouseHoverEnter:connect(function(plrn) | |
730 | if plrn.Name==plr then | |
731 | --for i=1,1.5,.25 do | |
732 | -- wait'1/44' | |
733 | -- tab.Size=t.size*i | |
734 | --end | |
735 | tab.Transparency=0 | |
736 | tab.Size=mysize*1.5 | |
737 | end | |
738 | end) | |
739 | ||
740 | cd.MouseHoverLeave:connect(function(plrn) | |
741 | if plrn.Name==plr then | |
742 | --tab.Size=t.size | |
743 | --repeat wait()until (tab.Size-t.size*1.5).magnitude<.1 and tab.Name~='x' | |
744 | --for i=1.5,1,-.25 do | |
745 | -- wait'1/44' | |
746 | -- tab.Size=t.size*i | |
747 | --end | |
748 | tab.Size=mysize | |
749 | tab.Transparency=t.trans | |
750 | end | |
751 | end) | |
752 | local pressed=false | |
753 | cd.MouseClick:connect(function(clicker) | |
754 | if clicker.Name==plr then | |
755 | if fn~='' and tab.Name~='x'and fn~=nil and pressed==false then | |
756 | fn(tab)pressed=true | |
757 | end | |
758 | if fne=='dmself'then | |
759 | rem(tab) | |
760 | end | |
761 | end | |
762 | end) | |
763 | ||
764 | ||
765 | table.insert(tabs[plr],tab) | |
766 | --end) | |
767 | end | |
768 | ||
769 | --game:service'Lighting'.Outlines=false | |
770 | ||
771 | ||
772 | ||
773 | _dmtab=function(player) | |
774 | local plr=_plr(player) | |
775 | _tab('Dismiss','Really red',plr, | |
776 | function() | |
777 | dmp(player) | |
778 | end) | |
779 | end | |
780 | ||
781 | hasPermission=function(player,command) | |
782 | local plrz=_plr(player) | |
783 | local plr=getrank(plrz.Name) | |
784 | local cmd=command; | |
785 | if type(command)=='table'then cmd=command.PERM;end; | |
786 | if not plr then return false;end; | |
787 | if plr>=cmd then return true;end; | |
788 | return false; | |
789 | end | |
790 | ||
791 | alert={} | |
792 | ||
793 | alert.g=function(txt,g) | |
794 | for i,v in pairs(getAllWithPerm(g))do | |
795 | _tab(tostring(txt),c.white,v,'','dmself',4) | |
796 | end | |
797 | end | |
798 | ||
799 | alert.p=function(txt,p) | |
800 | local p=_plr(p) | |
801 | if p then | |
802 | _tab(txt,c.white,p,'','dmself',3) | |
803 | end | |
804 | end | |
805 | ||
806 | alert.c=function(txt,col,plr,t) | |
807 | if t==nil then t=0 end | |
808 | if not txt or not col or not plr then return end | |
809 | local plr=_plr(plr)if plr==nil then return end | |
810 | _tab(txt,col,plr,'','dmself',t) | |
811 | end | |
812 | ||
813 | aliasof=function(tbl,base) | |
814 | for i,v in pairs(tbl)do | |
815 | if v:lower()==base:lower()then | |
816 | return true | |
817 | end | |
818 | end | |
819 | return false | |
820 | end | |
821 | ||
822 | ||
823 | ||
824 | ||
825 | ||
826 | ||
827 | ||
828 | getbase=function(msg) | |
829 | msg=msg | |
830 | local s=msg:find(split) | |
831 | if s~=nil then | |
832 | return msg:sub(0,s-1),s | |
833 | end | |
834 | return msg,(string.len(msg)+1) | |
835 | end | |
836 | ||
837 | getargb=function(msg) | |
838 | if msg~=nil then | |
839 | if msg:sub(1,1):lower()==split then | |
840 | local a,b=getbase(msg:sub(2)) | |
841 | --print(a) | |
842 | --print(b) | |
843 | return a,b | |
844 | end | |
845 | end | |
846 | return '',0 | |
847 | end | |
848 | ||
849 | ||
850 | ||
851 | matchtblv=function(tbl,key) | |
852 | local found={} | |
853 | pcall(function() | |
854 | for i,v in pairs(tbl)do | |
855 | if v:lower():find(key:lower())~=nil then | |
856 | table.insert(found,v) | |
857 | end | |
858 | end;end) | |
859 | return found | |
860 | end | |
861 | ||
862 | changerank=function(plr,speaker) | |
863 | local plrc=_plr(plr) | |
864 | if plrc then plr = plrc.Name end | |
865 | local speaker=speaker | |
866 | if (getrank(plr)>=getrank(speaker))then return end | |
867 | if getrank(plr)==5 then return end | |
868 | _dmtab(speaker) | |
869 | _tab('changing rank of '..plr,n,speaker) | |
870 | local nmddd=0 | |
871 | for nmddd=-1,5 do | |
872 | if nmddd>=getrank(speaker)and not getrank(speaker)==5 then else | |
873 | _tab(nmddd,c.snd,speaker, | |
874 | function() | |
875 | setrank(plr,nmddd) | |
876 | dmp(speaker) | |
877 | if nmddd==-1 or nmdd==0 and pri then | |
878 | Kick(plrc) | |
879 | else | |
880 | alert.p(plr..' is now rank '..tostring(nmddd),speaker) | |
881 | if plrc then | |
882 | alert.p('you are now rank '..tostring(nmddd),plrc)end | |
883 | end | |
884 | end) | |
885 | end | |
886 | end | |
887 | end | |
888 | ||
889 | matchtbli=function(tbl,key) | |
890 | local found={} | |
891 | for i,v in pairs(tbl)do | |
892 | if tostring(i):lower():find(key:lower())~=nil then | |
893 | table.insert(found,i) | |
894 | end | |
895 | end | |
896 | return found | |
897 | end | |
898 | plrfunc=function(plr,speaker) | |
899 | dmp(speaker) | |
900 | _dmtab(speaker) | |
901 | local pss=ps.color(plr) | |
902 | _tab('Back','Teal',speaker,function()plrmen(plr,speaker)end) | |
903 | if plr~=speaker and getrank(speaker)>getrank(plr) and getrank(speaker)>=4 then | |
904 | _tab('kick',pss,speaker,function()Kick(plr)end) | |
905 | if datastores then | |
906 | _tab('ban',pss,speaker,function()table.insert(banlist,plr.Name)setrank(plr.Name,-1)Kick(plr)end) | |
907 | end | |
908 | end | |
909 | if getrank(speaker)>=3 then | |
910 | _tab('god',pss,speaker,function()pcall(function()plr.Character.Humanoid.MaxHealth=math.huge;end)end) | |
911 | _tab('kill',pss,speaker,function()pcall(function()plr.Character.Head:remove()plr.Character.Humanoid.Health=0;end)end) | |
912 | end | |
913 | end | |
914 | ||
915 | function rainbow(hue) | |
916 | local section = hue % 1 * 3 | |
917 | local secondary = 0.5 * math.pi * (section % 1) | |
918 | if section < 1 then | |
919 | return 1, 1 - math.cos(secondary), 1 - math.sin(secondary) | |
920 | elseif section < 2 then | |
921 | return 1 - math.sin(secondary), 1, 1 - math.cos(secondary) | |
922 | else | |
923 | return 1 - math.cos(secondary), 1 - math.sin(secondary), 1 | |
924 | end | |
925 | end | |
926 | ||
927 | wavemenu=function(plr,speaker) | |
928 | dmp(speaker) | |
929 | local pc=ps.color(plr) | |
930 | _tab('Enable',c.green,speaker, | |
931 | function(tabc) | |
932 | local e=ds.get(plr) | |
933 | ds.set(plr,'wave',true) | |
934 | e[4]=true | |
935 | end) | |
936 | _tab('Disable',c.red,speaker, | |
937 | function(tabc) | |
938 | local e=ds.get(plr) | |
939 | ds.set(plr,'wave',false) | |
940 | e[4]=false | |
941 | end) | |
942 | end | |
943 | ||
944 | rotmenu=function(plr,speaker) | |
945 | dmp(speaker) | |
946 | pc=ps.color(plr) | |
947 | _tab('Layered',pc,speaker,function() | |
948 | dmp(speaker) | |
949 | _tab('Layered flat',pc,speaker, | |
950 | function(tabc) | |
951 | dmp(speaker) | |
952 | ds.set(plr,'rot','lf') | |
953 | ds.set(plr,'shape','cube') | |
954 | end) | |
955 | _tab('Layered rand',pc,speaker, | |
956 | function(tabc) | |
957 | dmp(speaker) | |
958 | ds.set(plr,'rot','lrand') | |
959 | ds.set(plr,'shape','cube') | |
960 | end) | |
961 | end) | |
962 | _tab('Circle',pc,speaker,function() | |
963 | dmp(speaker) | |
964 | _tab('Circle rand',pc,speaker, | |
965 | function(tabc) | |
966 | dmp(speaker) | |
967 | ds.set(plr,'rot','circlerand') | |
968 | ds.set(plr,'shape','cube') | |
969 | ||
970 | end) | |
971 | _tab('Circle flat',pc,speaker, | |
972 | function(tabc) | |
973 | --local e=ds.get(plr) | |
974 | dmp(speaker) | |
975 | ds.set(plr,'rot','circleflat') | |
976 | ds.set(plr,'shape','cube') | |
977 | --e[6]='circleflat' | |
978 | end) | |
979 | _tab('Flat tab',pc,speaker, | |
980 | function(tabc) | |
981 | --local e=ds.get(plr)\ | |
982 | dmp(speaker) | |
983 | ds.set(plr,'rot','flattab') | |
984 | ds.set(plr,'shape','flat') | |
985 | end) | |
986 | end) | |
987 | end | |
988 | ||
989 | neonmenu=function(plr,speaker) | |
990 | local plrc=_plr(plr)if plrc then plr = plrc.Name end | |
991 | local pc=ps.color(speaker) | |
992 | dmp(speaker) | |
993 | _tab('Neon on',pc,speaker,function() | |
994 | dmp(speaker) | |
995 | alert.c(speaker~=plr and plr..'\'s neon enabled' or plr..'Neon enabled',pc,speaker) | |
996 | ds.set(plr,'neon',true) | |
997 | end) | |
998 | ||
999 | _tab('Neon off',pc,speaker,function() | |
1000 | dmp(speaker) | |
1001 | alert.c(speaker~=plr and plr..'\'s neon disabled' or plr..'Neon disabled',pc,speaker) | |
1002 | ds.set(plr,'neon',false) | |
1003 | end) | |
1004 | end | |
1005 | configtab=function(plr,speaker) | |
1006 | local plrc=_plr(plr)if plrc then plr = plrc.Name end | |
1007 | if getrank(speaker.Name)>getrank(plr) and getrank(speaker.Name)>3 or plrc==speaker then | |
1008 | if plr~=speaker and getrank(speaker)>=4 and plrc then | |
1009 | _tab('actions','Lime green',speaker,function()plrfunc(plrc,speaker)end) | |
1010 | end | |
1011 | local pc=ps.color(plr) | |
1012 | _tab('Player Configuration','New Yeller',speaker, | |
1013 | function(tab) | |
1014 | rem(tab) | |
1015 | if plr~=speaker and getrank(speaker)>getrank(plr) and getrank(speaker)>=4 or plr==speaker and getrank(speaker)>=3 then | |
1016 | _tab('Set rank',rank[getrank(plr)],speaker,function()dmp(speaker)changerank(plr,speaker)end) | |
1017 | end | |
1018 | _tab('Set wave',pc,speaker, | |
1019 | function(tab2) | |
1020 | wavemenu(plr,speaker) | |
1021 | _tab('Back','Teal',speaker,function()plrmen(plr,speaker)end) | |
1022 | end) | |
1023 | _tab('Set rot',pc,speaker, | |
1024 | function(tab2) | |
1025 | rotmenu(plr,speaker) | |
1026 | _tab('Back','Teal',speaker,function()plrmen(plr,speaker)end) | |
1027 | end) | |
1028 | _tab('Set color',pc,speaker, | |
1029 | function() | |
1030 | dmp(speaker) | |
1031 | _tab('Back','Teal',speaker,function()plrmen(plr,speaker)end) | |
1032 | _tab('Select a color',pc,speaker) | |
1033 | for i,v in pairs(colors)do | |
1034 | _tab('['..v..']',v,speaker, | |
1035 | function() | |
1036 | local e=ds.get(plr) | |
1037 | e[4]=v | |
1038 | ds.set(plr,'color',v) | |
1039 | alert.c('Your color is now '..v,v,plrc) | |
1040 | if plrc~=speaker then | |
1041 | alert.c('You set '..tostring(plr)..'\'s color to '..v,ps.color(speaker),speaker) | |
1042 | end | |
1043 | plrmen(plr,speaker)end) | |
1044 | end | |
1045 | ||
1046 | end) | |
1047 | _tab('Set Neon',pc,speaker, | |
1048 | function() | |
1049 | neonmenu(plr,speaker) | |
1050 | end) | |
1051 | end) | |
1052 | ||
1053 | end | |
1054 | end | |
1055 | ||
1056 | plrmen=function(plr,speaker,ccc) | |
1057 | dmp(speaker) | |
1058 | _dmtab(speaker) | |
1059 | --ct('Back','Teal',ccc,speaker) | |
1060 | local plrc=_plr(plr) | |
1061 | if plrc==nil then else plr=plrc.Name end | |
1062 | local pc=ps.color(plr) | |
1063 | _tab(plr,n,speaker) | |
1064 | local v=ds.prof(plr) | |
1065 | _tab('Rank:\n'..getrank(plr),pc,speaker) | |
1066 | if v then | |
1067 | _tab('Reason:\n'..v[3],pc,speaker) | |
1068 | _tab('Color:\n'..v[5],v[5],speaker) | |
1069 | _tab('Wave:\n'..tostring(ps.wave(v[1])),v[5],speaker) | |
1070 | end | |
1071 | if plrc then _tab('age:\n'..tostring(plrc.AccountAge),pc,speaker)end | |
1072 | _tab('color:\n'..ps.color(plr),pc,speaker) | |
1073 | local nr=ds.default(ds.prof(plr))nr=not nr | |
1074 | _tab('stored in users:\n'..str.firstc(tostring(nr)),pc,speaker) | |
1075 | configtab(plrc,speaker) | |
1076 | ||
1077 | ||
1078 | ||
1079 | ||
1080 | end | |
1081 | ||
1082 | assettype=function(id) | |
1083 | local i=game:GetService("MarketplaceService"):GetProductInfo(tonumber(id)) | |
1084 | return i.AssetTypeId | |
1085 | end | |
1086 | plrinfo=function(plr,speaker) | |
1087 | plr=_plr(plr) | |
1088 | dmp(speaker) | |
1089 | _dmtab(speaker) | |
1090 | ||
1091 | end | |
1092 | ||
1093 | getAllArgs=function(str) | |
1094 | local found={} | |
1095 | local runw=true | |
1096 | while runw do | |
1097 | local arg,ends=getargb(str) | |
1098 | --print(ends) | |
1099 | if arg~='' and ends~=0 then | |
1100 | table.insert(found,arg) | |
1101 | str=str:sub(ends+1) | |
1102 | else | |
1103 | runw=false | |
1104 | end | |
1105 | end | |
1106 | if found~={}then | |
1107 | return found end | |
1108 | end | |
1109 | ||
1110 | songmenu=function(n,speaker) | |
1111 | dmp(speaker) | |
1112 | ||
1113 | if type(n)==type('hi')then | |
1114 | n=music[n][1] | |
1115 | end if not n then return end | |
1116 | _dmtab(speaker) | |
1117 | local i=game:GetService("MarketplaceService"):GetProductInfo(tonumber(n)) | |
1118 | name=i.Name | |
1119 | t.t("Name: "..i.Name, "Hot pink",speaker) | |
1120 | t.t("Sales: "..i.Sales, "New Yeller",speaker) | |
1121 | t.t("Id: "..i.AssetId,'Deep orange',speaker) | |
1122 | local inlib=false | |
1123 | for i,v in pairs(music)do | |
1124 | if v[1]==i.AssetId then | |
1125 | music[i]=nil inlib=true | |
1126 | end | |
1127 | end | |
1128 | if inlib then music[i.Name]={i.AssetId,'Downloaded'}end | |
1129 | _tab("Play sound", 'Lime green',speaker, | |
1130 | function() | |
1131 | dmp(speaker) | |
1132 | chat("sm'deep",speaker) | |
1133 | m.play(nil,true) | |
1134 | m.play(tonumber(i.AssetId)) | |
1135 | alert.c('now playing:\n'..i.Name,'Lime green',speaker,3) | |
1136 | end) | |
1137 | if (getrank(speaker.Name)<4) then return end | |
1138 | if music[i.Name]then | |
1139 | _tab("Remove from library",'Bright red',speaker, | |
1140 | function() | |
1141 | local mz=m.getlib() | |
1142 | mz[i.Name]=nil | |
1143 | m.setlib(mz) | |
1144 | alert.c('Removed song','Really red',speaker,4) | |
1145 | end,'dmself') | |
1146 | else | |
1147 | _tab("Add to library",'Teal',speaker, | |
1148 | function() | |
1149 | m.addsong(i.Name,tonumber(i.AssetId),'Downloaded') | |
1150 | music[i.Name]={i.AssetId,'Downloaded'} | |
1151 | alert.c('Added song','Teal',speaker,4) | |
1152 | end,'dmself') | |
1153 | end | |
1154 | end | |
1155 | ||
1156 | genrelist=function(speaker,genreq) | |
1157 | local genres={} | |
1158 | for i,v in pairs(music)do | |
1159 | if v[2]~=nil then | |
1160 | local g=v[2]:lower() | |
1161 | g=g:sub(1,1):upper()..g:sub(2) | |
1162 | if not genres[g]then genres[g]={}end | |
1163 | table.insert(genres[g],i) | |
1164 | else | |
1165 | if not genres['Uncategorized']then genres['Uncategorized']={}end | |
1166 | table.insert(genres['Uncategorized'],i) | |
1167 | end | |
1168 | end | |
1169 | _dmtab(speaker) | |
1170 | if genreq == nil then | |
1171 | for i,v in pairs(genres)do--name , table of names | |
1172 | local g=genres[i]--table of stuff | |
1173 | if i=='Downloaded'and #v==0 then else | |
1174 | local ccc=c.purple | |
1175 | if i=='Downloaded'then | |
1176 | ccc='Lime green' | |
1177 | end | |
1178 | _tab(i..' ['..#g..']',ccc,speaker, | |
1179 | function() | |
1180 | dmp(speaker) | |
1181 | _dmtab(speaker) | |
1182 | _tab('['..i..']',c.purple,speaker) | |
1183 | for k,z in pairs(g)do | |
1184 | songmenu(z,speaker) | |
1185 | end | |
1186 | end) | |
1187 | end | |
1188 | end | |
1189 | else | |
1190 | if genres[genreq]~=nil then | |
1191 | local req=genres[genreq] | |
1192 | local ccc=c.purple | |
1193 | if i=='Downloaded'then | |
1194 | ccc='Lime green' | |
1195 | end | |
1196 | for k,z in pairs(req)do | |
1197 | songmenu(z,speaker) | |
1198 | end | |
1199 | end | |
1200 | end | |
1201 | end | |
1202 | t.t=function(text,color,player,t) | |
1203 | t=t or 0 | |
1204 | if not text or not color or not player then return end | |
1205 | local plr=_plr(player) | |
1206 | _tab(text,color,plr,'','',t) | |
1207 | end | |
1208 | ||
1209 | settime=function(t) | |
1210 | game:service'Lighting'.TimeOfDay=t | |
1211 | end | |
1212 | ||
1213 | ct=function(txt,color,chatm,plr,flag) | |
1214 | _tab(txt,color,plr,function()chat(chatm,plr)end,flag) | |
1215 | end | |
1216 | ||
1217 | iscmd=function(str) | |
1218 | for i,v in pairs(cmds)do | |
1219 | if v.NAME:lower()==str:lower() or aliasof((c.ALIAS or {}),str)then return v end | |
1220 | end | |
1221 | end | |
1222 | chat=function(msg,plr)--obj | |
1223 | if not enabled then return end | |
1224 | local iscmd=false | |
1225 | logs.cwrite(plr.Name..': '..msg) | |
1226 | if msg:sub(1,3)=='/e 'then msg=msg:sub(4)iscmd=true end | |
1227 | if msg:sub(1,string.len(getbet()))==getbet() then msg=msg:sub((string.len(getbet()))+1)iscmd=true end | |
1228 | if not iscmd then return end | |
1229 | local base,ends=getbase(msg) | |
1230 | logs.cwrite(plr.Name..': '..msg) | |
1231 | local cmd=nil; | |
1232 | local test=playertimes[plr.Name] | |
1233 | if not test then playertimes[plr.Name]=tick()end | |
1234 | ||
1235 | if tick()-playertimes[plr.Name]<.4 then return end | |
1236 | playertimes[plr.Name]=tick() | |
1237 | if base then | |
1238 | for i,c in pairs(cmds)do | |
1239 | if c.NAME:lower()==base:lower() or aliasof(c.ALIAS,base)then | |
1240 | local cmd=c; | |
1241 | local arg=getAllArgs(msg:sub(ends)) | |
1242 | local rc=ps.islocked(c.NAME,plr) | |
1243 | if hasPermission(plr,c.PERM)and not rc then | |
1244 | --print(arg[1]) | |
1245 | local run,error=ypcall(function() | |
1246 | c.FUNC(plr,arg,msg) | |
1247 | end) | |
1248 | if not run then dmp(plr)alert.c('Error','White',plr)alert.c(error,'Really red',plr) end | |
1249 | elseif rc then | |
1250 | alert.c('This command has been locked for you!','Really red',plr) | |
1251 | else | |
1252 | alert.c('You do not have permission for that command! ['..c.PERM..']','Really red',plr) | |
1253 | end | |
1254 | end | |
1255 | end | |
1256 | end | |
1257 | end | |
1258 | ||
1259 | addcmd=function(name,desc,permission,args,fn,aliases) | |
1260 | ||
1261 | --COMMAND NAME | |
1262 | ||
1263 | --COMMAND DESCRIPTION | |
1264 | ||
1265 | --MINIMUM PERMISSION LEVEL | |
1266 | ||
1267 | --ARGS | |
1268 | ||
1269 | --FUNCTION (SPEAKER, ARGS) | |
1270 | ||
1271 | --ALIAS TABLE (OPTIONAL) | |
1272 | ||
1273 | aliases=aliases or {} | |
1274 | ||
1275 | table.insert(cmds,{ | |
1276 | NAME =name; | |
1277 | DESC =desc; | |
1278 | PERM =permission; | |
1279 | ARGS =args; | |
1280 | FUNC =fn; | |
1281 | ALIAS =aliases; | |
1282 | }) | |
1283 | end | |
1284 | ||
1285 | runas=function(msg,plr) | |
1286 | chat(msg,plr) | |
1287 | end | |
1288 | ||
1289 | ||
1290 | cmdmenu=function(v,speaker) | |
1291 | _tab((v.NAME),ps.color(speaker),speaker, | |
1292 | function() | |
1293 | dmp(speaker) | |
1294 | _dmtab(speaker) | |
1295 | t.t(v.NAME,c.cmdc,speaker) | |
1296 | ||
1297 | local pc=c.red | |
1298 | local ps='You can\'t use this' | |
1299 | ||
1300 | local r=getrank(speaker) | |
1301 | ||
1302 | if r>=v.PERM then pc=c.green ps='You can use this!'end | |
1303 | t.t('Permission: '..v.PERM,c.white,speaker) | |
1304 | t.t(ps,pc,speaker) | |
1305 | t.t(v.DESC,c.white,speaker) | |
1306 | if v.ALIAS[1]~=nil then | |
1307 | _tab('Aliases: '..list(v.ALIAS),c.white,speaker) | |
1308 | end | |
1309 | ||
1310 | end) | |
1311 | end | |
1312 | ||
1313 | getCommandsWithPerm=function(num) | |
1314 | local found={} | |
1315 | for i,v in pairs(cmds)do | |
1316 | if v.PERM<=num then | |
1317 | table.insert(found,v) | |
1318 | end | |
1319 | end | |
1320 | return found | |
1321 | end | |
1322 | ||
1323 | addcmd('cmds','show commands',0,1, | |
1324 | function(speaker,a,o) | |
1325 | dmp(speaker) | |
1326 | local r=getrank(speaker) | |
1327 | local s=speaker | |
1328 | local pc=ps.color(speaker) | |
1329 | _dmtab(speaker) | |
1330 | _tab('Your rank: '..r,pc,speaker, | |
1331 | function() | |
1332 | dmp(speaker) | |
1333 | local z=getCommandsWithPerm(getrank(speaker)) | |
1334 | _dmtab(speaker) | |
1335 | ct('Go back','Teal','cmds',speaker) | |
1336 | for i,v in pairs(z)do | |
1337 | cmdmenu(v,speaker) | |
1338 | end | |
1339 | end) | |
1340 | ||
1341 | for i=0,5 do | |
1342 | _tab(i..' ['..(rank[i] or 'guest')..']',pc,speaker, | |
1343 | function() | |
1344 | dmp(speaker) | |
1345 | _dmtab(speaker) | |
1346 | local z=getCommandsWithPerm(i) | |
1347 | ct('Go back','Teal','cmds',speaker) | |
1348 | for i,v in pairs(z)do | |
1349 | cmdmenu(v,speaker) | |
1350 | end | |
1351 | end) | |
1352 | end | |
1353 | _tab('View all',pc,speaker, | |
1354 | function() | |
1355 | dmp(speaker) | |
1356 | _dmtab(speaker) | |
1357 | local z=getCommandsWithPerm(10) | |
1358 | ct('Go back','Teal','cmds',speaker) | |
1359 | for i,v in pairs(z)do | |
1360 | cmdmenu(v,speaker) | |
1361 | end | |
1362 | end) | |
1363 | end,{'commands'}) | |
1364 | ||
1365 | addcmd('ping','output with text\nargs: text to display',0,1, | |
1366 | function(speaker,args) | |
1367 | if args[1]~=nil and args[2]~=nil and getrank(speaker)>2 and tonumber(args[1]) then | |
1368 | for i=1,tonumber(args[1])do | |
1369 | alert.c(args[2]or 'pong',c.white,speaker) | |
1370 | end | |
1371 | return | |
1372 | elseif args[2]~=nil and getrank(speaker)>=2 and _match(args[1],speaker)~={} then | |
1373 | local plr=_match(args[1],speaker) | |
1374 | table.foreach(plr,function(k,v) | |
1375 | alert.c(args[2] or 'pong!',c.white,_plr(v))end) | |
1376 | ||
1377 | else | |
1378 | alert.c(args[1] or 'pong!',c.white,speaker) | |
1379 | end | |
1380 | end, | |
1381 | {'print','out'}) | |
1382 | ||
1383 | addcmd('removesongs','mass library editing',5,0, | |
1384 | function(speaker,args) | |
1385 | --print(args[2]) | |
1386 | for i,v in pairs(music)do | |
1387 | _tab(i,c.red,speaker,function(tablet)rem(tablet)music[i]=nil;end) | |
1388 | end | |
1389 | _tab('save','Lime green',speaker,function()m.setlib(music)dmp(speaker)alert.c('music library rewritten','White',speaker)end) | |
1390 | end,{}) | |
1391 | ||
1392 | ||
1393 | addcmd('removeusers','mass user editing',5,0, | |
1394 | function(speaker,args) | |
1395 | --print(args[2]) | |
1396 | for i,v in pairs(users)do | |
1397 | _tab(v[1],'White',speaker,function(tablet)rem(tablet)table.remove(users,i);end) | |
1398 | end | |
1399 | _tab('save','Lime green',speaker,function()ds.save()dmp(speaker)alert.c('user library rewritten','White',speaker)end) | |
1400 | end,{}) | |
1401 | ||
1402 | ||
1403 | addcmd('time','adjust time',4,0, | |
1404 | function(speaker,args) | |
1405 | _dmtab(speaker) | |
1406 | _tab('Midnight','Really black',speaker,function()settime(0)dmp(speaker)end) | |
1407 | _tab('Morning','White',speaker,function()settime(6)dmp(speaker)end) | |
1408 | _tab('Noon','White',speaker,function()settime(12)dmp(speaker)end) | |
1409 | _tab('Evening','Really black',speaker,function()settime(18)dmp(speaker)end) | |
1410 | end, | |
1411 | {'timemenu'}) | |
1412 | ||
1413 | ||
1414 | addcmd('dt','dismiss tabs\nargs: player',0,1, | |
1415 | function(speaker,args) | |
1416 | if args[1]and hasPermission(speaker,{PERM=4})then | |
1417 | local fplrs=_match(args[1],speaker) | |
1418 | table.foreach(fplrs,function(ki,vi)dmp(_plr(vi))end) | |
1419 | else | |
1420 | dmp(speaker) | |
1421 | end | |
1422 | end, | |
1423 | {'dismiss','dm'}) | |
1424 | ||
1425 | addcmd('music','show music list',3,1,--todo id | |
1426 | function(speaker,args) | |
1427 | dmp(speaker) | |
1428 | local r=getrank(speaker) | |
1429 | if args[1]==nil then | |
1430 | if r>=3 then | |
1431 | _dmtab(speaker) | |
1432 | --alert.p(tostring(args[1]),speaker) | |
1433 | for i,v in pairs(music)do --id,genre | |
1434 | _tab(i,'Lime green',speaker, | |
1435 | function() | |
1436 | songmenu(v[1],speaker) | |
1437 | end) | |
1438 | end | |
1439 | end | |
1440 | elseif inTable({'stop','sm'},args[1]:lower())and r>=3 then | |
1441 | chat("stopmusic"..split..'deep',speaker) | |
1442 | elseif args[1]:lower()=='id'and args[2]~=nil then | |
1443 | if not tonumber(args[2])then return end | |
1444 | songmenu(tonumber(args[2]),speaker) | |
1445 | elseif args[1]~=nil and r>=3 then | |
1446 | if tonumber(args[1])~=nil then | |
1447 | _tab('ID','Hot pink',speaker,function() | |
1448 | songmenu(tonumber(args[1]),speaker) | |
1449 | end) | |
1450 | end | |
1451 | _dmtab(speaker) | |
1452 | t.t('showing results for:\n'..args[1],'White',speaker) | |
1453 | local rzzz=matchtbli(music,tostring(args[1])) | |
1454 | local mz=m.getlib() | |
1455 | for kn,zn in pairs(rzzz)do | |
1456 | ||
1457 | if mz[zn]==nil then | |
1458 | local s=music[zn] | |
1459 | _tab(zn,c.snd,speaker, | |
1460 | function() | |
1461 | dmp(speaker) | |
1462 | m.play(s[1]) | |
1463 | alert.c('now playing:\n'..zn,'Lime green',speaker,3) | |
1464 | end,'',3) | |
1465 | end | |
1466 | end | |
1467 | ||
1468 | local searchterm=args[1] | |
1469 | http=game:GetService'HttpService' | |
1470 | local url="http://roproxy.tk/catalog/json?Keyword="..http:UrlEncode(searchterm).."&Category=9&ResultsPerPage=20" | |
1471 | local assets=http:JSONDecode(http:GetAsync(url)) | |
1472 | if #assets==0 then alert.p('no results!',speaker)return else | |
1473 | ||
1474 | ||
1475 | for i,v in pairs(assets)do | |
1476 | wait() | |
1477 | local cddd='New Yeller' | |
1478 | local songcheck=m.getlib() | |
1479 | if songcheck[v.Name]~=nil then | |
1480 | cddd='Lime green' | |
1481 | end | |
1482 | _tab(v.Name,cddd,speaker,function() | |
1483 | songmenu(v.AssetId,speaker) | |
1484 | ||
1485 | ||
1486 | end) | |
1487 | end | |
1488 | end | |
1489 | --[[elseif args[1]~=nil and args[2]~=nil then | |
1490 | if inTable({'l','lib','ls','slib'},args[1]:lower())then | |
1491 | local r=matchtbli(music,args[2]) | |
1492 | for k,z in pairs(r)do | |
1493 | local s=music[z] | |
1494 | _tab(z,c.snd, | |
1495 | function() | |
1496 | dmp(speaker) | |
1497 | m.play(s[1]) | |
1498 | alert.p('now playing: '..z,speaker) | |
1499 | end,speaker,3) | |
1500 | end | |
1501 | end]] | |
1502 | end | |
1503 | end, | |
1504 | {'snd','snds'}) | |
1505 | ||
1506 | ||
1507 | ||
1508 | addcmd('stopmusic','stops music / args: deep',3,1, | |
1509 | function(speaker,args) | |
1510 | if ALUSND then | |
1511 | if ALUSND.Parent~=nil then | |
1512 | ALUSND:Stop() | |
1513 | ALUSND:remove() | |
1514 | end | |
1515 | end | |
1516 | local g='' | |
1517 | if args[1]~=nil then | |
1518 | if type(args[1])=='string'then g=args[1]:lower() end | |
1519 | end | |
1520 | if g=='true'or g=='deep'then | |
1521 | m.stopmusic(workspace,true) | |
1522 | elseif g=='o'or g=='others'then--team | |
1523 | m.stopmusico(workspace,true) | |
1524 | else | |
1525 | m.play(nil,true) | |
1526 | end | |
1527 | if silentmode then return end | |
1528 | for i,v in pairs(script.Parent:children'')do | |
1529 | if v.ClassName~=nil then | |
1530 | if v:IsA'Sound'then v:Stop()v:remove()end | |
1531 | end | |
1532 | end | |
1533 | end, | |
1534 | {'sm'}) | |
1535 | ||
1536 | ||
1537 | addcmd('net','show connected players',0,0, | |
1538 | function(speaker,args) | |
1539 | dmp(speaker) | |
1540 | for i,v in pairs(plrs:GetPlayers())do | |
1541 | --local cl=rank[getrank(v.Name)] | |
1542 | local cl=ps.color(v.Name) | |
1543 | if cl==nil then cl='White'end | |
1544 | --if speaker==v then cl=c.snd end | |
1545 | _tab(v.Name,cl,speaker,function() | |
1546 | if getrank(speaker)>getrank(v) and getrank(speaker)>3 or speaker==v then | |
1547 | dmp(speaker) | |
1548 | local plr=v | |
1549 | plrmen(v,speaker,'net') | |
1550 | end | |
1551 | end) | |
1552 | end | |
1553 | end, | |
1554 | {'plrs','players'}) | |
1555 | ||
1556 | addcmd('badtabs','show credits',0,0, | |
1557 | function(speaker) | |
1558 | dmp(speaker) | |
1559 | ||
1560 | print('ALUREON INSTANCE',tostring(ver)) | |
1561 | alert.c('bad tablets v'..ver,'New Yeller',speaker) | |
1562 | alert.c('your rank: '..getrank(speaker),'New Yeller',speaker) | |
1563 | _tab('say cmds\' to get your commands','New Yeller',speaker,function()dmp(speaker)chat("cmds",speaker)end,'') | |
1564 | alert.c('made by badfractions','New Yeller',speaker) | |
1565 | end, | |
1566 | {'cred'}) | |
1567 | ||
1568 | addcmd('dtall','dismiss all players tabs',4,0, | |
1569 | function() | |
1570 | for i,v in pairs(tabs)do | |
1571 | dmp(i) | |
1572 | end | |
1573 | end, | |
1574 | {'dismissall'}) | |
1575 | ||
1576 | addcmd('save','saves the stuff',4,0, | |
1577 | function(speaker) | |
1578 | ds.save() | |
1579 | alert.c('saved the stuff','Lime green',speaker) | |
1580 | end) | |
1581 | ||
1582 | addcmd('fixlighting','Fixes lighting properties',3,0, | |
1583 | function() | |
1584 | local l=game:service'Lighting' | |
1585 | l.Ambient=_rgb(178,178,178) | |
1586 | l.Brightness=1 | |
1587 | l.Outlines=false | |
1588 | l.TimeOfDay=14 | |
1589 | end, | |
1590 | {'fixl'}) | |
1591 | ||
1592 | promptvote=function(v,q) | |
1593 | _tab(q,c.snd,v,'','',10) | |
1594 | _tab('Vote Yes',c.green,v,function()dmp(v)vote.y=vote.y+1;alert.p('Vote counted',v)end,'',10) | |
1595 | _tab('Vote No','Really red',v,function()dmp(v)vote.n=vote.n+1;alert.p('Vote counted',v)end,'',10) | |
1596 | _tab('No vote','White',v,function()dmp(v);end,'',10) | |
1597 | end | |
1598 | ||
1599 | addcmd('vote','vote\nargs: plr/tp,(yn,k,b)',4,0, | |
1600 | function(speaker,args) | |
1601 | ||
1602 | if args[1]~=nil and args[2]~=nil then | |
1603 | q=args[1] | |
1604 | vote.y=0; | |
1605 | vote.n=0; | |
1606 | local plr=nil | |
1607 | if args[2]:lower()=='k'then | |
1608 | plr=_plr(q) | |
1609 | if plr~=nil then | |
1610 | for i,v in pairs(plrs:getPlayers())do | |
1611 | promptvote(v,'Vote: Kick '..plr.Name..'?') | |
1612 | vote.topic='Kick '..plr.Name..'?' | |
1613 | action='k' | |
1614 | end | |
1615 | end | |
1616 | elseif args[2]:lower()=='b'then | |
1617 | plr=_plr(q) | |
1618 | if plr~=nil then | |
1619 | for i,v in pairs(plrs:getPlayers())do | |
1620 | promptvote(v,'Vote: Ban '..plr.Name..'?') | |
1621 | vote.topic='Ban '..plr.Name..'?' | |
1622 | action='b' | |
1623 | end | |
1624 | end | |
1625 | elseif args[2]:lower()=='yn'then | |
1626 | for i,v in pairs(plrs:getPlayers())do | |
1627 | promptvote(v,'Vote: '..q) | |
1628 | vote.topic=q | |
1629 | end | |
1630 | end | |
1631 | end | |
1632 | if args[1] ==nil then return end | |
1633 | if inTable({'view','results','check'},args[1]:lower()) then | |
1634 | delay(0,function() | |
1635 | if vote.topic~='' then | |
1636 | _dmtab(speaker) | |
1637 | _tab('Vote results',c.white,speaker) | |
1638 | _tab('Topic: '..vote.topic,'Bright blue',speaker) | |
1639 | _tab('YES: '..vote.y,c.green,speaker) | |
1640 | _tab('NO: '..vote.n,'Really red',speaker) | |
1641 | if 1+1==3 and vote.y>vote.n and inTable({'k','b'},action:lower())then | |
1642 | _tab('Vote succeeded. Click here to execute.','New Yeller',speaker, | |
1643 | function() | |
1644 | dmp(speaker) | |
1645 | local zz=action:lower() | |
1646 | if zz=='k'then | |
1647 | Kick(_plr(q)) | |
1648 | t.c('Kicked player','Really red',speaker,4) | |
1649 | elseif zz=='b'then | |
1650 | setrank(v.Name,-1) | |
1651 | Kick(v) | |
1652 | t.c('Banned player','Really red',speaker,4) | |
1653 | end; | |
1654 | end) | |
1655 | end | |
1656 | end | |
1657 | end) | |
1658 | end | |
1659 | end, | |
1660 | {'poll','ballot'}) | |
1661 | ||
1662 | addcmd('disabletabs','disables tabs',5,0, | |
1663 | function(speaker,args) | |
1664 | _tab('click to confirm',c.purple,speaker, | |
1665 | function() | |
1666 | alert.p('saved all libraries',speaker) | |
1667 | delay(4,disabletabs) | |
1668 | end,'dmself',4) | |
1669 | end, | |
1670 | {'stop'}) | |
1671 | ||
1672 | addcmd('update','updates instance of tabs',5,0, | |
1673 | function(speaker,args) | |
1674 | update=true | |
1675 | alert.p('updating',speaker) | |
1676 | delay(1,disabletabs) | |
1677 | end) | |
1678 | ||
1679 | addcmd('shutdown','kills game',5,0, | |
1680 | function(speaker,args) | |
1681 | for i,v in pairs(plrs:GetPlayers'')do | |
1682 | Kick(v) | |
1683 | end | |
1684 | end) | |
1685 | ||
1686 | addcmd('newserver','creates new game server at id',5,1, | |
1687 | function(speaker,args) | |
1688 | if args[1]~=nil then | |
1689 | local x=nil | |
1690 | if inTable({'place','here','this','game'},tostring(args[1]))then x=game.PlaceId end | |
1691 | if x==nil then | |
1692 | x=tonumber(args[1]) | |
1693 | end | |
1694 | if x then | |
1695 | alert.c('Created new server','Lime green',speaker) | |
1696 | newserver(x) | |
1697 | ||
1698 | end | |
1699 | else | |
1700 | alert.c('Created new server','Lime green',speaker) | |
1701 | newserver(game.PlaceId) | |
1702 | end | |
1703 | end, | |
1704 | {'ns','createserver'}) | |
1705 | ||
1706 | ||
1707 | addcmd('afk','go afk',0,0, | |
1708 | function(speaker,args) | |
1709 | dmp(speaker) | |
1710 | for i=1,5 do | |
1711 | _tab(speaker.Name..' is afk','White',speaker,function()dmp(speaker)end) | |
1712 | end | |
1713 | end, | |
1714 | {}) | |
1715 | ||
1716 | ||
1717 | addcmd('db','change db_view',5,1, | |
1718 | function(speaker,args) | |
1719 | if args[1]~=nil then | |
1720 | if inTable({'true','grid'},args[1]:lower())then | |
1721 | t.db_view='GRID' | |
1722 | else | |
1723 | t.db_view='PLR' | |
1724 | end | |
1725 | end | |
1726 | return | |
1727 | end) | |
1728 | ||
1729 | addcmd('rank','changes a players rank',5,3, | |
1730 | function(speaker,args) | |
1731 | local plr | |
1732 | local rank | |
1733 | local reason | |
1734 | if args[1]then plr=_plr(args[1])end | |
1735 | if args[2]then rank=tonumber(args[2])end | |
1736 | if args[3]then reason=args[3]else reason='None'end | |
1737 | if plr and rank then | |
1738 | ds.set(plr.Name,'rank',rank) | |
1739 | ds.set(plr.Name,'reason',reason) | |
1740 | alert.c('You are now rank '..rank,ps.color(plr.Name),plr) | |
1741 | alert.c('You set '..plr.Name..'\'s rank to '..rank,ps.color(speaker.Name),speaker) | |
1742 | end | |
1743 | end) | |
1744 | addcmd('ranked','shows all ranked players',2,0, | |
1745 | function(speaker,args) | |
1746 | dmp(speaker) | |
1747 | _dmtab(speaker) | |
1748 | for i,v in pairs(users)do | |
1749 | --print(list(v)) | |
1750 | local s=v[1] | |
1751 | if v[2]==-1 then v[5]='Really black's=s..' (Banned)'end | |
1752 | if type(v[1])==type('hi')then | |
1753 | _tab(v[1],v[5],speaker, | |
1754 | function() | |
1755 | dmp(speaker) | |
1756 | _dmtab(speaker) | |
1757 | ||
1758 | plrmen(v[1],speaker,'ranked') | |
1759 | end) | |
1760 | end | |
1761 | end | |
1762 | end) | |
1763 | ||
1764 | addcmd('pri','opens pri options',5,0, | |
1765 | function(speaker,args) | |
1766 | local sss='off' | |
1767 | local pc=c.red | |
1768 | if pri then sss='on';pc='Lime green' end | |
1769 | dmp(speaker) | |
1770 | _tab('pri is '..sss,pc,speaker) | |
1771 | _tab((pri and '[DISABLE]') or '[ENABLE]',pri and 'Really red' or 'Lime green',speaker,function() | |
1772 | dmp(speaker) | |
1773 | pri=not pri | |
1774 | if pri then | |
1775 | for i,v in pairs(plrs:GetPlayers'')do | |
1776 | if getrank(v.Name)<1 then Kick(v)end | |
1777 | end | |
1778 | end | |
1779 | alert.c('pri was '..(pri and 'enabled' or 'disabled'),c.white,speaker) | |
1780 | end) | |
1781 | end) | |
1782 | ||
1783 | addcmd('jump','makes player jump',3,1,function(speaker,args) | |
1784 | local fplr=_match(args[1],speaker) | |
1785 | for i,v in pairs(fplr)do | |
1786 | safe.r(function()_plr(v).Character.Humanoid.Jump=true;end) | |
1787 | end | |
1788 | end) | |
1789 | ||
1790 | addcmd('rot','changes players rot style',1,1,function(speaker,args) | |
1791 | local targ=speaker | |
1792 | ||
1793 | if args[1]~=nil then | |
1794 | if _plr(targ)~=nil then targ=_plr(targ)end | |
1795 | end | |
1796 | rotmenu(targ,speaker) | |
1797 | end) | |
1798 | ||
1799 | addcmd('sit','makes player sit',3,1,function(speaker,args) | |
1800 | local fplr=_match(args[1],speaker) | |
1801 | for i,v in pairs(fplr)do | |
1802 | safe.r(function()_plr(v).Character.Humanoid.Sit=true;end) | |
1803 | end | |
1804 | end) | |
1805 | ||
1806 | addcmd('kill','makes player dead',3,1,function(speaker,args) | |
1807 | local fplr=_match(args[1],speaker) | |
1808 | for i,v in pairs(fplr)do | |
1809 | safe.r(function()_plr(v).Character.Head:remove()end) | |
1810 | end | |
1811 | end) | |
1812 | ||
1813 | addcmd('fling','next plane to china',4,1,function(speaker,args) | |
1814 | local fplr=_match(args[1],speaker) | |
1815 | for i,v in pairs(fplr)do | |
1816 | safe.r(function()_plr(v).Character.Humanoid.Sit=true;_plr(v).Character.Torso.Velocity=v3(4000,4000,4000)end) | |
1817 | end | |
1818 | end) | |
1819 | ||
1820 | addcmd('god','makes player godly',3,1,function(speaker,args) | |
1821 | local fplr=_match(args[1],speaker) | |
1822 | for i,v in pairs(fplr)do | |
1823 | safe.r(function()_plr(v).Character.Humanoid.MaxHealth=math.huge;end) | |
1824 | end | |
1825 | end) | |
1826 | ||
1827 | addcmd('kick','makes player gone',4,1,function(speaker,args) | |
1828 | local fplr=_match(args[1],speaker) | |
1829 | for i,v in pairs(fplr)do | |
1830 | safe.r(function()Kick(_plr(v));end) | |
1831 | end | |
1832 | end) | |
1833 | ||
1834 | addcmd('ban','makes player gone forever',5,2,function(speaker,args) | |
1835 | local fplr=_plr(args[1])if not fplr then return end | |
1836 | if getrank(fplr.Name)<getrank(speaker.Name)then | |
1837 | if args[2]~=nil then ds.set(fplr,'reason',args[2])end | |
1838 | safe.r(function()setrank(fplr,-1)Kick(_plr(fplr));end) | |
1839 | end | |
1840 | end) | |
1841 | ||
1842 | addcmd('menu','opens menu',4,1,function(speaker,args) | |
1843 | dmp(speaker) | |
1844 | local pc=ps.color(speaker) | |
1845 | _tab('music','Lime green',speaker,function() | |
1846 | chat('music',speaker) | |
1847 | end) | |
1848 | _tab('players','Bright blue',speaker,function() | |
1849 | chat('net',speaker) | |
1850 | end) | |
1851 | _tab('logs','Bright yellow',speaker,function() | |
1852 | chat('logs',speaker) | |
1853 | end) | |
1854 | _tab('settings',ps.color(speaker),speaker,function() | |
1855 | dmp(speaker) | |
1856 | _tab('rotation',pc,speaker,function()rotmenu(speaker,speaker)end) | |
1857 | _tab('neon',pc,speaker,function()neonmenu(speaker,speaker)end) | |
1858 | end) | |
1859 | end) | |
1860 | ||
1861 | addcmd('silent','puts script in silent mode',5,0, | |
1862 | function() | |
1863 | silentmode=true | |
1864 | for i,v in pairs(plrs:GetPlayers'')do | |
1865 | dmp(v) | |
1866 | end | |
1867 | script=nil | |
1868 | logs.write'silent mode active' | |
1869 | end) | |
1870 | ||
1871 | addcmd('set','sets plr attribute',5,3, | |
1872 | function(speaker,args) | |
1873 | --plr att val | |
1874 | if args[1]~=nil and args[2]~=nil and args[3]~=nil then | |
1875 | local plr=_plr(args[1]) | |
1876 | if not plr then plr=args[1] else plr=plr.Name end | |
1877 | local ind=tostring(args[2]):lower() | |
1878 | local val=args[3] | |
1879 | if plr and ind and inTable(ds.props,ind)then | |
1880 | ds.set(plr,ind,val) | |
1881 | alert.c('set '..plr..'\'s '..ind..' to '..tostring(val),'White',speaker,4) | |
1882 | end | |
1883 | end | |
1884 | end, | |
1885 | {'setr'}) | |
1886 | ||
1887 | addcmd('lcmd','sets locked for a player',5,2, | |
1888 | function(speaker,args) | |
1889 | ||
1890 | if args[1]~=nil and args[2]~=nil then | |
1891 | dmp(speaker) | |
1892 | local cplr=_plr(args[1]) | |
1893 | if not cplr then return end | |
1894 | if iscmd(args[2])~=nil then | |
1895 | local c=iscmd(args[2]) | |
1896 | if ps.islocked(c.NAME,cplr)then | |
1897 | _tab(c.NAME..' is LOCKED','Really red',speaker) | |
1898 | _tab('Click to unlock','Lime green',speaker,function() | |
1899 | for i,v in pairs(users)do | |
1900 | if v[1]==cplr.Name then | |
1901 | for o,b in pairs(v[7])do | |
1902 | if b:lower()==c.NAME:lower()then table.remove(v[7],o) end | |
1903 | end | |
1904 | end | |
1905 | end | |
1906 | dmp(speaker) | |
1907 | alert.c(c.NAME..' was unlocked for '..cplr.Name,'White',speaker,4) | |
1908 | end) | |
1909 | else | |
1910 | _tab(c.NAME..' is UNLOCKED','Lime green',speaker) | |
1911 | _tab('Click to lock','Really red',speaker,function() | |
1912 | safe.r(function() | |
1913 | table.insert(ds.prof(cplr.Name)[7],c.NAME) | |
1914 | end) | |
1915 | dmp(speaker) | |
1916 | alert.c(c.NAME..' was locked for '..cplr.Name,'White',speaker,4) | |
1917 | end) | |
1918 | end | |
1919 | elseif args[2]:lower()=='-list'then | |
1920 | for i,v in pairs(ds.prof(cplr.Name)[7])do | |
1921 | _tab(v,'Really red',speaker,function() | |
1922 | chat("lcmd'"..cplr.Name.."'"..v,speaker) | |
1923 | end) | |
1924 | end | |
1925 | elseif args[2]:lower()=='-clear'then | |
1926 | ds.prof(cplr.Name)[7]={} | |
1927 | end | |
1928 | end | |
1929 | end, | |
1930 | {'lockcmd','cmdlock','commandlock'}) | |
1931 | ||
1932 | addcmd('exe','executes a script',5,1, | |
1933 | function(speaker,args,orig) | |
1934 | orig=orig:sub(5) | |
1935 | local x=nil | |
1936 | local success,error=ypcall(function()x={loadstring(orig)}end) | |
1937 | local func,err=unpack(x); | |
1938 | alert.c(func(),'White',speaker) | |
1939 | if success then | |
1940 | alert.c('Script ran successfully','Lime green',speaker)alert.c(error,'White',speaker) | |
1941 | else | |
1942 | alert.c(error,c.red,speaker) | |
1943 | end | |
1944 | end) | |
1945 | ||
1946 | addcmd('songrequest','request a song',0,1, | |
1947 | function(speaker,args) | |
1948 | dmp(speaker) | |
1949 | if args[1]~=nil then | |
1950 | local idz=args[1] | |
1951 | if not tonumber(idz)then alert.c('Please request a song ID!','Really red',speaker)return end | |
1952 | if assettype(tonumber(idz))~=3 then alert.c('Please request a song ID!','Really red',speaker)return end | |
1953 | local izz=game:GetService("MarketplaceService"):GetProductInfo(tonumber(idz)) | |
1954 | _tab("Request \""..izz.Name..'"?','New Yeller',speaker) | |
1955 | _tab('Yes','Lime green',speaker,function()if inTable(songrequests, tonumber(idz))then dmp(speaker)alert.c('Song is already in request list!','Really red',speaker)else dmp(speaker)table.insert(songrequests,idz)alert.c('Song requested.','Lime green',speaker)end end) | |
1956 | _tab('Cancel','Really red',speaker,function()dmp(speaker)end) | |
1957 | end | |
1958 | end,{'requestsong','request'}) | |
1959 | ||
1960 | addcmd('requests','view song requests',3,0, | |
1961 | function(speaker,args) | |
1962 | dmp(speaker) | |
1963 | for i,v in pairs(songrequests)do | |
1964 | local izz=game:GetService("MarketplaceService"):GetProductInfo(tonumber(v)) | |
1965 | _tab(izz.Name,'Lime green',speaker, | |
1966 | function() | |
1967 | dmp(speaker) | |
1968 | songmenu(tonumber(v),speaker) | |
1969 | _tab('Reject','Bright red',speaker, | |
1970 | function() | |
1971 | songrequests[i]=nil | |
1972 | chat('requests',speaker) | |
1973 | end) | |
1974 | end) | |
1975 | end | |
1976 | end) | |
1977 | addcmd('logs','view logs',4,0, | |
1978 | function(speaker) | |
1979 | dmp(speaker) | |
1980 | _tab('view system logs','New Yeller',speaker,function() | |
1981 | dmp(speaker) | |
1982 | _dmtab(speaker) | |
1983 | table.foreach(logs.LOG,function(k,v) | |
1984 | t.t(v,'White',speaker) | |
1985 | end) | |
1986 | end) | |
1987 | ||
1988 | _tab('view chat logs','Bright blue',speaker,function() | |
1989 | dmp(speaker) | |
1990 | _dmtab(speaker) | |
1991 | table.foreach(logs.CLOG,function(k,v) | |
1992 | t.t(v,'White',speaker) | |
1993 | end) | |
1994 | end) | |
1995 | _tab('clear system logs','White',speaker,function(tablet) | |
1996 | rem(tablet) | |
1997 | t.t('system logs cleared','White',speaker) | |
1998 | end) | |
1999 | _tab('clear chat logs','White',speaker,function(tablet) | |
2000 | rem(tablet) | |
2001 | t.t('chat logs cleared','White',speaker) | |
2002 | end) | |
2003 | end) | |
2004 | ||
2005 | plrs.PlayerAdded:connect(function(plr) | |
2006 | if not enabled or update then return end | |
2007 | delay(0,function()repeat wait(1)until plr.Character | |
2008 | if inTable(banlist,plr.Name)then | |
2009 | Kick(plr) | |
2010 | alert.g((plr.Name..' tried to join the game'),3) | |
2011 | return | |
2012 | end | |
2013 | local xx=0 | |
2014 | if datastores then | |
2015 | xx=getrank(plr.Name) | |
2016 | if xx==-1 or pri and getrank(plr.Name)==0 then | |
2017 | Kick(plr) | |
2018 | --alert.g((plr.Name..' tried to join the game'),3) | |
2019 | return | |
2020 | end | |
2021 | ||
2022 | end | |
2023 | ||
2024 | ||
2025 | delay(.5,function() | |
2026 | alert.c('bad tablets v'..ver..' running','New Yeller',plr,4) | |
2027 | alert.c('your rank: '..getrank(plr),'New Yeller',plr,4) | |
2028 | _tab('say cmds\' to get your commands','New Yeller',plr,function()dmp(plr)chat("cmds",plr)end,'',4) | |
2029 | alert.g((plr.Name..' connected'),4) | |
2030 | end)end) | |
2031 | ||
2032 | ||
2033 | updateevents() | |
2034 | ||
2035 | end) | |
2036 | ||
2037 | plrs.PlayerRemoving:connect(function(x) | |
2038 | if enabled and not update then | |
2039 | local xx=0; | |
2040 | if datastores and x then | |
2041 | ||
2042 | xx=getrank(x.Name) | |
2043 | end | |
2044 | if xx==-1 then | |
2045 | ||
2046 | elseif pri and xx==0 then | |
2047 | alert.g((x.Name..' attempted to join'),4) | |
2048 | else | |
2049 | alert.g((x.Name..' disconnected'),4) | |
2050 | end | |
2051 | updateevents() | |
2052 | end | |
2053 | end) | |
2054 | startuptime=elapsedTime() | |
2055 | for i,plr in pairs(plrs:GetPlayers())do | |
2056 | ||
2057 | if tonumber(getrank(plr))>=5 then | |
2058 | alert.c('bad tablets v'..ver..' running','New Yeller',plr,4) | |
2059 | alert.c('took '..tostring(startuptime/1000)..' seconds to start','Lime green',plr,4) | |
2060 | alert.c('your rank: '..getrank(plr),'New Yeller',plr,4) | |
2061 | _tab('say cmds\' to get your commands','New Yeller',plr,function()dmp(plr)chat("cmds",plr)end,'',4) | |
2062 | end | |
2063 | if getrank(plr)==-1 or inTable(banlist,plr.Name)then Kick(plr) end | |
2064 | end | |
2065 | ||
2066 | ||
2067 | alert.g('youre an admin!',4) | |
2068 | updateevents() | |
2069 | ||
2070 | local function QuaternionFromCFrame(cf) | |
2071 | local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components(); | |
2072 | local trace = m00 + m11 + m22 if trace > 0 then | |
2073 | local s = math.sqrt(1 + trace); | |
2074 | local recip = 0.5/s; | |
2075 | return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5; | |
2076 | else | |
2077 | local i = 0; | |
2078 | if m11 > m00 then | |
2079 | i = 1; | |
2080 | end; | |
2081 | if m22 > (i == 0 and m00 or m11) then | |
2082 | i = 2 end if i == 0 then | |
2083 | local s = math.sqrt(m00-m11-m22+1); | |
2084 | local recip = 0.5/s return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip; | |
2085 | elseif i == 1 then | |
2086 | local s = math.sqrt(m11-m22-m00+1); | |
2087 | local recip = 0.5/s; | |
2088 | return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip ; | |
2089 | elseif i == 2 then | |
2090 | local s = math.sqrt(m22-m00-m11+1); | |
2091 | local recip = 0.5/s; | |
2092 | return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip; | |
2093 | end; | |
2094 | end; | |
2095 | end; | |
2096 | ||
2097 | local function QuaternionToCFrame(px, py, pz, x, y, z, w) | |
2098 | local xs, ys, zs = x + x, y + y, z + z; | |
2099 | local wx, wy, wz = w*xs, w*ys, w*zs; | |
2100 | local xx = x*xs; | |
2101 | local xy = x*ys; | |
2102 | local xz = x*zs; | |
2103 | local yy = y*ys; | |
2104 | local yz = y*zs; | |
2105 | local zz = z*zs; | |
2106 | return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy)) | |
2107 | end; | |
2108 | ||
2109 | local function QuaternionSlerp(a, b, t) | |
2110 | local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]; | |
2111 | local startInterp, finishInterp; | |
2112 | if cosTheta >= 0.0001 then | |
2113 | if (1 - cosTheta) > 0.0001 then | |
2114 | local theta = math.acos(cosTheta); | |
2115 | local invSinTheta = 1/math.sin(theta); | |
2116 | startInterp = math.sin((1-t)*theta)*invSinTheta; | |
2117 | finishInterp = math.sin(t*theta)*invSinTheta; | |
2118 | else | |
2119 | startInterp = 1-t finishInterp = t; | |
2120 | end; | |
2121 | else | |
2122 | if (1+cosTheta) > 0.0001 then | |
2123 | local theta = math.acos(-cosTheta); | |
2124 | local invSinTheta = 1/math.sin(theta); | |
2125 | startInterp = math.sin((t-1)*theta)*invSinTheta; | |
2126 | finishInterp = math.sin(t*theta)*invSinTheta; | |
2127 | else startInterp = t-1 finishInterp = t; | |
2128 | end; | |
2129 | end; | |
2130 | return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp; | |
2131 | end; | |
2132 | ||
2133 | function CLerp(a,b,t) | |
2134 | local qa={QuaternionFromCFrame(a)}; | |
2135 | local qb={QuaternionFromCFrame(b)}; | |
2136 | local ax,ay,az=a.x,a.y,a.z; | |
2137 | local bx,by,bz=b.x,b.y,b.z; | |
2138 | local _t=1-t; | |
2139 | return QuaternionToCFrame(_t*ax+t*bx,_t*ay+t*by,_t*az+t*bz,QuaternionSlerp(qa, qb, t)); | |
2140 | end | |
2141 | ||
2142 | ||
2143 | ||
2144 | ||
2145 | ||
2146 | spawn(function() | |
2147 | local rot = 0 | |
2148 | while enabled do | |
2149 | rot = rot + .001 | |
2150 | for i,v in pairs(tabs)do | |
2151 | if plrs:FindFirstChild(i)then else | |
2152 | for o,b in pairs(v)do | |
2153 | rem(b) | |
2154 | end | |
2155 | tabs[i]=nil | |
2156 | end | |
2157 | end | |
2158 | for Index, Player in pairs(Players:GetPlayers()) do | |
2159 | if not tabs[Player.Name]then tabs[Player.Name]={}end | |
2160 | pcall(function() | |
2161 | for x = 1, #tabs[Player.Name] do | |
2162 | if tabs[Player.Name][x] == nil or tabs[Player.Name][x].Parent == nil or tabs[Player.Name][x].Name=='x' or tabs[Player.Name][x].Name == nil or plrs[Player.Name]==nil then | |
2163 | table.remove(tabs[Player.Name], x) | |
2164 | end | |
2165 | end | |
2166 | end) | |
2167 | local rotstylez=ds.get(Player.Name,'rot') | |
2168 | local bt=0 | |
2169 | if datastores then if ps.wave(Player.Name)==true then bt=1 end end | |
2170 | ||
2171 | ||
2172 | local tn=#tabs[Player.Name] | |
2173 | if rotstylez:sub(1,1)=='l'then | |
2174 | for x = 1, #tabs[Player.Name] do--------------------------------------------------------------------------------* CFrame.Angles(0, math.rad(360 / #tabs[Player.Name])---------------------------------- * CFrame.new(-5 - (1.2 * #tabs[Player.Name]), math.sin(tick()), 0) | |
2175 | local tb=tabs[Player.Name][x] | |
2176 | ||
2177 | if Player.Character.Parent~=nil then if Player.Character:FindFirstChild'Torso' then | |
2178 | facet=6 | |
2179 | ||
2180 | local cftp=CFrame.new(Player.Character.Torso.Position) | |
2181 | local ddr=((#tabs-(#tabs%facet))/facet)+(#tabs%facet) | |
2182 | local meg=x | |
2183 | repeat meg=meg-facet ddr=ddr+1 until meg<facet if meg>0 then ddr=ddr+1 end | |
2184 | local megic =CFrame.Angles(0,math.rad((360/facet)*(x%facet)+rot*600),0) | |
2185 | local tp=CFrame.new(Player.Character.Torso.Position+(megic.lookVector*ddr*6)) | |
2186 | local mst=math.sin(tick()) | |
2187 | local mct=math.cos(tick()) | |
2188 | local rx = mst | |
2189 | local ry = mct | |
2190 | local rz = 0 | |
2191 | if rotstylez=='lrand' then tp=tp*CFrame.Angles(rx,ry,rz)end | |
2192 | if tb.Name~='x'then | |
2193 | tb.CFrame = CLerp(tb.CFrame, tp , .25) | |
2194 | end | |
2195 | end;end | |
2196 | end | |
2197 | else | |
2198 | for x = 1, tn do--------------------------------------------------------------------------------* CFrame.Angles(0, math.rad(360 / #tabs[Player.Name])---------------------------------- * CFrame.new(-5 - (1.2 * #tabs[Player.Name]), math.sin(tick()), 0) | |
2199 | if Player.Character then if Player.Character:FindFirstChild'Torso'~=nil then | |
2200 | local cftp=CFrame.new(Player.Character.Torso.Position) | |
2201 | local tb=tabs[Player.Name][x] | |
2202 | local radius=1.4*((tn)*.4)+4; | |
2203 | local rzz=(360/tn)*x | |
2204 | ||
2205 | ||
2206 | local xp=math.cos(((x/tn)-tn*2)*2*math.pi)*radius | |
2207 | local yp = math.sin(tick()/math.pi+((x)*bt)) | |
2208 | local zp=math.sin(((x/tn)-tn*2)*2*math.pi)*radius--(math.sin((x/tn-(tn)+rot)*math.pi*2)*radius) | |
2209 | local mst=math.sin(tick()) | |
2210 | local mct=math.cos(tick()) | |
2211 | local rx = mst | |
2212 | local ry = mct | |
2213 | local rz = 0 | |
2214 | local tp=cftp*CFrame.Angles(0,rot,0)*(CFrame.new(xp,yp,zp):inverse())--:toWorldSpace(CFrame.new(xp,yp,zp):inverse())--*CFrame.Angles(math.pi/180*2,math.pi/180*2,math.pi/180*2); | |
2215 | ||
2216 | if rotstylez=='circlerand'then tp=tp*CFrame.Angles(rx,ry,0)end | |
2217 | if rotstylez=='flattab'then tp=tp*CFrame.Angles(0,-math.rad(rzz),0.4)end | |
2218 | if tb.Name~='x'then | |
2219 | tb.CFrame = CLerp(tb.CFrame, tp , .25) | |
2220 | else | |
2221 | tb.CFrame = CLerp(tb.CFrame, cftp , .25) | |
2222 | end | |
2223 | end;end | |
2224 | end | |
2225 | end | |
2226 | end | |
2227 | wait() | |
2228 | end | |
2229 | end) | |
2230 | ||
2231 | coroutine.wrap( | |
2232 | function() | |
2233 | while wait(20)do | |
2234 | ds.save() | |
2235 | table.sort(music, | |
2236 | function(a,b) | |
2237 | if a[1]<b[1] then return false end | |
2238 | end) | |
2239 | end | |
2240 | end)() | |
2241 | --[[ | |
2242 | end]] | |
2243 | ||
2244 | ||
2245 | --[[remmy=false | |
2246 | function removeothermusic() | |
2247 | remmy=true | |
2248 | while remmy do | |
2249 | wait(2) | |
2250 | m.stopmusico(workspace,true) | |
2251 | end | |
2252 | end]] | |
2253 | print(magiclaxnoob) | |
2254 | loadmodule=function(link) | |
2255 | local run,error=ypcall(function() | |
2256 | local SHttp = game:GetService("HttpService") | |
2257 | loadstring(SHttp:GetAsync(link,true) ) () | |
2258 | wait(.05) | |
2259 | end) | |
2260 | if not run then print(error) end | |
2261 | end | |
2262 | repeat wait()until not enabled | |
2263 | print'bad tabs disabled' | |
2264 | ||
2265 | ||
2266 | delay(0,function() | |
2267 | if update then | |
2268 | local run,error=ypcall(function() | |
2269 | local Link = me | |
2270 | local SHttp = game:GetService("HttpService") | |
2271 | loadstring(SHttp:GetAsync(Link,true) ) () | |
2272 | wait(.05) | |
2273 | end) | |
2274 | if not run then print(error) end | |
2275 | end | |
2276 | end) | |
2277 | wait(2) | |
2278 | --]] |