GetVehiclesCountByType - Revision history

Ahmed Ly at 22:49, 11 September 2017

2017-09-11T22:49:33Z

← Older revision		Revision as of 22:49, 11 September 2017
Line 48:		Line 48:
	<syntaxhighlight lang="lua">		<syntaxhighlight lang="lua">
	local types = {		local types = {
	"Automobile",		"Automobile",
	"Plane",		"Plane",
	"Bike",		"Bike",
	"Helicopter",		"Helicopter",
	"Boat",		"Boat",
	"Train",		"Train",
	"Trailer",		"Trailer",
	"BMX",		"BMX",
	"Monster Truck",		"Monster Truck",
	"Quad"		"Quad"
	}		}

	function outputVehicleCountToServerLog()		function outputVehicleCountToServerLog()
	for index, typeName in ipairs(types) do		for index, typeName in ipairs(types) do
	local count = getVehiclesCountByType(typeName)		local count = getVehiclesCountByType(typeName)
	outputServerLog(("Amount of '%s' vehicles: %d"):format(typeName, count))		outputServerLog(("Amount of '%s' vehicles: %d"):format(typeName, count))
	end		end
	end		end

	addEventHandler("onResourceStart", resourceRoot,		addEventHandler("onResourceStart", resourceRoot,
	function()		function ()
	outputVehicleCountToServerLog()		outputVehicleCountToServerLog()
	setTimer(outputVehicleCountToServerLog, ~~6e4~~, 0)		setTimer(outputVehicleCountToServerLog, 60e3, 0)
	end,		end,
	false)		false)
			</syntaxhighlight>
			</section>

			==Example 2==
			<section name="Server" class="server" show="true">
			This example writes the amount of vehicles on the specified type, and sends the results to the server console.
			<syntaxhighlight lang="lua">
			function getVehiclesCountByType(vehicleType)
			assert(type(vehicleType) == "string", "expected string at argument 1, got ".. type(vehicleType))

			local getVehicleType = getVehicleType -- Localize
			local vehicleList = getElementsByType("vehicle")
			local vehicleCount = #vehicleList
			local typeCount = 0

			for index = 1, vehicleCount do
			if getVehicleType(vehicleList[index]) == vehicleType then
			typeCount = typeCount + 1
			end
			end

			return typeCount
			end

			function IfElse(condition, resultTrue, resultFalse)
			if (not condition) then
			return resultFalse
			else
			return resultTrue
			end
			end

			local stringType = { ["Automobile"] = true,
			["Plane"] = true,
			["Bike"] = true,
			["Helicopter"] = true,
			["Boat"] = true,
			["Train"] = true,
			["Trailer"] = true,
			["BMX"] = true,
			["Monster Truck"] = true,
			["Quad"] = true
			}

			addCommandHandler("amountvehicle", function(aElement, commandName, typevehicle)
			if (getElementType(aElement) == "console") then
			if (type(typevehicle) ~= "string") or (tostring(typevehicle) == nil) or (tostring(typevehicle) == "") or (string.len(typevehicle) < 3) then
			outputServerLog("Correct syntax: amountvehicle <Type Vehicle>")
			return
			end
			if stringType[tostring(typevehicle)] then
			outputServerLog(("[Vehicles By Type - '%s'] - "..IfElse(getVehiclesCountByType(typevehicle) < 1, " Not found!", "Found '%s'")):format(typevehicle, getVehiclesCountByType(typevehicle)))
			else
			outputServerLog("#ERROR! The entered this syntax - '"..tostring(typevehicle).."' isn't correct")
			end
			end
			end)
	</syntaxhighlight>		</syntaxhighlight>
	</section>		</section>

Developer: /* Example */

2017-09-11T21:43:47Z

Example

← Older revision		Revision as of 21:43, 11 September 2017
Line 48:		Line 48:
	<syntaxhighlight lang="lua">		<syntaxhighlight lang="lua">
	local types = {		local types = {
	"Automobile",		"Automobile",
	"Plane",		"Plane",
	"Bike",		"Bike",
	"Helicopter",		"Helicopter",
	"Boat",		"Boat",
	"Train",		"Train",
	"Trailer",		"Trailer",
	"BMX",		"BMX",
	"Monster Truck",		"Monster Truck",
	"Quad"		"Quad"
	}		}

	function outputVehicleCountToServerLog()		function outputVehicleCountToServerLog()
	for index, typeName in ipairs(types) do		for index, typeName in ipairs(types) do
	local count = getVehiclesCountByType(typeName)		local count = getVehiclesCountByType(typeName)
	outputServerLog(("Amount of '%s' vehicles: %d"):format(typeName, count))		outputServerLog(("Amount of '%s' vehicles: %d"):format(typeName, count))
	end		end
	end		end

	addEventHandler("onResourceStart", resourceRoot,		addEventHandler("onResourceStart", resourceRoot,
	function ()		function()
	outputVehicleCountToServerLog()		outputVehicleCountToServerLog()
	setTimer(outputVehicleCountToServerLog, 6e4, 0)		setTimer(outputVehicleCountToServerLog, 6e4, 0)
	end,		end,
	false)		false)
	</syntaxhighlight>		</syntaxhighlight>

Developer: /* Example 2 */

2017-09-11T21:40:52Z

Example 2

