function math.isnan(n)
    return n ~= n
 end

 function findPlayerAngleAddress()
    for i = 0x00E849E0, 0x00E849E0 do
        local val = ReadFloat(i)
        if val == 1.47 and tostring(val) ~= "1.#QNAN" and tostring(val) ~= "-1.#QNAN" then
            print("*(" .. i .. ") = " .. val)
            return i
        end
    end
    return false
 end

--_,address = pcall(findPlayerAngleAddress)
--address = 0x00E849E0 + 0xBFC
--print("add: " .. tostring(address))
--print("val: " .. tostring(ReadFloat(address)))

--if type(address) ~= 'number' then return end

function turnPlayerToAng(ang)
    SetKeyState(0x25, true)
    while math.abs(ReadFloat(address) - ang) > .5 do
        --print("Angle: " .. ReadFloat(address))
        Sleep(10)
    end
    SetKeyState(0x25, false)
end

Sleep(3000)

--turnPlayerToAng(0)

function PressKey(key)
    SetKeyState(key, true)
    Sleep(50)
    SetKeyState(key, false)
end

function PressKeyWithModifiers(key, mod)
    for k,v in ipairs(mod) do
        SetKeyState(v, true)
    end
    Sleep(50)
    SetKeyState(key, true)
    Sleep(50)
    SetKeyState(key, false)
    Sleep(50)
    for k,v in ipairs(mod) do
        SetKeyState(v, false)
    end
end

function TypeLetter(l)
    local key = VKeyFromString(l)
    if l == l:upper() then
        SetKeyState(0x10, true)
        Sleep(50)
    end
    PressKey(key)
    if l == l:upper() then
        SetKeyState(0x10, false)
    end
end

function VKeyFromString(c)
    return c:upper():byte()
end

local msg = "..."

PressKey(0x0D)
CopyToClipBoard(msg)
PressKeyWithModifiers(VKeyFromString("V"), {0x11}) -- 0x11 = Ctrl (I need to create some constants)
PressKey(0x0D)