Beiträge von McJoker

addEvent( "onBankPedGetsCool", true )
function cancelPedDamageBank ( attacker )
	if not fac then return end
	if not attacker then
		cancelEvent ()
	end
	local fac = getElementData ( attacker, "fraktion" )
	if fac == 2 or fac == 3 or fac == 7 or fac == 9 or fac == 12 or fac == 13 or frac == 14 then
	else
		cancelEvent ()
	end	


end


function makeTheBankPedCool ( ped )


	addEventHandler ( "onClientPedDamage", ped, cancelPedDamageBank )


end


addEventHandler( "onBankPedGetsCool", getRootElement(), makeTheBankPedCool )

function contract_func ( player, cmd, name, geld )


	local target = getPlayerFromName ( name )
	if target and vioGetElementData ( target, "loggedin" ) then
		local geld = tonumber ( geld )
		if geld then
			local pmoney = tonumber ( vioGetElementData ( player, "money" ) )
			if pmoney >= geld then
				if geld >= mincontract then
					if not isHit( target ) then
						vioSetElementData ( player, "money", pmoney - geld )
						takePlayerMoney ( player, geld )
						playSoundFrontEnd ( player, 40 )
						triggerClientEvent ( player, "HudEinblendenMoney", getRootElement() )
						vioSetElementData ( target, "contract", tonumber ( vioGetElementData ( target, "contract" ) ) + geld )
						outputChatBox ( "Du hast "..geld.." $ Kopfgeld auf "..name.." ausgesetzt - ein Hitman wird sich bald um ihn kuemmern...", player, 0, 125, 0 )	
					end
				else
					outputChatBox ( "Bitte setze mindestens "..mincontract.." $ als Belohnung aus!", player, 125, 0, 0 )
				end
			else
				outputChatBox ( "Du hast nicht genug Geld, um einen Mord in Auftrag zu geben.", player, 125, 0, 0 )
			end
		else
			outputChatBox ( "Ungueltige Summe!", player, 125, 0, 0 )
		end
	else
		outputChatBox ( "Der Spieler existiert nicht / ist offline!", player, 125, 0, 0 )
	end
end
addCommandHandler ( "contract", contract_func )		


--------------------------------------------------------------------------


addCommandHandler ( "contract", contract_func )


function contracts_func ( player )


	if isHit(player) then
		outputChatBox ( "Auftraege ( Die ersten 3 werden angezeigt ):", player, 200, 200, 20 )
		for id, playeritem in ipairs(getElementsByType("player")) do
			if vioGetElementData ( player, "loggedin" ) == 1 then
				local contract = tonumber ( vioGetElementData ( playeritem, "contract" ) )
				local i = 0
				if contract >= mincontract then
					local i = i + 1
					outputChatBox ( getPlayerName ( playeritem )..", Belohnung: "..contract, player, 200, 200, 20 )
					if i == 3 then
						break
					end
				end
			end
		end
	else
		outputChatBox ( "Du bist kein Hitman!", player, 125, 0, 0 )
	end
end
addCommandHandler ( "contracts", contracts_func )

local bloods_cars ={}


