All pastes #977236 Raw Edit

Something

public lua v1 · immutable
·published 2008-04-08 18:30 UTC
rendered paste body
 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 endfunction turnPlayerToAng(ang)    SetKeyState(0x25, true)    while math.abs(ReadFloat(address) - ang) > .5 do        --print("Angle: " .. ReadFloat(address))        Sleep(10)    end    SetKeyState(0x25, false)endSleep(3000)--turnPlayerToAng(0)function PressKey(key)    SetKeyState(key, true)    Sleep(50)    SetKeyState(key, false)endfunction 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)    endendfunction 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)    endendfunction VKeyFromString(c)    return c:upper():byte()endlocal msg = "..."PressKey(0x0D)CopyToClipBoard(msg)PressKeyWithModifiers(VKeyFromString("V"), {0x11}) -- 0x11 = Ctrl (I need to create some constants)PressKey(0x0D)