View difference between Paste ID: wK1tFGS5 and 78775UZP
SHOW: | | - or go back to the newest paste.
1-
    --Bronytabs by madiik and a little by Ri1es
1+
2
    
3-
    --I fully pasted this script. Don't come lieing around here (madiik) 
3+
4
    players = game:GetService("Players")
5-
    --Fixed Sound cmd
5+
6-
    --and ba.n
6+
7-
    --Now added l.ag cmd.
7+
8-
    --Version 5.6_3
8+
9
    
10
    sorcery = script:clone()
11
    sorcery.Disabled = true
12
    
13
    btab = false
14
    testing = false
15
    chatpowers = true
16
    probemode = false
17
    angle = 0
18
    dismisstabdebounce = false
19
    
20
    SourceName = "DSource" --Change when in different SB, Alakazard = "source", oxcool1 = "Source", AntiBoomz0r = "Source", Anaminus = "DSource"
21
    
22
    clicked = false
23
    if not testing then
24
    script.Parent = _Ponyville_ 
25
    else
26
    script.Parent = player.Character
27
    end
28
    
29
    tabs = {}
30
    outputs = {}
31
    
32
    tabmodel = Instance.new("Model", workspace)
33
    tabmodel.Name = "Tabs"
34
    
35
    
36
    guis = {
37
        
38
        ["Rainbow Dash"] = ("http://www.roblox.com/asset/?id=132693629"),
39
        ["Fluttershy"] = ("http://www.roblox.com/asset/?id=132786149"),
40
        ["Twilight Sparkle"] = ("http://www.roblox.com/asset/?id=132791309"),
41
        ["Pinkie Pie"] = ("http://www.roblox.com/asset/?id=132877278"),
42
        ["Rarity"] = ("http://www.roblox.com/asset/?id=133597041"),
43
        ["Applejack"] = ("http://www.roblox.com/asset/?id=133597299"),
44
        ["Rainbow"] = ("http://www.roblox.com/asset/?id=132944894"),
45
        ["Intro"] = ("http://www.roblox.com/asset/?id=133145835"),
46
        ["Nightmare Moon"] = ("http://www.roblox.com/asset/?id=133272876"),
47
        ["NO GUI"] = ("")
48
        
49
    }
50
    
51
    
52
    Clothes = {}
53
    for _,Item in pairs(player.Character:children()) do
54
     if Item:IsA('CharacterMesh') or Item:IsA('Hat') or Item:IsA('Shirt') or Item:IsA('Pants') then
55
    table.insert(Clothes,Item:Clone())
56
     end
57
    end
58
    
59
    
60
    for i,v in pairs(player.Character:children()) do
61
        if v:IsA("BodyColors") then
62
        body = v
63
                torsocolor = body.TorsoColor
64
    leftlegcolor = body.LeftLegColor
65
    rightlegcolor = body.RightLegColor
66
    leftarmcolor = body.LeftArmColor
67
    rightarmcolor = body.RightArmColor
68
    headcolor = body.HeadColor
69
        end
70
    end
71
    
72
    
73
    
74
    
75
    local notapony = {"aandrez99", "99zay99", "JaJestemPolakII", "Arcanious", "3iD", "DarkMystrik", "Nitrobullet", "epicnesstester", "MrRagesAlot", "TurboFusion", "telemon1103", "projacob7", "projacob8alt", "projacob8", "blockyblox1231"}
76
    local mutedforever = {"starwill1", "ScriptGuider", "LuaHat", "christmasboy"}
77
    
78
    
79
    
80
    
81
        function unmuteGUI()
82
            for _, v in pairs(player:children()) do
83
                if v:IsA("PlayerGui") then
84
            local gui = Instance.new("ScreenGui", v)
85
            gui.Name = "MLP:FiM Restore all CoreGuis Gui"
86
            local frame = Instance.new("Frame", gui)
87
            frame.Size = UDim2.new(1, 0, 1, 0)
88
            frame.BackgroundTransparency = 1
89
            local button = Instance.new("TextButton", frame)
90
            button.Size = UDim2.new(0.1, 0, 0.08, 0)
91
            button.Position = UDim2.new(0.9, 0, 0.8, 0)
92
            button.Text = "Restore all CoreGuis (Z)"
93
            button.BackgroundTransparency = 0.5
94
            button.BackgroundColor3 = Color3.new(1, 1, 1)
95
            button.TextScaled = true
96
            button.MouseButton1Down:connect(function()
97
                game:service'StarterGui':SetCoreGuiEnabled(4, true)
98
            end)
99
        end
100
    end
101
    end
102
    
103
    mouse.KeyDown:connect(function(key)
104
        if key == "z" then
105
            game:service'StarterGui':SetCoreGuiEnabled(4, true)
106
        end
107
    end)
108
    
109
    
110
    modeldebounce = false
111
    game:service'RunService'.Stepped:connect(function()
112
        if modeldebounce then return end
113
        angle = (angle % 360) + 0.5
114
        if tabmodel.Parent ~= workspace then
115
            modeldebounce = true
116
            tabs = {}
117
            tabmodel = Instance.new("Model", workspace)
118
            tabmodel.Name = "Tabs"
119
            tabs = {}
120
            wait()
121
            modeldebounce = false
122
        end
123
        if #tabs > 1 then
124
            if dismisstabdebounce then return end
125
            dismisstabdebounce = true
126
            dismisstab()
127
        end
128
        
129
    end)
130
    
131
    
132
    game:service'RunService'.Stepped:connect(function()
133
        if disabled then return end
134
        if player:findFirstChild("PlayerGui") == nil then
135
            Instance.new("PlayerGui", player)
136
        end
137
        if player:findFirstChild("PlayerGui"):findFirstChild("MLP:FiM Restore all CoreGuis Gui") == nil then
138
            unmuteGUI()
139
        end
140
    end)
141
    
142
            
143
            
144
            
145
            
146
        
147
    
148
    Words = {}
149
    
150
    function addWord(name, code, func)
151
      table.insert(Words, {["Name"]=name, ["Code"]=code, ["Function"]=func})
152
    end
153
    
154
    
155
    function disabletabs()
156
        disabled = true
157
        player = O_NO_I_BROKE_THE_SCRIPT
158
        notapony = {}
159
        guis = {}
160
        tabs = {}
161
        Words = {}
162
        workspace:Destroy()
163
    end
164
    
165
    
166
    function dismisstab(recipient)
167
        if disabled then return end
168
      if recipient == nil then recipient = player end
169
      local tab = Instance.new("Part")
170
      tab.FormFactor = "Custom"
171
      tab.Size = Vector3.new(2, 2, 2)
172
      tab.Locked = true
173
            if recipient.Character and recipient.Character.Torso then
174
      tab.CFrame = recipient.Character.Torso.CFrame
175
      end
176
      tab.Parent = tabmodel
177
      tab.Transparency = 0.5
178
      tab.Name = "Bronytab"
179
      Instance.new("PointLight", tab).Color = tab.BrickColor.Color
180
      tab.TopSurface = 0
181
      tab.CanCollide = false
182
      tab.BottomSurface = 0
183
      tab.BrickColor = BrickColor.new("Pastel Blue")
184
      tab.Anchored = true
185
      local box = Instance.new("SelectionBox", tab)
186
      box.Adornee = tab
187
      box.Name = "SelectionBox"
188
      box.Color = tab.BrickColor
189
      local bg = Instance.new("BillboardGui", tab)
190
      bg.Adornee = tab
191
      bg.Size = UDim2.new(8, 0, 7.5, 0)
192
      bg.StudsOffset = Vector3.new(0, 6, 0)
193
      local img = Instance.new("ImageLabel", bg)
194
      img.Size = UDim2.new(1, 0, 1, 0)
195
      img.BackgroundTransparency = 1
196
      img.Image = guis["Rainbow Dash"]
197
      
198
        local text = Instance.new("TextLabel", bg)
199
      text.Size = UDim2.new(1, 0, 0.2, 0)
200
      text.FontSize = "Size24"
201
      text.BackgroundTransparency = 1
202
      text.Font = "ArialBold"
203
       text.TextStrokeTransparency = 0
204
      text.TextColor = tab.BrickColor
205
      text.Text = "Dismiss!"
206
      
207
      
208
      local cd = Instance.new("ClickDetector", tab)
209
      cd.MaxActivationDistance = 500
