|
| 13 Dec 2013 04:59 PM |
repeat wait() until game.Players.LocalPlayer.Character repeat wait() until game.Players.LocalPlayer.PlayerGui:findFirstChild("HealthGUI") game.Players.LocalPlayer.PlayerGui.HealthGUI:Remove()
local ButtonMain = script.Parent.Menu.ButtonsMain local ButtonStart = script.Parent.Menu.ButtonsStart local Left = script.Parent.LeftSideBar local Right = script.Parent.RightSideBar local Char = game.Players.LocalPlayer.Character local Player = game.Players.LocalPlayer local Shop = script.Parent.Shop
local Allies = { {"Spark Military"; 766201}; {"STOR"; 685697}; {"TGA"; 880650}; {"HAU"; 476946}; {"RS"; 585037}; {"VL"; 260009}; {"TDE"; 754683}; }
TriggerSlide = function() Right:TweenPosition(UDim2.new(1,-200,1,-50), "Out", "Linear", 0.5, true) Left:TweenPosition(UDim2.new(0,0,1,-50), "Out", "Linear", 0.5, true) end
local CheckAlly = function(Player) for _,v in pairs(Allies) do if Player:IsInGroup(v[2]) then return true end end return false end
if not game.Players.LocalPlayer:findFirstChild("Existing") then local CC = Workspace.CurrentCamera CC.CoordinateFrame = Workspace.CamPart.CFrame CC.Focus = Workspace.CamPartFocus.CFrame CC.CameraType = "Scriptable" Instance.new("IntValue", Player).Name = "Existing" Money = Instance.new("NumberValue", Player) Money.Name = "Money" Level = Instance.new("NumberValue", Player) Level.Name = "Level" XP = Instance.new("NumberValue", Player) XP.Name = "XP" Capturing = Instance.new("BoolValue", Player) Capturing.Name = "Capturing" BanAmount = Instance.new("NumberValue", Player) BanAmount.Name = "BanAmount" game.Players.LocalPlayer.Character.Parent = game.Lighting script.Parent.Active = true else TriggerSlide() _G.Zoom("-", ButtonMain.Start) ButtonMain.Visible = false script.Parent.Active = false script.Parent.BackgroundTransparency = 1 end
if Player:FindFirstChild("Level") then Left.Level.Text = "Level "..Player.Level.Value Left.Money.Text = "$"..Player.Money.Value Left.Level.Backing.Bar.Size = UDim2.new((Player.XP.Value/(Player.Level.Value*500)),0,1,0) end
Player.Level.Changed:connect(function() Left.Level.Text = "Level "..Player.Level.Value end)
Player.XP.Changed:connect(function() Left.Level.Backing.Bar.Size = UDim2.new((Player.XP.Value/(Player.Level.Value*500)),0,1,0) if Player.XP.Value >= (Player.Level.Value*500) and Player.Level.Value < 55 then LeftOver = Player.XP.Value - (Player.Level.Value*500) if LeftOver > 0 then Player.XP.Value = LeftOver else Player.XP.Value = 0 end Player.Level.Value = Player.Level.Value + 1 end end)
Player.Money.Changed:connect(function() Left.Money.Text = "$"..Player.Money.Value end)
Die = function() game.Players.LocalPlayer.Character.Parent = Workspace game.Players.LocalPlayer.Character:BreakJoints() game.Workspace.CurrentCamera.CameraSubject = game.Players.LocalPlayer.Character.Humanoid game.Workspace.CurrentCamera.CameraType = Enum.CameraType.Custom end
ClearScreen = function() for _,v in pairs(script.Parent:GetChildren()) do if v.className == "Frame" then if v.Name ~= "LeftSideBar" and v.Name ~= "RightSideBar" and v.Name ~= "Menu" and v.Name ~= "ChatLog" then v.Visible = false end end end end CallButton = function(Butt) if Butt.Name == "Start" then _G.Zoom("-", Butt) Butt.Parent.Visible = false wait(1) ButtonStart.Visible = true _G.Zoom("+", ButtonStart.Optyx) elseif Butt.Name == "BackS" then _G.Zoom("-", Butt) Butt.Parent.Visible = false wait(1) ButtonMain.Visible = true _G.Zoom("+", ButtonMain.Start) elseif Butt.Name == "Optyx" then if game.Players.LocalPlayer:IsInGroup(674982) or CheckAlly(game.Players.LocalPlayer) then game.Players.LocalPlayer.TeamColor = game.Teams.RCW.TeamColor _G.Zoom("-", Butt) Butt.Parent.Visible = false Die() end elseif Butt.Name == "Visitors" then if not game.Players.LocalPlayer:IsInGroup(674982) then game.Players.LocalPlayer.TeamColor = game.Teams.Visitors.TeamColor _G.Zoom("-", Butt) Die() Butt.Parent.Visible = false end elseif Butt.Name == "Hostiles" then if not game.Players.LocalPlayer:IsInGroup(674982) then game.Players.LocalPlayer.TeamColor = game.Teams.Hostiles.TeamColor _G.Zoom("-", Butt) Die() Butt.Parent.Visible = false end elseif Butt.Name == "Credits" then ClearScreen() if Deb then return end script.Parent.Credits.Visible = not script.Parent.Credits.Visible Deb = true if script.Parent.Credits.Title.Visible then for _,v in pairs(script.Parent.Credits:GetChildren()) do v.Visible = false end else for _,v in pairs(script.Parent.Credits:GetChildren()) do v.Visible = true _G.NumberToText(v, 0.15, 0.01) end end Deb = false elseif Butt.Name == "News" then ClearScreen() if Deb then return end script.Parent.News.Visible = not script.Parent.News.Visible Deb = true if script.Parent.News.Title.Visible then for _,v in pairs(script.Parent.News:GetChildren()) do v.Visible = false end else for _,v in pairs(script.Parent.News:GetChildren()) do v.Visible = true _G.NumberToText(v, 0.15, 0.01) end end Deb = false elseif Butt.Name == "RaidReg" then ClearScreen() script.Parent.RaidReg.Visible = not script.Parent.RaidReg.Visible end end
for _, Container in pairs(script.Parent.Menu:GetChildren()) do if Container.className == "Frame" then for _,Button in pairs(Container:GetChildren()) do Button.MouseEnter:connect(function() _G.PlaceBackdrop(Button) _G.OpenBackdrop(Button.Backdrop) end) Button.MouseLeave:connect(function() _G.CloseBackdrop(Button) end) Button.MouseButton1Up:connect(function() _G.CloseBackdrop(Button) CallButton(Button) end) Button.MouseButton2Up:connect(function() _G.CloseBackdrop(Button) end) Button.MouseButton2Down:connect(function() _G.CloseBackdrop(Button) end) end end end
Left.Store.MouseButton1Down:connect(function() if Player:IsInGroup(674982) then Shop.Title.Text = "Orbital Military Market" end if Player.TeamColor ~= game.Teams.Visitors.TeamColor then Shop.Visible = not Shop.Visible end end)
--// Health Bar & Shielding local Shield = Instance.new("IntValue", Player.Character) Shield.Name = "ShieldP" local MaxShield = Instance.new("IntValue", Player.Character) MaxShield.Name = "MaxShield" MaxShield.Value = 10 local Disable = Instance.new("BoolValue", Player.Character) Disable.Name = "Disabled" Disable.Value = false local Impact = Instance.new("BoolValue", Player.Character) Impact.Name = "Impact" Impact.Value = false BaseShield = 10 local ShieldPart = script.Shield
ApplyShielding = function(Player) local Player = game.Players.LocalPlayer local Character = Player.Character ShieldPart=script.Shield Weld=Instance.new("Weld") Weld.Part0=Character.Torso Weld.Part1=ShieldPart Weld.C1=CFrame.new(0,0.4,0) Weld.Parent=ShieldPart ShieldPart.Parent=Character Ob = Instance.new("ObjectValue", script) Ob.Name = "ShieldPart" Ob.Value = ShieldPart Ob.Value.Anchored = false end
ShieldFX = function() for i = 1,6 do script.ShieldPart.Value.Transparency = (0.4 + (i*0.1)) wait(0.1) end end
ShieldRecharge = function() if not DB then Recharge = true DB = true local Charge = 0 ShieldPart.Charge:Play() while Shield.Value < MaxShield.Value do wait(0.3) if Charge >= 6 then if Recharge and not Impact.Value then if SDB == false then SDB = true ShieldPart.Charge:Play() end if Shield.Value ~= MaxShield.Value then if Shield.Value >= MaxShield.Value then Shield.Value = MaxShield.Value elseif Shield.Value < MaxShield.Value then Shield.Value = Shield.Value +1 end end elseif Impact.Value then Impact.Value = false Charge = 0 ShieldPart.DCharge:Play() SDB = false else break end else Charge = Charge +0.3 end end Charge = 0 Recharge = false DB = false SDB = false end end
ShieldChange = function() ShieldFX() Right.Shield.Bar.Size = UDim2.new((Shield.Value/MaxShield.Value), 0, 0, 10) Right.Shield.Bar.Position = UDim2.new(-(Shield.Value/MaxShield.Value),200,0,0) if Shield.Value <= 0 then Shield.Value = 0 Right.Shield.Bar.Size = UDim2.new((Shield.Value/MaxShield.Value), 0, 0, 10) Right.Shield.Bar.Position = UDim2.new(-(Shield.Value/MaxShield.Value),200,0,0) ShieldPart.DCharge:Play() Recharge = true ShieldRecharge() end if not DB then ShieldRecharge() end end
--[[ if Player:FindFirstChild("Shielding") then if Player:IsInGroup(412978) and not Player:IsInGroup(418206) then MaxShield.Value = BaseShield*1.25 Shield.Value = BaseShield*1.25 elseif Player:IsInGroup(418206) then MaxShield.Value = BaseShield*1.6 Shield.Value = BaseShield*1.6 else MaxShield.Value = BaseShield Shield.Value = BaseShield end else Shield.Value = 0 MaxShield.Value = 0 end ]]--
Shield.Changed:connect(ShieldChange) Player.Character.Humanoid.Changed:connect(HealthChange) ApplyShielding() ShieldRecharge()
Char.Humanoid.Changed:connect(function() Right.Health.Bar.Size = UDim2.new((Char.Humanoid.Health/Char.Humanoid.MaxHealth),0,0,10) Right.Health.Bar.Position = UDim2.new(-(Char.Humanoid.Health/Char.Humanoid.MaxHealth),215,0,0) end) |
|
|
| Report Abuse |
|
| |
|
| 13 Dec 2013 05:05 PM |
i don't see any problems with it it looks fine |
|
|
| Report Abuse |
|
|
| 13 Dec 2013 05:10 PM |
| it wont work with the team change |
|
|
| Report Abuse |
|
DeusCael
|
  |
| Joined: 26 Oct 2013 |
| Total Posts: 24433 |
|
|
| 13 Dec 2013 05:11 PM |
does this look like script helpers to you?
[-DC-] |
|
|
| Report Abuse |
|
cop346
|
  |
| Joined: 16 Jul 2010 |
| Total Posts: 9303 |
|
|
| 13 Dec 2013 05:13 PM |
i think i know the problem
now you want it for just rcw cause ill make it |
|
|
| Report Abuse |
|
|
| 13 Dec 2013 05:14 PM |
hm game.Players.PlayerAdded:connect(function(plr) if plr:IsInGroup(674982) then player.TeamColor = game.Teams["YourTeamNameHere"] end end) |
|
|
| Report Abuse |
|
| |