-- El Paso Texas Border Roleplay Script

-- Configuration
local borderX = -1235.537 -- El Paso Texas Border X Coordinate
local borderY = -1360.907 -- El Paso Texas Border Y Coordinate
local usaX = -1356.309 -- USA X Coordinate
local usaY = -1360.907 -- USA Y Coordinate
local moneyLocation = vector3(-1354.437, -1360.907, 34.524) -- Money Location
local washingMachineLocation = vector3(-1355.408, -1360.907, 34.524) -- Washing Machine Location
local sneakingSpeed = 5 -- Sneaking Speed
local teleportSpeed = 10 -- Teleport Speed
local interval = 5000 -- Interval between actions

-- Variables
local money = 0
local isSneaking = false
local isTeleporting = false

-- Functions
function getSneakingLocation()
    return vector3(math.random(borderX - 10, borderX + 10), math.random(borderY - 10, borderY + 10), 34.524)
end

function getTeleportLocation()
    return vector3(math.random(usaX - 10, usaX + 10), math.random(usaY - 10, usaY + 10), 34.524)
end

function movePlayerToLocation(location)
    while (GetEntityCoords(GetPlayerPed(-1)) - location).magnitude > 1 do
        SetEntitySpeed(GetPlayerPed(-1), sneakingSpeed)
        SetPedToRagdoll(GetPlayerPed(-1), 1, 1, 1, 0, 0, 0)
        Wait(0)
    end
end

function teleportPlayerToLocation(location)
    while (GetEntityCoords(GetPlayerPed(-1)) - location).magnitude > 1 do
        SetEntitySpeed(GetPlayerPed(-1), teleportSpeed)
        SetPedToRagdoll(GetPlayerPed(-1), 1, 1, 1, 0, 0, 0)
        Wait(0)
    end
end

function washMoney()
    local moneyBag = GetClosestObjectOfType(moneyLocation, 1.0, GetHashKey("prop_money_bag_01"), false, false, false)
    if moneyBag then
        local result = exports["ghmattimoney"]:ProcessMoney(moneyBag)
        if result then
            local washingMachine = GetClosestObjectOfType(washingMachineLocation, 1.0, GetHashKey("prop_washing_machine"), false, false, false)
            if washingMachine then
                exports["ghmattimoney"]:WashMoney(washingMachine)
            end
        end
    end
end

-- Main Loop
while true do
    if not isSneaking and not isTeleporting then
        local location = getSneakingLocation()
        movePlayerToLocation(location)
        isSneaking = true
        Wait(5000)
    elseif isSneaking then
        local location = getTeleportLocation()
        teleportPlayerToLocation(location)
        isSneaking = false
        isTeleporting = true
        Wait(5000)
    elseif isTeleporting then
        washMoney()
        isTeleporting = false
        Wait(5000)
    end
end