Скрипт умирает

Koro Kuro

Активный
Автор темы
216
48
Помогите пожалуйста. Почему скрипт zzzzzzzzzzzz.lua умирает?
 

Вложения

  • moonloader.log
    1.7 KB · Просмотры: 11

Koro Kuro

Активный
Автор темы
216
48
Не установил же... ты точно в ту сборку установил? Мун говорит, что у тебя нет сампфункса
Ну я скачал архив. Там была папка SAMPFUNCS SDK файл SAMPFUNCS.asi и SAMPFUNCS Readme.txt я кинул в сборку. Может что то не так сделал?
 

Иглобрюх

Активный
248
74
на лаунчер арз сампфункс не ставится вроде
Ставится, мб у тебя авто очистка стоит в настройках лаунчера. Но если у тебя чудом удаляет только SF, то можешь использовать бета-версию лаунчера. Там вроде как вырезана проверка обновления и сборки.
 

Koro Kuro

Активный
Автор темы
216
48
Теперь то что не так? Скачал другую сборку. Заного всё установил. Установил доп. библиотеки которые просил. ошибки в мунлог не вижу но в игре не работает
 

Вложения

  • moonloader.log
    3.2 KB · Просмотры: 5

Fott

Простреленный
3,461
2,374
Теперь то что не так? Скачал другую сборку. Заного всё установил. Установил доп. библиотеки которые просил. ошибки в мунлог не вижу но в игре не работает
а где скрипт zzzzz в логе?
 

CaJlaT

Овощ
Модератор
2,824
2,655
Достаточно использовать переводчик
1618148494822.png

И увидеть, что не хватает скобки рядом с sequent_async_http_request
А перед этим написан номер строки zzzzzzzzzzzz (2).lua: D:\Games\GTA by MONTA\moonloader\zzzzzzzzzzzz (2).lua:16: '(' expected near 'sequent_async_http_request', в данном случае 16 строка
 

Koro Kuro

Активный
Автор темы
216
48
Lua:
require'lib.moonloader'

local requests = require 'requests'
requests.http_socket, requests.https_socket = http, http
local lanes = require('lanes').configure()
local encoding = require 'encoding'
encoding.default = 'CP1251'
cp = encoding.CP1251
u8 = encoding.UTF8

local s = require"lib.samp.events"
local allmoney, allroute, FONT, skipmsgg = 0, 0, renderCreateFont('Verdana', 12, 9), 'off'
local token = ''
local idv =

function sequent_async_http_request(method, url, args, resolve, reject)
    if not _G['lanes.async_http'] then
        local linda = lanes.linda()
        local lane_gen = lanes.gen('*', {package = {path = package.path, cpath = package.cpath}}, function()
            local requests = require 'requests'
            while true do
                local key, val = linda:receive(50 / 1000, 'request')
                if key == 'request' then
                    local ok, result = pcall(requests.request, val.method, val.url, val.args)
                    if ok then
                        result.json, result.xml = nil, nil
                        linda:send('response', result)
                    else
                        linda:send('error', result)
                    end
                end
            end
        end)
        _G['lanes.async_http'] = {lane = lane_gen(), linda = linda}
    end
    local lanes_http = _G['lanes.async_http']
    lanes_http.linda:send('request', {method = method, url = url, args = args})
    lua_thread.create(function(linda)
        while true do
            local key, val = linda:receive(0, 'response', 'error')
            if key == 'response' then
                return resolve(val)
            elseif key == 'error' then
                return reject(val)
            end
            wait(0)
        end
    end, lanes_http.linda)
end


vklog = function(text, vk_id)
    text = string.gsub(text, "%s+", '%%20')
    text = u8(text)
    sequent_async_http_request('GET', "https://api.vk.com/method/messages.send?message="..text.."&user_id="..vk_id.."&access_token="..token.."&v=5.89", nil,
    function(response)
    end,
    function(error)
    end)
end


function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    id = sampGetPlayerIdByCharHandle(PLAYER_PED)
    nick = sampGetPlayerNickname(id)
    server = sampGetCurrentServerName()
    ip, port = sampGetCurrentServerAddress()
    sampRegisterChatCommand("pilot", function() status = not status end)
    sampRegisterChatCommand("skipworkmsg", function()
    skipmsg = not skipmsg   
        if skipmsg then
            sampAddChatMessage('Skip msg work - on', -1)   
            skipmsgg = 'on'
        else
            sampAddChatMessage('Skip msg work - off', -1)   
            skipmsgg = 'off'
        end
    end)
    while true do
        wait(0)
            if status then
                renderFontDrawText(FONT, '������ �������: '..allroute..'\n���������� �� ��� �����: '..allmoney..'$\n������� ��������� ������: '..skipmsgg, 100, 400, 0xFFFFFFFF)
            end
    end
end

function s.onServerMessage(color, msg)
    local money, _ = msg:match('���������� �� ����: (%d+)%$, �� ����� �����: (%d+)%$')
    if msg:find('����� ��� ������� � ������������� �� ����') then
        sampProcessChatInput("/invis")
        slot()
    elseif msg:find('�� ���� ���� �������� �������� 12 �����.') then
        sampProcessChatInput("/invis")
    elseif msg:find('���� ������� ��������!') then
        oslot()
        allmoney = money + allmoney
        allroute = 1 + allroute
        vklog('���: '..nick..'%0A�������� �������/��: '..server..' ['..ip..':'..port..']%0A������ �������: '..allroute..'%0A����� �������� ���� � �������: '..money..'$%0A����� ����������: '..allmoney..'$', idv)
    elseif msg:find('���������� �������� ����������') then
        lua_thread.create(function()
            wait(3000)
            sampProcessChatInput("/fly")
            wait(1000)
            sampProcessChatInput("/fly")
        end)
    elseif msg:find('���� �������� �� ���������� �����') then
        vklog('�������� ������ ����������!', idv)
    end
    if skipmsg == true then
        if msg:find('���������') then
            return false
        elseif msg:find('���������') then
            return false
        end
    end
end

function slot()
        lua_thread.create(function()
            setCharCoordinates(PLAYER_PED, 1533.2614746094, 1398.2799072266, 1505.8737792969 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1542.8338623047, 1396.1120605469, 1505.8156738281 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1543.5609130859, 1399.6014404297, 1505.8156738281 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1553.7716064453, 1396.3172607422, 1505.8123779297 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1557.8349609375, 1388.205078125, 1505.8156738281 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1557.6026611328, 1377.3507080078, 1505.8356933594 - 1)
            sampProcessChatInput("/invis")
            wait(200)
            knopka1()
        end)
end

function oslot()
    lua_thread.create(function()
        setCharCoordinates(PLAYER_PED, 1557.5467529297, 1392.0765380859, 1505.8156738281 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1549.5476074219, 1396.2054443359, 1505.8156738281 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1543.2847900391, 1399.7823486328, 1505.8156738281 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1535.0620117188, 1396.5959472656, 1505.8123779297 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1528.2127685547, 1398.3758544922, 1509.2834472656 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1521.8568115234, 1398.7790527344, 1509.3056640625 - 1)
        sampProcessChatInput("/invis")
        wait(500)
        knopka1()
        wait(500)
        knopka2()
    end)
end

function knopka1()
    lua_thread.create(function()
        setVirtualKeyDown(18, true) --??????? alt
        wait(100)
        setVirtualKeyDown(18, false) --?????????? alt
    end)
end

function knopka2()
    lua_thread.create(function()
        setVirtualKeyDown(13, true) --??????? alt
        wait(100)
        setVirtualKeyDown(13, false) --?????????? alt
    end)
end
 

Sousehe

Потрачен
211
32
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Lua:
require'lib.moonloader'

local requests = require 'requests'
requests.http_socket, requests.https_socket = http, http
local lanes = require('lanes').configure()
local encoding = require 'encoding'
encoding.default = 'CP1251'
cp = encoding.CP1251
u8 = encoding.UTF8

local s = require"lib.samp.events"
local allmoney, allroute, FONT, skipmsgg = 0, 0, renderCreateFont('Verdana', 12, 9), 'off'
local token = ''
local idv =

function sequent_async_http_request(method, url, args, resolve, reject)
    if not _G['lanes.async_http'] then
        local linda = lanes.linda()
        local lane_gen = lanes.gen('*', {package = {path = package.path, cpath = package.cpath}}, function()
            local requests = require 'requests'
            while true do
                local key, val = linda:receive(50 / 1000, 'request')
                if key == 'request' then
                    local ok, result = pcall(requests.request, val.method, val.url, val.args)
                    if ok then
                        result.json, result.xml = nil, nil
                        linda:send('response', result)
                    else
                        linda:send('error', result)
                    end
                end
            end
        end)
        _G['lanes.async_http'] = {lane = lane_gen(), linda = linda}
    end
    local lanes_http = _G['lanes.async_http']
    lanes_http.linda:send('request', {method = method, url = url, args = args})
    lua_thread.create(function(linda)
        while true do
            local key, val = linda:receive(0, 'response', 'error')
            if key == 'response' then
                return resolve(val)
            elseif key == 'error' then
                return reject(val)
            end
            wait(0)
        end
    end, lanes_http.linda)
