не компелируется lua файл

Sainix

Потрачен
Автор темы
59
4
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Версия MoonLoader
.026-beta
Всем привет ребята нужна помощь заранее пасибо. Вообщем у меня почему то не компелируется lua файл. Использую вот этот компелятор 0.2.6+
https://blast.hk/threads/17276/


Вот сам код:
function randomFunction    main ()
    var_0_0 = 3 --var_0_0 NUMBER-NUMBER
    data = var_0_0
    var_0_0 = true --var_0_0 PRIMITIVE-PRIMITIVE
    stop = var_0_0
    return
end


function randomFunction(INPUT_VAR_0_)
    var_1_2 = INPUT_VAR_0_
    var_1_1 = tonumber(var_1_2)
    speed = var_1_1
    var_1_3 = INPUT_VAR_0_
    var_1_2 =  "Скорость: " .. var_1_3 .. ""
    var_1_3 = 4294967295 --var_1_3 NUMBER-NUMBER
    sampAddChatMessage(var_1_2, var_1_3)
    return
end


function randomFunction()
    var_2_1 = "/tpg - начать ТП | /tps - остановить ТП " --strings longer than 40 characters get cut off, so check to see if there's more!
    var_2_2 = 4294967295 --var_2_2 NUMBER-NUMBER
    sampAddChatMessage(var_2_1, var_2_2)
    return
end


function someFunc3()
    var_3_0 = isSampAvailable()
    if not var_3_0 then
        --jump to 0010 (if previous if statement is false) --0010 JMP-JMP
        repeat
        var_3_1 = 0 --var_3_1 NUMBER-NUMBER
        wait(var_3_1)
    else
        --location 0010--0010 LOCATION-LOCATION_
        until false or (previous if statement is true) --location 0010
        var_3_0 = sampIsLocalPlayerSpawned()
        if not var_3_0 then
            --jump to 0019 (if previous if statement is false) --0019 JMP-JMP
            repeat
            var_3_1 = 0 --var_3_1 NUMBER-NUMBER
            wait(var_3_1)
        else
            --location 0019--0019 LOCATION-LOCATION_
            until false or (previous if statement is true) --location 0019
            var_3_1 = 0 --var_3_1 NUMBER-NUMBER
            wait(var_3_1)
            var_3_0 = isCharInAnyCar(PLAYER_PED)
            if var_3_0 then
                --jump to 0033 (if previous if statement is false) --0033 JMP-JMP
                var_3_1 = storeCarCharIsInNoSave(playerPed)
                var_3_2 = false --var_3_2 PRIMITIVE-PRIMITIVE
                freezeCarPositionAndDontLoadCollision(var_3_1, var_3_2)
            end
            lua_thread.create(dates)
            var_3_1 = "Машино-ТелеПорт by Розвідка України и th" --strings longer than 40 characters get cut off, so check to see if there's more!
            var_3_2 = 4294967295 --var_3_2 NUMBER-NUMBER
            sampAddChatMessage(var_3_1, var_3_2)
            var_3_0 = require("lib.bass")
            var_3_2 = "https://cs1-46v4.vkuseraudio.net/p20/8c0" --strings longer than 40 characters get cut off, so check to see if there's more!
            var_3_3 = 0 --var_3_3 NUMBER-NUMBER
            var_3_4 = 0 --var_3_4 NUMBER-NUMBER
            var_3_5 = nil
            var_3_6 = nil
            var_3_1 = var_3_0.BASS_StreamCreateURL(var_3_2, var_3_3, var_3_4, var_3_5, var_3_6)
            var_3_3 = var_3_1
            var_3_5 = 0.04 --var_3_5 NUMBER-NUMBER
            var_3_0.BASS_ChannelSetAttribute(var_3_3, BASS_ATTRIB_VOL, var_3_5)
            var_3_3 = var_3_1
            var_3_4 = false --var_3_4 PRIMITIVE-PRIMITIVE
            var_3_0.BASS_ChannelPlay(var_3_3, var_3_4)
            sampRegisterChatCommand("tpg", start)
            local randomFunction0 = function() end -- starts at  test.lua:0
            sampRegisterChatCommand("tps", randomFunction0)
            local randomFunction1 = function() end -- starts at  test.lua:0
            sampRegisterChatCommand("tpspeed", randomFunction1)
            local randomFunction2 = function() end -- starts at  test.lua:0
            sampRegisterChatCommand("tph", randomFunction2)
            return
        end
    end end --REVERSE ME--REVERSE ME

function randomFunction    start (INPUT_VAR_0_)
    var_4_1, var_4_2, var_4_3, var_4_4 = getTargetBlipCoordinates()
    _ = var_4_4
    mPosY = var_4_3
    mPosX = var_4_2
    result = var_4_1
    var_4_2 = INPUT_VAR_0_
    var_4_1 = tonumber(var_4_2)
    until false or (previous if statement is true) --location 0010
    var_4_0 = var_4_1
    if result == true then
        --jump to 0043 (if previous if statement is false) --0043 JMP-JMP
        if var_4_0 then
            --jump to 0038 (if previous if statement is false) --0038 JMP-JMP
            var_4_1 = 1 --var_4_1 NUMBER-NUMBER
            if var_4_1 < var_4_0 then
                --jump to 0033 (if previous if statement is false) --0033 JMP-JMP
                until false or (previous if statement is true) --location 0019
                higth = var_4_0
                var_4_1 = isCharInAnyCar(PLAYER_PED)
                if var_4_1 then
                    --jump to 0028 (if previous if statement is false) --0028 JMP-JMP
                    var_4_1 = 1 --var_4_1 NUMBER-NUMBER
                    data = var_4_1
                    --jump to 0047 (if previous if statement is false) --0047 JMP-JMP
                    var_4_3 = 4294967295 --var_4_3 NUMBER-NUMBER
                    sampAddChatMessage("Вы должны находится в машине", var_4_3)
                    --jump to 0047 (if previous if statement is false) --0047 JMP-JMP
                    var_4_2 = "Установите высоту больше единицы для Тел" --strings longer than 40 characters get cut off, so check to see if there's more!
                    var_4_3 = 4294967295 --var_4_3 NUMBER-NUMBER
                    sampAddChatMessage(var_4_2, var_4_3)
                    --jump to 0047 (if previous if statement is false) --0047 JMP-JMP
                    var_4_2 = "Установите высоту для ТелеПортации - /tp" --strings longer than 40 characters get cut off, so check to see if there's more!
                    var_4_3 = 4294967295 --var_4_3 NUMBER-NUMBER
                    sampAddChatMessage(var_4_2, var_4_3)
                    --jump to 0047 (if previous if statement is false) --0047 JMP-JMP
                    var_4_3 = 4294967295 --var_4_3 NUMBER-NUMBER
                    sampAddChatMessage("Поставьте метку для ТелеПортации", var_4_3)
                    return
                end
            end end end end --REVERSE ME--REVERSE ME--REVERSE ME--REVERSE ME

function randomFunction    dates ()
    repeat
    var_5_1 = 0 --var_5_1 NUMBER-NUMBER
    wait(var_5_1)
    if data == 0 then
        --jump to 0014 (if previous if statement is false) --0014 JMP-JMP
        gold_up()
        until false or (previous if statement is true) --location 0010
        wait(speed)
    else
        --location 0014--0014 LOCATION-LOCATION_
        if data == 1 then
            --jump to 0023 (if previous if statement is false) --0023 JMP-JMP
            gold_go()
            until false or (previous if statement is true) --location 0019
            wait(speed)
        else
            --location 0023--0023 LOCATION-LOCATION_
            if data == 2 then
                --jump to 0001 (if previous if statement is false) --0001 JMP-JMP
                gold_down()
                wait(speed)
                --jump to 0001 (if previous if statement is false) --0001 JMP-JMP
                until false or (previous if statement is true) --location 0032
                return
            end
        end end end --REVERSE ME--REVERSE ME--REVERSE ME

function randomFunction    gold_up ()
    var_6_0 = true --var_6_0 PRIMITIVE-PRIMITIVE
    send = var_6_0
    var_6_0 = true --var_6_0 PRIMITIVE-PRIMITIVE
    tp_process = var_6_0
    var_6_1 = storeCarCharIsInNoSave(playerPed)
    var_6_2 = true --var_6_2 PRIMITIVE-PRIMITIVE
    until false or (previous if statement is true) --location 0010
    freezeCarPositionAndDontLoadCollision(var_6_1, var_6_2)
    var_6_0, var_6_1, var_6_2 = getCharCoordinates(playerPed)
    var_6_5 = var_6_0
    var_6_6 = var_6_1
    var_6_7 = var_6_2 +  10 --var_6_7 NUMBER-NUMBER
    until false or (previous if statement is true) --location 0019
    setCharCoordinates(playerPed, var_6_5, var_6_6, var_6_7)
    var_6_3 = higth -  10 --var_6_3 NUMBER-NUMBER
    if var_6_3 < var_6_2 then
        --jump to 0026 (if previous if statement is false) --0026 JMP-JMP
        var_6_3 = 2 --var_6_3 NUMBER-NUMBER
        data = var_6_3
        var_6_3 = false --var_6_3 PRIMITIVE-PRIMITIVE
        send = var_6_3
        return
    end
end --REVERSE ME

function randomFunction()
    var_7_0 = true --var_7_0 PRIMITIVE-PRIMITIVE
    send = var_7_0
    var_7_0, var_7_1, var_7_2 = getCharCoordinates(playerPed)
    var_7_4 = storeCarCharIsInNoSave(playerPed)
    until false or (previous if statement is true) --location 0010
    var_7_6 = mPosX - var_7_0 --var_7_6 NUMBER-NUMBER
    var_7_7 = mPosY - var_7_1 --var_7_7 NUMBER-NUMBER
    setCarHeading(var_7_4,  getHeadingFromVector2d(var_7_6, var_7_7) )
    until false or (previous if statement is true) --location 0019
    var_7_6 = var_7_0
    var_7_7 = var_7_1
    var_7_3 = getDistanceBetweenCoords2d(mPosX, mPosY, var_7_6, var_7_7)
    var_7_4 = 20 --var_7_4 NUMBER-NUMBER
    if var_7_3 < var_7_4 then
        --jump to 0029 (if previous if statement is false) --0029 JMP-JMP
        var_7_3 = 3 --var_7_3 NUMBER-NUMBER
        data = var_7_3
        --jump to 0044 (if previous if statement is false) --0044 JMP-JMP
        var_7_5 = 0 --var_7_5 NUMBER-NUMBER
        until false or (previous if statement is true) --location 0032
        var_7_6 = 20 --var_7_6 NUMBER-NUMBER
        var_7_7 = 0 --var_7_7 NUMBER-NUMBER
        var_7_3, var_7_4, var_7_5 = getOffsetFromCharInWorldCoords(playerPed, var_7_5, var_7_6, var_7_7)
        var_7_2 = var_7_5
        var_7_1 = var_7_4
        var_7_0 = var_7_3
        var_7_5 = var_7_0
        var_7_6 = var_7_1
        setCharCoordinates(playerPed, var_7_5, var_7_6, higth)
        var_7_3 = false --var_7_3 PRIMITIVE-PRIMITIVE
        send = var_7_3
        return
    end
end --REVERSE ME

function randomFunction    gold_down ()
    var_8_0 = true --var_8_0 PRIMITIVE-PRIMITIVE
    send = var_8_0
    var_8_0, var_8_1, var_8_2 = getCharCoordinates(playerPed)
    var_8_5 = var_8_0
    var_8_6 = var_8_1
    until false or (previous if statement is true) --location 0010
    var_8_7 = var_8_2 -  10 --var_8_7 NUMBER-NUMBER
    setCharCoordinates(playerPed, var_8_5, var_8_6, var_8_7)
    if stop == true then
        --jump to 0046 (if previous if statement is false) --0046 JMP-JMP
        var_8_6 = 999 --var_8_6 NUMBER-NUMBER
        until false or (previous if statement is true) --location 0019
        var_8_3 = getGroundZFor3dCoord(mPosX, mPosY, var_8_6)
        var_8_3 = var_8_3 +  20 --var_8_3 NUMBER-NUMBER
        if var_8_2 < var_8_3 then
            --jump to 0074 (if previous if statement is false) --0074 JMP-JMP
            var_8_5 = var_8_0
            var_8_6 = var_8_1
            var_8_8 = var_8_0
            var_8_9 = var_8_1
            var_8_10 = 999 --var_8_10 NUMBER-NUMBER
            until false or (previous if statement is true) --location 0032
            setCharCoordinates(playerPed, var_8_5, var_8_6,  getGroundZFor3dCoord(var_8_8, var_8_9, var_8_10) )
            var_8_3 = false --var_8_3 PRIMITIVE-PRIMITIVE
            tp_process = var_8_3
            var_8_3 = false --var_8_3 PRIMITIVE-PRIMITIVE
            stop = var_8_3
            var_8_4 = storeCarCharIsInNoSave(playerPed)
            var_8_5 = false --var_8_5 PRIMITIVE-PRIMITIVE
            freezeCarPositionAndDontLoadCollision(var_8_4, var_8_5)
            var_8_3 = 0 --var_8_3 NUMBER-NUMBER
            data = var_8_3
            --jump to 0074 (if previous if statement is false) --0074 JMP-JMP
            var_8_6 = 999 --var_8_6 NUMBER-NUMBER
            var_8_3 = getGroundZFor3dCoord(mPosX, mPosY, var_8_6)
            var_8_3 = var_8_3 +  20 --var_8_3 NUMBER-NUMBER
            if var_8_2 < var_8_3 then
                --jump to 0074 (if previous if statement is false) --0074 JMP-JMP
                var_8_10 = 999 --var_8_10 NUMBER-NUMBER
                setCharCoordinates(playerPed, mPosX, mPosY,  getGroundZFor3dCoord(mPosX, mPosY, var_8_10) )
                var_8_3 = false --var_8_3 PRIMITIVE-PRIMITIVE
                tp_process = var_8_3
                var_8_4 = storeCarCharIsInNoSave(playerPed)
                var_8_5 = false --var_8_5 PRIMITIVE-PRIMITIVE
                freezeCarPositionAndDontLoadCollision(var_8_4, var_8_5)
                var_8_3 = 0 --var_8_3 NUMBER-NUMBER
                data = var_8_3
                var_8_3 = false --var_8_3 PRIMITIVE-PRIMITIVE
                send = var_8_3
                return
            end
        end end end --REVERSE ME--REVERSE ME--REVERSE ME

function randomFunction    ev.onSendVehicleSync (INPUT_VAR_0_)
    if tp_process == true then
        --jump to 0007 (if previous if statement is false) --0007 JMP-JMP
        var_9_2 = -0.2 --var_9_2 NUMBER-NUMBER
        INPUT_VAR_0_.moveSpeed.z = var_9_2
    end
    var_9_1 = not send
    if var_9_1 == true then
    end -- maybe?
    until false or (previous if statement is true) --location 0010
    --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
    return INPUT_VAR_0_
    --jump to 0015 (if previous if statement is false) --0015 JMP-JMP
    var_9_1 = false --var_9_1 PRIMITIVE-PRIMITIVE
    return var_9_1
    return
end


function someFunc10()
    script_name("tp")
    var_10_0 = require("lib.samp.events")
    ev = var_10_0
    var_10_0 = 70 --var_10_0 NUMBER-NUMBER
    speed = var_10_0
    until false or (previous if statement is true) --location 0010
    local randomFunction3 = function() end -- starts at  test.lua:0
    main = randomFunction3
    local randomFunction4 = function() end -- starts at  test.lua:0
    start = randomFunction4
    local randomFunction5 = function() end -- starts at  test.lua:0
    dates = randomFunction5
    local randomFunction6 = function() end -- starts at  test.lua:0
    gold_up = randomFunction6
    local randomFunction7 = function() end -- starts at  test.lua:0
    until false or (previous if statement is true) --location 0019
    gold_go = randomFunction7
    local randomFunction8 = function() end -- starts at  test.lua:0
    gold_down = randomFunction8
    local randomFunction9 = function() end -- starts at  test.lua:0
    ev.onSendVehicleSync = randomFunction9
    return
end