generic image
Processing...
  • Games
  • Catalog
  • Develop
  • Robux
  • Search in Players
  • Search in Games
  • Search in Catalog
  • Search in Groups
  • Search in Library
  • Log In
  • Sign Up
  • Games
  • Catalog
  • Develop
  • Robux
   
ROBLOX Forum » Club Houses » Clans & Guilds
Home Search
 

Re: fix this make it workable for rcw group id > 674982

Previous Thread :: Next Thread 
ImagineChaos is not online. ImagineChaos
Joined: 19 Oct 2013
Total Posts: 571
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
ImagineChaos is not online. ImagineChaos
Joined: 19 Oct 2013
Total Posts: 571
13 Dec 2013 05:03 PM
b1
Report Abuse
Speedycub100 is not online. Speedycub100
Joined: 26 Jul 2011
Total Posts: 6630
13 Dec 2013 05:05 PM
i don't see any problems with it
it looks fine
Report Abuse
ImagineChaos is not online. ImagineChaos
Joined: 19 Oct 2013
Total Posts: 571
13 Dec 2013 05:10 PM
it wont work with the team change
Report Abuse
DeusCael is not online. 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 is not online. 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
LordOfTheAtoms is not online. LordOfTheAtoms
Joined: 22 Jul 2012
Total Posts: 4030
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
ImagineChaos is not online. ImagineChaos
Joined: 19 Oct 2013
Total Posts: 571
13 Dec 2013 05:38 PM
thanks guys
Report Abuse
Previous Thread :: Next Thread 
Page 1 of 1
 
 
ROBLOX Forum » Club Houses » Clans & Guilds
   
 
   
  • About Us
  • Jobs
  • Blog
  • Parents
  • Help
  • Terms
  • Privacy

©2017 Roblox Corporation. Roblox, the Roblox logo, Robux, Bloxy, and Powering Imagination are among our registered and unregistered trademarks in the U.S. and other countries.



Progress
Starting Roblox...
Connecting to Players...
R R

Roblox is now loading. Get ready to play!

R R

You're moments away from getting into the game!

Click here for help

Check Remember my choice and click Launch Application in the dialog box above to join games faster in the future!

Gameplay sponsored by:
Loading 0% - Starting game...
Get more with Builders Club! Join Builders Club
Choose Your Avatar
I have an account
generic image