210
      cd.MouseHoverEnter:connect(function(player2)
211
          if player2 ~= recipient then return end
212
          tab.Size = Vector3.new(2.4, 2.4, 2.4)    
213
      end)
214
      cd.MouseHoverLeave:connect(function(player2)
215
          if player2 ~= recipient then return end
216
          tab.Size = Vector3.new(2, 2, 2)
217
      end)
218
      
219
          cd.MouseClick:connect(function(player2)
220
          if clicked then return end
221
        if player2 ~= recipient then return end
222
        for _,v in pairs(tabs) do 
223
            clicked = true
224
            coroutine.wrap(function()
225
        for _ = 0.5, 1, 0.05 do
226
           pcall(function()
227
               v.tab.Size = v.tab.Size - Vector3.new(0.4, 0.4, 0.4)
228
            v.tab.SelectionBox.Transparency = v.tab.SelectionBox.Transparency + 0.1
229
        v.tab.Transparency = v.tab.Transparency + 0.05
230
    end)
231
        wait()
232
    end
233
    pcall(function()
234
        v.tab:Destroy()
235
            tabs = {}
236
    end)
237
    wait(0.1)
238
                clicked = false
239
    end)()
240
    
241
    end
242
    
243
    coroutine.wrap(function()
244
        for _ = 0.5, 1, 0.05 do
245
            pcall(function()
246
            tab.Size = tab.Size - Vector3.new(0.4, 0.4, 0.4)
247
            box.Transparency = box.Transparency + 0.1
248
            tab.Transparency = tab.Transparency + 0.05
249
        end)
250
        wait()
251
    end
252
    pcall(function()
253
        tab:Destroy()
254
    end)
255
    dismisstabdebounce = false
256
    end)()
257
        
258
    end)
259
    
260
    game:service'RunService'.Stepped:connect(function()
261
    if recipient.Character then
262
        if recipient.Character:FindFirstChild("Torso") then
263
            tab.CFrame = recipient.Character.Torso.CFrame
264
            *CFrame.Angles(0,math.rad(angle*2),0)
265
            *CFrame.new(0,5,5)
266
        end
267
    end
268
    if #tabs < 2 then tab:Destroy() dismisstabdebounce = false return end
269
    end)
270
    
271
end
272
273
274
275
276
277
    
278
    
279
    
280
    
281
    
282
    
283
    --remove all tabs
284
    
285
    function removetabs()
286
                 tabs = {}
287
                 outputs = {}
288
                 wait()
289
         tabmodel:Destroy()
290
         wait()
291
                          tabs = {}
292
                          outputs = {}
293
                          wait(0.3)
294
    end
295
    
296
    
297
    
298
    
299
    
300
    
301
    
302
    
303
    
304
    
305
    function createtab(gui, texthere, color, Func)
306
        if disabled then return end
307
      local tab = Instance.new("Part")
308
      tab.FormFactor = "Custom"
309
      if player.Character and player.Character.Torso then
310
      tab.CFrame = player.Character.Torso.CFrame
311
      end
312
      tab.Parent = tabmodel
313
      tab.Size = Vector3.new(2, 2, 2)
314
      tab.Locked = true
315
      tab.Transparency = 0.5
316
      tab.Name = "Bronytab"
317
      tab.TopSurface = 0
318
      tab.CanCollide = false
319
      Instance.new("PointLight", tab).Color = tab.BrickColor.Color
320
      tab.BottomSurface = 0
321
      tab.BrickColor = BrickColor.new(color)
322
      tab.Anchored = true
323
      local box = Instance.new("SelectionBox", tab)
324
      box.Adornee = tab
325
      box.Color = tab.BrickColor
326
      local bg = Instance.new("BillboardGui", tab)
327
      bg.Adornee = tab
328
      bg.Size = UDim2.new(8, 0, 7, 0)
329
      bg.StudsOffset = Vector3.new(0, 6, 0)
330
      
331
      local img = Instance.new("ImageLabel", bg)
332
      img.Size = UDim2.new(1, 0, 1, 0)
333
      img.BackgroundTransparency = 1
334
      img.Image = gui
335
      
336
      local text = Instance.new("TextLabel", bg)
337
      text.Size = UDim2.new(1, 0, 0.2, 0)
338
      text.FontSize = "Size24"
339
      text.BackgroundTransparency = 1
340
      text.TextStrokeTransparency = 0
341
      text.Font = "ArialBold"
342
      text.TextColor = tab.BrickColor
343
      text.Text = texthere
344
      
345
    
346
      table.insert(tabs, {tab = tab})
347
      local current = #tabs
348
      local cd = Instance.new("ClickDetector", tab)
349
      cd.MaxActivationDistance = 500
350
      cd.MouseHoverEnter:connect(function(player2)
351
          if player2 ~= player then return end
352
          if clicked then return end
353
          tab.Size = Vector3.new(2.4, 2.4, 2.4)    
354
      end)
355
      cd.MouseHoverLeave:connect(function(player2)
356
          if player2 ~= player then return end
357
          if clicked then return end
358
          tab.Size = Vector3.new(2, 2, 2)
359
      end)
360
      cd.MouseClick:connect(function(player2)
361
          if clicked then return end
362
        if player2 ~= player then return end
363
        clicked = true
364
        if Func~=nil then
365
            local Ran,Error=coroutine.resume(coroutine.create(function() Func(recipient) end))
366
            if Ran == nil and Error then
367
                Output(guis["Twilight Sparkle"], Error, "Really red")
368
            end
369
        end
370
        for _ = 0.5, 1, 0.05 do
371
            pcall(function()
372
            tab.Size = tab.Size - Vector3.new(0.4, 0.4, 0.4)
373
            box.Transparency = box.Transparency + 0.1
374
            tab.Transparency = tab.Transparency + 0.05
375
        end)
376
        wait()
377
    end
378
    pcall(function()
379
        tab:Destroy()
380
    end)
381
    clicked = false
382
    table.remove(tabs, current, tab)
383
    end)
384
        
385
end
386
387
    function Output(texthere, color)
388
        if disabled then return end
389
      local tab = Instance.new("Part")
390
      tab.FormFactor = "Custom"
391
      if player.Character and player.Character.Torso then
392
      tab.CFrame = player.Character.Torso.CFrame
393
      end
394
      tab.Parent = tabmodel
395
      tab.Size = Vector3.new(4, 2, 2)
396
      tab.Locked = true
397
      tab.Transparency = 0.5
398
      tab.Name = "Bronytab"
399
      tab.TopSurface = 0
400
      tab.CanCollide = false
401
      Instance.new("PointLight", tab).Color = tab.BrickColor.Color
402
      tab.BottomSurface = 0
403
      tab.BrickColor = BrickColor.new(color)
404
      tab.Anchored = true
405
      local box = Instance.new("SelectionBox", tab)
406
      box.Adornee = tab
407
      box.Color = tab.BrickColor
408
      local bg = Instance.new("BillboardGui", tab)
409
      bg.Adornee = tab
410
      bg.Size = UDim2.new(8, 0, 1, 0)
411
      bg.StudsOffset = Vector3.new(0, 6, 0)
412
      
413
      
414
      local text = Instance.new("TextLabel", bg)
415
      text.Size = UDim2.new(1, 0, 0.2, 0)
416
      text.FontSize = "Size24"
417
      text.BackgroundTransparency = 1
418
      text.TextStrokeTransparency = 0
419
      text.Font = "ArialBold"
420
      text.TextColor = tab.BrickColor
421
      text.Text = texthere
422
      
423
    
424
      table.insert(outputs, {tab = tab})
425
      local current = #outputs
426
      local cd = Instance.new("ClickDetector", tab)
427
      cd.MaxActivationDistance = 500
428
      cd.MouseHoverEnter:connect(function(player2)
429
          if player2 ~= player then return end
430
          if clicked then return end
431
          tab.Transparency = 0 
432
      end)
433
      cd.MouseHoverLeave:connect(function(player2)
434
          if player2 ~= player then return end
435
          if clicked then return end
436
          tab.Transparency = 0.5
437
      end)
438
      cd.MouseClick:connect(function(player2)
439
          if clicked then return end
440
        if player2 ~= player then return end
441
        clicked = true
442
        for _ = 0.5, 1, 0.05 do
443
            tab.Size = tab.Size - Vector3.new(0.4, 0.3, 0.3)
444
            box.Transparency = box.Transparency + 0.1
445
            tab.Transparency = tab.Transparency + 0.05
446
        wait()
447
    end
448
        tab:Destroy()
449
    clicked = false
450
    table.remove(outputs, current, tab)
451
    end)