bloods_cars  = [1]	createFactionVehicle ( 522, -1939.4, -1041.9, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bike 
bloods_cars  = [2]	createFactionVehicle ( 522, -1939.4, -1045.5, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bike
bloods_cars  = [3]	createFactionVehicle ( 522, -1939.4, -1049.5, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bike
bloods_cars  = [4]	createFactionVehicle ( 522, -1939.4, -1053.3, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bike
bloods_cars  = [5]	createFactionVehicle ( 522, -1939.4, -1056.7, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bike
bloods_cars  = [6] 	createFactionVehicle ( 522, -1938.0, -1061.4, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bike
bloods_cars  = [7]	createFactionVehicle ( 470, -1949.2, -1085.6, 30.9, 0, 0, 0, 14, 3, 0, 8, 9 ), --Patriot
bloods_cars  = [8]	createFactionVehicle ( 470, -1942.2, -1085.8, 30.9, 0, 0, 0, 14, 3, 0, 8, 9 ), --Patriot
bloods_cars  = [9]	createFactionVehicle ( 495, -1952.0, -1048.3, 32.7, 0, 0, 0, 14, 3, 0, 8, 9 ), --Sandking
bloods_cars  = [10]	createFactionVehicle ( 495, -1952.0, -1054.9, 32.7, 0, 0, 0, 14, 3, 0, 8, 9 ), --Sandking
bloods_cars  = [11]	createFactionVehicle ( 482, -1952.3, -1040.1, 32.4, 0, 0, 0, 14, 3, 0, 8, 9 ), --Burrito
bloods_cars  = [12]	createFactionVehicle ( 482, -1952.3, -1033.4, 32.4, 0, 0, 0, 14, 3, 0, 8, 9 ), --Burrito
bloods_cars  = [13]	createFactionVehicle ( 482, -1952.3, -1026.3, 32.4, 0, 0, 0, 14, 3, 0, 8, 9 ), --Burrito
bloods_cars  = [14]	createFactionVehicle ( 424, -1942.8, -1042.0, 32.0, 0, 0, 0, 14, 3, 0, 8, 9 ), --BF-Injection
bloods_cars  = [15]	createFactionVehicle ( 504, -1949.9, -1061.0, 31.8, 0, 0, 0, 14, 3, 0, 8, 9 ), --Bloodring Banger
bloods_cars  = [16]	createFactionVehicle ( 489, -1938.9, -1029.9, 32.5, 0, 0, 0, 14, 3, 0, 8, 9 ), --Rancher
bloods_cars  = [17]	createFactionVehicle ( 489, -1938.8, -1023.0, 32.5, 0, 0, 0, 14, 3, 0, 8, 9 ), --Rancher
bloods_cars  = [18]	createFactionVehicle ( 489, -1939.7, -1037.8, 32.5, 0, 0, 0, 14, 3, 0, 8, 9 ), --Rancher
bloods_cars  = [19]	createFactionVehicle ( 487, -1946.0, -1049.2, 53.6, 0, 0, 0, 14, 3, 0, 8, 9 ), --Maverick
bloods_cars  = [20]	createFactionVehicle ( 447, -1961.7, -1048.7, 53.4, 0, 0, 0, 14, 3, 0, 8, 9 )  --Seasparrow
for i=1, #bloods_cars do
	setVehicleColor ( bloods_cars[i], 254, 0, 0 )
end

fraktionNames = {}
fraktionNames = { [0] = "Zivilisten", [1]="Polizei", [2]="Mafia", [3]="Triaden", [4]="Terroristen", [5]="Reporter", [6]="FBI", [7]="Los Aztecas", [8]="Bundeswehr", [9]="Angels of Death", [10]="Medic", [11]="O-AMT", [12]="Ballas", [13]="Grove", [14]="Bloods" }


local allowToChangeSkin = false
local allowToChangeSkinTimer = nil


fraktionMembers = {}
fraktionMemberList = {}
fraktionMemberListInvite = {}


for i = 0, #fraktionNames+1 do
	fraktionMembers[i] = {}
	fraktionMemberList[i] = {}
	fraktionMemberListInvite[i] = {}
end


local frespawnTimer = {}
local zaehlerFrespawnTimer = {}


factionVehicles = {}
factionVehicles[1] = {}
factionVehicles[2] = {}
factionVehicles[3] = {}
factionVehicles[4] = {}
factionVehicles[5] = {}
factionVehicles[6] = {}
factionVehicles[7] = {}
factionVehicles[8] = {}
factionVehicles[9] = {}
factionVehicles[10] = {}
factionVehicles[11] = {}
factionVehicles[12] = {}
factionVehicles[13] = {}
factionVehicles[14] = {}


factionSkins = {}
factionSkins[1] = { 280, 281, 282, 283, 284, 285, 288, 265, 266, 267 }
factionSkins[2] = { 111, 112, 113, 124, 125, 126, 127, 237, 272 }
factionSkins[3] = { 49, 117, 118, 120, 122, 123, 141, 169, 186, 294 }
factionSkins[4] = { 221, 222, 220, 143, 142, 307 }
factionSkins[5] = { 59, 141, 187, 188, 189, 296 }
factionSkins[6] = { 285, 286, 165, 164, 163, 295 }
factionSkins[7] = { 173, 174, 175, 115, 114, 116, 293, 292, 108, 109, 110 }
factionSkins[8] = { 287, 312, 191 }
factionSkins[9] = { 100, 247, 248, 298, 181, 299, 291 }
factionSkins[10] = { 274, 275, 276, 70 }
factionSkins[11] = { 305, 268, 201, 128, 50, 42 }
factionSkins[12] = { 102, 103, 104, 195, 13 }
factionSkins[13] = { 269, 270, 271, 301, 311, 105, 106, 107 }
factionSkins[14] = {  19, 144, 297, 307, 303,  21, 233,  93, 40,  2, 12, 217, 223, 239 }
aktionlaeuft = false
---------------------------------------------------------------------------------------------------------------


function isPDCar ( car )
	if factionVehicles[1][car] then return true else return false end
end


function isMafiaCar ( car )
	if factionVehicles[2][car] then return true else return false end
end


function isTriadenCar ( car )
	if factionVehicles[3][car] then return true else return false end
end


function isTerrorCar ( car )
	if factionVehicles[4][car] then return true else return false end
end


function isNewsCar ( car )
	if factionVehicles[5][car] then return true else return false end
end


function isFBICar ( car )
	if factionVehicles[6][car] then return true else return false end
end


function isAztecasCar ( car )
	if factionVehicles[7][car] then return true else return false end
end


function isArmyCar ( car )
	if factionVehicles[8][car] then return true else return false end
end


function isBikerCar ( car )
	if factionVehicles[9][car] then return true else return false end
end


function isMedicCar ( car )
	if factionVehicles[10][car] then return true else return false end
end


function isMechanikerCar ( car )
	if factionVehicles[11][car] then return true else return false end
end


function isBallasCar ( car )
	if factionVehicles[12][car] then return true else return false end
end


function isGroveCar ( car )
	if factionVehicles[13][car] then return true else return false end
end


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


function isFederalCar ( car )
	if isArmyCar( car ) or isFBICar( car ) or isPDCar ( car ) then
		return true
	else
		return false
	end
end


function isEvilCar ( car )
	if isMafiaCar( car ) or isTriadenCar( car ) or isTerrorCar ( car ) or isAztecasCar ( car ) or isBikerCar ( car ) or isBallasCar ( car ) or isGroveCar ( car ) or isBloodsCar ( car ) then
		return true
	else
		return false
	end
end


function getPlayerFaction ( player )


	local fac = vioGetElementData ( player, "fraktion" )
	if fac then
		return tonumber(fac)
	else


		return false
	end


end


function getPlayerRank ( player )


	local ran = vioGetElementData ( player, "rang" )
	if ran then
		return tonumber(ran)
	else
		return false
	end


end


function getPlayerRankName ( player )


	local ran = getPlayerRank ( player )
	local fac = getPlayerFaction ( player )
	if ran then
		return factionRankNames[fac][ran]
	else
		return false
	end


end


-----------------------------------------------------------------------------------------------------


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


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


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


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


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


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


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


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


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


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


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


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


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


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


------------------------------------------------------------------------------------------------------


function isStateFaction(player)
	if isArmy(player) or isCop(player) or isFBI(player) then return true else return false end
end


function isOnStateDuty(player)
	return isOnDuty(player)
end


function isOnDuty(player)


	local model = getElementModel(player) 
	if isCop (player) then
		for i=1, #factionSkins[1] do
			if factionSkins[1][i] == model then		
				return true		
			end	
		end
	elseif isFBI (player) then
		for i=1, #factionSkins[6] do
			if factionSkins[6][i] == model then	
				return true		
			end	
		end
	elseif isArmy (player) then
		for i=1, #factionSkins[8] do
			if factionSkins[8][i] == model then		
				return true		
			end	
		end
	end
	return false
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
	end
	return false
end




function isAbleOffduty ( player )


	local model = getElementModel(player) 
	for i=1, #factionSkins[1] do
		if factionSkins[1][i] == model then	
			return true
		end
	end
	for i=1, #factionSkins[6] do
		if factionSkins[6][i] == model then		
			return true		
		end	
	end
	for i=1, #factionSkins[8] do
		if factionSkins[8][i] == model then			
			return true		
		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) or isBloods(player) then return true else return false end
end


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


function isInDepotFaction(player)
	return true
end


---------------------------------------------------------------------------------------------------




function sendMSGForFaction ( msg, faction, r, g, b )
	if not r then
		local r, g, b = 200, 200, 100
	end
	for playeritem, key in pairs ( fraktionMembers[faction] ) do
		outputChatBox ( msg, playeritem, r, g, b )
	end
end


function getFactionMembersOnline ( faction )


	if faction then
		counter = 0
		for playeritem, index in pairs ( fraktionMembers[faction] ) do
			counter = counter + 1
		end
		return counter
	else
		return false
	end
end
function policeComputer ( presser, key, state )


	if state == "down" and isOnDuty(presser) and isFederalCar ( getPedOccupiedVehicle ( presser ) ) and getElementModel ( getPedOccupiedVehicle ( presser ) ) ~= 520 then
		triggerClientEvent ( presser,"showPDComputer", getRootElement() )
	end
end
function createTeleportMarker ( x1, y1, z1, int1, dim1, x2, y2, z2, int2, dim2, rot, needetFaction )


	if not needetFaction then
		needetFaction = 0
	end
	local marker1 = createMarker ( x1, y1, z1 + 0.5, "corona", 1, 0, 0, 0, 0 )
	local marker2 = createMarker ( x1, y1, z1, "cylinder", 1, 255, 0, 0, 150 )
	setElementDimension ( marker1, dim1 )
	setElementDimension ( marker2, dim1 )
	setElementInterior ( marker1, int1 )
	setElementInterior ( marker2, int1 )
	addEventHandler ( "onMarkerHit", marker1,
		function ( hit, dim )
			if dim then
				if getElementType ( hit ) == "player" then
					if not getPedOccupiedVehicle ( hit ) then
						if needetFaction == 0 or vioGetElementData ( hit, "fraktion" ) == needetFaction then
							fadeElementInterior ( hit, int2, x2, y2, z2, rot, dim2 )
						else
							infobox ( hit, "Du bist nicht\nbefugt!", 5000, 125, 0, 0 )
						end
					end
				end
			end
		end
	)
end


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