end


vklog = function(text, vk_id)
    text = string.gsub(text, "%s+", '%%20')
    text = u8(text)
    sequent_async_http_request('GET', "https://api.vk.com/method/messages.send?message="..text.."&user_id="..vk_id.."&access_token="..token.."&v=5.89", nil,
    function(response)
    end,
    function(error)
    end)
end


function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    id = sampGetPlayerIdByCharHandle(PLAYER_PED)
    nick = sampGetPlayerNickname(id)
    server = sampGetCurrentServerName()
    ip, port = sampGetCurrentServerAddress()
    sampRegisterChatCommand("pilot", function() status = not status end)
    sampRegisterChatCommand("skipworkmsg", function()
    skipmsg = not skipmsg  
        if skipmsg then
            sampAddChatMessage('Skip msg work - on', -1)  
            skipmsgg = 'on'
        else
            sampAddChatMessage('Skip msg work - off', -1)  
            skipmsgg = 'off'
        end
    end)
    while true do
        wait(0)
            if status then
                renderFontDrawText(FONT, '������ �������: '..allroute..'\n���������� �� ��� �����: '..allmoney..'$\n������� ��������� ������: '..skipmsgg, 100, 400, 0xFFFFFFFF)
            end
    end
end

function s.onServerMessage(color, msg)
    local money, _ = msg:match('���������� �� ����: (%d+)%$, �� ����� �����: (%d+)%$')
    if msg:find('����� ��� ������� � ������������� �� ����') then
        sampProcessChatInput("/invis")
        slot()
    elseif msg:find('�� ���� ���� �������� �������� 12 �����.') then
        sampProcessChatInput("/invis")
    elseif msg:find('���� ������� ��������!') then
        oslot()
        allmoney = money + allmoney
        allroute = 1 + allroute
        vklog('���: '..nick..'%0A�������� �������/��: '..server..' ['..ip..':'..port..']%0A������ �������: '..allroute..'%0A����� �������� ���� � �������: '..money..'$%0A����� ����������: '..allmoney..'$', idv)
    elseif msg:find('���������� �������� ����������') then
        lua_thread.create(function()
            wait(3000)
            sampProcessChatInput("/fly")
            wait(1000)
            sampProcessChatInput("/fly")
        end)
    elseif msg:find('���� �������� �� ���������� �����') then
        vklog('�������� ������ ����������!', idv)
    end
    if skipmsg == true then
        if msg:find('���������') then
            return false
        elseif msg:find('���������') then
            return false
        end
    end
end

function slot()
        lua_thread.create(function()
            setCharCoordinates(PLAYER_PED, 1533.2614746094, 1398.2799072266, 1505.8737792969 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1542.8338623047, 1396.1120605469, 1505.8156738281 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1543.5609130859, 1399.6014404297, 1505.8156738281 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1553.7716064453, 1396.3172607422, 1505.8123779297 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1557.8349609375, 1388.205078125, 1505.8156738281 - 1)
            wait(250)
            setCharCoordinates(PLAYER_PED, 1557.6026611328, 1377.3507080078, 1505.8356933594 - 1)
            sampProcessChatInput("/invis")
            wait(200)
            knopka1()
        end)
end

function oslot()
    lua_thread.create(function()
        setCharCoordinates(PLAYER_PED, 1557.5467529297, 1392.0765380859, 1505.8156738281 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1549.5476074219, 1396.2054443359, 1505.8156738281 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1543.2847900391, 1399.7823486328, 1505.8156738281 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1535.0620117188, 1396.5959472656, 1505.8123779297 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1528.2127685547, 1398.3758544922, 1509.2834472656 - 1)
        wait(250)
        setCharCoordinates(PLAYER_PED, 1521.8568115234, 1398.7790527344, 1509.3056640625 - 1)
        sampProcessChatInput("/invis")
        wait(500)
        knopka1()
        wait(500)
        knopka2()
    end)
end

function knopka1()
    lua_thread.create(function()
        setVirtualKeyDown(18, true) --??????? alt
        wait(100)
        setVirtualKeyDown(18, false) --?????????? alt
    end)
end

function knopka2()
    lua_thread.create(function()
        setVirtualKeyDown(13, true) --??????? alt
        wait(100)
        setVirtualKeyDown(13, false) --?????????? alt
    end)
end
В строчках local token и local idv удали ровно.