Script crashing game? Please help


local WepTable={}
WepTable[1] * * * = "weapon_crowbar"
WepTable[2] * * * = "weapon_stunstick"
WepTable[3] * * * = "weapon_pistol"
WepTable[4] * * * = "weapon_shotgun"
WepTable[5] * * * = "weapon_rpg"
WepTable[6] * * * = "weapon_crossbow"
WepTable[7] * * * = "weapon_frag"
WepTable[8] * * * = "weapon_bugbait"
WepTable[9] * * * = "weapon_ar2"
WepTable[10] * * * = "weapon_357"
WepTable[11] * * * = "weapon_smg1"
function MainFrame()
* * * * MainFrame = vgui.Create("DFrame")
* * * * MainFrame:SetPos(25,25)
* * 	MainFrame:SetSize(300,400)
* * * * MainFrame:SetTitle("AdminPanel")
* * * * MainFrame:MakePopup()
		GodModeButton = vgui.Create( "DButton", MainFrame )
		GodModeButton:SetPos( 5, 25 ) 
		GodModeButton:SetSize( 100, 30 ) 
		GodModeButton:SetText( "GodMode On/Off")
		GodModeButton.DoClick = function()
		GodPlayers = DermaMenu()
			for k, v in pairs(player.GetAll()) do
				GodPlayers:AddOption(v:Nick(),function() RunConsoleCommand("god",v:SteamID()) *end)
			end
			GodPlayers:Open()
			end
			SlayButton = vgui.Create( "DButton", MainFrame )
		SlayButton:SetPos( 5, 65 ) 
		SlayButton:SetSize( 100, 30 ) 
		SlayButton:SetText( "Slay")
		SlayButton.DoClick = function()
		SlayPlayers = DermaMenu()
			for k, v in pairs(player.GetAll()) do
				SlayPlayers:AddOption(v:Nick(),function() RunConsoleCommand( "slay",v:SteamID()) *end)
				
			end
			SlayPlayers:AddOption("All",GiveAll)
			RunConsoleCommand("M1kep_GiveAll") end)
			SlayPlayers:Open()
			end
		FreezeButton = vgui.Create( "DButton", MainFrame )
		FreezeButton:SetPos( 5, 105 ) 
		FreezeButton:SetSize( 100, 30 ) 
		FreezeButton:SetText( "Freeze")
		FreezeButton.DoClick = function()
		FreezePlayers = DermaMenu()
			for k, v in pairs(player.GetAll()) do
				FreezePlayers:AddOption(v:Nick(),function() RunConsoleCommand("freeze",v:SteamID()) *end)
			end
			FreezePlayers:AddOption("All",FreezeAll)
			FreezePlayers:Open()
			end
			SpawnButton = vgui.Create( "DButton", MainFrame )
		SpawnButton:SetPos( 5, 145 ) 
		SpawnButton:SetSize( 100, 30 ) 
		SpawnButton:SetText( "Spawn")
		SpawnButton.DoClick = function()
		SpawnPlayers = DermaMenu()
			for k, v in pairs(player.GetAll()) do
				SpawnPlayers:AddOption(v:Nick(),function() RunConsoleCommand("Spawn",v:SteamID()) *end)
			end
			SpawnPlayers:Open()
			end
		GiveWeps = vgui.Create( "DButton", MainFrame )
		GiveWeps:SetPos( 5, 185 ) 
		GiveWeps:SetSize( 100, 30 ) 
		GiveWeps:SetText( "All Weapons")
		GiveWeps.DoClick = function()
		GiveWepsPlayers = DermaMenu()
			for k, v in pairs(player.GetAll()) do
				GiveWepsPlayers:AddOption(v:Nick(),AllWeps(v:SteamID()))
			end
			GiveWepsPlayers:Open()
			end
		
		end
		concommand.Add("+1Main", MainFrame)

function Close()

	MainFrame:Remove()

end
concommand.Add("-1Main",Close)
function AllWeps( SteamID )
*for I = 1,11 do*
*RunConsoleCommand("GiveWeapon" , SteamID,WepTable*)*

* *end
*end
*concommand.Add("AllWeps",AllWeps)
*
*function FreezeAll()
*for k, v in pairs(player.GetAll()) do*
*RunConsoleCommand("Freeze" , v:SteamID())*
*end
*end


Ok so when I click the All Weps button it comes up with the list of players but then my game freezes and crashes.
Can anybody see why?

[editline]29th December 2011[/editline]

Wh are the stars there :confused: well just ignore the stars

[editline]30th December 2011[/editline]

Ok just tried it again its not crashing now,
It’s just reliable stream overflow and buffer overflow and I need to reconnect
Any help?

They are annoying errors. No way to stop them.

So my script wont work? How can i get it to work?
And when i say

It does this only when i click the “All Weapons” Button