Beiträge von Nevo

function createFactionVehicle ( model, x, y, z, rx, ry, rz, faction, c1, c2, c3, c4, numberplate )


	if not c3 then
		c3 = 0
	end

	if not c4 then
		c4 = 0
	end

	if not numberplate then
		numberplate = fraktionNames[faction]
	end

	local veh = createVehicle ( model, x, y, z, rx, ry, rz, numberplate )

	setVehicleColor ( veh, c1, c2, c3, c4 )
	setElementHealth ( veh, 1700 )
	setVehiclePaintjob ( veh, 3 )
	toggleVehicleRespawn ( veh, true )
	setVehicleRespawnDelay ( veh, FCarDestroyRespawn * 1000 * 60 )
	setVehicleIdleRespawnDelay ( veh, FCarIdleRespawn * 1000 * 60 )
	factionVehicles[faction][veh] = true

	vioSetElementData ( veh, "owner", fraktionNames[faction] )
	vioSetElementData ( veh, "ownerfraktion", faction )
	vioSetElementData ( veh, "sportmotor", ( faction == 10 and 3 or 2 ) )
	vioSetElementData ( veh, "bremse", ( faction == 10 and 3 or 2 ) )
	vioSetElementData ( veh, "antrieb", "awd" )
	setElementFrozen ( veh, true )

	if faction ~= 1 and faction ~= 6 and faction ~= 8 then
		addEventHandler ( "onVehicleStartEnter", veh, function ( player, seat, jacked )
			if seat == 0 and vioGetElementData ( player, "fraktion" ) ~= faction then
				if not jacked then
					cancelEvent ()
				end
			else
				setElementFrozen ( source, false )
			end
		end )

		addEventHandler ( "onVehicleEnter", veh, function ( player, seat, jacked )
			if seat == 0 and vioGetElementData ( player, "fraktion" ) ~= faction and jacked then
				setElementVelocity ( source, 0, 0, 0 )
				setControlState ( player, "enter_exit", false )
				setTimer ( removePedFromVehicle, 750, 1, player )
				setTimer ( setControlState, 150, 1, player, "enter_exit", false )
				setTimer ( setControlState, 200, 1, player, "enter_exit", true )
				setTimer ( setControlState, 700, 1, player, "enter_exit", false )
				infobox ( player, "Du bist keiner\nvon "..fraktionNames[faction].."!", 4000, 255, 0, 0 )
			end
		end )
	else
		addEventHandler ( "onVehicleStartEnter", veh, function ( player, seat, jacked )
			if seat == 0 and not isOnDuty ( player ) then
				if not jacked then
					cancelEvent ()
				end
			else
				setElementFrozen ( source, false )
			end
		end )

		addEventHandler ( "onVehicleEnter", veh, function ( player, seat, jacked )
			if seat == 0 and not isOnDuty ( player ) and jacked then
				setControlState ( player, "enter_exit", false )
				setTimer ( removePedFromVehicle, 750, 1, player )
				setTimer ( setControlState, 150, 1, player, "enter_exit", false )
				setTimer ( setControlState, 200, 1, player, "enter_exit", true )
				setTimer ( setControlState, 700, 1, player, "enter_exit", false )
				infobox ( player, "Du bist keiner\nvon "..fraktionNames[faction].."!", 4000, 255, 0, 0 )
			end
		end )
	end


	if faction == 1 then
		addEventHandler ( "onVehicleEnter", veh,
			function ( player, seat )
				local veh = source
				if not isKeyBound ( player, "sub_mission", "down", policeComputer ) then
					bindKey ( player, "sub_mission", "down", policeComputer )
				end
			end )

	elseif faction == 6 then
		addEventHandler ( "onVehicleEnter", veh,
			function ( player, seat )
				local veh = source
				if not isKeyBound ( player, "sub_mission", "down", policeComputer ) then
					bindKey ( player, "sub_mission", "down", policeComputer )
				end
			end )

	elseif faction == 8 then
		addEventHandler ( "onVehicleEnter", veh,
			function ( player, seat )
				local veh = source
				if getPedOccupiedVehicleSeat ( player ) == 0 then
					if not isKeyBound ( player, "sub_mission", "down", policeComputer ) and getElementModel ( veh ) ~= 520 then
						bindKey ( player, "sub_mission", "down", policeComputer )
					end

					if getElementModel ( veh ) == 433 then

						setElementHealth ( player, 100 )
						setPedArmor ( player, 100 )
						setElementHunger ( player, 100 )

					elseif getElementModel ( veh ) == 432 then

						if vioGetElementData ( player, "job" ) ~= "tankcommander" then
							opticExitVehicle ( player )
							outputChatBox ( "Du hast nicht die erforderliche Klasse!", player, 125, 0, 0 )
						end

					elseif getElementModel ( veh ) == 425 or getElementModel ( veh ) == 520 then

						if vioGetElementData ( player, "job" ) ~= "air" then
							opticExitVehicle ( player )
							outputChatBox ( "Du hast nicht die erforderliche Klasse!", player, 125, 0, 0 )
						end	

					elseif getElementModel ( veh ) == 563 or getElementModel ( veh ) == 595 then

						if vioGetElementData ( player, "job" ) ~= "marine" and seat == 0 then
							opticExitVehicle ( player )
							outputChatBox ( "Du hast nicht die erforderliche Klasse!", player, 125, 0, 0 )
						else
							giveWeapon ( player, 46, 3, true )
						end


					end

				else


					if not isKeyBound ( player, "sub_mission", "down", policeComputer ) and isOnDuty( player ) then
						bindKey ( player, "sub_mission", "down", policeComputer )
					end

					if getElementModel ( veh ) == 433 then

						setElementHealth ( player, 100 )
						setPedArmor ( player, 100 )
						setElementHunger ( player, 100 )

					end

				end
			end )

	end
	giveSportmotorUpgrade ( veh )

	return veh