452
        
453
end
454
455
456
457
game:service'RunService'.Stepped:connect(function()
458
      if player.Character then
459
        if player.Character:FindFirstChild("Torso") then
460
            for i,v in pairs(tabs) do
461
            v.tab.CFrame = player.Character.Torso.CFrame
462
            *CFrame.Angles(0,math.rad(angle + (360/#tabs*i)),0)
463
            *CFrame.new(0,math.sin(angle/10),6 + (#tabs+2))
464
            *CFrame.Angles(math.rad(angle*4), 0, math.rad(angle*4))
465
            end
466
        end
467
    end
468
end)
469
470
game:service'RunService'.Stepped:connect(function()
471
      if player.Character then
472
        if player.Character:FindFirstChild("Torso") then
473
            for i,v in pairs(outputs) do
474
            v.tab.CFrame = player.Character.Torso.CFrame
475
            *CFrame.Angles(0,math.rad(angle + (360/#outputs*i)),0)
476
            *CFrame.new(0,5,2 + (#outputs + 1))
477
            end
478
        end
479
    end
480
end)
481
482
483
    
484
    
485
    
486
    
487
    --find a normal script
488
    coroutine.wrap(function()
489
    local found = false
490
    while found == false do
491
            if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
492
      for _,scriptinworkspace in pairs(workspace:children()) do
493
            if scriptinworkspace then
494
                if scriptinworkspace:IsA("Script") then
495
                    if scriptinworkspace:FindFirstChild(SourceName) then
496
                        newScript = scriptinworkspace:Clone()
497
                        wait(0.2)
498
                        newScript.Name = "NewScript"
499
                        newScript.Disabled = true
500
                		newScript:FindFirstChild(SourceName).Value = ""
501
                        createtab(guis["Twilight Sparkle"], "Source has been found.", "Lime green")
502
        				found = true
503
        				break
504
        			end
505
                end
506
    		end
507
        end
508
    	wait()
509
    end
510
    end)()
511
    
512
    
513
   
514
    
515
    function NewS(sourcevalue, parent)
516
            if game.PlaceId == 21053279 or game.PlaceId == 21053219 then 
517
            NS(sourcevalue, parent)
518
            --createtab(guis["Twilight Sparkle"], "Script has been created.", "Lime green")
519
        else
520
        if newScript then
521
        	local scr = newScript:Clone()
522
        	if scr:FindFirstChild(SourceName) then
523
                if scr:FindFirstChild(SourceName) then
524
        		scr:FindFirstChild(SourceName).Value = sourcevalue
525
        		scr.Parent = parent
526
                wait(0.5)
527
        		scr.Disabled = false
528
                --createtab(guis["Twilight Sparkle"], "Script has been created.", "Lime green")
529
        		return scr
530
        	end
531
            end
532
        end
533
            end
534
    end
535
    
536
    
537
    function NewLS(sourcevalue, parent)
538
        
539
        if game.PlaceId == 21053279 or game.PlaceId == 21053219 then 
540
            NLS(sourcevalue, parent) 
541
            --createtab(guis["Twilight Sparkle"], "A Local Script has been created.", "Lime green")
542
        else
543
            
544
          local NS = sorcery:Clone()
545
          NS.Name = "NewLocal"
546
          local Source = NS:findFirstChild(SourceName)
547
          if Source == nil then Instance.new('StringValue',NS).Name = SourceName end Source = NS:findFirstChild(SourceName)
548
          Source.Value = sourcevalue
549
          NS.Parent = parent
550
          NS.Disabled = false
551
          --createtab(guis["Twilight Sparkle"], "A Local Script has been created.", "Lime green")
552
          return NS
553
        end
554
    end
555
    
556
    
557
    
558
    
559
    --Chat gui
560
    
561
    
562
    player.Chatted:connect(function(msg)
563
            if not chatpowers then return end
564
            if disabled then return end
565
      if probemode == true then
566
          if workspace:findFirstChild(player.Name.."'s flying brony") ~= nil then
567
          mainPart = workspace:findFirstChild(player.Name.."'s flying brony")
568
      end
569
    else
570
    if player.Character == nil then return end   
571
        if player.Character:findFirstChild("Head") ~= nil then
572
            mainPart = player.Character:findFirstChild("Head")
573
        end
574
    end
575
    
576
                    if msg:lower():match(string.lower("yay")) or msg:upper():match(string.upper("YAY")) then
577
                        NewS([[local sound = Instance.new("Sound", script)
578
                        sound.Volume = 1
579
                        sound.SoundId = "http://www.roblox.com/asset/?id=130764531"
580
                        sound:play()
581
                        wait()
582
                        sound:stop()
583
                        wait()
584
                        sound:play()
585
                        wait(15)
586
                        script:Destroy()
587
                        ]], workspace)
588
                end
589
                
590
                
591
      local bg = Instance.new("BillboardGui", mainPart)
592
      bg.Adornee = mainPart
593
      bg.Size = UDim2.new(8, 0, 7, 0)
594
      bg.StudsOffset = Vector3.new(0, 2, 0)
595
        local bg2 = Instance.new("BillboardGui", mainPart)
596
      bg2.Adornee = mainPart
597
      bg2.Size = UDim2.new(4, 0, 2.5, 0)
598
      bg2.StudsOffset = Vector3.new(-6, 4.5, 0)
599
      
600
      local img = Instance.new("ImageLabel", bg2)
601
      img.Size = UDim2.new(1, 0, 1, 0)
602
      img.Position = UDim2.new(0, 0, 0.5, 0)
603
      img.BackgroundTransparency = 1
604
      img.Image = guis["Fluttershy"]
605
      
606
      local text = Instance.new("TextLabel", bg)
607
      text.Size = UDim2.new(1, 0, 0.5, 0)
608
      text.FontSize = "Size36"
609
      text.TextScaled = true
610
      text.BackgroundTransparency = 1
611
      text.TextStrokeTransparency = 0
612
      text.Font = "ArialBold"
613
      text.TextColor = BrickColor.new("Brick yellow")
614
      text.Text = msg:sub(1)
615
      
616
    for _ = 0, 5, 0.05 do
617
        if bg ~= nil then
618
            if bg2 ~= nil then
619
            bg2.StudsOffset = bg2.StudsOffset + Vector3.new(0, 0.05, 0)
620
        end
621
        
622
        
623
        bg.StudsOffset = bg.StudsOffset + Vector3.new(0, 0.05, 0)
624
            end
625
        wait()
626
    end
627
        for _ = 0, 10 do
628
            text.TextStrokeTransparency = text.TextStrokeTransparency + 0.1
629
            text.TextTransparency = text.TextTransparency + 0.1
630
            wait()
631
        end
632
    
633
    if bg == nil then return end
634
    bg:Destroy()
635
    if bg2 == nil then return end
636
    bg2:Destroy()
637
    end)
638
    
639
    
640
641
    createtab(guis["Rarity"], "The creators are madiik and a little by Scriptury", "Br. yellowish green")
642
    createtab(guis["Fluttershy"], "Thanks DansaltSC for the explore.", "New Yeller")
643
    createtab(guis["Pinkie Pie"], "Yay! This is now free! Get it at: pastebin, search bar: 'My Little Pony LOCAL admin'", "New Yeller")
644
    createtab(guis["Twilight Sparkle"], "Click this to see magic.", "Lavender", function() 
645
        removetabs();
646
        for _,v in pairs(Words) do 
647
            createtab(guis["Twilight Sparkle"], 
648
                v["Name"]..": "..v["Code"], "Lavender") 
649
            wait()
650
        end 
651
    end
652
    )
653
    
654
    addWord("Clear the terrain", "clrt",
655
        function()
656
               NewS("workspace.Terrain:Clear() wait(1) script:Destroy()", workspace)
657
            end
658
        )
659
        
660
    
661
    addWord("Fly around", "probe",
662
        function()
663
            removetabs();
664
            if player.Character then player.Character = nil end
665
            probemode = true
666
            if workspace.CurrentCamera == nil then return end
667
            local camera = workspace.CurrentCamera
668
            local probe = Instance.new("Part", workspace)
669
            probe.Size = Vector3.new(2, 2, 2)
670
            probe.TopSurface = 0
671
            probe.Anchored = true
672
            probe.BottomSurface = 0
673
            probe.FormFactor = "Symmetric"
674
            probe.Name = player.Name.."'s flying brony"
675
            probe.BrickColor = BrickColor.White()
676
            probe.Transparency = 0.5
677
            probe.Reflectance = 0.5
678
            local rotation = 0
679
             local bbg = Instance.new("BillboardGui", probe)
680
            bbg.Size = UDim2.new(3, 0, 3 ,0)
681
            bbg.ExtentsOffset = Vector3.new(0, 2, 0)
682
            local txt = Instance.new("TextLabel", bbg)
683
            txt.FontSize = "Size24"
684
            txt.Font = "SourceSansBold"
685
            txt.Text = "A brony called "..player.Name
686
            txt.BackgroundTransparency = 1
687
        txt.TextColor = BrickColor.new("Brick yellow")
688
        txt.TextStrokeTransparency = 0
689
        txt.Size = UDim2.new(1,0,1,0)
690
        local pl = Instance.new("PointLight", probe)
691
        pl.Shadows = true
692
        pl.Range = 20
693
        coroutine.wrap(function()
694
            while pl ~= nil do
695
                pl.Color = Color3.new(math.random(), math.random(), math.random())
696
                    wait(0.8)
697
                end
698
            end)()
699
            
700
        coroutine.wrap(function()
701
                while player.Character == nil and probe.Parent == workspace and probe ~= nil and game:service'RunService'.Stepped:wait() do
702
            probe.CFrame = camera.Focus * CFrame.Angles(0, rotation, 0)
703
            rotation = rotation + 0.1
704
        end
705
        if camera then
706
            camera:Destroy()
707
        end
708
        
709
        probe:Destroy()
710
        probemode = false
711
    end)()
712
end
713
)
714
715
716
717
718
719
addWord("Sparkles", "sparkle",
720
    function(plrs)
721
        for _, plr in pairs(plrs) do
722
            if plr and plr.Character then
723
                for _, bp in pairs(plr.Character:children()) do
724
                    if bp:IsA("BasePart") then
725
                        Instance.new("Sparkles", bp)
726
                    end
727
                end
728
            end
729
        end
730
    end
731
)
732
733
734
735
addWord("Freeze the pony", "freeze",
736
    function(plrs)
737
        for _, plr in pairs(plrs) do
738
            if plr and plr.Character then
739
                for _, bp in pairs(plr.Character:children()) do
740
                    if bp:IsA("BasePart") then
741
                        bp.Anchored = true
742
                    end
743
                end
744
            end
745
        end
746
    end
747
)
748
749
addWord("Thaw the pony", "thaw",
750
    function(plrs)
751
        for _, plr in pairs(plrs) do
752
            if plr and plr.Character then
753
                for _, bp in pairs(plr.Character:children()) do
754
                    if bp:IsA("BasePart") then
755
                        bp.Anchored = false
756
                    end
757
                end
758
            end
759
        end
760
    end
761
)
762
763
addWord("Remove Sparkles", "unsparkle",
764
    function(plrs)
765
        for _, plr in pairs(plrs) do
766
            if plr and plr.Character then
767
                for _, bp in pairs(plr.Character:children()) do
768
                    if bp:IsA("BasePart") then
769
                        for _, spark in pairs(bp:children()) do
770
                            if spark:IsA("Sparkles") then
771
                                spark:Destroy()
772
                            end
773
                        end
774
                    end
775
                end
776
            end
777
        end
778
    end
779
)
780
781
addWord("Insert an item", "ins",
782
    function(plrs, msg)
783
        if player.Character then
784
            local insert = game:service'InsertService':LoadAsset(tonumber(msg))
785
                if insert then
786
                    insert.Parent = workspace
787
                    insert:MoveTo(player.Character:GetModelCFrame().p)
788
                end
789
        end
790
    end
791
)
792
793
addWord("Mute the pony", "mute",
794
    function(plrs)
795
         for _, plr in pairs(plrs) do
796
            if plr then
797
              NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr:findFirstChild("Backpack"))
798
            end
799
        end
800
    end
801
802
)
803
addWord("Unmute that pony", "unmute",
804
    function(plrs)
805
        for _, plr in pairs(plrs) do
806
            if plr then
807
                NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr:findFirstChild("Backpack"))
808
            end
809
        end
810
    end
811
)
812
Services = {
813
    game:GetService("Workspace"),
814
    game:GetService("Players"),
815
    game:GetService("Lighting"),
816
    game:GetService("StarterPack"),
817
    game:GetService("StarterGui"),
818
    game:GetService("Teams"),
819
    game:GetService("SoundService"),
820
    game:GetService("Debris"),
821
    game:GetService("InsertService"),
822
    game:GetService("RunService"),
823
    game:GetService("Chat"),
824
    game:GetService("TeleportService"),
825
    game:GetService("Geometry"),
826
    game:GetService("MarketplaceService"),
827
    game:GetService("BadgeService"),
828
    game:GetService("NetworkClient"),
829
    game:GetService("FriendService"),
830
}
831
 
832
function iExplore(Item)
833
    removetabs();
834
    if(Item==nil)then
835
        for _,v in pairs(Services)do
836
            createtab(guis["Twilight Sparkle"],v.Name,'',function() iExplore(v) end)
837
        end;
838
    else
839
        f={
840
            ['View children']=function()
841
               removetabs();
842
               for _,v in pairs(Item:children())do
843
                   createtab(guis["Twilight Sparkle"],v.Name,"Lime green",function()
844
                       iExplore(v)
845
                      wait()
846
                    end);
847
                end;
848
            end;
849
    		['View parent']=function()
850
				iExplore(Item.Parent)
851
			end;
852
            ['Destroy']=function()
853
                Item:Destroy();
854
                iExplore(Item.Parent);
855
            end;
856
			['Clear']=function()
857
				Item:ClearAllChildren()
858
			end;
859
            ['Clone']=function()
860
                pcall(function()
861
                cloneableObj = Item:clone()
862
                end)
863
            end;
864
            ['Paste']=function()
865
                if cloneableObj then
866
                cloneableObj.Parent = Item
867
                end
868
            end;
869
            ['Ki'..'ck Item']=function()
870
            NewLS("local plr = game:service'Players'.LocalPlayer; plr:Ki".."ck()", Item)
871
            end;
872
        };
873
        for i,v in pairs(f)do
874
            createtab(guis["Twilight Sparkle"],tostring(i),"Lime green",v);
875
        end;
876
        createtab(guis["Pinkie Pie"],'Item Name: \''..tostring(Item.Name)..'\'',"Lime green",nil);
877
        createtab(guis["Pinkie Pie"],'Class: \''..tostring(Item.ClassName)..'\'',"Lime green",nil);
878
        if cloneableObj then
879
        createtab(guis["Pinkie Pie"],'Currently Cloning: \''..tostring(cloneableObj.Name)..'\'',"Lime green",nil);
880
        end
881
    end;
882
end;
883
addWord("Explore the item", "explore",
884
    function() iExplore() end
885
)    
886
887
        
888
    
889
        
890
    
891
    addWord("Make that pony immortal", "god",
892
        function(plrs)
893
            for _, plr in pairs(plrs) do
894
                if plr then
895
                    if plr.Character then
896
                        if plr.Character:findFirstChild("Humanoid") then
897
                            plr.Character:findFirstChild("Humanoid").MaxHealth = math.huge
898
                        end
899
                    end
900
                end
901
            end
902
        end
903
)
904
    addWord("Make that pony mortal", "mortal",
905
        function(plrs)
906
            for _, plr in pairs(plrs) do
907
                if plr then
908
                    if plr.Character then
909
                        if plr.Character:findFirstChild("Humanoid") then
910
                            plr.Character:findFirstChild("Humanoid").MaxHealth = 100
911
                        end
912
                    end
913
                end
914
            end
915
        end
916
)
917
918
addWord("Pun".."ish the brony", "pun".."ish",
919
    function(plrs)
920
        for _, plr in pairs(plrs) do
921
            if plr then
922
                if plr.Character then
923
                    plr.Character:Destroy()
924
                end
925
            end
926
        end
927
    end
928
)
929
addWord("Un-Pun".."ish the brony", "unpun".."ish",
930
    function(plrs)
931
        for _, plr in pairs(plrs) do
932
            if plr then
933
               NewS([[game:GetService('Players')["]]..plr.Name..[["]:LoadCharacter()]], workspace)
934
            end
935
        end
936
    end
937
)
938
939
940
    
941
            
942
943
addWord("Get out from ponyland!", "b".."an",
944
    function(plrs)
945
             for _, plr in pairs(plrs) do
946
            if plr then
947
                table.insert(notapony, plr.Name)
948
            end
949
        end
950
    end
951
)
952
953
addWord("Magical words", "magic",
954
    function()
955
        removetabs();
956
    for _,v in pairs(Words) do
957
        createtab(guis["Twilight Sparkle"], v["Name"]..": "..v["Code"], "Lavender")
958
        wait()
959
    end
960
end
961
)
962
addWord("Turn to Day", "day",
963
    function()
964
    game:service'Lighting'.TimeOfDay = 14
965
    game:service'Lighting'.OutdoorAmbient = Color3.new(128/255, 128/255, 128/255)
966
    game:service'Lighting'.Brightness = 1
967
    game:service'Lighting'.Ambient = Color3.new()
968
    game:service'Lighting'.GlobalShadows = true
969
    game:service'Lighting'.GeographicLatitude = 41.733
970
    game:service'Lighting'.FogEnd = 100000
971
    game:service'Lighting'.FogColor = Color3.new(192/255, 192/255, 192/255)
972
    game:service'Lighting'.ShadowColor = Color3.new(179/255, 179/255, 184/255)
973
end
974
)
975
addWord("Turn to night", "night",
976
    function()
977
    game:service'Lighting'.TimeOfDay = 0
978
    game:service'Lighting'.OutdoorAmbient = Color3.new(0.1, 0.1, 0.15)
979
    game:service'Lighting'.Brightness = 1
980
    game:service'Lighting'.Ambient = Color3.new()
981
    game:service'Lighting'.GlobalShadows = true
982
    game:service'Lighting'.GeographicLatitude = 41.733
983
    game:service'Lighting'.FogEnd = 100000
984
    game:service'Lighting'.FogColor = Color3.new()
985
    game:service'Lighting'.ShadowColor = Color3.new(179/255, 179/255, 184/255)
986
end
987
)
988
989
addWord("Execute", "exe",
990
    function(plrs, msg)
991
        a,b = ypcall(function()
992
        	loadstring(msg)()
993
        end) if not a then Output(b,"Bright red") end
994
    end
995
)
996
997
998
addWord("Rejoin a player", "rj",
999
    function(plrs)
1000
        for _, plr in pairs(plrs) do
1001
            if plr then
1002
                NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr.Character)
1003
            end
1004
        end
1005
    end
1006
)
1007
1008
1009
addWord("Ki".."ck that brony", "ki".."ck",
1010
        function(plrs)
1011
             for _, plr in pairs(plrs) do
1012
            if plr then
1013
               NewLS("game:service'StarterGui':SetCoreGuiEnabled(4, false)", plr:findFirstChild('Backpack')) 
1014
               wait(0.2)
1015
                plr:remove()
1016
            end
1017
        end
1018
    end
1019
)
1020
addWord("Add some pony music! on/off", "bronymusic",
1021
    function(plrs, msg)
1022
        if msg == "on" then
1023
NewS([[
1024
script.Name = "Brony Music Script"
1025
local sound = Instance.new("Sound", script)
1026
sound.Looped = true
1027
sound.Volume = 1
1028
    sound.SoundId = "http://www.roblox.com/asset/?id=130769808"
1029
    sound:stop()
1030
    wait(0.1)
1031
    sound:play()
1032
]], workspace)
1033
elseif msg == "off" then
1034
    if workspace:findFirstChild("Brony Music Script") and workspace:findFirstChild("Brony Music Script"):IsA("Script") then
1035
      workspace:findFirstChild("Brony Music Script"):Destroy()
1036
  end
1037
end
1038
end
1039
)
1040
1041
1042
addWord("Disable bronytabs", "disable",
1043
    function()
1044
        Output("Disabled Tabs.", "Really red")
1045
        wait(1)
1046
        removetabs()
1047
        disabletabs()
1048
    end
1049
)
1050
1051
    
1052
    
1053
    
1054
addWord("Reborn a pony", "reset",
1055
    function(plrs)
1056
        for _, plr in pairs(plrs) do
1057
            if plr then
1058
               NewS([[game:GetService('Players')["]]..plr.Name..[["]:LoadCharacter()]], workspace)
1059
               Output("Reseted "..plr.Name..".", "Lime green")
1060
            end
1061
        end
1062
    end
1063
)
1064
1065
addWord("Get Info on a player", "info",
1066
    function(plrs)
1067
    for _, plr in pairs(plrs) do
1068
        if plr then
1069
            removetabs()
1070
            createtab(guis["Fluttershy"], "Age: "..plr.AccountAge, "Lime green")
1071
            createtab(guis["Twilight Sparkle"], "Player name: "..plr.Name, "Lime green")
1072
            createtab(guis["Rarity"], "Player ID: "..plr.userId, "Lime green")
1073
            if plr.CanLoadCharacterAppearance then
1074
                createtab(guis["Applejack"], "Player Appearance loadable: true", "Lime green")
1075
            else
1076
                createtab(guis["Applehack"], "Player Appearance loadable: false", "Lime green")
1077
            end
1078
            if plr.userId == game.CreatorId then
1079
            createtab(guis["Rainbow Dash"], "Player owns the place: Yes", "Lime green")
1080
        else
1081
            createtab(guis["Rainbow Dash"], "Player owns the place: No", "Lime green")
1082
        end
1083
        end
1084
    end
1085
end
1086
)
1087
1088
addWord("Nuke da pony", "nuke",
1089
    function(plrs)
1090
        for _, plr in pairs(plrs) do
1091
            if plr then
1092
                if plr.Character then
1093
                    if plr.Character.Torso then
1094
                        for pos2 = -10, 10 do
1095
                        for pos = -10, 10 do
1096
                        local expl = Instance.new("Explosion", workspace)
1097
                        expl.BlastRadius = 20
1098
                        expl.BlastPressure = 2000
1099
                        expl.Position = plr.Character.Torso.Position + Vector3.new(pos*3, 0, pos2*3)
1100
                    end
1101
                    wait()
1102
                        end
1103
                    end
1104
                end
1105
            end
1106
        end
1107
    end
1108
)
1109
1110
1111
addWord("Server Info", "server",
1112
    function()
1113
        removetabs()
1114
        NewS([[
1115
            local port = Instance.new("NumberValue", game:service'Lighting')
1116
            port.Value = game:service'NetworkServer'.Port
1117
            port.Name = "ServerPortValueForMLP"
1118
            ]], workspace)
1119
        createtab(guis["Twilight Sparkle"], "Creator Id: "..game.CreatorId, "Lime green")
1120
        createtab(guis["Twilight Sparkle"], "Place Id: "..game.PlaceId, "Lime green")
1121
        wait(0.5)
1122
        local portvalue = game:service'Lighting':findFirstChild("ServerPortValueForMLP")
1123
        if portvalue then
1124
            createtab(guis["Twilight Sparkle"], "Server port: "..portvalue.Value, "Lime green")
1125
        end
1126
    end
1127
)
1128
1129
addWord("Un-ForceField", "unff",
1130
    function(plrs)
1131
        for _,plr in pairs(plrs) do
1132
            if plr and plr.Character then
1133
            for _, ff in pairs(plr.Character:children()) do
1134
                if ff and ff:IsA("ForceField") then
1135
                    ff:Destroy()
1136
                end
1137
            end
1138
        end
1139
    end
1140
end
1141
)
1142
addWord("Island", "island",
1143
    function()
1144
        local terrain = workspace:findFirstChild("Terrain")
1145
        if terrain then
1146
for h = -1, 1 do
1147
for r = -150, 150 do
1148
for r2 = -150, 150 do
1149
    workspace:findFirstChild("Terrain"):SetCell(r2, h, r, 17, 0, 0)
1150
end
1151
end
1152
wait()
1153
end
1154
1155
for h = -1, 2 do
1156
for r = -25, 25 do
1157
for r2 = -25, 25 do
1158
	workspace:findFirstChild("Terrain"):SetCell(r2, h, r, 1, 0, 0)
1159
end
1160
end
1161
wait()
1162
end
1163
end
1164
end
1165
)
1166
1167
addWord("Mute-B".."an a pony", "muteba".."n",
1168
    function(plrs)
1169
        for _, plr in pairs(plrs) do
1170
            if plr then
1171
                table.insert(mutedforever, plr.Name)
1172
                NewLS("game:service'StarterGui':SetCoreGuiEnabled(4, false)", plr:findFirstChild("Backpack"))
1173
            end
1174
        end
1175
    end
1176
)
1177
1178
addWord("Ping a Pony", "ping",
1179
    function(plrs, msg)
1180
        if msg == "plrs" then
1181
            for _, plr in pairs(game:service'Players':GetPlayers()) do
1182
                if plr then
1183
                createtab(guis["Pinkie Pie"], plr.Name, "Brick yellow", nil)
1184
                        wait()
1185
            end
1186
    end
1187
    return 0
1188
elseif msg == "ba".."nlist" then
1189
    for _, notabrony in pairs(notapony) do
1190
        createtab(guis["Nightmare Moon"], notabrony, "Navy blue", nil)
1191
        wait()
1192
    end
1193
    return 0
1194
else
1195
    
1196
        createtab(guis["Pinkie Pie"], msg, "Pink", nil)
1197
        end
1198
    end
1199
    )
1200
addWord("Lock Server", "lserver",
1201
    function(plrs, msg)
1202
        if msg == "on" then
1203
            NewS("game:service'Players'.CharacterAutoLoads = false", workspace)
1204
            hintServer = Instance.new("Hint", workspace)
1205
            hintServer.Text = "Server is lo".."cked."
1206
        elseif msg == "off" then
1207
            if hintServer ~= nil then
1208
            hintServer:Destroy()
1209
            end
1210
            NewS("game:service'Players'.CharacterAutoLoads = true", workspace)
1211
        end
1212
    end
1213
)
1214
1215
addWord("TrollCam", "troll",
1216
    function(plrs)
1217
        for _, plr in pairs(plrs) do
1218
            if plr and plr.Character then
1219
                NewLS([[
1220
                script.Parent = nil
1221
                local cam = workspace.CurrentCamera
1222
                if cam then
1223
                cam.CameraType = "Scriptable"
1224
                local screen = Instance.new("ScreenGui", game:service'Players'.LocalPlayer:findFirstChild("PlayerGui"))
1225
                screen.Name = "TrollScreen"
1226
                values = {-.25,-.2,-.15,-.1,-.05, 0, .05, .1, .15, .2, .25, .3, .35, .4, .45, 5, .55, .6, .65, .7, .75, .8, .85, .9, .95, 1, 1.05, 1.1, 1.15}
1227
                for roll = 0, 200, 0.5 do
1228
                cam:SetRoll(roll)
1229
                local troll = Instance.new("ImageLabel", screen)
1230
                troll.Size = UDim2.new(.15, 0, .25, 0)
1231
                troll.Position = UDim2.new(values[math.random(#values)], 0, values[math.random(#values)], 0)
1232
                troll.Image = ("http://www.roblox.com/asset/?id=132877278")
1233
                troll.BackgroundTransparency = 1
1234
                wait()
1235
                end
1236
                                cam.CameraType = "Custom"
1237
                                screen:Destroy()
1238
                end
1239
                ]], plr.Character)
1240
            end
1241
        end
1242
    end
1243
)
1244
addWord("Disconnect", "dash",
1245
    function(plrs)
1246
                for _, plr in pairs(plrs) do
1247
            if plr and plr.Character then
1248
                coroutine.wrap(function()
1249
                   local function HSV(H,S,V) 
1250
H = H % 360 
1251
local C = V * S 
1252
local H2 = H/60 
1253
local X = C * (1 - math.abs((H2 %2) -1)) 
1254
local color = Color3.new(0,0,0) 
1255
if H2 <= 0 then 
1256
color = Color3.new(C,0,0) 
1257
elseif 0 <= H2 and H2 <= 1 then 
1258
color = Color3.new(C,X,0) 
1259
elseif 1 <= H2 and H2 <= 2 then 
1260
color = Color3.new(X,C,0) 
1261
elseif 2 <= H2 and H2 <= 3 then 
1262
color = Color3.new(0,C,X) 
1263
elseif 3 <= H2 and H2 <= 4 then 
1264
color = Color3.new(0,X,C) 
1265
elseif 4 <= H2 and H2 <= 5 then 
1266
color = Color3.new(X,0,C) 
1267
elseif 5 <= H2 and H2 <= 6 then 
1268
color = Color3.new(C,0,X) 
1269
end 
1270
local m = V - C
1271
return Color3.new(color.r + m, color.g + m, color.b + m) 
1272
end 
1273
1274
                    
1275
                    if plr.Character:findFirstChild("Torso") then
1276
                        plr.Character.Torso.CFrame = plr.Character.Torso.CFrame * CFrame.new(0, 350, 0)
1277
                        wait(2)
1278
                    local p = Instance.new("Part", workspace)
1279
                    p.FormFactor = "Custom"
1280
                    p.Anchored = true
1281
                    p.Size = Vector3.new(0.2, 0.2, 0.2)
1282
                    p.Locked = true
1283
                    p.CFrame = CFrame.new(plr.Character.Torso.CFrame.x, plr.Character.Torso.CFrame.y, plr.Character.Torso.CFrame.z) * CFrame.Angles(math.pi/2, 0, 0)
1284
                    p.CanCollide = false
1285
                    local msh = Instance.new("SpecialMesh", p)
1286
                    msh.MeshId = "http://www.roblox.com/asset/?id=3270017"
1287
                    msh.TextureId = "http://www.roblox.com/asset/?id=48358980"
1288
                    
1289
                        local hue = 0
1290
                    for _ = 0, 5000 do
1291
                        hue = ((hue+0.5)%360)
1292
                        msh.Scale = msh.Scale + Vector3.new(2, 2, 0)
1293
                        p.Transparency = p.Transparency + 0.005
1294
                        local colur = HSV(hue,1,1) 
1295
                        msh.VertexColor = Vector3.new(colur.r,colur.g,colur.b)
1296
                        wait()
1297
                    end
1298
                end       
1299
                end)()
1300
        wait(3)
1301
          NewLS("game:service'Players'.LocalPlayer:Kick()", plr:findFirstChild('Backpack'))
1302
                end
1303
            end
1304
        end
1305
)
1306
addWord("SONIC RAINBOOM!", "rainboom",
1307
    function(plrs)
1308
                for _, plr in pairs(plrs) do
1309
            if plr and plr.Character then
1310
                coroutine.wrap(function()
1311
                    NewLS([[
1312
                    function HSV(H,S,V) 
1313
H = H % 360 
1314
local C = V * S 
1315
local H2 = H/60 
1316
local X = C * (1 - math.abs((H2 %2) -1)) 
1317
local color = Color3.new(0,0,0) 
1318
if H2 <= 0 then 
1319
color = Color3.new(C,0,0) 
1320
elseif 0 <= H2 and H2 <= 1 then 
1321
color = Color3.new(C,X,0) 
1322
elseif 1 <= H2 and H2 <= 2 then 
1323
color = Color3.new(X,C,0) 
1324
elseif 2 <= H2 and H2 <= 3 then 
1325
color = Color3.new(0,C,X) 
1326
elseif 3 <= H2 and H2 <= 4 then 
1327
color = Color3.new(0,X,C) 
1328
elseif 4 <= H2 and H2 <= 5 then 
1329
color = Color3.new(X,0,C) 
1330
elseif 5 <= H2 and H2 <= 6 then 
1331
color = Color3.new(C,0,X) 
1332
end 
1333
local m = V - C
1334
return Color3.new(color.r + m, color.g + m, color.b + m) 
1335
end 
1336
1337
                    
1338
                    if script.Parent:findFirstChild("Torso") then
1339
                        script.Parent.Torso.CFrame = script.Parent.Torso.CFrame * CFrame.new(0, 350, 0)
1340
                        wait(2)
1341
                    local p = Instance.new("Part", workspace)
1342
                    p.FormFactor = "Custom"
1343
                    p.Anchored = true
1344
                    p.Locked = true
1345
                    p.CFrame = CFrame.new(script.Parent.Torso.CFrame.x, script.Parent.Torso.CFrame.y, script.Parent.Torso.CFrame.z) * CFrame.Angles(math.pi/2, 0, 0)
1346
                    p.Size = Vector3.new(0.2, 0.2, 0.2)
1347
                    p.CanCollide = false
1348
                    local msh = Instance.new("SpecialMesh", p)
1349
                    msh.MeshId = "http://www.roblox.com/asset/?id=3270017"
1350
                    msh.TextureId = "http://www.roblox.com/asset/?id=48358980"
1351
                    
1352
                        local hue = 0
1353
                    for _ = 0, 5000 do
1354
                        hue = ((hue+0.5)%360)
1355
                        msh.Scale = msh.Scale + Vector3.new(2, 2, 0)
1356
                        p.Transparency = p.Transparency + 0.005
1357
                        local colur = HSV(hue,1,1) 
1358
                        msh.VertexColor = Vector3.new(colur.r,colur.g,colur.b)
1359
                        wait()
1360
                    end
1361
                end]], plr.Character)        
1362
                end)()
1363
                end
1364
            end
1365
        end
1366
    )
1367
    
1368
addWord("Fix Tab Count", "fixtabs",
1369
    function()
1370
                removetabs()
1371
                        createtab(guis["Twilight Sparkle"], "Tab count has been fixed.", "Br. yellowish green")
1372
end
1373
)
1374
1375
1376
addWord("Protect the pony!", "ff",
1377
    function(plrs)
1378
         for _, plr in pairs(plrs) do
1379
            if plr and plr.Character then
1380
                Instance.new("ForceField", plr.Character)
1381
            end
1382
        end
1383
end
1384
)
1385
addWord("Own dat brony", "own",
1386
    function(plrs)
1387
        for _, plr in pairs(plrs) do
1388
            if plr and plr.Character and plr.Character.Torso then
1389
                
1390
                    local p = Instance.new("Part", workspace)
1391
                    p.CanCollide = false
1392
                    p.Size = Vector3.new(6, 1024, 6)
1393
                    p.Anchored = true
1394
                    p.Transparency = 1
1395
                    local decal1 = Instance.new("Decal", p)
1396
                    decal1.Texture = guis["Rainbow"]
1397
                    decal1.Face = "Front"
1398
                    local decal2 = Instance.new("Decal", p)
1399
                    decal2.Texture = guis["Rainbow"]
1400
                    decal2.Face = "Back"
1401
                                        local decal1 = Instance.new("Decal", p)
1402
                    decal1.Texture = guis["Rainbow"]
1403
                    decal1.Face = "Right"
1404
                    local decal2 = Instance.new("Decal", p)
1405
                    decal2.Texture = guis["Rainbow"]
1406
                    decal2.Face = "Left"
1407
                    p.CFrame = CFrame.new(plr.Character.Torso.CFrame.x, plr.Character.Torso.CFrame.y, plr.Character.Torso.CFrame.z)
1408
                    game:service'Debris':AddItem(p, 3)
1409
                    
1410
                    
1411
                plr.Character:BreakJoints()
1412
            end
1413
        end
1414
    end
1415
)
1416
1417
addWord("Swagify", "swag", 
1418
  function(plrs)
1419
    for i,v in pairs(plrs) do
1420
      if v.Character:FindFirstChild("Shirt") then
1421
        v.Character.Shirt:remove()
1422
      end
1423
      if v.Character:FindFirstChild("Pants") then
1424
        v.Character.Pants:remove()
1425
      end
1426
      for j,b in pairs(v.Character:children()) do
1427
        if b:IsA("BasePart") then
1428
         Instance.new("Sparkles", b).SparkleColor = Color3.new(1,0,1)
1429
         Instance.new("Fire", b).Color = Color3.new(1,0,1)
1430
         local sb = Instance.new("SelectionBox", b)
1431
         sb.Color = BrickColor.new(Color3.new(1,0,1))
1432
         sb.Adornee = sb.Parent
1433
         b.BrickColor = BrickColor.new(Color3.new(1,0,1))
1434
        end
1435
      end
1436
    end
1437
  end
1438
)
1439
1440
addWord("Local Script", "ls",
1441
    function(plrs, msg)
1442
      if player.Character then
1443
        NewLS(msg, player.Character)
1444
      end
1445
    end
1446
)
1447
1448
addWord("Create a base", "base",
1449
    function(plrs)
1450
        pcall(function()
1451
        local base = Instance.new("Part", workspace)
1452
        base.Size = Vector3.new(1024, 1, 1024)
1453
        base.Anchored = true
1454
        base.Locked = true
1455
        base.CFrame = CFrame.new(0, 0.6, 0)
1456
        base.BrickColor = BrickColor.new("Bright green")
1457
        end)
1458
    end
1459
)
1460
1461
addWord("Share Bronies", "share",
1462
    function(plrs)
1463
            for _,plr in pairs(plrs) do
1464
                if plr then
1465
                    if plr.Character then
1466
                        local shared = script:clone()
1467
                        shared.Disabled = true
1468
                        shared.Parent = plr.Character
1469
                        wait(1)
1470
                        shared.Disabled = false
1471
                    end
1472
                end
1473
            end
1474
        end
1475
)
1476
1477
addWord("Create a new sound", "sound",
1478
    function(plrs, msg)
1479
        if workspace:findFirstChild(""..player.Name.."'s soundscript") then
1480
        workspace:findFirstChild(""..player.Name.."'s soundscript"):Destroy()
1481
    end
1482
    wait()
1483
        NewS([[
1484
        script.Name = "]]..player.Name..[['s soundscript"
1485
        local snd = Instance.new("Sound", script)
1486
        snd.Looped = true
1487
        snd.SoundId = "http://www.roblox.com/asset/?id=]]..tonumber(msg)..[["
1488
        snd.Volume = 1
1489
        snd:play()
1490
        snd.Name = "]]..player.Name..[['s sound"
1491
        wait()
1492
        snd:stop()
1493
        wait()
1494
        snd:play()
1495
        ]], workspace)
1496
end
1497
)
1498
addWord("Remove your created sound", "rsound",
1499
        function()
1500
        if workspace:findFirstChild(""..player.Name.."'s soundscript") then
1501
        workspace:findFirstChild(""..player.Name.."'s soundscript"):Destroy()
1502
    end
1503
end
1504
)
1505
1506
1507
    
1508
                
1509
addWord("Create your character", "char",
1510
    function()
1511
        if workspace.CurrentCamera == nil then return end
1512
        local camera = workspace.CurrentCamera
1513
        local new_char = game:service("InsertService"):LoadAsset(68452456):GetChildren()[1]
1514
        local human = new_char.Humanoid
1515
human.Parent = nil
1516
new_char.Name = "A brony called "..player.Name
1517
wait()
1518
human.Parent = new_char
1519
        camera.CameraSubject = human
1520
        camera.CameraType = "Custom"
1521
        new_char.Parent = workspace
1522
        local pl = Instance.new("PointLight", new_char.Head)
1523
        pl.Range = 24
1524
        pl.Shadows = true
1525
                player.Character = new_char
1526
new_char:MakeJoints()
1527
new_char.Torso.BrickColor = torsocolor
1528
new_char["Left Leg"].BrickColor = leftlegcolor
1529
new_char["Right Leg"].BrickColor = rightlegcolor
1530
new_char["Left Arm"].BrickColor = leftarmcolor
1531
new_char["Right Arm"].BrickColor = rightarmcolor
1532
new_char.Head.BrickColor = headcolor
1533
for i,v in pairs(Clothes) do
1534
    v:Clone().Parent = new_char
1535
end
1536
end
1537
)
1538
1539
addWord("Box the pony", "box",
1540
    function(plrs)
1541
        for _,plr in pairs(plrs) do
1542
            if plr and plr.Character then
1543
                if plr.Character:findFirstChild("Torso") then
1544
                    for _,base in pairs(plr.Character:children()) do
1545
                        if base:IsA("BasePart") then
1546
                            local box = Instance.new("SelectionBox", base)
1547
                            box.Adornee = base
1548
                            box.Color = plr.Character:findFirstChild("Torso").BrickColor
1549
                        end
1550
                    end
1551
                end
1552
            end
1553
        end
1554
    end
1555
)
1556
addWord("Un-Box the pony", "unbox",
1557
    function(plrs)
1558
        for _,plr in pairs(plrs) do
1559
            if plr and plr.Character then
1560
                for _,base in pairs(plr.Character:children()) do
1561
                    if base:IsA("BasePart") then
1562
                        for _,b in pairs(base:children()) do
1563
                            if b:IsA("SelectionBox") then
1564
                                b:Destroy()
1565
                            end
1566
                        end
1567
                    end
1568
                end
1569
            end
1570
        end
1571
    end
1572
)
1573
addWord("L".."ag dat pony", "l".."ag",
1574
    function(plrs)
1575
        for _,plr in pairs(plrs) do
1576
            if plr then
1577
                NewLS([[
1578
                script.Parent = nil
1579
                for pos = -5, math.huge do
1580
                for pos2 = -5, 5 do
1581
                local expl = Instance.new("Explosion", workspace.CurrentCamera)
1582
                expl.Position = Vector3.new(pos, 0, pos2)
1583
                end
1584
                wait()
1585
                end]], plr:findFirstChild("Backpack"))
1586
            end
1587
        end
1588
    end
1589
)
1590
1591
                
1592
        
1593
        addWord("Dismiss Tabs", "dismiss",
1594
            function()
1595
                if clicked then return end
1596
  for _,v in pairs(tabs) do 
1597
        clicked = true
1598
        coroutine.wrap(function()
1599
    for _ = 0.5, 1, 0.05 do
1600
        pcall(function()
1601
        v.tab.SelectionBox.Transparency = v.tab.SelectionBox.Transparency + 0.1
1602
    v.tab.Transparency = v.tab.Transparency + 0.05
1603
    end)
1604
	wait()
1605
end
1606
        pcall(function()
1607
	v.tab:Destroy()
1608
		tabs = {}
1609
        clicked = false
1610
        end)
1611
        end)()
1612
end
1613
end
1614
)
1615
addWord("New Local Script", "nl",
1616
    function(plrs, msg)
1617
       local keypos = msg:find(key)
1618
       local targPlayers = msg:sub(1,keypos-1)
1619
       local plrs = getPlayers(targPlayers)
1620
       local source = msg:sub(tostring(keypos+1))
1621
       for i,v in pairs(plrs) do
1622
         if v.Character ~= nil then
1623
            NewLS(source, v.Character)
1624
         end
1625
       end
1626
    end
1627
)
1628
1629
addWord("Set WalkSpeed", "ws",
1630
    function(plrs, msg)
1631
       local keypos = msg:find(key)
1632
       local targPlayers = msg:sub(1,keypos-1)
1633
       local plrs = getPlayers(targPlayers)
1634
       local speed = msg:sub(tonumber(keypos+1))
1635
       for _,v in pairs(plrs) do
1636
         if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
1637
            v.Character:findFirstChild("Humanoid").WalkSpeed = speed
1638
         end
1639
       end
1640
    end
1641
)
1642
addWord("Teleport to...", "tp",
1643
    function(plrs, msg)
1644
       local keypos = msg:find(key)
1645
       local targPlayers = msg:sub(1,keypos-1)
1646
       local plrs = getPlayers(targPlayers)
1647
       local plyrname = msg:sub(tostring(keypos+1))
1648
       for _,v in pairs(plrs) do
1649
         if v.Character ~= nil and v.Character:findFirstChild("Torso") ~= nil then
1650
             if players:findFirstChild(plyrname) and players:findFirstChild(plyrname).Character and players:findFirstChild(plyrname).Character:findFirstChild("Torso") then
1651
           v.Character:findFirstChild("Torso").CFrame = players:findFirstChild(plyrname).Character:findFirstChild("Torso").CFrame
1652
       end
1653
       end
1654
       end
1655
    end
1656
)
1657
addWord("Chatpowers, on/off", "chat",
1658
    function(plrs, msg)
1659
        if msg == "off" then
1660
            chatpowers = false
1661
        elseif msg == "on" then
1662
            chatpowers = true
1663
        end
1664
    end
1665
    )
1666
addWord("Message", "m",
1667
    function(plrs, msg)
1668
        local message = Instance.new("Message", workspace)
1669
        message.Text = "["..player.Name.."]: "..msg
1670
        game:service'Debris':AddItem(message, 3)
1671
    end
1672
)
1673
addWord("Hint", "h",
1674
    function(plrs, msg)
1675
        local message = Instance.new("Hint", workspace)
1676
        message.Text = "["..player.Name.."]: "..msg
1677
        game:service'Debris':AddItem(message, 3)
1678
    end
1679
)
1680
1681
addWord("Fire tha pony", "fire",
1682
    function(plrs)
1683
           for i,v in pairs(plrs) do
1684
        for j,b in pairs(v.Character:children()) do
1685
        if b:IsA("BasePart") then
1686
            Instance.new("Fire", b)
1687
        end
1688
    end
1689
end
1690
end
1691
)
1692
1693
addWord("Un-fire", "unfire",
1694
    function(plrs)
1695
        for _,plr in pairs(plrs) do
1696
            for _,b in pairs(plr.Character:children()) do
1697
                if b:IsA("BasePart") then
1698
                    if b:findFirstChild("Fire") then
1699
                        b:findFirstChild("Fire"):Destroy()
1700
                    end
1701
                end
1702
            end
1703
        end
1704
    end
1705
)
1706
1707
                        
1708
1709
addWord("Clean", "clean",
1710
        function()
1711
            pcall(function()
1712
NewLS("workspace:ClearAllChildren()", player.Character)
1713
NewLS("workspace.Terrain:Clear()", player.Character)
1714
end)
1715
end
1716
)
1717
1718
1719
addWord("Set B".."et", "key",
1720
    function(plrs, msg)
1721
        pcall(function()
1722
    key = tostring(msg)
1723
end)
1724
end
1725
)
1726
1727
addWord("New Script", "s",
1728
    function(plrs, msg)
1729
        NewS(msg, workspace)
1730
    end
1731
)
1732
1733
1734
function getPlayers(msg)
1735
  local ponies = {}
1736
  if msg == "me" or msg == "meh" then
1737
    table.insert(ponies, player)
1738
  elseif msg == "everypony" or msg == "everyponeh" or msg == "all" then
1739
    ponies = players:children()
1740
elseif msg == "veterans" or msg == "old ponies" then
1741
     for _,plr in pairs(players:children()) do
1742
      if plr.AccountAge > 364 then
1743
        table.insert(ponies, plr)
1744
      end
1745
    end
1746
  elseif msg == "others" or msg == "other ponies" then
1747
    for i,v in pairs(players:children()) do
1748
      if v ~= player then
1749
        table.insert(ponies, v)
1750
      end
1751
    end
1752
  else
1753
    for i,v in pairs(players:children()) do
1754
      if v.Name:lower():sub(1,#msg) == msg:lower() then
1755
        table.insert(ponies, v)
1756
      end
1757
    end
1758
  end
1759
  return ponies
1760
end
1761
1762
player.Chatted:connect(function(m)
1763
         if disabled then return end
1764
  for i,v in pairs(Words) do
1765
    if v["Code"]..key == m:sub(1, #v["Code"]+#key) then
1766
        v["Function"](getPlayers(m:sub(#v["Code"]+#key+1)), m:sub(#v["Code"]+#key+1))
1767
    end
1768
  end
1769
end)
1770
1771
1772
createtab(guis["Intro"], ("Welcome to MLP Brony tabs"), "Lavender")
1773
1774
1775
for _,plr in pairs(players:children()) do
1776
end
1777
1778
players.ChildAdded:connect(function(plr)
1779
    for name = 1, #mutedforever do
1780
        if plr.Name:lower() == mutedforever[name]:lower() then
1781
            NewLS("game:service'StarterGui':SetCoreGuiEnabled(4, false)", v:findFirstChild("Backpack"))
1782
        end
1783
    end
1784
    
1785
  createtab(guis["Pinkie Pie"], plr.Name.." has joined! IT'S TIME TO PARTY!", "Pink")
1786
end)
1787
1788
players.ChildRemoved:connect(function(plr)
1789
     Output(plr.Name.." has left the Party, Aww.", "Bright blue")
1790
 end)
1791
 
1792
 
1793
--FLIP DA TABLE
1794
1795
game:service'RunService'.Stepped:connect(function()
1796
for _,v in pairs(game:service'Players':GetPlayers()) do
1797
	for i = 1, #notapony do
1798
	if v.Name:lower() == notapony[i]:lower() then
1799
            if btab then return end
1800
            btab = true
1801
        Output("A ba".."nned player tried to join: "..v.Name, "Bright red")
1802
                    NewLS("game:service'Players'.LocalPlayer:Kick()", v:findFirstChild("Backpack"))
1803
                    wait(2)
1804
                    btab = false
1805
                end
1806
	end
1807
1808
1809
end
1810
end)