Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Clover is now fully loaded!
- ARCLoad: Server sent chunk 0/6
- local MasterFrame
- local OpenJobsSub, OpenClassesSub, OpenCategorysSub, OpenJobs, OpenTiers, OpenClasses, OpenModels, OpenWeapons, OpenCategorys, OpenAgendas, OpenDoorGroups, OpenDemoteGroups, OpenGroupChat, OpenWorkshop, ScrollPositions, SideBarsOpen, CreatedGui = {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}, {}
- local OpenTab, Spacing = 1, 40
- local function CreateVGui(Name, Parent)
- local Gui = vgui.Create(Name, Parent)
- table.insert(CreatedGui, Gui)
- return Gui
- end
- local RenderPanel, Search
- local function Redraw() end
- local function DrawMenu()
- if not MasterFrame or not MasterFrame:IsVisible() then
- return
- end
- for _, v in ipairs(CreatedGui) do
- v:Remove()
- end
- CreatedGui = {}
- local CloseFull = CreateVGui("DButton", MasterFrame)
- CloseFull:Dock(FILL)
- CloseFull.DoClick = function()
- MasterFrame:SetVisible(false)
- end
- CloseFull.Paint = function(self, w, h)
- Derma_DrawBackgroundBlur(self, self.m_fCreateTime)
- end
- local TabPanel = CreateVGui("DPanel", MasterFrame)
- TabPanel:SetSize(ScrW() * 0.6, ScrH() * 0.6)
- TabPanel:SetPos(ScrW()/2 - TabPanel:GetWide()/2, ScrH()/2 - TabPanel:GetTall()/2)
- TabPanel.Paint = function(self, w, h)
- draw.RoundedBox(16, 0, 0, w, h, Color(245, 245, 245))
- end
- local CloseButton = CreateVGui("DButton", MasterFrame)
- CloseButton:SetPos(ScrW()/2 + TabPanel:GetWide()/2 - 45, ScrH()/2 - TabPanel:GetTall()/2)
- CloseButton:SetText("X")
- CloseButton:SetSize(45, 32)
- CloseButton:SetTextColor(Color(255, 255, 255))
- CloseButton:SetFont("VHUIFont")
- CloseButton.DoClick = function()
- MasterFrame:SetVisible(false)
- end
- CloseButton.Paint = function(self, w, h)
- draw.RoundedBoxEx(14, 0, 0, 45, 32, Color(200, 80, 80), false, true, false, false)
- end
- local RefreshButton = CreateVGui("DButton", MasterFrame)
- RefreshButton:SetPos(ScrW()/2 + TabPanel:GetWide()/2 - 90, ScrH()/2 - TabPanel:GetTall()/2)
- RefreshButton:SetText("U")
- RefreshButton:SetSize(45, 32)
- RefreshButton:SetTextColor(Color(255, 255, 255))
- RefreshButton:SetFont("VHUIFont")
- RefreshButton.DoClick = function()
- JobHandler.RequestUpdate( )
- MasterFrame:SetVisible(false)
- JobUploadProgress = vgui.Create( "DProgress" )
- JobUploadProgress:SetPos( 10, 30 )
- JobUploadProgress:SetSize( 200, 20 )
- JobUploadProgress:SetFraction( 0 )
- JobUploadProgress:MoveToFront( )
- end
- RefreshButton.Paint = function(self, w, h)
- draw.RoundedBoxEx(16, 0, 0, 45, 32, Color(80, 200, 200), false, false, true, false)
- end
- RenderPanel = CreateVGui("DScrollPanel", TabPanel)
- RenderPanel:SetPos(Spacing, Spacing)
- RenderPanel:SetSize(TabPanel:GetWide() * 0.6 - Spacing, TabPanel:GetTall() - Spacing * 2)
- RenderPanel.Paint = function(self, w, h)
- draw.RoundedBox(8, 0, 0, w, h, Color(235, 235, 235))
- end
- local VBar = RenderPanel:GetVBar()
- NewSBar(VBar)
- VBar:SetEnabled(true)
- VBar.SetEnabled = function() end
- local ListPanel = CreateVGui("DScrollPanel", TabPanel)
- ListPanel:SetPos(TabPanel:GetWide() * 0.6 + Spacing, Spacing)
- ListPanel:SetSize(TabPanel:GetWide() * 0.4 - Spacing * 2, TabPanel:GetTall() - Spacing * 2)
- ListPanel.Paint = function(self, w, h)
- draw.RoundedBox(8, 0, 0, w, h, Color(235, 235, 235))
- end
- NewSBar(ListPanel:GetVBar())
- local function NewMenuButton(Name, Tab, Parent)
- local MenuButton = CreateVGui("DButton")
- if Parent then
- Parent:AddItem(MenuButton)
- else
- MenuButton:SetParent(ListPanel)
- end
- MenuButton:Dock(TOP)
- MenuButton:DockMargin(0, 0, 0, 2)
- MenuButton:SetText(Name)
- MenuButton:SetTall(40)
- if Parent then
- MenuButton:SetTextColor(Color(70, 70, 70))
- else
- MenuButton:SetTextColor(Color(240, 240, 240))
- end
- MenuButton:SetFont("VHUIFont")
- MenuButton:SetTextInset(5, 0)
- MenuButton:SetContentAlignment(4)
- MenuButton.DoClick = function()
- if OpenTab ~= Tab then
- OpenTab = Tab
- Redraw()
- end
- end
- if Parent then
- MenuButton.Paint = function(self, w, h)
- draw.RoundedBox(8, 0, 0, w, h, Color(180, 180, 180, OpenTab == Tab and 120 or 0))
- end
- else
- MenuButton.Paint = function(self, w, h)
- draw.RoundedBox(8, 0, 0, w, h, Color(180, 180, 180, OpenTab == Tab and 200 or 255))
- end
- end
- end
- local JobTab = CreateVGui("DForm", ListPanel)
- JobTab:Dock(TOP)
- JobTab:SetName("Jobs")
- JobTab:SetExpanded(SideBarsOpen[1] or 1)
- JobTab.OnToggle = funct
- [ERROR] RunString:1517: ')' expected near 'then'
- 1. unknown - RunString:0
- ARCLoad: Server sent chunk 1/6
- ARCLoad: Server sent chunk 2/6
- ARCLoad: Server sent chunk 3/6
- ARCLoad: Server sent chunk 4/6
- ARCLoad: Server sent chunk 5/6
- ARCLoad: Server sent chunk 6/6
- 270735
- ARCBank: Running...
- ____ ____ _ ___ ___ ____ ____ ____ ____ _ _ ____ ____ ___ ____ _ _ _ _ _ _ _ ____
- |__| |__/ | | / | |__/ |__| | |_/ |___ |__/ |__] |__| |\ | |_/ | |\ | | __
- | | | \ | | /__ |___ | \ | | |___ | \_ |___ | \ |__] | | | \| | \_ | | \| |__]
- ARCBank: ...I can never get a vacation...
- ARCBank: © Copyright 2014,2015 Aritz Beobide-Cardinal (ARitz Cracker) All rights reserved.
- ARCBank: Version: 1.3.1h
- ARCBank: Updated on: April 17th 2015
- ARCBank: Loading virtual Lua files...
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement