script_author("KatranLife")

slot0 = require("samp.events")
slot1 = require("imgui")
slot2 = require("encoding")
slot4 = {}
slot2.default = "CP1251"
u8 = slot2.UTF8
slot5 = slot1.ImBool(false)
slot15 = {}
slot16 = {
    infState = slot1.ImBool(false).v,
    infFov = slot1.ImFloat(0).v,
    infAng = slot1.ImBool(false).v,
    infObj = slot1.ImBool(false).v,
    infVeh = slot1.ImBool(false).v,
    infLine = slot1.ImBool(false).v,
    infBlood = slot1.ImBool(false).v,
    infRand = slot1.ImFloat(0).v
}
slot15.settings = slot16
slot14 = require("inicfg").load(slot15)

function LoadSettings()
    if uv0.load(uv1, script.this.filename .. ".ini") == nil then
  return
    end

    uv2.v = slot0.settings.infState
    uv3.v = slot0.settings.infFov
    uv4.v = slot0.settings.infAng
    uv5.v = not slot0.settings.infObj
    uv6.v = not slot0.settings.infVeh
    uv7.v = slot0.settings.infLine
    uv8.v = slot0.settings.infBlood
    uv9.v = slot0.settings.infRand
end

function SaveSettings()
    uv0.save(uv1, script.this.filename .. ".ini")
end

function slot1.OnDrawFrame()
    if uv0.v then
  uv1.SetNextWindowSize(uv1.ImVec2(650, 250), uv1.Cond.FirstUseEver)
  uv1.Begin(u8("[SilentAim] Settings"), uv0)

  if uv1.Checkbox(u8("Enable"), uv2) then
   tarPed = -1
   uv3.settings.infState = uv2.v

   SaveSettings()
  end

  if uv1.SliderFloat(u8("Fov"), uv4, 2, 80) then
   uv3.settings.infFov = uv4.v

   SaveSettings()
  end

  if uv1.SliderFloat(u8("Hit"), uv5, 1, 100) then
   uv3.settings.infRand = uv5.v

   SaveSettings()
  end

  if uv1.Checkbox(u8("FakeAngle"), uv6) then
   uv3.settings.infAng = uv6.v

   SaveSettings()
  end

  if uv1.Checkbox(u8("IgnoreObjects"), uv7) then
   uv3.settings.infObj = not uv7.v

   SaveSettings()
  end

  if uv1.Checkbox(u8("IgnoreVehicles"), uv8) then
   uv3.settings.infVeh = not uv8.v

   SaveSettings()
  end

  if uv1.Checkbox(u8("DrawLines"), uv9) then
   uv3.settings.infLine = uv9.v

   SaveSettings()
  end

  if uv1.Checkbox(u8("DrawBlood"), uv10) then
   uv3.settings.infBlood = uv10.v

   SaveSettings()
  end

  for slot4 = 1, 20, 1 do
   if uv11[slot4] ~= nil then
    if string.len("") < 1 then
     slot0 = "Ignor:"
    end

    slot0 = string.format("%s %i |", slot0, uv11[slot4])
   end
  end

  if string.len(slot0) > 0 then
   uv1.Text(slot0)
  end

  uv1.End()
    end
end

function main()
    if not isSampLoaded() or not isCleoLoaded() or not isSampfuncsLoaded() then
  return
    end

    while not isSampAvailable() do
  wait(200)
    end

    LoadSettings()
    sampRegisterChatCommand("sadd", function (slot0)
  if slot0 == nil then
   sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}используйте: /sadd [id]", -1)

   return
  end

  if tonumber(slot0) == nil then
   sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}используйте: /sadd [id]", -1)

   return
  end

  if slot1 < 0 or slot1 > 999 then
   sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}используйте: /sadd [id]", -1)

   return
  end

  for slot5 = 1, 20, 1 do
   if uv0[slot5] == slot1 then
    sampAddChatMessage(string.format("{3E8BFE}[SilentAim] {FFFFFF}id %i есть в ignor", slot1), -1)

    return
   end
  end

  for slot5 = 1, 20, 1 do
   if uv0[slot5] == nil then
    uv0[slot5] = slot1

    sampAddChatMessage(string.format("{3E8BFE}[SilentAim] {FFFFFF}id %i добавлен в ignor", slot1), -1)

    return
   end
  end

  sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}игнор лист переполнен", -1)
    end)
    sampRegisterChatCommand("srem", function (slot0)
  if slot0 == nil then
   sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}используйте: /srem [id]", -1)

   return
  end

  if tonumber(slot0) == nil then
   sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}используйте: /srem [id]", -1)

   return
  end

  if slot1 < 0 or slot1 > 999 then
   sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}используйте: /srem [id]", -1)

   return
  end

  for slot5 = 1, 20, 1 do
   if uv0[slot5] == slot1 then
    uv0[slot5] = nil

    sampAddChatMessage(string.format("{3E8BFE}[SilentAim] {FFFFFF}id %i удален из ignor", slot1), -1)

    return
   end
  end

  sampAddChatMessage(string.format("{3E8BFE}[SilentAim] {FFFFFF}id %i не найден в ignor", slot1), -1)
    end)
    sampRegisterChatCommand("silent", function ()
  uv0.v = not uv0.v
    end)
    sampAddChatMessage("{3E8BFE}[SilentAim] {FFFFFF}loaded (/silent, /sadd, /srem)", -1)

    while true do
  wait(10)

  uv2.Process = uv1.v
    end
end

function slot0.onPlayerQuit(slot0, slot1)
    for slot5 = 1, 20, 1 do
  if uv0[slot5] == slot0 then
   uv0[slot5] = nil

   sampAddChatMessage(string.format("{3E8BFE}[SilentAim] {FFFFFF}id %i удален из ignor", slot0), -1)

   break
  end
    end
end

function slot0.onSendPlayerSync(slot0)
    if uv0.settings.infState and uv0.settings.infAng and camMode == 53 and tarPed ~= -1 then
  slot1, slot2 = sampGetPlayerIdByCharHandle(tarPed)

  if slot1 then
   slot3, slot4, slot5 = getCharCoordinates(tarPed)
   slot0.quaternion[0], slot8, slot9, slot10 = CalculateQuat(0, 0, getHeadingFromVector2d(slot3 - slot0.position.x, slot4 - slot0.position.y))
   slot0.keysData = 2
   slot0.quaternion[3] = -slot10
  end
    end
end

function slot0.onSendAimSync(slot0)
    camMode = slot0.camMode

    if uv0.settings.infState then
  slot1, slot2 = sampGetPlayerIdByCharHandle(PLAYER_PED)

  if getCurrentCharWeapon(PLAYER_PED) >= 22 and slot3 <= 33 and not isCharDead(PLAYER_PED) and not sampIsPlayerPaused(slot2) then
   camX = slot0.camPos.x
   camY = slot0.camPos.y
   camZ = slot0.camPos.z
   frontX = slot0.camFront.x
   frontY = slot0.camFront.y
   frontZ = slot0.camFront.z

   CheckTarget(slot3)
  end
    end
end

function slot0.onSendBulletSync(slot0)
    if uv0.settings.infState and tarPed ~= -1 then
  slot1 = getCurrentCharWeapon(PLAYER_PED)
  slot2, slot3 = sampGetPlayerIdByCharHandle(tarPed)

  if slot2 and stopwork ~= 1 and slot0.targetType ~= 1 and slot1 >= 22 and slot1 <= 33 then
   slot4 = 0

   for slot8 = 1, 20, 1 do
    if uv1[slot8] == slot3 then
     slot4 = 1
    end
   end

   if slot4 == 0 and ShotCreate(tarPed, slot3) == 1 then
    return false
   end
  end
    end
end

function CheckTarget(slot0)
    slot2, slot3, slot4 = getCharCoordinates(PLAYER_PED)
    slot5 = uv0.settings.infFov
    tarPed = -1

    for slot10, slot11 in pairs(getAllChars()) do
  if slot11 ~= PLAYER_PED then
   slot19, slot20, slot21 = getCharCoordinates(slot11)

   if isLineOfSightClear(slot2, slot3, slot4, slot12, slot13, slot14, uv0.settings.infObj, uv0.settings.infVeh, false, uv0.settings.infObj, false) then
    slot15, slot16 = sampGetPlayerIdByCharHandle(slot11)
    slot17 = FacingToCoords(slot12, slot13, slot5)

    if getDistanceBetweenCoords3d(slot2, slot3, slot4, slot12, slot13, slot14) > 1 and slot18 < GetWeaponDist(slot0) and slot17 ~= nil and slot17 < slot5 and not isCharDead(slot11) and not sampIsPlayerPaused(slot16) then
     tarPed = slot11
     slot5 = slot17
    end
   end
  end
    end
end

function ShotCreate(slot0, slot1)
    if uv0.settings.infRand < math.random(100) then
  return 0
    end

    slot12, slot13, slot14 = getCharCoordinates(slot0)
    slot9, slot10, slot11 = getCharCoordinates(PLAYER_PED)

    if getDistanceBetweenCoords3d(slot5, slot6, slot7, slot2, slot3, slot4) == nil or GetWeaponDist(getCurrentCharWeapon(PLAYER_PED)) == nil then
  return 0
    end

    if slot8 < 1 or slot10 < slot8 or isCharDead(slot0) or sampIsPlayerPaused(slot1) then
  return 0
    end

    slot12 = RandomFloat(-0.25, 0.25)
    slot13 = RandomFloat(-0.8, 0.8)

    if RandomFloat(-0.25, 0.25) > -0.3 and slot11 < 0.3 or slot12 > -0.3 and slot12 < 0.3 or slot13 > -0.6 and slot13 < 0.6 then
  slot11 = 0.3
  slot12 = 0.3
  slot13 = 0.6
    end

    slot14 = CreateSync("bullet", false)
    slot14.targetType = 1
    slot14.targetId = slot1
    slot14.weaponId = slot9
    slot15 = {
  x = slot5 + slot11,
  y = slot6 + slot12,
  z = slot7 + slot13
    }
    slot14.origin = slot15
    slot15 = {
  x = slot2 + slot11,
  y = slot3 + slot12,
  z = slot4 + slot13
    }
    slot14.target = slot15
    slot15 = {
  x = slot11,
  y = slot12,
  z = slot13
    }
    slot14.center = slot15

    slot14.send()
    sampSendGiveDamage(slot1, GetWeaponDamage(slot9), slot9, 3)

    if uv0.settings.infLine then
  fireSingleBullet(slot5, slot6, slot7, slot2, slot3, slot4, 1)
    end

    if uv0.settings.infBlood then
  addBlood(slot2, slot3, slot4, 0, 0, 0, 50, slot0)
    end

    return 1
end

function RandomFloat(slot0, slot1)
    return slot0 + math.random() * (slot1 - slot0)
end

function VectorySize(slot0, slot1, slot2)
    return math.sqrt(slot0 * slot0 + slot1 * slot1, slot2 * slot2)
end

function GetWeaponDamage(slot0)
    return ({
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  8.25,
  13.2,
  46.2,
  3.3,
  3.3,
  4.95,
  6.6,
  8.25,
  9.9,
  9.9,
  6.6,
  [33.0] = 24.75
    })[slot0]
end

function GetWeaponDist(slot0)
    return ({
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  nil,
  35,
  35,
  35,
  40,
  35,
  40,
  35,
  45,
  70,
  90,
  35,
  [33.0] = 95
    })[slot0]
end

