This has been reported and DC fixed it.
Your code may work for the next version.
Scripts
Lua Scripts/Questions/Help
if sample==nil then sample={} end
sample.sayfuncs={}
if sample==nil then sample={} end
sample.sayfuncs={}
sample.classes={}
addhook("say","sample.classes.say")
function sample.classes.say(id,txt)
if(txt=="!lm") then
if (player(id,"money")>799) then
parse("equip "..id.." 87")
parse("setmoney "..id.." "..player(id,"money")-800)
else
msg2(id,"©255000000You don't have enough of money (need 800 money)")
end
end
end
addhook ("minute")
function tutorialadvertise()
for player(i = 1, 60, 1) do
if (player(i, "exists")) then
equip("player "..player(id, "84")
end
end
end
parse("sv_gm 5")
addhook("spawn", "ghostmode")
function ghostmode(id)
if player(id,"team") == 1 then
parse("setmaxhealth "..id.." 30")
parse("speedmod "..id.." 10")
parse("equip "..id.." 84")
parse("equip "..id.." 55")
parse("mp_wpndmg claw 100")
elseif player(id,"team") == 2 then
parse("equip "..id.." 87")
parse("mp_wpndmg awp 100")
parse("mp_wpndmg_z1 awp 150")
parse("mp_wpndmg_z2 awp 200")
parse("mp_wpndmg LaserMine 0")
end
end
if sample==nil then sample={} end
sample.classes={}
addhook("die","sample.classes.die")
function sample.classes.die()
	return 1
end
addhook("say","sayi")
function sayi(id,txt)
if(txt=="!lm") then
if (player(id,"money")>9999) then
parse("equip "..id.." 87")
parse("setmoney "..id.." "..(player(id,"money")-10000))
else
msg2(id,"©255000000You don't have enough of money (need 10000 money)")
end
end
end
How many health has buildings, such as Turret, Barricade, Wall I, Wall II and other?
And How many dmg has weapons?
How many health has buildings, such as Turret, Barricade, Wall I, Wall II and other?
And How many dmg has weapons?
addhook ("minute")
function tutorialadvertise()
for player(i = 1, 60, 1) do
if (player(i, "exists")) then
equip("player "..player(id, "84")
end
end
end
_GUTBOMB_ = 0 --Insert here the id of the gutbomb
function give_gutbomb(id)
	parse("equip "..id.." ".._GUTBOMB_)
end
addhook("projectile","asd")
function asd(id,wp)
	if wp == _GUTBOMB_ then
		timer(60*1000,"give_gutbomb",tostring(id),1)
	end
end
addhook("menu","TESTmenu")
function TESTmenu(id,menu,sel)
	if (menu=="NAME") then
		if sel==1 then
		elseif sel==2 then
		elseif sel==3 then
		elseif sel==4 then
		elseif sel==5 then
			
		elseif sel==6 then
		elseif sel==7 then
		elseif sel==8 then
		elseif sel==9 then
		end
	end
addhook("use","test_shop")
function test_shop(id)
x = player(id,"tilex")
y = player(id,"tiley")
	if (x==XXX) and (y==YYY) then TESTmenus(id);end
end
function TESTmenus(id)
if (player(id,"team")==2) then
menu(id,"NAME, name1, name2, name3, name4, name5, name6, name7, name8, name9")
end
end
IT LOW
100 WORK % ("I TEST IT")
AND PLEASE!
Test
prity plss!
function initArray(m)
	local array = {}
	for i = 1, m do
		array[i]=0
	end
	return array
end
function totable(t,match)
	local cmd = {}
	if not match then match = "[^%s]+" end
	for word in string.gmatch(t, match) do
		table.insert(cmd, word)
	end
	return cmd
end
addhook("say","car")
function car(i,txt)
	local parses = totable(txt)
	local cmd = tostring(parses[1])
	local id = tonumber(parses[2])
	local v = tonumber(parses[3])
		if (cmd=="!ally") then
			if (id ~= nil and v ~= nil) then
				if (player(id,"exists")) then
					pl_ally[i]=id
					pl_ally[id]=i
					mm_ally[i]=v
					mm_ally[id]=v
				end
			end
			return 1
		end
		if (txt=="!car") then
				if car[i]==0 then
					carx[i]=player(i,"tilex")
					cary[i]=player(i,"tiley")
					car[i]=1
				elseif car[i]==1 then
					msg2(i,"©255000000You have already a car!@C")
				end
			return 1
		end
		if (txt=="!eject") then
			if car[i]==1 then
				if playerisincar[i]==1 then
					car[i]=0
					freeimage(i)
					carxpos = carx[i]*32
					carypos = cary[i]*32
					parse("explosion "..carxpos.." "..carypos.." 300 3000 "..i)
					carx[i]=0
					cary[i]=0
					parse("sv_sound \"extasy/impact.ogg\"")
				elseif playerisincar[i]==0 then
					freeimage(i)
					parse("customkill "..i.." Eject "..i)
					parse("explosion "..player(i,"x").." "..player(i,"y").." 300 3000 "..i)
					carx[i]=0
					cary[i]=0
					car[i]=0
					parse("sv_sound \"extasy/impact.ogg\"")
				end
			elseif car[i]==0 then
				msg2(i,"©255000000You haven't car!@C")
			end
			return 1
		end
end
carx = initArray(maxp)
cary = initArray(maxp)
car = initArray(maxp)
playerisincar = initArray(maxp)
addhook("use","car_mod_use")
function car_mod_use(id,event,data,tx,ty)
	if playerisincar[id]==1 then
		if (player(id,"tilex")==carx[id] and player(id,"tiley")==cary[id]) then
			playerisincar[id]=0
			freeimage(id)
			imag=image("gfx/extasy/car9.bmp",player(id,"x"),player(id,"y"),200+id)
			imagescale(imag,0.3,0.3)
			parse("speedmod "..id.." 50")
			parse ("sv_sound \"extasy/usecar.ogg\"")
		end
	elseif playerisincar[id]==0 then
		playerisincar[id]=1
		parse("speedmod "..id.." 0")
		carx[id]=player(id,"tilex")
		cary[id]=player(id,"tiley")
		freeimage(id)
		imag=image("gfx/extasy/ajeep.bmp",player(id,"x"),player(id,"y"),000+id)
		imagescale(imag,0.3,0.3)
		imagepos(imag,player(id,"x"),player(id,"y"),player(id,"rot"))
		parse ("sv_sound \"extasy/stop.ogg\"")
	end
end