This commit is contained in:
EVO 2025-06-30 11:12:01 +02:00
commit 3c7cdc4a3d
570 changed files with 228 additions and 2765 deletions

View file

@ -2,7 +2,6 @@ local QBCore = exports[Config.CoreName]:GetCoreObject()
local nvMode = 0
local thermalMode = 0
local flashlightActive = false
local flashlightObject = nil
-- Funktion zum Prüfen des Charaktergeschlechts
local function IsPedMale(ped)
@ -41,7 +40,7 @@ local function DisableAllVisionModes()
thermalMode = 0
end
-- Funktion zum Aktivieren der Helm-Lampe
-- Funktion zum Aktivieren der Helm-Lampe (GTA-Style)
local function ToggleHelmetFlashlight()
local ped = PlayerPedId()
@ -51,195 +50,47 @@ local function ToggleHelmetFlashlight()
return
end
-- Taschenlampe umschalten mit nativer GTA-Funktion
if flashlightActive then
-- Deaktiviere die Lampe
if DoesEntityExist(flashlightObject) then
DeleteEntity(flashlightObject)
flashlightObject = nil
end
SetFlashLightKeepOnWhileMoving(false)
TriggerServerEvent('InteractSound_SV:PlayWithinDistance', 3.0, 'flashlight', 0.4)
flashlightActive = false
QBCore.Functions.Notify('Helm-Lampe ausgeschaltet!')
else
-- Aktiviere die Lampe
local boneIndex = GetPedBoneIndex(ped, 31086) -- Kopf-Knochen
-- Erstelle ein Licht-Objekt
local coords = GetEntityCoords(ped)
flashlightObject = CreateObject(GetHashKey("prop_cs_police_torch"), coords.x, coords.y, coords.z, true, true, true)
-- Mache das Objekt unsichtbar, aber behalte das Licht
SetEntityVisible(flashlightObject, false, 0)
SetEntityCollision(flashlightObject, false, false)
-- Befestige das Objekt am Kopf
AttachEntityToEntity(
flashlightObject,
ped,
boneIndex,
Config.Flashlight.offset.x,
Config.Flashlight.offset.y,
Config.Flashlight.offset.z,
0.0, 0.0, 0.0,
true, true, false, true, 0, true
)
-- Erstelle ein Licht
local c = Config.Flashlight.color
local range = Config.Flashlight.range
local intensity = Config.Flashlight.intensity
-- Verwende natives Licht-System
SetEntityLights(flashlightObject, false)
SetFlashLightKeepOnWhileMoving(true)
TriggerServerEvent('InteractSound_SV:PlayWithinDistance', 3.0, 'flashlight', 0.4)
flashlightActive = true
QBCore.Functions.Notify('Helm-Lampe eingeschaltet!')
end
end
-- Thread für das Licht-Update
-- Thread zur Überprüfung, ob der Helm noch getragen wird
Citizen.CreateThread(function()
while true do
Citizen.Wait(0)
Citizen.Wait(1000) -- Überprüfe jede Sekunde
if flashlightActive and DoesEntityExist(flashlightObject) then
if flashlightActive then
local ped = PlayerPedId()
-- Prüfen, ob der Spieler noch den richtigen Helm trägt
if not IsWearingFlashlightHelmet(ped) then
-- Deaktiviere die Lampe, wenn der Helm abgenommen wurde
if DoesEntityExist(flashlightObject) then
DeleteEntity(flashlightObject)
flashlightObject = nil
end
SetFlashLightKeepOnWhileMoving(false)
flashlightActive = false
QBCore.Functions.Notify('Helm-Lampe ausgeschaltet, da der Helm abgenommen wurde!', 'error')
Citizen.Wait(500)
else
local pos = GetEntityCoords(ped)
local forwardVector = GetEntityForwardVector(ped)
local c = Config.Flashlight.color
local range = Config.Flashlight.range
local intensity = Config.Flashlight.intensity
-- Zeichne das Licht in Blickrichtung
DrawSpotLight(
pos.x, pos.y, pos.z + 1.0,
forwardVector.x, forwardVector.y, forwardVector.z,
c.r, c.g, c.b,
range, intensity,
0.0, 1.0, 1.0
)
end
else
Citizen.Wait(500) -- Längere Wartezeit, wenn keine Lampe aktiv ist
end
end
end)
-- Nachtsicht-Befehl
RegisterCommand('toggleNV', function()
local ped = PlayerPedId()
if QBCore.Functions.HasItem(Config.NVItem) then
local gender = IsPedMale(ped) and "male" or "female"
local glasses = Config.Glasses[gender]
-- Prüfen, ob der Spieler eine der Brillen trägt
local canToggle = not Config.CheckHelmet
if Config.CheckHelmet then
if IsWearingGlasses(ped, glasses.up) or IsWearingGlasses(ped, glasses.nvDown) then
canToggle = true
end
end
if canToggle then
-- Deaktiviere zuerst Wärmebild, falls aktiv
if thermalMode > 0 then
SetSeethrough(false)
thermalMode = 0
-- Wenn die Wärmebildbrille getragen wird, klappe sie hoch
if IsWearingGlasses(ped, glasses.thermalDown) then
SetGlasses(ped, glasses.up)
end
end
-- Nachtsicht-Modus umschalten
if nvMode == 0 then
-- Wenn die Brille hochgeklappt ist, klappe sie runter
if IsWearingGlasses(ped, glasses.up) then
SetGlasses(ped, glasses.nvDown)
end
QBCore.Functions.Notify('Nachtsicht aktiviert!')
SetNightvision(true)
nvMode = 1
else
-- Wenn die Brille runtergeklappt ist, klappe sie hoch
if IsWearingGlasses(ped, glasses.nvDown) then
SetGlasses(ped, glasses.up)
end
QBCore.Functions.Notify('Nachtsicht deaktiviert!')
SetNightvision(false)
nvMode = 0
end
else
QBCore.Functions.Notify('Du trägst keine Nachtsichtbrille!', 'error')
end
else
QBCore.Functions.Notify('Du hast kein Nachtsichtgerät!', 'error')
end
-- [Rest des Codes bleibt unverändert]
end)
-- Wärmebild-Befehl
RegisterCommand('toggleThermal', function()
local ped = PlayerPedId()
if QBCore.Functions.HasItem(Config.ThermalItem) then
local gender = IsPedMale(ped) and "male" or "female"
local glasses = Config.Glasses[gender]
-- Prüfen, ob der Spieler eine der Brillen trägt
local canToggle = not Config.CheckHelmet
if Config.CheckHelmet then
if IsWearingGlasses(ped, glasses.up) or IsWearingGlasses(ped, glasses.thermalDown) then
canToggle = true
end
end
if canToggle then
-- Deaktiviere zuerst Nachtsicht, falls aktiv
if nvMode > 0 then
SetNightvision(false)
nvMode = 0
-- Wenn die Nachtsichtbrille getragen wird, klappe sie hoch
if IsWearingGlasses(ped, glasses.nvDown) then
SetGlasses(ped, glasses.up)
end
end
-- Wärmebild-Modus umschalten
if thermalMode == 0 then
-- Wenn die Brille hochgeklappt ist, klappe sie runter
if IsWearingGlasses(ped, glasses.up) then
SetGlasses(ped, glasses.thermalDown)
end
QBCore.Functions.Notify('Wärmebild aktiviert!')
SetSeethrough(true)
thermalMode = 1
else
-- Wenn die Brille runtergeklappt ist, klappe sie hoch
if IsWearingGlasses(ped, glasses.thermalDown) then
SetGlasses(ped, glasses.up)
end
QBCore.Functions.Notify('Wärmebild deaktiviert!')
SetSeethrough(false)
thermalMode = 0
end
else
QBCore.Functions.Notify('Du trägst keine Wärmebildbrille!', 'error')
end
else
QBCore.Functions.Notify('Du hast kein Wärmebildgerät!', 'error')
end
-- [Rest des Codes bleibt unverändert]
end)
-- Helm-Lampe-Befehl
@ -254,64 +105,7 @@ RegisterKeyMapping('toggleHelmetLight', 'Helm-Lampe umschalten', 'keyboard', Con
-- Event zum Umschalten der Brille
RegisterNetEvent('nightvision:toggleGlasses', function(mode)
local ped = PlayerPedId()
local gender = IsPedMale(ped) and "male" or "female"
local glasses = Config.Glasses[gender]
-- Alle Sichtmodi deaktivieren
DisableAllVisionModes()
if mode == 'nightvision' then
-- Wenn keine der konfigurierten Brillen getragen wird, setze hochgeklappte Version auf
if not (IsWearingGlasses(ped, glasses.up) or
IsWearingGlasses(ped, glasses.nvDown) or
IsWearingGlasses(ped, glasses.thermalDown)) then
SetGlasses(ped, glasses.up)
QBCore.Functions.Notify('Nachtsichtbrille aufgesetzt!')
-- Wenn hochgeklappte Brille getragen wird, klappe sie runter und aktiviere Nachtsicht
elseif IsWearingGlasses(ped, glasses.up) then
SetGlasses(ped, glasses.nvDown)
QBCore.Functions.Notify('Nachtsicht aktiviert!')
SetNightvision(true)
nvMode = 1
-- Wenn runtergeklappte Nachtsichtbrille getragen wird, klappe sie hoch und deaktiviere Nachtsicht
elseif IsWearingGlasses(ped, glasses.nvDown) then
SetGlasses(ped, glasses.up)
QBCore.Functions.Notify('Nachtsicht deaktiviert!')
nvMode = 0
-- Wenn Wärmebildbrille getragen wird, wechsle zu Nachtsichtbrille
elseif IsWearingGlasses(ped, glasses.thermalDown) then
SetGlasses(ped, glasses.nvDown)
QBCore.Functions.Notify('Nachtsicht aktiviert!')
SetNightvision(true)
nvMode = 1
end
elseif mode == 'thermal' then
-- Wenn keine der konfigurierten Brillen getragen wird, setze hochgeklappte Version auf
if not (IsWearingGlasses(ped, glasses.up) or
IsWearingGlasses(ped, glasses.nvDown) or
IsWearingGlasses(ped, glasses.thermalDown)) then
SetGlasses(ped, glasses.up)
QBCore.Functions.Notify('Wärmebildbrille aufgesetzt!')
-- Wenn hochgeklappte Brille getragen wird, klappe sie runter und aktiviere Wärmebild
elseif IsWearingGlasses(ped, glasses.up) then
SetGlasses(ped, glasses.thermalDown)
QBCore.Functions.Notify('Wärmebild aktiviert!')
SetSeethrough(true)
thermalMode = 1
-- Wenn runtergeklappte Wärmebildbrille getragen wird, klappe sie hoch und deaktiviere Wärmebild
elseif IsWearingGlasses(ped, glasses.thermalDown) then
SetGlasses(ped, glasses.up)
QBCore.Functions.Notify('Wärmebild deaktiviert!')
thermalMode = 0
-- Wenn Nachtsichtbrille getragen wird, wechsle zu Wärmebildbrille
elseif IsWearingGlasses(ped, glasses.nvDown) then
SetGlasses(ped, glasses.thermalDown)
QBCore.Functions.Notify('Wärmebild aktiviert!')
SetSeethrough(true)
thermalMode = 1
end
end
-- [Rest des Codes bleibt unverändert]
end)
-- Behalte den alten Event-Namen für Kompatibilität
@ -323,11 +117,12 @@ end)
AddEventHandler('onResourceStop', function(resourceName)
if (GetCurrentResourceName() ~= resourceName) then return end
-- Deaktiviere alle Effekte und entferne Objekte
-- Deaktiviere alle Effekte
DisableAllVisionModes()
if DoesEntityExist(flashlightObject) then
DeleteEntity(flashlightObject)
flashlightObject = nil
-- Deaktiviere die Taschenlampe
if flashlightActive then
SetFlashLightKeepOnWhileMoving(false)
flashlightActive = false
end
end)

View file

@ -43,11 +43,12 @@ Config.Glasses = {
-- Flashlight configuration
Config.Flashlight = {
color = {r = 255, g = 255, b = 255}, -- Farbe des Lichts (weiß)
range = 30.0, -- Reichweite des Lichts
intensity = 8.0, -- Intensität des Lichts
range = 15.0, -- Reichweite des Lichts (reduziert für realistischeren Effekt)
intensity = 10.0, -- Intensität des Lichts
offset = {x = 0.0, y = 0.3, z = 0.0} -- Position des Lichts relativ zum Kopf
}
-- Helm-Konfiguration für die Lampe
Config.FlashlightHelmet = {
male = {