function FacingToCoords(slot0, slot1, slot2)
    slot3 = camX + frontX * 50
    slot4 = camY + frontY * 50
    slot5, slot6, slot7 = getCharCoordinates(PLAYER_PED)

    if 7 - VectorySize(slot5 - slot0, slot6 - slot1, 0) / 5 < 0 then
  slot9 = 0
    end

    if math.deg(math.atan2(slot5 - slot3, slot6 - slot4)) + slot9 > math.deg(math.atan2(slot5 - slot0, slot6 - slot1)) - slot2 and slot12 < slot13 + slot2 then
  if slot13 < slot12 then
   return slot12 - slot13
  else
   return slot13 - slot12
  end
    end

    return nil
end

function CalculateQuat(slot0, slot1, slot2)
    slot3 = slot0 * math.pi / 360
    slot4 = slot1 * math.pi / 360
    slot5 = slot2 * math.pi / 360
    slot6 = math.cos(slot4)
    slot7 = math.cos(slot5)
    slot8 = math.cos(slot3)
    slot9 = math.sin(slot4)
    slot10 = math.sin(slot5)
    slot11 = math.sin(slot3)

    return slot6 * slot7 * slot8 - slot9 * slot10 * slot11, slot9 * slot10 * slot8 + slot6 * slot7 * slot11, slot9 * slot7 * slot8 + slot6 * slot10 * slot11, slot6 * slot10 * slot8 - slot9 * slot7 * slot11
end

function CreateSync(slot0, slot1)
    slot2 = require("ffi")
    slot3 = require("samp.raknet")
    slot4 = require("sampfuncs")
    slot5 = {}
    slot6 = {
  "PlayerSyncData",
  slot3.PACKET.PLAYER_SYNC,
  sampStorePlayerOnfootData
    }
    slot5.player = slot6
    slot6 = {
  "VehicleSyncData",
  slot3.PACKET.VEHICLE_SYNC,
  sampStorePlayerIncarData
    }
    slot5.vehicle = slot6
    slot6 = {
  "PassengerSyncData",
  slot3.PACKET.PASSENGER_SYNC,
  sampStorePlayerPassengerData
    }
    slot5.passenger = slot6
    slot6 = {
  "AimSyncData",
  slot3.PACKET.AIM_SYNC,
  sampStorePlayerAimData
    }
    slot5.aim = slot6
    slot6 = {
  "TrailerSyncData",
  slot3.PACKET.TRAILER_SYNC,
  sampStorePlayerTrailerData
    }
    slot5.trailer = slot6
    slot6 = {
  "UnoccupiedSyncData",
  slot3.PACKET.UNOCCUPIED_SYNC
    }
    slot5.unoccupied = slot6
    slot6 = {
  "BulletSyncData",
  slot3.PACKET.BULLET_SYNC
    }
    slot5.bullet = slot6
    slot6 = {
  "SpectatorSyncData",
  slot3.PACKET.SPECTATOR_SYNC
    }
    slot5.spectator = slot6
    slot7 = "struct " .. slot5[slot0][1]
    slot9 = tonumber(slot2.cast("uintptr_t", slot2.new(slot7 .. "*", slot2.new(slot7, {}))))

    if (slot1 or true) and slot6[3] then
  slot11, slot12 = nil

  if slot1 == true then
   slot11, slot12 = sampGetPlayerIdByCharHandle(PLAYER_PED)
  else
   slot12 = tonumber(slot1)
  end

  slot10(slot12, slot9)
    end

    slot11 = {
  __index = function (slot0, slot1)
   return uv0[slot1]
  end,
  __newindex = function (slot0, slot1, slot2)
   uv0[slot1] = slot2
  end
    }
    slot13 = {
  send = function ()
   slot0 = raknetNewBitStream()

   raknetBitStreamWriteInt8(slot0, uv0[2])
   raknetBitStreamWriteBuffer(slot0, uv1, uv2.sizeof(uv3))
   raknetSendBitStreamEx(slot0, uv4.HIGH_PRIORITY, uv4.UNRELIABLE_SEQUENCED, 1)
   raknetDeleteBitStream(slot0)
  end
    }

    return setmetatable(slot13, slot11)
end