@@ Line 73: / Line 73: @@
      end,
 false)
 </syntaxhighlight>
 </section>

Developer: /* Example */

2017-09-11T21:40:07Z

Example

← Older revision		Revision as of 21:40, 11 September 2017
Line 70:		Line 70:
	function ()		function ()
	outputVehicleCountToServerLog()		outputVehicleCountToServerLog()
	setTimer(outputVehicleCountToServerLog, ~~60e3~~, 0)		setTimer(outputVehicleCountToServerLog, 6e4, 0)
	end,		end,
	false)		false)

EnternalEnvy: /* Authors */

2016-12-19T23:08:54Z

Authors

← Older revision		Revision as of 23:08, 19 December 2016
Line 4:		Line 4:

	===Authors===		===Authors===
	* '''~~Uc.Setlings~~''': Original code and idea		* '''EnternalEnvy''': Original code and idea
	* '''Necktrox''': Code quality and performance edits		* '''Necktrox''': Code quality and performance edits

Uc.Setlings: /* Example 2 */

2016-04-29T19:18:33Z

Example 2

← Older revision		Revision as of 19:18, 29 April 2016
Line 98:		Line 98:

	function IfElse(condition, resultTrue, resultFalse)		function IfElse(condition, resultTrue, resultFalse)
	if (not condition) then		if (not condition) then
	return resultFalse		return resultFalse
	else		else
	return resultTrue		return resultTrue
	end		end
	end		end

Uc.Setlings: /* Example 2 */

2016-04-29T19:17:33Z

Example 2

← Older revision		Revision as of 19:17, 29 April 2016
Line 98:		Line 98:

	function IfElse(condition, resultTrue, resultFalse)		function IfElse(condition, resultTrue, resultFalse)
	if (condition) then return ~~resultTrue~~		if (not condition) then
	else return ~~resultFalse~~ end		return resultFalse
			else
			return resultTrue
			end
	end		end

Uc.Setlings: /* Example 2 */

2016-04-29T19:15:54Z

Example 2

← Older revision		Revision as of 19:15, 29 April 2016
Line 121:		Line 121:
	end		end
	if stringType[tostring(typevehicle)] then		if stringType[tostring(typevehicle)] then
	outputServerLog(("[Vehicles By Type - '%s'] - "..IfElse(getVehiclesCountByType(typevehicle) ~~== 0~~, " Not found!", "Found '%s'")):format(typevehicle, getVehiclesCountByType(typevehicle)))		outputServerLog(("[Vehicles By Type - '%s'] - "..IfElse(getVehiclesCountByType(typevehicle) < 1, " Not found!", "Found '%s'")):format(typevehicle, getVehiclesCountByType(typevehicle)))
	else		else
	outputServerLog("#ERROR! The entered this syntax - '"..tostring(typevehicle).."' isn't correct")		outputServerLog("#ERROR! The entered this syntax - '"..tostring(typevehicle).."' isn't correct")

Uc.Setlings: /* Example 2 */

2016-04-29T19:13:00Z

Example 2

← Older revision		Revision as of 19:13, 29 April 2016
Line 80:		Line 80:
	This example writes the amount of vehicles on the specified type, and sends the results to the server console.		This example writes the amount of vehicles on the specified type, and sends the results to the server console.
	<syntaxhighlight lang="lua">		<syntaxhighlight lang="lua">

	function getVehiclesCountByType(vehicleType)		function getVehiclesCountByType(vehicleType)
	assert(type(vehicleType) == "string", "expected string at argument 1, got ".. type(vehicleType))		assert(type(vehicleType) == "string", "expected string at argument 1, got ".. type(vehicleType))
Line 98:		Line 97:
	end		end

			function IfElse(condition, resultTrue, resultFalse)
			if (condition) then return resultTrue
			else return resultFalse end
			end

	local stringType = { ["Automobile"] = true,		local stringType = { ["Automobile"] = true,
Line 119:		Line 121:
	end		end
	if stringType[tostring(typevehicle)] then		if stringType[tostring(typevehicle)] then
	outputServerLog(("~~Amount of~~ '%s' ~~vehicles:~~ %d"):format(typevehicle, getVehiclesCountByType(typevehicle)))		outputServerLog(("[Vehicles By Type - '%s'] - "..IfElse(getVehiclesCountByType(typevehicle) == 0, " Not found!", "Found '%s'")):format(typevehicle, getVehiclesCountByType(typevehicle)))
	else		else
	outputServerLog("#ERROR! The entered this syntax - '"..tostring(typevehicle).."' isn't correct")		outputServerLog("#ERROR! The entered this syntax - '"..tostring(typevehicle).."' isn't correct")

Uc.Setlings: /* Example 2 */

2016-04-25T15:32:43Z

Example 2

← Older revision		Revision as of 15:32, 25 April 2016
Line 118:		Line 118:
	return		return
	end		end
	if ~~(type(typevehicle) == "string") and~~ stringType[tostring(typevehicle)] then		if stringType[tostring(typevehicle)] then
	outputServerLog(("Amount of '%s' vehicles: %d"):format(typevehicle, getVehiclesCountByType(typevehicle)))		outputServerLog(("Amount of '%s' vehicles: %d"):format(typevehicle, getVehiclesCountByType(typevehicle)))
	else		else