Spartan

ITEM.Name = 'Spartan'
ITEM.Price = 250
ITEM.Model = 'models/player/lordvipes/h3_spartans_mps/h3spartan_mps_cvp.mdl'
ITEM.Description = "..."




function ITEM:OnEquip(ply, modifications)
        if not ply._OldModel then
                ply._OldModel = ply:GetModel()
        end
        timer.Simple(2, function() ply:SetupHands()
                ply:SetModel(self.Model)
                --ply:SetSkin(1)
                ply:SetBodygroup(1, modifications.group1 or 0)          --helmets
                ply:SetBodygroup(2, modifications.group2 or 0)          --chestpiece
                ply:SetBodygroup(3, modifications.group3 or 0)          --shoulderl
                ply:SetBodygroup(4, modifications.group4 or 0)          --shoulder2
                ply:SetBodygroup(5, modifications.group5 or 0)          --katana
        end)
end



    function Derma_Query_Dropdown( strText, strTitle, ... )

            local Window = vgui.Create( "DFrame" )
                    Window:SetTitle( strTitle or "Message Title (First Parameter)" )
                    Window:SetDraggable( false )
                    Window:ShowCloseButton( false )
                    Window:SetBackgroundBlur( true )
                    Window:SetDrawOnTop( true )

            local InnerPanel = vgui.Create( "DPanel", Window )
                    InnerPanel:SetDrawBackground( false )

            local Text = vgui.Create( "DLabel", InnerPanel )
                    Text:SetText( strText or "Message Text (Second Parameter)" )
                    Text:SizeToContents()
                    Text:SetContentAlignment( 5 )
                    Text:SetTextColor( color_white )

            local ButtonPanel = vgui.Create( "DPanel", Window )
                    ButtonPanel:SetTall( 50 )
                    ButtonPanel:SetDrawBackground( false )

            local NumOptions = 0
            local ListBox = vgui.Create( "DComboBox", ButtonPanel )

            local k = 1
            while true do

                    local Text = select( k, ... )
                    if Text == nil then break end

                    local Func = select( k+1, ... ) or function() end

                    ListBox:AddChoice(Text, Func, k == 1)

                    NumOptions = NumOptions + 1
                    k = k + 2

            end

            ListBox:SetPos(5,25)
            ListBox:SetWide(100)
            ListBox:SetTall(20)
            ListBox.OnSelect = function(self, index, value, data)
                    data()
                    Window:Close();
            end


            local w, h = Text:GetSize()

            w = math.max( w, ButtonPanel:GetWide() )

            Window:SetSize( w + 50, h + 25 + 45 + 10 )
            Window:Center()

            InnerPanel:StretchToParent( 5, 25, 5, 45 )

            Text:SetPos(0,5)
            Text:CenterHorizontal()

            ButtonPanel:StretchToParent( 5, 25, 5, 5 )

            ListBox:SetWide(ButtonPanel:GetWide())
            ListBox:CenterHorizontal()
            ListBox:CenterVertical()

            Window:MakePopup()

            if ( NumOptions == 0 ) then

                    Window:Close()
                    Error( "Derma_Query: Created Query with no Options!?" )
                    return nil

            end

            return Window

    end

function ITEM:OnHolster(ply)
        if ply._OldModel then
                ply:SetModel(ply._OldModel)
        end
end

function ITEM:Modify(modifications)
        Derma_Query_Dropdown("Choose Helmet", "",
                        "Mark VI", function()
                                modifications.group1 = 0 -- Default helmet
                                PS:SendModifications(self.ID, modifications) --Makes sure the pointshop knows to apply changes
                        end,
                        "CBQ", function()
                                modifications.group1 = 1 -- CBQ helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EOD", function()
                                modifications.group1 = 2 -- EOD helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EVA", function()
                                modifications.group1 = 3 -- EVA helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Hayabusa", function()
                                modifications.group1 = 4 -- Hayabusa helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "MarkV", function()
                                modifications.group1 = 5 -- MarkV helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "ODST", function()
                                modifications.group1 = 6 -- ODST helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Recon", function()
                                modifications.group1 = 7 -- Recon helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Rogue", function()
                                modifications.group1 = 8 -- Rogue helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Scout", function()
                                modifications.group1 = 9 -- Scout helmet
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Security", function()
                                modifications.group1 = 10 -- Security helmet
                                PS:SendModifications(self.ID, modifications)
                        end)
        Derma_Query_Dropdown("Choose Chestpiece", "",
                        "Mark VI", function()
                                modifications.group2 = 0 -- Default chestpiece
                                PS:SendModifications(self.ID, modifications) --Makes sure the pointshop knows to apply changes
                        end,
                        "CQB", function()
                                modifications.group2 = 1 -- CQB chestpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EOD", function()
                                modifications.group2 = 2 -- EOD chestpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EVA", function()
                                modifications.group2 = 3 -- EVA chestpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Hayabusa", function()
                                modifications.group2 = 4 -- Hayabusa chestpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Recon", function()
                                modifications.group2 = 5 -- Recon chestpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Scout", function()
                                modifications.group2 = 6 -- Scout chestpiece
                                PS:SendModifications(self.ID, modifications)
                        end)
        Derma_Query_Dropdown("Choose Left Shoulderpiece", "",
                        "Mark VI", function()
                                modifications.group3 = 0 -- Default left shoulderpiece
                                PS:SendModifications(self.ID, modifications) --Makes sure the pointshop knows to apply changes
                        end,
                        "CQB", function()
                                modifications.group3 = 1 -- CQB left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EOD", function()
                                modifications.group3 = 2 -- EOD left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EVA", function()
                                modifications.group3 = 3 -- EVA left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Hayabusa", function()
                                modifications.group3 = 4 -- Hayabusa left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Recon", function()
                                modifications.group3 = 5 -- Recon left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Scout", function()
                                modifications.group3 = 6 -- Scout left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Security", function()
                                modifications.group3 = 7 -- Security left shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end)
        Derma_Query_Dropdown("Choose Right Shoulderpiece", "",
                        "Mark VI", function()
                                modifications.group4 = 0 -- Default right shoulderpiece
                                PS:SendModifications(self.ID, modifications) --Makes sure the pointshop knows to apply changes
                        end,
                        "CQB", function()
                                modifications.group4 = 1 -- CQB right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EOD", function()
                                modifications.group4 = 2 -- EOD right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "EVA", function()
                                modifications.group4 = 3 -- EVA right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Hayabusa", function()
                                modifications.group4 = 4 -- Hayabusa right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Recon", function()
                                modifications.group4 = 5 -- Recon right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Scout", function()
                                modifications.group4 = 6 -- Scout right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end,
                        "Security", function()
                                modifications.group4 = 7 -- Security right shoulderpiece
                                PS:SendModifications(self.ID, modifications)
                        end)
        Derma_Query_Dropdown("Katana", "",
                        "No", function()
                                modifications.group5 = 0 -- No Katana
                                PS:SendModifications(self.ID, modifications) --Makes sure the pointshop knows to apply changes
                        end,
                        "Katana", function()
                                modifications.group5 = 1 -- Katana
                                PS:SendModifications(self.ID, modifications)
                        end)
                        print("modify")

end

function ITEM:OnModify(ply, modifications)
   self:OnHolster(ply)
   self:OnEquip(ply, modifications) -- adds the item back again, with new mods
end