end

factionVehicles[14] = {}


function isAdacCar ( car )
	if factionVehicles[14][car] then return true else return false end
end


function isAdac(player)
	if tonumber(vioGetElementData ( player, "fraktion" )) == 14 then return true else return false end
end


function isEmergencyOnDuty(player)


	local model = getElementModel(player) 

	if isMedic (player) then
		for i=1, #factionSkins[10] do
			if factionSkins[10][i] == model then		
				return true		
			end	
		end

	elseif isMechaniker (player) then
		for i=1, #factionSkins[11] do
			if factionSkins[11][i] == model then		
				return true		
			end	
		end

	elseif isAdac (player) then
		for i=1, #factionSkins[14] do
			if factionSkins[14][i] == model then		
				return true		
			end	
		end
	end

	return false
end


function isEvil(player)
	if isMafia(player) or isTriad(player) or isTerror(player) or isAztecas(player) or isBiker(player) or isBallas(player) or isGrove(player) then return true else return false end
end


function isEmergency(player)
	if isMedic(player) or isMechaniker(player) or isAdac(player) then return true else return false end
end


function isInDepotFaction(player)
	return true
end


function startFrespawn ( player )
	frespawnTimer[getPlayerFaction ( player )] = nil
	local frak = vioGetElementData ( player, "fraktion" )
	if frak == 1 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 2 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) and getElementDimension ( veh ) ~= diegangwardimension then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end	
	elseif frak == 3 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) and getElementDimension ( veh ) ~= diegangwardimension then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 4 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 5 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 6 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 7 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) and getElementDimension ( veh ) ~= diegangwardimension then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 8 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 9 then
		for veh, _ in pairs ( factionVehicles[frak] ) do
			if not getVehicleOccupant ( veh ) and getElementDimension ( veh ) ~= diegangwardimension then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 10 then
		for i=1, #medicVehicles do
			if not getVehicleOccupant ( medicVehicles[i] ) then
				respawnVehicle ( medicVehicles[i] )
				setElementFrozen ( medicVehicles[i], true )
			end
		end
	elseif frak == 11 then
		for i=1, #mechanikerVehicles do
			if not getVehicleOccupant ( mechanikerVehicles[i] ) then
				respawnVehicle ( mechanikerVehicles[i] )
				setElementFrozen ( mechanikerVehicles[i], true )
			end		
		end
	elseif frak == 12 then
		for veh,_ in pairs (factionVehicles[12]) do
			if not getVehicleOccupant ( veh ) and getElementDimension ( veh ) ~= diegangwardimension then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 13 then
		for veh, _ in pairs (factionVehicles[13]) do
			if not getVehicleOccupant ( veh ) and getElementDimension ( veh ) ~= diegangwardimension then
				respawnVehicle ( veh )
				setElementFrozen ( veh, true )
			end
		end
	elseif frak == 14 then
		for i=1, #adacVehicles do
			if not getVehicleOccupant ( adacVehicles[i] ) then
				respawnVehicle ( adacVehicles[i] )
				setElementFrozen ( adacVehicles[i], true )
			end		
		end
	end
end

addEventHandler ( "onPlayerConnect", getRootElement(), function ( nick, ip, uname, serial )
	if nick == "Player" then
		cancelEvent ( true, "Bitte wähle einen Nickname ( Unter \"Settings\" )" )
	elseif string.find ( nick, "mtasa" ) then
		cancelEvent ( true, "Fuck you!" )
	elseif string.find ( nick, "'" ) then
		cancelEvent ( true, "Bitte kein ' benutzen!" )
	else
		local result = nil
		if playerUID[nick] then 
			result = dbPoll ( dbQuery ( handler, "SELECT STime, Grund, AdminUID FROM ?? WHERE UID=? OR ??=?", "ban", playerUID[nick], "Serial", serial ), -1 )
		else
			result = dbPoll ( dbQuery ( handler, "SELECT STime, Grund, AdminUID FROM ?? WHERE ??=?", "ban", "Serial", serial ), -1 )
		end
		local deleteit = false
		if result and result[1] then
			for i=1, #result do
				if result[i]["STime"] ~= 0 and ( result[i]["STime"] - getTBanSecTime ( 0 ) ) <= 0 then
					deleteit = true
				else
					local reason = result[i]["Grund"]
					local admin = playerUIDName[tonumber ( result[i]["AdminUID"] )]
					local diff = math.floor ( ( ( result[i]["STime"] - getTBanSecTime ( 0 ) ) / 60 ) * 100 ) / 100
					if diff >= 0 then
						cancelEvent ( true, "Du bist noch "..diff.." Stunden von "..tostring(admin).." gesperrt, Grund: "..tostring(reason) )
					else
						cancelEvent ( true, "Du wurdest permanent von "..tostring(admin).." gesperrt, Grund: "..tostring(reason) )
					end
					return
				end
			end
			if deleteit then
				if playerUID[nick] then
					dbExec ( handler, "DELETE FROM ?? WHERE UID=? OR Serial=?", "ban", "UID", playerUID[nick], serial )
				else
					dbExec ( handler, "DELETE FROM ?? WHERE Serial=?", "ban", serial )
				end
			end
		elseif getPlayerWarnCount ( nick ) >= 3 then
			cancelEvent ( true, "Du hast 3 Warns! Ablaufdatum des nächsten Warns: "..getLowestWarnExtensionTime ( nick ) )
		end
	end
	insertPlayerIntoLoggedIn ( nick, ip, serial )
end )