In-Game Script Loader

function theloader(player,cmd,args)
	local truepath = "vinci/"..args[1]
	if file.Exists(truepath,"GAME") then
		local contents = file.Read(truepath,"GAME")
		assert(CompileString( contents, tostring(math.random()) ))()
	else
		Msg("File not found.")
	end
end

function theautocomplete()
	local thelist = {}
	local list = file.Find("vinci/*.lua","GAME")
	for _, f in pairs(list) do
		table.insert(thelist,"vinci_load "..f)
	end
	return thelist
end



concommand.Add( "vinci_load", theloader, theautocomplete )