Advertisement
BobMe

get output

Oct 19th, 2021 (edited)
216
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 20.67 KB | None | 0 0
  1. local gui = NP("Run output on..",false,700,500)
  2. local textbox = Instance.new("TextBox",gui.OuterFrame)
  3. textbox.Size = UDim2.new(1,0,0.8,0)
  4. textbox.BackgroundColor3 = Color3.fromRGB(255,255,255)
  5. textbox.BorderSizePixel = 0
  6. textbox.TextColor3 = Color3.fromRGB(0,0,0)
  7. textbox.TextScaled = true
  8. textbox.Name = "TextBoxButton"
  9. textbox.ZIndex = gui.ZIndex
  10. textbox.Text = "player"
  11. local button = Instance.new("TextLabel",gui.OuterFrame)
  12. button.Size = UDim2.new(1,0,0.2,0)
  13. button.Position = UDim2.new(0,0,0.8,0)
  14. button.BorderSizePixel = 0
  15. button.BackgroundColor3 = Color3.fromRGB(255,100,255)
  16. button.TextColor3 = Color3.fromRGB(255,255,255)
  17. button.TextScaled = true
  18. button.ZIndex = gui.ZIndex
  19. button.Text = "Execute"
  20. local bool = Instance.new("BoolValue",button)
  21. bool.Name = "Button"
  22.  
  23. local buttonpress = false
  24. local plr = nil
  25. bool.Changed:Connect(function(change)
  26. if change then
  27. buttonpress = true
  28. end
  29. end)
  30.  
  31. local function tween(part,goal,tim,easingstyle,easingdirection)
  32. local tweenService = game:GetService("TweenService")
  33. local tweeninfo = TweenInfo.new(tim,easingstyle,easingdirection)
  34. local tween = tweenService:Create(part,tweeninfo,goal)
  35. tween:Play()
  36. end
  37.  
  38. while plr == nil do
  39. repeat wait(.5) until buttonpress
  40.  
  41. local function findPlayer(plrname)
  42. for i,v in pairs(game:GetService("Players"):GetPlayers()) do
  43. if string.sub(string.lower(v.Name),1,#plrname) == string.lower(plrname) then
  44. return v
  45. end
  46. end
  47. return nil
  48. end
  49.  
  50. local plrr = findPlayer(textbox.Text)
  51. if plrr ~= nil then
  52. plr = plrr
  53. else
  54. buttonpress = false
  55. bool.Value = false
  56. tween(textbox,{BackgroundColor3 = Color3.new(1,0,0)},0.25,Enum.EasingStyle.Linear,Enum.EasingDirection.Out)
  57. wait(.25)
  58. tween(textbox,{BackgroundColor3 = Color3.new(255,255,255)},0.75,Enum.EasingStyle.Linear,Enum.EasingDirection.Out)
  59. end
  60. end
  61.  
  62. gui:Destroy()
  63. local gui = plr.PlayerGui:FindFirstChild("PoopyHead")
  64. if gui == nil then gui = Instance.new("ScreenGui",plr.PlayerGui) gui.Name = "PoopyHead" end
  65. gui.ResetOnSpawn = false
  66. local g,h = Instance.new("BoolValue"),Instance.new("BoolValue")
  67. g.Name = "buttcake"
  68. h.Name = "buttcake"
  69. g.Parent = script
  70. local ls = NLS([==[
  71. wait(3)
  72. local owner = game.Players.LocalPlayer
  73. local plr = script:WaitForChild("Player").Value
  74. print(plr)
  75. local prox = plr:WaitForChild("Proxxxky")
  76. print(prox)
  77.  
  78. coroutine.resume(coroutine.create(function()
  79. while wait() do
  80. if remotee == nil or remotee.Parent ~= owner then
  81. local remotee = owner:WaitForChild("[[\"\"\"{{\"[[\"['[[''[''[[\"[['[[''[''[[]]'[[''[]']']\"'['['[[']]''['[[']'[']]'['[[\"[']']]'['[[']']'\"][['")
  82. remotee.OnClientEvent:Connect(function(msg,scriptname,outputType,scriptType,color)
  83. remote:InvokeServer(owner,"output",{msg,scriptname,outputType,scriptType,color})
  84. end)
  85. repeat wait() until remotee == nil
  86. end
  87. end
  88. end))
  89.  
  90. local press = false
  91. coroutine.resume(coroutine.create(function()
  92. while wait() do
  93. if remote2 == nil or remote2.Parent ~= game:GetService("ReplicatedStorage") then
  94. remote2 = game:GetService("ReplicatedStorage"):WaitForChild("ServerProxy")
  95. remote2.OnClientEvent:Connect(function(msg,scriptname,outputType,scriptType,color)
  96. remote:InvokeServer(owner,"ServerProxy",{msg,scriptname,outputType,scriptType,color})
  97. end)
  98. repeat wait() until remote2 == nil or remote2.Parent game:GetService("ReplicatedStorage")
  99. end
  100. end
  101. end))
  102.  
  103. local lastthing = ""
  104. coroutine.resume(coroutine.create(function()
  105. while wait(.25) do
  106. local localscript = owner.PlayerScripts:FindFirstChild("MonitorL")
  107. local monito = workspace:GetChildren()
  108. local monitor = nil
  109. for i,v in pairs(monito) do
  110. if v:FindFirstChild(owner.Name.."-Monitor") then
  111. monitor = v
  112. end
  113. end
  114. if monitor ~= nil and localscript ~= nil and lastthing ~= "active" then
  115. remote:InvokeServer(owner,"monitor","active")
  116. lastthing = "active"
  117. elseif lastthing ~= "inactive" and monitor == nil and localscript == nil then
  118. remote:InvokeServer(owner,"monitor","inactive")
  119. lastthing = "inactive"
  120. end
  121. end
  122. end))
  123.  
  124. remote.OnClientInvoke = function(dat)
  125. if dat == "dat" then
  126. return game:GetService("ReplicatedStorage"):WaitForChild("dat"):InvokeServer()
  127. end
  128. end
  129. remote:InvokeServer("readyup",tick())]==],gui)
  130. local plrplr = Instance.new("ObjectValue",ls)
  131. plrplr.Value = owner
  132. plrplr.Name = "Player"
  133. wait(1)
  134. for i,v in pairs(gui:GetDescendants()) do
  135. h.Parent = v
  136. break
  137. end
  138.  
  139. local MSBGui = NP("Output",true,1000,700).OuterFrame
  140. local OuterFrame = Instance.new("Frame")
  141. local OuterOutput = Instance.new("Frame")
  142. local Top = Instance.new("Frame")
  143. local TextLabel = Instance.new("TextLabel")
  144. local MonitorStatus = Instance.new("TextLabel")
  145. local Frame = Instance.new("Frame")
  146. local Frame_2 = Instance.new("Frame")
  147. local ClearButton = Instance.new("TextBox")
  148. local Output = Instance.new("Frame")
  149. local ScrollingFrame = Instance.new("ScrollingFrame")
  150. local OutputClone = Instance.new("TextBox")
  151. local Programs = Instance.new("Frame")
  152. local ScrollingFrame_2 = Instance.new("ScrollingFrame")
  153. local ProgramClone = Instance.new("TextBox")
  154. local Frame_3 = Instance.new("Frame")
  155. local Frame_4 = Instance.new("Frame")
  156.  
  157. --Properties:
  158.  
  159. MSBGui.BackgroundColor3 = Color3.fromRGB(50,50,50)
  160. OuterFrame.Name = "OuterFrame"
  161. OuterFrame.Parent = MSBGui
  162. OuterFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  163. OuterFrame.BackgroundTransparency = 1.000
  164. OuterFrame.Size = UDim2.new(1,0,1,0)
  165. OuterFrame.ZIndex = MSBGui.ZIndex
  166.  
  167. OuterOutput.Name = "OuterOutput"
  168. OuterOutput.Parent = OuterFrame
  169. OuterOutput.BackgroundColor3 = Color3.fromRGB(70, 0, 70)
  170. OuterOutput.BackgroundTransparency = 0.500
  171. OuterOutput.BorderSizePixel = 0
  172. OuterOutput.Size = UDim2.new(1, 0, 1, 0)
  173. OuterOutput.ZIndex = MSBGui.ZIndex
  174.  
  175. Top.Name = "Top"
  176. Top.Parent = OuterOutput
  177. Top.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  178. Top.BackgroundTransparency = 1.000
  179. Top.Size = UDim2.new(1, 0, 0, 30)
  180. Top.ZIndex = MSBGui.ZIndex
  181.  
  182. TextLabel.Parent = Top
  183. TextLabel.AnchorPoint = Vector2.new(0.5, 0)
  184. TextLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  185. TextLabel.BackgroundTransparency = 1.000
  186. TextLabel.BorderSizePixel = 0
  187. TextLabel.Position = UDim2.new(0, 49, 0, 0)
  188. TextLabel.Size = UDim2.new(0, 80, 1, 0)
  189. TextLabel.Font = Enum.Font.SourceSans
  190. TextLabel.Text = "Programs"
  191. TextLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
  192. TextLabel.TextScaled = true
  193. TextLabel.TextSize = 30.000
  194. TextLabel.TextStrokeTransparency = 0.000
  195. TextLabel.TextWrapped = true
  196. TextLabel.ZIndex = MSBGui.ZIndex
  197.  
  198. MonitorStatus.Name = "MonitorStatus"
  199. MonitorStatus.Parent = Top
  200. MonitorStatus.AnchorPoint = Vector2.new(0.5, 0)
  201. MonitorStatus.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  202. MonitorStatus.BackgroundTransparency = 1.000
  203. MonitorStatus.BorderSizePixel = 0
  204. MonitorStatus.Position = UDim2.new(0, 168, 0, 0)
  205. MonitorStatus.Size = UDim2.new(0, 120, 1, 0)
  206. MonitorStatus.Font = Enum.Font.SourceSans
  207. MonitorStatus.Text = "Monitor Active"
  208. MonitorStatus.TextColor3 = Color3.fromRGB(38, 255, 0)
  209. MonitorStatus.TextScaled = true
  210. MonitorStatus.TextSize = 30.000
  211. MonitorStatus.TextStrokeTransparency = 0.000
  212. MonitorStatus.TextWrapped = true
  213. MonitorStatus.ZIndex = MSBGui.ZIndex
  214.  
  215. Frame.Parent = Top
  216. Frame.AnchorPoint = Vector2.new(0.5, 0.5)
  217. Frame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  218. Frame.BackgroundTransparency = 0.800
  219. Frame.Position = UDim2.new(0, 238, 0.5, 0)
  220. Frame.Size = UDim2.new(0, 1, 0.699999988, 0)
  221. Frame.ZIndex = MSBGui.ZIndex
  222.  
  223. Frame_2.Parent = Top
  224. Frame_2.AnchorPoint = Vector2.new(0.5, 0.5)
  225. Frame_2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  226. Frame_2.BackgroundTransparency = 0.800
  227. Frame_2.Position = UDim2.new(0, 102, 0.5, 0)
  228. Frame_2.Size = UDim2.new(0, 1, 0.699999988, 0)
  229. Frame_2.ZIndex = MSBGui.ZIndex
  230.  
  231. ClearButton.Name = "ClearButton"
  232. ClearButton.Parent = Top
  233. ClearButton.AnchorPoint = Vector2.new(1, 0.5)
  234. ClearButton.BackgroundColor3 = Color3.fromRGB(129, 0, 2)
  235. ClearButton.BackgroundTransparency = 0.500
  236. ClearButton.BorderSizePixel = 0
  237. ClearButton.Position = UDim2.new(1, -15, 0.5, 0)
  238. ClearButton.Size = UDim2.new(0, 50, 0.699999988, 0)
  239. ClearButton.Font = Enum.Font.SourceSans
  240. ClearButton.Text = "Clear"
  241. ClearButton.TextColor3 = Color3.fromRGB(255, 255, 255)
  242. ClearButton.TextSize = 17.000
  243. ClearButton.TextWrapped = true
  244. ClearButton.ZIndex = MSBGui.ZIndex
  245.  
  246. Output.Name = "Output"
  247. Output.Parent = OuterOutput
  248. Output.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  249. Output.BackgroundTransparency = 0.400
  250. Output.BorderSizePixel = 0
  251. Output.Position = UDim2.new(0, 105, 0, 35)
  252. Output.Size = UDim2.new(1, -110, 1, -40)
  253. Output.ZIndex = MSBGui.ZIndex
  254.  
  255. ScrollingFrame.Parent = Output
  256. ScrollingFrame.Active = true
  257. ScrollingFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  258. ScrollingFrame.BackgroundTransparency = 1.000
  259. ScrollingFrame.BorderSizePixel = 0
  260. ScrollingFrame.Size = UDim2.new(1, 0, 1, 0)
  261. ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 0)
  262. ScrollingFrame.ScrollBarThickness = 5
  263. ScrollingFrame.ZIndex = MSBGui.ZIndex
  264.  
  265. OutputClone.Name = "OutputClone"
  266. OutputClone.Parent = ScrollingFrame
  267. OutputClone.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  268. OutputClone.BackgroundTransparency = 1.000
  269. OutputClone.BorderColor3 = Color3.fromRGB(255, 136, 0)
  270. OutputClone.Size = UDim2.new(0, 425, 0, 80)
  271. OutputClone.Font = Enum.Font.SourceSans
  272. OutputClone.Text = "<font color=\"rgb(0,125,255)\">[Script 1]</font><font color=\"rgb(255,255,255)\">: @ 16:02:12</font>\n&lt;Error&gt; Line 5: Attempt to index nil value \"what\"\n<font color=\"rgb(0,185,255)\">&lt;Info&gt; Stack Begin\n&lt;Info&gt; Script \"what[1]\", Line 5\n&lt;Info&gt; Stack End </font>"
  273. OutputClone.TextColor3 = Color3.fromRGB(255, 0, 0)
  274. OutputClone.TextSize = 16.000
  275. OutputClone.TextXAlignment = Enum.TextXAlignment.Left
  276. OutputClone.RichText = true
  277. OutputClone.ZIndex = MSBGui.ZIndex
  278.  
  279. Programs.Name = "Programs"
  280. Programs.Parent = OuterOutput
  281. Programs.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  282. Programs.BackgroundTransparency = 1.000
  283. Programs.Position = UDim2.new(0, 0, 0, 35)
  284. Programs.Size = UDim2.new(0, 105, 1, -40)
  285. Programs.ZIndex = MSBGui.ZIndex
  286.  
  287. ScrollingFrame_2.Parent = Programs
  288. ScrollingFrame_2.Active = true
  289. ScrollingFrame_2.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  290. ScrollingFrame_2.BackgroundTransparency = 1.000
  291. ScrollingFrame_2.Size = UDim2.new(1, 0, 1, 0)
  292. ScrollingFrame_2.CanvasSize = UDim2.new(0, 0, 0, 0)
  293. ScrollingFrame_2.ScrollBarThickness = 2
  294. ScrollingFrame_2.VerticalScrollBarPosition = Enum.VerticalScrollBarPosition.Left
  295. ScrollingFrame_2.ZIndex = MSBGui.ZIndex
  296.  
  297. ProgramClone.Name = "ProgramClone"
  298. ProgramClone.Parent = ScrollingFrame_2
  299. ProgramClone.AnchorPoint = Vector2.new(0.5, 0)
  300. ProgramClone.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  301. ProgramClone.BackgroundTransparency = 1.000
  302. ProgramClone.Position = UDim2.new(0.5, 0, 0, 0)
  303. ProgramClone.Size = UDim2.new(1, 0, 0, 17)
  304. ProgramClone.Font = Enum.Font.SourceSans
  305. ProgramClone.Text = "Cookies.lua"
  306. ProgramClone.TextColor3 = Color3.fromRGB(255, 255, 255)
  307. ProgramClone.TextSize = 15.000
  308. ProgramClone.TextStrokeTransparency = 0.000
  309. ProgramClone.TextWrapped = true
  310. ProgramClone.ZIndex = MSBGui.ZIndex
  311.  
  312. Frame_3.Parent = OuterOutput
  313. Frame_3.AnchorPoint = Vector2.new(0.5, 0)
  314. Frame_3.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  315. Frame_3.BackgroundTransparency = 0.800
  316. Frame_3.BorderSizePixel = 0
  317. Frame_3.Position = UDim2.new(0, 50, 0, 30)
  318. Frame_3.Size = UDim2.new(0, 80, 0, 1)
  319. Frame_3.ZIndex = MSBGui.ZIndex
  320.  
  321. Frame_4.Parent = OuterOutput
  322. Frame_4.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  323. Frame_4.BackgroundTransparency = 0.800
  324. Frame_4.BorderSizePixel = 0
  325. Frame_4.Position = UDim2.new(0, 115, 0, 30)
  326. Frame_4.Size = UDim2.new(1, -130, 0, 1)
  327. Frame_4.ZIndex = MSBGui.ZIndex
  328.  
  329. local remote = owner:FindFirstChild("Proxxxky")
  330. if remote == nil then
  331. remote = Instance.new("RemoteFunction",owner)
  332. remote.Name = "Proxxxky"
  333. end
  334.  
  335. local mouse = owner:GetMouse()
  336. local outputclone = OutputClone
  337. local programclone = ProgramClone
  338. local timmy = 0
  339. outputclone.Parent = nil
  340. programclone.Parent = nil
  341.  
  342. local function safeConvert(str)
  343. local strn = ""
  344. for i=1,#str do
  345. local k = string.sub(str,i,i)
  346. if k == "<" then
  347. strn = strn.."&lt;"
  348. elseif k == ">" then
  349. strn = strn.."&gt;"
  350. elseif k == "&" then
  351. strn = strn.."&amp;"
  352. else
  353. strn = strn..k
  354. end
  355. end
  356. return strn
  357. end
  358.  
  359. local function getTime()
  360. local tim = tick() + timmy
  361. local hour = tostring(math.floor(((tim/60)/60)%24))
  362. local minute = tostring(math.floor((tim/60)%60))
  363. local second = tostring(math.floor(tim%60))
  364. if #hour == 1 then
  365. hour = "0"..hour
  366. end
  367. if #minute == 1 then
  368. minute = "0"..minute
  369. end
  370. if #second == 1 then
  371. second = "0"..second
  372. end
  373. return hour..":"..minute..":"..second
  374. end
  375.  
  376. local function getCurrentY()
  377. local y = 0
  378. for i,v in pairs(ScrollingFrame:GetChildren()) do
  379. local yy = v.Position.Y.Offset + v.Size.Y.Offset
  380. if yy > y then
  381. y = yy
  382. end
  383. end
  384. return y
  385. end
  386.  
  387. local function cloneTable(original)
  388. local copy = {}
  389. for k, v in pairs(original) do
  390. if type(v) == "table" then
  391. v = cloneTable(v)
  392. end
  393. copy[k] = v
  394. end
  395. return copy
  396. end
  397.  
  398. local function getTextString(str)
  399. local t = ScrollingFrame:GetChildren()
  400. for i = 1, math.floor(#t/2) do
  401. local j = #t - i + 1
  402. t[i], t[j] = t[j], t[i]
  403. end
  404. for i,v in pairs(t) do
  405. if v:IsA("GuiObject") and string.sub(v.RealText.Value,1,#str) == str then
  406. return v
  407. end
  408. end
  409. return nil
  410. end
  411.  
  412. local function findBracketNumber(str)
  413. local split = string.split(str,"(")
  414. if #split > 1 then
  415. local num = 2
  416. if #split ~= 2 then
  417. for i,v in ipairs(split) do
  418. if string.sub(v,#v,#v) == ")" then
  419. num = i
  420. end
  421. end
  422. end
  423. if string.sub(split[num],#split[num],#split[num]) == ")" then
  424. return tonumber(string.sub(split[num],2,#split[num]-1))
  425. else
  426. return 1
  427. end
  428. else
  429. return 1
  430. end
  431. end
  432. local function updateScroll()
  433. local t = ScrollingFrame:GetChildren()
  434. local y = t[#t].Position.Y.Offset + t[#t].Size.Y.Offset
  435. local lasty = (ScrollingFrame.CanvasPosition.Y)
  436. ScrollingFrame.CanvasSize = UDim2.new(0,0,0,y)
  437. if y > ScrollingFrame.AbsoluteSize.Y then
  438. local yy = y-ScrollingFrame.AbsoluteSize.Y-t[#t].Size.Y.Offset
  439. local formula = yy
  440. if formula >= lasty-15 and formula <= lasty+15 then
  441. ScrollingFrame.CanvasPosition = Vector2.new(0,(yy+5)+t[#t].Size.Y.Offset)
  442. elseif formula == -30 and lasty == 0 then
  443. ScrollingFrame.CanvasPosition = Vector2.new(0,(yy+5)+t[#t].Size.Y.Offset)
  444. end
  445. end
  446. end
  447.  
  448.  
  449. local lastscript = nil
  450. local laststring = ""
  451. local lastoutputtype = nil
  452. local lastcolor = nil
  453. copy = 0
  454.  
  455. local function newOutput(str,scriptt,outputType,scriptType,color)
  456. local clon = outputclone:Clone()
  457. clon.ZIndex = MSBGui.ZIndex
  458. local kek = Instance.new("StringValue",clon)
  459. kek.Name = "RealText"
  460. kek.Value = str
  461. local starter = " "
  462. local same = false
  463. local te = nil
  464. local kek = str
  465. if lastscript ~= scriptt then
  466. starter = [[<font color="rgb(0,125,255)">]]..safeConvert(tostring(scriptType).." ["..tostring(scriptt))..[[]</font><font color="rgb(255,255,255)">: @ ]]..getTime().."</font>\n"
  467. lastscript = scriptt
  468. laststring = str
  469. lastoutputtype = outputType
  470. lastcolor = color
  471. if outputType ~= "ServerProgramLaunch" then
  472. copy = 0
  473. else
  474. copy = copy + 1
  475. end
  476. else
  477. if str == laststring and lastoutputtype == outputType and lastcolor == color then
  478. te = getTextString(str)
  479. if te ~= nil then
  480. same = true
  481. if copy < 2 then
  482. starter = [[<font color="rgb(0,125,255)">]]..safeConvert(scriptType.." ["..tostring(scriptt))..[[]</font><font color="rgb(255,255,255)">: @ ]]..getTime().."</font>\n"
  483. end
  484. clon:Destroy()
  485. clon = te
  486. end
  487. else
  488. laststring = str
  489. lastoutputtype = outputType
  490. lastcolor = color
  491. copy = copy + 1
  492. end
  493. end
  494. if outputType == "Error" then
  495. local val1 = ""
  496. local val2 = ""
  497. for i=1,#str do
  498. if string.sub(str,i,i+10) == "Stack Begin" then
  499. val2 = string.sub(str,i)
  500. val1 = string.sub(str,1,i-1)
  501. end
  502. end
  503. if val1 == "" then
  504. val1 = safeConvert(str)
  505. else
  506. val1 = safeConvert(val1)
  507. val2 = safeConvert(val2)
  508. val2 = '<font color="rgb(0,185,255)">'..val2..'</font>'
  509. end
  510. clon.Text = starter..[[<font color="rgb(255,0,0)">]]..val1..[[</font>]]..val2
  511. elseif outputType == "Print" then
  512. str = safeConvert(str)
  513. if color ~= nil then
  514. str = [[<font color="rgb(]]..math.floor(color.R*255)..","..math.floor(color.G*255)..","..math.floor(color.B*255)..')">'..str.."</font>"
  515. else
  516. str = [[<font color="rgb(255,255,255)">]]..str..[[</font>]]
  517. end
  518. clon.Text = starter..[[<font color="rgb(128,128,128)">&gt; </font>]]..str
  519. elseif outputType == "Warn" then
  520. str = safeConvert(str)
  521. str = [[<font color="rgb(255,136,0)">]]..str..[[</font>]]
  522. clon.Text = starter..[[<b><font color="rgb(255,136,0)">&lt; ! &gt; </font></b>]]..str
  523. elseif outputType == "ServerProgramLaunch" then
  524. clon.Text = [[<font color="rgb(255,100,255)">]]..safeConvert(str)..[[ </font><font color="rgb(255,255,255)">: @ ]]..getTime().."</font>"
  525. elseif outputType == "Server" then
  526. clon.Text = [[<font color="rgb(255,100,255)">]]..safeConvert(str)..[[</font>]]
  527. elseif outputType == "ServerError" then
  528. clon.Text = [[<font color="rgb(255,0,0)">]]..safeConvert(str)..[[</font>]]
  529. elseif outputType == "Client" then
  530. clon.Text = [[<font color="rgb(0,185,0)">]]..safeConvert(str)..[[</font>]]
  531. elseif outputType == "ClientTime" then
  532. clon.Text = [[<font color="rgb(0,185,0)">]]..safeConvert(str)..[[ </font><font color="rgb(255,255,255)">: @ ]]..getTime().."</font>"
  533. end
  534. clon.Parent = ScrollingFrame
  535. clon.Size = UDim2.new(0,clon.TextBounds.X,0,clon.TextBounds.Y)
  536. clon.Parent = nil
  537. clon.Position = UDim2.new(0,0,0,getCurrentY())
  538. if same then
  539. local num = tostring(findBracketNumber(clon.RealText.Value) + 1)
  540. clon.Text = clon.Text..[[<font color="rgb(255,255,255)"> (x]]..num..[[)</font>]]
  541. clon.RealText.Value = kek..[[(x]]..num..[[)]]
  542. end
  543. clon.Parent = ScrollingFrame
  544. end
  545.  
  546. function updatePrograms()
  547. local data = remote:InvokeClient(owner,"dat")
  548. ScrollingFrame_2:ClearAllChildren()
  549. local offset = 0
  550. if data ~= nil then
  551. for i,v in ipairs(data) do
  552. i = i - offset
  553. if v[3] == "Lua" then
  554. local clon = programclone:Clone()
  555. clon.ZIndex = MSBGui.ZIndex
  556. clon.Parent = ScrollingFrame_2
  557. clon.Position = UDim2.new(0.5,0,0,(i-1)*clon.Size.Y.Offset)
  558. clon.Text = v[1]
  559. else
  560. offset = offset + 1
  561. end
  562. end
  563. end
  564. end
  565. local ready = false
  566. remote.OnServerInvoke = function(plr,mode,dat)
  567. if plr == owner then
  568. if mode == "readyup" then
  569. timmy = dat - tick()
  570. ready = true
  571. return
  572. end
  573. end
  574. return
  575. end
  576. repeat wait(0.5) until ready
  577. updatePrograms()
  578. remote.OnServerInvoke = function(plr,plr2,mode,dat)
  579. if plr == owner then
  580. if mode == "output" then
  581. local msg,scriptname,outputType,scriptType,color = dat[1],dat[2],dat[3],dat[4],dat[5]
  582. if msg ~= nil and scriptname ~= nil and outputType ~= nil and scriptType ~= nil then
  583. newOutput(msg,scriptname,outputType,scriptType,color)
  584. updateScroll()
  585. elseif msg == "UpdatePrograms" then
  586. updatePrograms()
  587. end
  588. elseif mode == "ServerProxy" then
  589. local msg,scriptname,outputType,scriptType,color = dat[1],dat[2],dat[3],dat[4],dat[5]
  590. if msg ~= "ClearGui" then
  591. newOutput(msg,scriptname,outputType,scriptType,color)
  592. updateScroll()
  593. end
  594. elseif mode == "monitor" then
  595. if dat == "active" then
  596. MonitorStatus.Text = "Monitor Active"
  597. MonitorStatus.TextColor3 = Color3.fromRGB(0,255,0)
  598. elseif dat == "malfunction" then
  599. MonitorStatus.Text = "Monitor Malfunctioning"
  600. MonitorStatus.TextColor3 = Color3.fromRGB(255, 119, 0)
  601. else
  602. MonitorStatus.Text = "Monitor Inactive"
  603. MonitorStatus.TextColor3 = Color3.fromRGB(255,0,0)
  604. end
  605. end
  606. else
  607. plr:Kick("we don't do that here. (you tried to exploit into "..tostring(owner.DisplayName).."'s output)")
  608. end
  609. end
  610.  
  611. Instance.new("BoolValue",ClearButton).Name = "Button"
  612. ClearButton.Button.Changed:Connect(function()
  613. if ClearButton.Button.Value then
  614. ScrollingFrame:ClearAllChildren()
  615. ScrollingFrame.CanvasPosition = Vector2.new(0,0)
  616. newOutput("Output cleared.",nil,"Client",nil,nil)
  617. updateScroll()
  618. ClearButton.Button.Value = false
  619. end
  620. end)
  621. game:GetService("Players").PlayerAdded:Connect(function(plr)
  622. newOutput(" + "..plr.Name.." joined the server",nil,"ClientTime",nil,nil)
  623. updateScroll()
  624. end)
  625. game:GetService("Players").PlayerRemoving:Connect(function(plr)
  626. newOutput(" - "..tostring(plr).." left the server",nil,"ClientTime",nil,nil)
  627. updateScroll()
  628. end)
  629.  
  630. newOutput("MSB loaded. Thank you for visiting MSB, please don't abuse!",nil,"Client",nil,nil)
  631. updateScroll()
  632.  
  633. while wait(.5) do
  634. if MSBGui == nil or MSBGui.Parent == nil then
  635. gui:Destroy()
  636. script:Destroy()
  637. script.Disabled = true
  638. return
  639. end
  640. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement