Today I search a script, this script is only for USGN (In Script). If I say "!goto id" I go to the player with the id and if I say "!bring id" the player with the id come to me.Please help !
Thanks you so much !
iDios
Scripts
Script "Go to" and "Bring".
Script "Go to" and "Bring".
1

Today I search a script, this script is only for USGN (In Script). If I say "!goto id" I go to the player with the id and if I say "!bring id" the player with the id come to me.addhook("say","mov_stuff")
function mov_stuff(id,txt)
	if string.sub(txt,1,5)=="!goto" then
		local x = player(string.sub(txt,7,string.len(txt)),"x")
		local y = player(string.sub(txt,7,string.len(txt)),"y")
		parse("setpos "..id.." "..x.." "..y)
		return 1
	elseif string.sub(txt,1,6)=="!bring" then
		local x = player(id,"x")
		local y = player(id,"y")
		parse("setpos "..string.sub(txt,8,string.len(txt)).." "..x.." "..y)
		return 1
	else
		return 0
	end
end
AdminList = {USGN,ID}
function Admins(id)
for _, usgn in ipairs(AdminList) do
if player(id,'usgn') == usgn then
return true
end
end
return false
end
addhook('say','adminCommands',-1)
function adminCommands(id,words)
	if Admins(id) and words:sub(1,1) =='!' then
		local command = words:lower():sub(2,2)
		if words:sub(3,3) ~= ' ' and #words ~= 2 then return end
		print(player(id,'name')..' used a command:'..words)
		if command == 'k' then
			kick=tonumber(words:sub(3,5))
			msg("©255255255"..(player(kick,"name")).." has been kicked by "..(player(id,"name")).."@C")
			parse("kick "..kick)
			return 1
		elseif command == 'x' then
			b=tonumber(string.sub(words,3,5))
			msg("©255255255"..(player(b,"name")).." has been banned by "..(player(id,"name")).."@C")
			parse("banname "..b)
			return 1
		elseif command =='a' then
			local distance = tonumber(words:sub(4))
			if distance then
				local rot = math.rad(player(id,'rot')-180)
				local x, y = -math.sin(rot)*distance*32, math.cos(rot)*distance*32
				parse('setpos '..id..' '..player(id,'x')+x..' '..player(id,'y')+y)
			else
				msg2(id,'Teleport forward: "!a <distance>"')
			end
			return 1
		elseif command =='b' then
			msg('©255100100'..player(id,'name')..' : '..words:sub(4)..'@C')
			return 1
		elseif command ==bring' then
			local target = tonumber(words:sub(4))
			if target then
				if player(target,'exists') then
					if target == id then
						msg2(id,'You may not teleport to yourself!')
					end
					parse('setpos '..target..' '..player(id,'x')..' '..player(id,'y'))
					return 1
				end
			end
			msg2(id,'Teleport a player to you: "!c <targetid>"')
			return 1
		elseif command =='d' then
			msg('©255100100'..words:sub(4)..'@C')
			return 1
		elseif command =='e' then
			local dmg = tonumber(words:sub(4))
			if dmg then
				parse('explosion '..player(id,'x')..' '..player(id,'y')..' '..dmg..' '..dmg..' '..id)
				return 1
			end
			msg2(id,'Spawn explosion: "!e <dmg>"')
			return 1
		elseif command =='i' then
			local itemid = tonumber(words:sub(4))
			if itemid then
				additem(id,itemid)
				return 1
			end
			msg2(id,'Spawn item: "!i <itemid>"')
			return 1
		elseif command =='h' then
			local s = words:find(' ',4)
			local target = tonumber(words:sub(4,s))
			if target then
				if player(target,'exists') then
					local heal = s and tonumber(words:sub(s+1,words:find(' ',s+1))) or nil
					if heal then
						parse('explosion '..player(target,'x')..' '..player(target,'y')..' 1 '..(-heal))
						return 1
					end
				end
			end
			msg2(id,'Heal player: "!h <targetid> <amount>"')
			return 1
		elseif command =='l' then
			local script = words:sub(3)
			if script then
				msg2(id,tostring(assert(loadstring(script))() or 'done!'))
				return
			end
			msg2(id,'Run lua script: "!l <script>"')
			return 1
		elseif command =='n' then
			msg2(id,'{'..player(id,'tilex')*32+16 ..', '..player(id,'tiley')*32+16 ..'}')
			return 1
		elseif command =='o' then
			msg2(id,'{'..player(id,'tilex')..', '..player(id,'tiley')..'}')
			return 1
		elseif command =='p' then
			msg2(id,'{'..player(id,'x')..', '..player(id,'y')..'}')
			return 1
		elseif command =='q' then
			local length = tonumber(words:sub(3))
			if length then
				length = math.min(length*50,250)
				for _, id in ipairs(player(0,'table')) do
					parse('shake '..id..' '..length)
				end
				for i = 1, 6 do
					if math.random(0,1) == 1 then
						parse('sv_sound weapons/explode'..i..'.wav')
					end
				end
			else
				msg2(id,'Earthquake: "!q <length in seconds, max 5>"')
			end
			return 1
		elseif command =='s' then
			local s = words:find(' ',4)
			local target = tonumber(words:sub(4,s))
			if target then
				if player(target,'exists') then
					local speed = s and tonumber(words:sub(s+1,words:find(' ',s+1))) or nil
					if speed then
						parse('speedmod '..target..' '..speed)
						return 1
					end
				end
			end
			msg2(id,'Speed modifier: "!s <targetid> <speedmod, between -100 and 100>"')
			return 1
		elseif command =='t' then
			local target = tonumber(words:sub(3))
			if target then
				if player(target,'exists') then
					if target == id then
						msg2(id,'You may not teleport to yourself!')
					end
					parse('setpos '..id..' '..player(target,'x')..' '..player(target,'y'))
					return 1
				end
			end
			msg2(id,'Teleport to player: "!t <targetid>"')
			return 1
		elseif command =='u' then
			local delay = tonumber(words:sub(3)) or 0
			shutdown(delay*1000)
			return 1
		elseif command =='v' then
			saveserver()
			msg2(id,'Saved server!')
			return 1
		elseif command =='sh' then
			local sh = words:find(' ',4)
			local target = tonumber(words:sub(4,sh))
			if target then
				if player(target,'exists') then
					local setmaxhp = sh and tonumber(words:sub(s+1,words:find(' ',s+1))) or nil
					if setmaxhp then
						parse('setmaxhealth '..target..' '..setmaxhp)
					end
				end
			end
		end
	end
end
adms = {}
addhook("say","mov_stuff")
function mov_stuff(id,txt)
	if string.sub(txt,1,5)=="!goto" and chkmem(id)==1 then
		local x = player(string.sub(txt,7,string.len(txt)),"x")
		local y = player(string.sub(txt,7,string.len(txt)),"y")
		parse("setpos "..id.." "..x.." "..y)
		return 1
	elseif string.sub(txt,1,6)=="!bring" and chkmem(id)==1 then
		local x = player(id,"x")
		local y = player(id,"y")
		parse("setpos "..string.sub(txt,8,string.len(txt)).." "..x.." "..y)
		return 1
	else
		return 0
	end
end
function addmem(usgn)
	loadstring("adms['"..usgn.."'] = {}, local M = adms['"player(id,"usgn")"']")
end
function chkmem(id)
	if adms[(''..player(id,"usgn")..'')] then
		return 1
	else
		return 0
	end
end
addmem(1234) -- This will be yours and others usgn things.
addmem(5678) -- Etc
addmem(7709) -- Double ETc
addmem(USGIN_ID_HERE)

1
