Advertisement
Guest User

Untitled

a guest
Apr 25th, 2015
203
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.99 KB | None | 0 0
  1. Clover is now fully loaded!
  2. ARCLoad: Server sent chunk 0/6
  3. local MasterFrame
  4. local OpenJobsSub, OpenClassesSub, OpenCategorysSub, OpenJobs, OpenTiers, OpenClasses, OpenModels, OpenWeapons, OpenCategorys, OpenAgendas, OpenDoorGroups, OpenDemoteGroups, OpenGroupChat, OpenWorkshop, ScrollPositions, SideBarsOpen, CreatedGui = {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}
  5. local OpenTab, Spacing = 1, 40
  6. local function CreateVGui(Name, Parent)
  7. local Gui = vgui.Create(Name, Parent)
  8. table.insert(CreatedGui, Gui)
  9. return Gui
  10. end
  11. local RenderPanel, Search
  12. local function Redraw() end
  13. local function DrawMenu()
  14. if not MasterFrame or not MasterFrame:IsVisible() then
  15. return
  16. end
  17. for _, v in ipairs(CreatedGui) do
  18. v:Remove()
  19. end
  20. CreatedGui = {}
  21. local CloseFull = CreateVGui("DButton", MasterFrame)
  22. CloseFull:Dock(FILL)
  23. CloseFull.DoClick = function()
  24. MasterFrame:SetVisible(false)
  25. end
  26. CloseFull.Paint = function(self, w, h)
  27. Derma_DrawBackgroundBlur(self, self.m_fCreateTime)
  28. end
  29. local TabPanel = CreateVGui("DPanel", MasterFrame)
  30. TabPanel:SetSize(ScrW() * 0.6, ScrH() * 0.6)
  31. TabPanel:SetPos(ScrW()/2 - TabPanel:GetWide()/2, ScrH()/2 - TabPanel:GetTall()/2)
  32. TabPanel.Paint = function(self, w, h)
  33. draw.RoundedBox(16, 0, 0, w, h, Color(245, 245, 245))
  34. end
  35. local CloseButton = CreateVGui("DButton", MasterFrame)
  36. CloseButton:SetPos(ScrW()/2 + TabPanel:GetWide()/2 - 45, ScrH()/2 - TabPanel:GetTall()/2)
  37. CloseButton:SetText("X")
  38. CloseButton:SetSize(45, 32)
  39. CloseButton:SetTextColor(Color(255, 255, 255))
  40. CloseButton:SetFont("VHUIFont")
  41. CloseButton.DoClick = function()
  42. MasterFrame:SetVisible(false)
  43. end
  44. CloseButton.Paint = function(self, w, h)
  45. draw.RoundedBoxEx(14, 0, 0, 45, 32, Color(200, 80, 80), false, true, false, false)
  46. end
  47. local RefreshButton = CreateVGui("DButton", MasterFrame)
  48. RefreshButton:SetPos(ScrW()/2 + TabPanel:GetWide()/2 - 90, ScrH()/2 - TabPanel:GetTall()/2)
  49. RefreshButton:SetText("U")
  50. RefreshButton:SetSize(45, 32)
  51. RefreshButton:SetTextColor(Color(255, 255, 255))
  52. RefreshButton:SetFont("VHUIFont")
  53. RefreshButton.DoClick = function()
  54. JobHandler.RequestUpdate( )
  55. MasterFrame:SetVisible(false)
  56. JobUploadProgress = vgui.Create( "DProgress" )
  57. JobUploadProgress:SetPos( 10, 30 )
  58. JobUploadProgress:SetSize( 200, 20 )
  59. JobUploadProgress:SetFraction( 0 )
  60. JobUploadProgress:MoveToFront( )
  61. end
  62. RefreshButton.Paint = function(self, w, h)
  63. draw.RoundedBoxEx(16, 0, 0, 45, 32, Color(80, 200, 200), false, false, true, false)
  64. end
  65. RenderPanel = CreateVGui("DScrollPanel", TabPanel)
  66. RenderPanel:SetPos(Spacing, Spacing)
  67. RenderPanel:SetSize(TabPanel:GetWide() * 0.6 - Spacing, TabPanel:GetTall() - Spacing * 2)
  68. RenderPanel.Paint = function(self, w, h)
  69. draw.RoundedBox(8, 0, 0, w, h, Color(235, 235, 235))
  70. end
  71. local VBar = RenderPanel:GetVBar()
  72. NewSBar(VBar)
  73. VBar:SetEnabled(true)
  74. VBar.SetEnabled = function() end
  75. local ListPanel = CreateVGui("DScrollPanel", TabPanel)
  76. ListPanel:SetPos(TabPanel:GetWide() * 0.6 + Spacing, Spacing)
  77. ListPanel:SetSize(TabPanel:GetWide() * 0.4 - Spacing * 2, TabPanel:GetTall() - Spacing * 2)
  78. ListPanel.Paint = function(self, w, h)
  79. draw.RoundedBox(8, 0, 0, w, h, Color(235, 235, 235))
  80. end
  81. NewSBar(ListPanel:GetVBar())
  82. local function NewMenuButton(Name, Tab, Parent)
  83. local MenuButton = CreateVGui("DButton")
  84. if Parent then
  85. Parent:AddItem(MenuButton)
  86. else
  87. MenuButton:SetParent(ListPanel)
  88. end
  89. MenuButton:Dock(TOP)
  90. MenuButton:DockMargin(0, 0, 0, 2)
  91. MenuButton:SetText(Name)
  92. MenuButton:SetTall(40)
  93. if Parent then
  94. MenuButton:SetTextColor(Color(70, 70, 70))
  95. else
  96. MenuButton:SetTextColor(Color(240, 240, 240))
  97. end
  98. MenuButton:SetFont("VHUIFont")
  99. MenuButton:SetTextInset(5, 0)
  100. MenuButton:SetContentAlignment(4)
  101. MenuButton.DoClick = function()
  102. if OpenTab ~= Tab then
  103. OpenTab = Tab
  104. Redraw()
  105. end
  106. end
  107. if Parent then
  108. MenuButton.Paint = function(self, w, h)
  109. draw.RoundedBox(8, 0, 0, w, h, Color(180, 180, 180, OpenTab == Tab and 120 or 0))
  110. end
  111. else
  112. MenuButton.Paint = function(self, w, h)
  113. draw.RoundedBox(8, 0, 0, w, h, Color(180, 180, 180, OpenTab == Tab and 200 or 255))
  114. end
  115. end
  116. end
  117. local JobTab = CreateVGui("DForm", ListPanel)
  118. JobTab:Dock(TOP)
  119. JobTab:SetName("Jobs")
  120. JobTab:SetExpanded(SideBarsOpen[1] or 1)
  121. JobTab.OnToggle = funct
  122.  
  123. [ERROR] RunString:1517: ')' expected near 'then'
  124. 1. unknown - RunString:0
  125.  
  126. ARCLoad: Server sent chunk 1/6
  127. ARCLoad: Server sent chunk 2/6
  128. ARCLoad: Server sent chunk 3/6
  129. ARCLoad: Server sent chunk 4/6
  130. ARCLoad: Server sent chunk 5/6
  131. ARCLoad: Server sent chunk 6/6
  132. 270735
  133. ARCBank: Running...
  134. ____ ____ _ ___ ___ ____ ____ ____ ____ _ _ ____ ____ ___ ____ _ _ _ _ _ _ _ ____
  135. |__| |__/ | | / | |__/ |__| | |_/ |___ |__/ |__] |__| |\ | |_/ | |\ | | __
  136. | | | \ | | /__ |___ | \ | | |___ | \_ |___ | \ |__] | | | \| | \_ | | \| |__]
  137.  
  138. ARCBank: ...I can never get a vacation...
  139. ARCBank: © Copyright 2014,2015 Aritz Beobide-Cardinal (ARitz Cracker) All rights reserved.
  140. ARCBank: Version: 1.3.1h
  141. ARCBank: Updated on: April 17th 2015
  142. ARCBank: Loading virtual Lua files...
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement