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