Вопросы по Lua скриптингу

Общая тема для вопросов по разработке скриптов на языке программирования Lua, в частности под MoonLoader.
  • Задавая вопрос, убедитесь, что его нет в списке частых вопросов и что на него ещё не отвечали (воспользуйтесь поиском).
  • Поищите ответ в теме посвященной разработке Lua скриптов в MoonLoader
  • Отвечая, убедитесь, что ваш ответ корректен.
  • Старайтесь как можно точнее выразить мысль, а если проблема связана с кодом, то обязательно прикрепите его к сообщению, используя блок [code=lua]здесь мог бы быть ваш код[/code].
  • Если вопрос связан с MoonLoader-ом первым делом желательно поискать решение на wiki.

Частые вопросы

— Как научиться писать скрипты? С чего начать?
Информация - Гайд - Всё о Lua скриптинге для MoonLoader(https://blast.hk/threads/22707/)
— Как вывести текст на русском? Вместо русского текста у меня какие-то каракули.
Изменить кодировку файла скрипта на Windows-1251. В Atom: комбинация клавиш Ctrl+Shift+U, в Notepad++: меню Кодировки -> Кодировки -> Кириллица -> Windows-1251.
— Как получить транспорт, в котором сидит игрок?
Lua: 
local veh = storeCarCharIsInNoSave(PLAYER_PED)
— Как получить свой id или id другого игрока?
Lua: 
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
— Как проверить, что строка содержит какой-то текст?
Lua: 
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
— Как эмулировать нажатие игровой клавиши?
Lua: 
local game_keys = require 'game.keys' -- где-нибудь в начале скрипта вне функции main

setGameKeyState(game_keys.player.FIREWEAPON, -1) -- будет сэмулировано нажатие клавиши атаки
Все иды клавиш находятся в файле moonloader/lib/game/keys.lua.
Подробнее о функции setGameKeyState здесь: lua - setgamekeystate | BlastHack — DEV_WIKI(https://www.blast.hk/wiki/lua:setgamekeystate)
— Как получить id другого игрока, в которого целюсь я?
Lua: 
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
— Как зарегистрировать команду чата SAMP?
Lua: 
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
— Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua: 
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: Jennifer, knowfaq, FreX и 38 других
Нажмите для раскрытия...
I

Izvinisb

Известный
Проверенный
963
599
Smeruxa написал(а):
Я помню где-то скидывали про то, как вывести всех людей в радиусе 50 метров, напомните пожалуйста, какая функция
Нажмите для раскрытия...
radius = 50
Код: 
bool result, Ped ped = findAllRandomCharsInSphere(float posX, float posY, float posZ, float radius, bool findNext, bool skipDead)
[CODE]
 
MaksQ

MaksQ

Известный
967
834
SaloFan написал(а):
Lua: 
local sampev = require'lib.samp.events'

function sampev.onApplyPlayerAnimation(id, lib, name, loop, x, y, freeze, time)
    if id == select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)) then return false end
end
Нажмите для раскрытия...
Тоже нормально не робит..
А вот этот cleo идеально все делает...

ыыы: 
{$CLEO .cs}

0000: NOP
0662: printstring "NoAnim"
03A4: name_thread "NOP SETPLAYERANIMATION"

:NOPSETPLAYERANIMATION
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @NOPSETPLAYERANIMATION
0001: wait 4500 ms
0B34: samp register_client_command "noanim" to_label @NOPSETPLAYERANIMATION_2

:NOPSETPLAYERANIMATION_1
0001: wait 0 ms
0002: jump @NOPSETPLAYERANIMATION_1

:NOPSETPLAYERANIMATION_2
0001: wait 0 ms
00D6: if 1@ == 1
then
0007: 1@ = 0
0AD1: show_formatted_text_highpriority "NoAnim ~r~OFF" time 2000
0B2D: write_samp_memory offset 0x16FA0 value 2@ size 2
else
0007: 1@ = 1
0AD1: show_formatted_text_highpriority "NoAnim ~g~ON" time 2000
0B2E: 2@ = read_samp_memory offset 0x16FA0 size 2
0B2D: write_samp_memory offset 0x16FA0 value 50064 size 2
end
Samp.CmdRet()
 

Вложения

  • NoAnim off.cs
    18.1 KB · Просмотры: 2
I

Izvinisb

Известный
Проверенный
963
599
Smeruxa написал(а):
Почему скрывает лишь одного игрока?
Lua: 
    sampRegisterChatCommand('vis_all', function()
        vis = not vis
        if vis then
            x, y, z = getCharCoordinates(PLAYER_PED)
            res, player3 = findAllRandomCharsInSphere(x, y, z, 50, true, true)
            if res then
                lua_thread.create(function()
                    while player3 > 0 do
                        wait(0)
                        setCharVisible(player3, false)
                    end
                end)
            end
        else
            x, y, z = getCharCoordinates(PLAYER_PED)
            res, player3 = findAllRandomCharsInSphere(x, y, z, 50, true, true)
            if res then
                lua_thread.create(function()
                    while player3 > 0 do
                        wait(0)
                        setCharVisible(player3, true)
                    end
                end)
            end
        end
    end)
Нажмите для раскрытия...
ну player3 это хендл, он имеет вид 0хff0445 чет тип такого, хз он больше 0 будет или нет.. получай еще ID и сравнивай с 0
 
Pashyka

Pashyka

Участник
220
17
Здравствуйте, знаю, Вы скажите нахрена я это сделал, но все-же, у меня выводит ошибку в коде из-за такого количества переменных, как этот отрывок можно укоротить?​
Выводит что-то типо этого
Код: 
[ML] (error) SobHelper.lua: C:\Games\ARIZONA GAMES\bin\Arizona\moonloader\SobHelper.lua:1009: function at line 282 has more than 60 upvalues


Lua: 
if imgui.ListBox('##listystav', selectedystav, {u8'1 Вопрос', u8'2 Вопрос', u8'3 Вопрос', u8'4 Вопрос', u8'5 Вопрос', u8'6 Вопрос', u8'7 Вопрос', u8'8 Вопрос', u8'9 Вопрос', u8'10 Вопрос', u8'11 Вопрос', u8'12 Вопрос',u8'13 Вопрос', u8'14 Вопрос', u8'15 Вопрос'}, 10) then
    if selectedystav.v == 0 then
        ystavvopr = ystav_1
        ystavotv = oystav_1
    elseif selectedystav.v == 1 then
        ystavvopr = ystav_2
        ystavotv = oystav_2
    elseif selectedystav.v == 2 then
        ystavvopr = ystav_3
        ystavotv = oystav_3
    elseif selectedystav.v == 3 then
        ystavvopr = ystav_4
        ystavotv = oystav_4
    elseif selectedystav.v == 4 then
        ystavvopr = ystav_5
        ystavotv = oystav_5
    elseif selectedystav.v == 5 then
        ystavvopr = ystav_6
        ystavotv = oystav_6
    elseif selectedystav.v == 6 then
        ystavvopr = ystav_7
        ystavotv = oystav_7
    elseif selectedystav.v == 7 then
        ystavvopr = ystav_8
        ystavotv = oystav_8
    elseif selectedystav.v == 8 then
        ystavvopr = ystav_9
        ystavotv = oystav_9
    elseif selectedystav.v == 9 then
        ystavvopr = ystav_10
        ystavotv = oystav_10
    elseif selectedystav.v == 10 then
        ystavvopr = ystav_11
        ystavotv = oystav_11
    elseif selectedystav.v == 11 then
        ystavvopr = ystav_12
        ystavotv = oystav_12
    elseif selectedystav.v == 12 then
        ystavvopr = ystav_13
        ystavotv = oystav_13
    elseif selectedystav.v == 13 then
        ystavvopr = ystav_14
        ystavotv = oystav_14
    elseif selectedystav.v == 14 then
        ystavvopr = ystav_15
        ystavotv = oystav_15
    end
end
 
I

Izvinisb

Известный
Проверенный
963
599
lsdsdls написал(а):
Здравствуйте, знаю, Вы скажите нахрена я это сделал, но все-же, у меня выводит ошибку в коде из-за такого количества переменных, как этот отрывок можно укоротить?​
Выводит что-то типо этого
Код: 
[ML] (error) SobHelper.lua: C:\Games\ARIZONA GAMES\bin\Arizona\moonloader\SobHelper.lua:1009: function at line 282 has more than 60 upvalues


Lua: 
if imgui.ListBox('##listystav', selectedystav, {u8'1 Вопрос', u8'2 Вопрос', u8'3 Вопрос', u8'4 Вопрос', u8'5 Вопрос', u8'6 Вопрос', u8'7 Вопрос', u8'8 Вопрос', u8'9 Вопрос', u8'10 Вопрос', u8'11 Вопрос', u8'12 Вопрос',u8'13 Вопрос', u8'14 Вопрос', u8'15 Вопрос'}, 10) then
    if selectedystav.v == 0 then
        ystavvopr = ystav_1
        ystavotv = oystav_1
    elseif selectedystav.v == 1 then
        ystavvopr = ystav_2
        ystavotv = oystav_2
    elseif selectedystav.v == 2 then
        ystavvopr = ystav_3
        ystavotv = oystav_3
    elseif selectedystav.v == 3 then
        ystavvopr = ystav_4
        ystavotv = oystav_4
    elseif selectedystav.v == 4 then
        ystavvopr = ystav_5
        ystavotv = oystav_5
    elseif selectedystav.v == 5 then
        ystavvopr = ystav_6
        ystavotv = oystav_6
    elseif selectedystav.v == 6 then
        ystavvopr = ystav_7
        ystavotv = oystav_7
    elseif selectedystav.v == 7 then
        ystavvopr = ystav_8
        ystavotv = oystav_8
    elseif selectedystav.v == 8 then
        ystavvopr = ystav_9
        ystavotv = oystav_9
    elseif selectedystav.v == 9 then
        ystavvopr = ystav_10
        ystavotv = oystav_10
    elseif selectedystav.v == 10 then
        ystavvopr = ystav_11
        ystavotv = oystav_11
    elseif selectedystav.v == 11 then
        ystavvopr = ystav_12
        ystavotv = oystav_12
    elseif selectedystav.v == 12 then
        ystavvopr = ystav_13
        ystavotv = oystav_13
    elseif selectedystav.v == 13 then
        ystavvopr = ystav_14
        ystavotv = oystav_14
    elseif selectedystav.v == 14 then
        ystavvopr = ystav_15
        ystavotv = oystav_15
    end
end
Нажмите для раскрытия...
Тебе ответили, пролистай 1-2 стр. назад https://www.blast.hk/threads/13892/post-479189
 
Kulen

Kulen

Новичок
11
0
Есть у кого идея как получить адрес памяти Textdraw ( Его id , тест , что угодно) ? Без использования SF
 
D

deleted-user-342019

Гость
Братья, я в тупике! Подскажите, что за проблема, и как её решить!
1586806000294.png


Код скрипта: 
script_name("VIP Clients")
script_version("14.03.2020")
script_author("Spataphore")
local script_version_str = "14.03.2020"

function main()
    autoupdate("https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3", '['..string.upper(thisScript().name)..']: ', "https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3")
end 

if not isSampfuncsLoaded() or not isSampLoaded() then
    return
  end
  while not isSampAvailable() do
    wait(100)
  end

local imgui = require 'imgui'
function imgui.OnDrawFrame()

 imgui.SetNextWindowSize(imgui.ImVec2(150, 200), imgui.Cond.FirstUseEver)
imgui.SetNextWindowPos(imgui.ImVec2(1080, 330), imgui.Cond.FirstUseEver)
if menu1
then
  imgui.ShowCursor = true
else
  imgui.ShowCursor = false
end
imgui.Begin('VIP Clients 14.04.2020')
  imgui.Text('Sergey_Spataphore')
  imgui.Text('Denis_Atreides')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
  imgui.End()
end


function main()
  imgui.Process = true
end
function autoupdate(json_url, prefix, url)
  local dlstatus = require('moonloader').download_status
  local json = getWorkingDirectory() .. '\\'..thisScript().name..'-version.json'
  if doesFileExist(json) then os.remove(json) end
  downloadUrlToFile(json_url, json,
    function(id, status, p1, p2)
      if status == dlstatus.STATUSEX_ENDDOWNLOAD then
        if doesFileExist(json) then
          local f = io.open(json, 'r')
          if f then
            local info = decodeJson(f:read('*a'))
            updatelink = info.updateurl
            updateversion = info.latest
            f:close()
            os.remove(json)
            if updateversion ~= thisScript().version then
              lua_thread.create(function(prefix)
                local dlstatus = require('moonloader').download_status
                local color = -1
                sampAddChatMessage((prefix..'Обнаружено обновление. Пытаюсь обновиться c '..thisScript().version..' на '..updateversion), color)
                wait(250)
                downloadUrlToFile(updatelink, thisScript().path,
                  function(id3, status1, p13, p23)
                    if status1 == dlstatus.STATUS_DOWNLOADINGDATA then
                      print(string.format('Загружено %d из %d.', p13, p23))
                    elseif status1 == dlstatus.STATUS_ENDDOWNLOADDATA then
                      print('Загрузка обновления завершена.')
                      sampAddChatMessage((prefix..'Обновление завершено!'), color)
                      goupdatestatus = true
                      lua_thread.create(function() wait(500) thisScript():reload() end)
                    end
                    if status1 == dlstatus.STATUSEX_ENDDOWNLOAD then
                      if goupdatestatus == nil then
                        sampAddChatMessage((prefix..'Обновление прошло неудачно. Запускаю устаревшую версию..'), color)
                        update = false
                      end
                    end
                  end
                )
                end, prefix
              )
            else
              update = false
              print('v'..thisScript().version..': Обновление не требуется.')
            end
          end
        else
          print('v'..thisScript().version..': Не могу проверить обновление.')
          update = false
        end
      end
    end
  )
  while update ~= false do wait(100) end
end
 
I

Izvinisb

Известный
Проверенный
963
599
Tomakow написал(а):
Братья, я в тупике! Подскажите, что за проблема, и как её решить!Посмотреть вложение 53427

Код скрипта: 
script_name("VIP Clients")
script_version("14.03.2020")
script_author("Spataphore")
local script_version_str = "14.03.2020"

function main()
    autoupdate("https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3", '['..string.upper(thisScript().name)..']: ', "https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3")
end

if not isSampfuncsLoaded() or not isSampLoaded() then
    return
  end
  while not isSampAvailable() do
    wait(100)
  end

local imgui = require 'imgui'
function imgui.OnDrawFrame()

imgui.SetNextWindowSize(imgui.ImVec2(150, 200), imgui.Cond.FirstUseEver)
imgui.SetNextWindowPos(imgui.ImVec2(1080, 330), imgui.Cond.FirstUseEver)
if menu1
then
  imgui.ShowCursor = true
else
  imgui.ShowCursor = false
end
imgui.Begin('VIP Clients 14.04.2020')
  imgui.Text('Sergey_Spataphore')
  imgui.Text('Denis_Atreides')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
  imgui.End()
end


function main()
  imgui.Process = true
end
function autoupdate(json_url, prefix, url)
  local dlstatus = require('moonloader').download_status
  local json = getWorkingDirectory() .. '\\'..thisScript().name..'-version.json'
  if doesFileExist(json) then os.remove(json) end
  downloadUrlToFile(json_url, json,
    function(id, status, p1, p2)
      if status == dlstatus.STATUSEX_ENDDOWNLOAD then
        if doesFileExist(json) then
          local f = io.open(json, 'r')
          if f then
            local info = decodeJson(f:read('*a'))
            updatelink = info.updateurl
            updateversion = info.latest
            f:close()
            os.remove(json)
            if updateversion ~= thisScript().version then
              lua_thread.create(function(prefix)
                local dlstatus = require('moonloader').download_status
                local color = -1
                sampAddChatMessage((prefix..'Обнаружено обновление. Пытаюсь обновиться c '..thisScript().version..' на '..updateversion), color)
                wait(250)
                downloadUrlToFile(updatelink, thisScript().path,
                  function(id3, status1, p13, p23)
                    if status1 == dlstatus.STATUS_DOWNLOADINGDATA then
                      print(string.format('Загружено %d из %d.', p13, p23))
                    elseif status1 == dlstatus.STATUS_ENDDOWNLOADDATA then
                      print('Загрузка обновления завершена.')
                      sampAddChatMessage((prefix..'Обновление завершено!'), color)
                      goupdatestatus = true
                      lua_thread.create(function() wait(500) thisScript():reload() end)
                    end
                    if status1 == dlstatus.STATUSEX_ENDDOWNLOAD then
                      if goupdatestatus == nil then
                        sampAddChatMessage((prefix..'Обновление прошло неудачно. Запускаю устаревшую версию..'), color)
                        update = false
                      end
                    end
                  end
                )
                end, prefix
              )
            else
              update = false
              print('v'..thisScript().version..': Обновление не требуется.')
            end
          end
        else
          print('v'..thisScript().version..': Не могу проверить обновление.')
          update = false
        end
      end
    end
  )
  while update ~= false do wait(100) end
end
Нажмите для раскрытия...
Как минимум, то тут 2-e main функции
 
damag

damag

Женюсь на официантке в моем любимом баре
Проверенный
1,152
1,199
как отправить команду боту в вк, и эту команду написало в чат в игре
 
|| NN - NoName ||

|| NN - NoName ||

Известный
1,049
635
Tomakow написал(а):
Братья, я в тупике! Подскажите, что за проблема, и как её решить!Посмотреть вложение 53427

Код скрипта: 
script_name("VIP Clients")
script_version("14.03.2020")
script_author("Spataphore")
local script_version_str = "14.03.2020"

function main()
    autoupdate("https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3", '['..string.upper(thisScript().name)..']: ', "https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3")
end

if not isSampfuncsLoaded() or not isSampLoaded() then
    return
  end
  while not isSampAvailable() do
    wait(100)
  end

local imgui = require 'imgui'
function imgui.OnDrawFrame()

imgui.SetNextWindowSize(imgui.ImVec2(150, 200), imgui.Cond.FirstUseEver)
imgui.SetNextWindowPos(imgui.ImVec2(1080, 330), imgui.Cond.FirstUseEver)
if menu1
then
  imgui.ShowCursor = true
else
  imgui.ShowCursor = false
end
imgui.Begin('VIP Clients 14.04.2020')
  imgui.Text('Sergey_Spataphore')
  imgui.Text('Denis_Atreides')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
  imgui.End()
end


function main()
  imgui.Process = true
end
function autoupdate(json_url, prefix, url)
  local dlstatus = require('moonloader').download_status
  local json = getWorkingDirectory() .. '\\'..thisScript().name..'-version.json'
  if doesFileExist(json) then os.remove(json) end
  downloadUrlToFile(json_url, json,
    function(id, status, p1, p2)
      if status == dlstatus.STATUSEX_ENDDOWNLOAD then
        if doesFileExist(json) then
          local f = io.open(json, 'r')
          if f then
            local info = decodeJson(f:read('*a'))
            updatelink = info.updateurl
            updateversion = info.latest
            f:close()
            os.remove(json)
            if updateversion ~= thisScript().version then
              lua_thread.create(function(prefix)
                local dlstatus = require('moonloader').download_status
                local color = -1
                sampAddChatMessage((prefix..'Обнаружено обновление. Пытаюсь обновиться c '..thisScript().version..' на '..updateversion), color)
                wait(250)
                downloadUrlToFile(updatelink, thisScript().path,
                  function(id3, status1, p13, p23)
                    if status1 == dlstatus.STATUS_DOWNLOADINGDATA then
                      print(string.format('Загружено %d из %d.', p13, p23))
                    elseif status1 == dlstatus.STATUS_ENDDOWNLOADDATA then
                      print('Загрузка обновления завершена.')
                      sampAddChatMessage((prefix..'Обновление завершено!'), color)
                      goupdatestatus = true
                      lua_thread.create(function() wait(500) thisScript():reload() end)
                    end
                    if status1 == dlstatus.STATUSEX_ENDDOWNLOAD then
                      if goupdatestatus == nil then
                        sampAddChatMessage((prefix..'Обновление прошло неудачно. Запускаю устаревшую версию..'), color)
                        update = false
                      end
                    end
                  end
                )
                end, prefix
              )
            else
              update = false
              print('v'..thisScript().version..': Обновление не требуется.')
            end
          end
        else
          print('v'..thisScript().version..': Не могу проверить обновление.')
          update = false
        end
      end
    end
  )
  while update ~= false do wait(100) end
end
Нажмите для раскрытия...
Что это, почему это не в функции?
1586806730452.png
 
  • Грустно
  • Нравится
Реакции: deleted-user-342019 и Izvinisb
D

deleted-user-342019

Гость
#00DD00 написал(а):
Что это, почему это не в функции?
Посмотреть вложение 53432
Нажмите для раскрытия...
Я переставил function main(), прошлая ошибка пропала, а теперь вылазит эта:
1586807071198.png


Код скрипта: 
script_name("VIP Clients")
script_version("14.03.2020")
script_author("Spataphore")
local script_version_str = "14.03.2020"
    autoupdate("https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3", '['..string.upper(thisScript().name)..']: ', "https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3")
end 

function main()
if not isSampfuncsLoaded() or not isSampLoaded() then
    return
  end
  while not isSampAvailable() do
    wait(100)
  end

local imgui = require 'imgui'
function imgui.OnDrawFrame()

 imgui.SetNextWindowSize(imgui.ImVec2(150, 200), imgui.Cond.FirstUseEver)
imgui.SetNextWindowPos(imgui.ImVec2(1080, 330), imgui.Cond.FirstUseEver)
if menu1
then
  imgui.ShowCursor = true
else
  imgui.ShowCursor = false
end
imgui.Begin('VIP Clients 14.04.2020')
  imgui.Text('Sergey_Spataphore')
  imgui.Text('Denis_Atreides')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
  imgui.End()
end


function main()
  imgui.Process = true
end
function autoupdate(json_url, prefix, url)
  local dlstatus = require('moonloader').download_status
  local json = getWorkingDirectory() .. '\\'..thisScript().name..'-version.json'
  if doesFileExist(json) then os.remove(json) end
  downloadUrlToFile(json_url, json,
    function(id, status, p1, p2)
      if status == dlstatus.STATUSEX_ENDDOWNLOAD then
        if doesFileExist(json) then
          local f = io.open(json, 'r')
          if f then
            local info = decodeJson(f:read('*a'))
            updatelink = info.updateurl
            updateversion = info.latest
            f:close()
            os.remove(json)
            if updateversion ~= thisScript().version then
              lua_thread.create(function(prefix)
                local dlstatus = require('moonloader').download_status
                local color = -1
                sampAddChatMessage((prefix..'Обнаружено обновление. Пытаюсь обновиться c '..thisScript().version..' на '..updateversion), color)
                wait(250)
                downloadUrlToFile(updatelink, thisScript().path,
                  function(id3, status1, p13, p23)
                    if status1 == dlstatus.STATUS_DOWNLOADINGDATA then
                      print(string.format('Загружено %d из %d.', p13, p23))
                    elseif status1 == dlstatus.STATUS_ENDDOWNLOADDATA then
                      print('Загрузка обновления завершена.')
                      sampAddChatMessage((prefix..'Обновление завершено!'), color)
                      goupdatestatus = true
                      lua_thread.create(function() wait(500) thisScript():reload() end)
                    end
                    if status1 == dlstatus.STATUSEX_ENDDOWNLOAD then
                      if goupdatestatus == nil then
                        sampAddChatMessage((prefix..'Обновление прошло неудачно. Запускаю устаревшую версию..'), color)
                        update = false
                      end
                    end
                  end
                )
                end, prefix
              )
            else
              update = false
              print('v'..thisScript().version..': Обновление не требуется.')
            end
          end
        else
          print('v'..thisScript().version..': Не могу проверить обновление.')
          update = false
        end
      end
    end
  )
  while update ~= false do wait(100) end
end
 
damag

damag

Женюсь на официантке в моем любимом баре
Проверенный
1,152
1,199
Tomakow написал(а):
Я переставил function main(), прошлая ошибка пропала, а теперь вылазит эта:Посмотреть вложение 53433

Код скрипта: 
script_name("VIP Clients")
script_version("14.03.2020")
script_author("Spataphore")
local script_version_str = "14.03.2020"
    autoupdate("https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3", '['..string.upper(thisScript().name)..']: ', "https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3")
end

function main()
if not isSampfuncsLoaded() or not isSampLoaded() then
    return
  end
  while not isSampAvailable() do
    wait(100)
  end

local imgui = require 'imgui'
function imgui.OnDrawFrame()

imgui.SetNextWindowSize(imgui.ImVec2(150, 200), imgui.Cond.FirstUseEver)
imgui.SetNextWindowPos(imgui.ImVec2(1080, 330), imgui.Cond.FirstUseEver)
if menu1
then
  imgui.ShowCursor = true
else
  imgui.ShowCursor = false
end
imgui.Begin('VIP Clients 14.04.2020')
  imgui.Text('Sergey_Spataphore')
  imgui.Text('Denis_Atreides')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
imgui.Text('-')
  imgui.End()
end


function main()
  imgui.Process = true
end
function autoupdate(json_url, prefix, url)
  local dlstatus = require('moonloader').download_status
  local json = getWorkingDirectory() .. '\\'..thisScript().name..'-version.json'
  if doesFileExist(json) then os.remove(json) end
  downloadUrlToFile(json_url, json,
    function(id, status, p1, p2)
      if status == dlstatus.STATUSEX_ENDDOWNLOAD then
        if doesFileExist(json) then
          local f = io.open(json, 'r')
          if f then
            local info = decodeJson(f:read('*a'))
            updatelink = info.updateurl
            updateversion = info.latest
            f:close()
            os.remove(json)
            if updateversion ~= thisScript().version then
              lua_thread.create(function(prefix)
                local dlstatus = require('moonloader').download_status
                local color = -1
                sampAddChatMessage((prefix..'Обнаружено обновление. Пытаюсь обновиться c '..thisScript().version..' на '..updateversion), color)
                wait(250)
                downloadUrlToFile(updatelink, thisScript().path,
                  function(id3, status1, p13, p23)
                    if status1 == dlstatus.STATUS_DOWNLOADINGDATA then
                      print(string.format('Загружено %d из %d.', p13, p23))
                    elseif status1 == dlstatus.STATUS_ENDDOWNLOADDATA then
                      print('Загрузка обновления завершена.')
                      sampAddChatMessage((prefix..'Обновление завершено!'), color)
                      goupdatestatus = true
                      lua_thread.create(function() wait(500) thisScript():reload() end)
                    end
                    if status1 == dlstatus.STATUSEX_ENDDOWNLOAD then
                      if goupdatestatus == nil then
                        sampAddChatMessage((prefix..'Обновление прошло неудачно. Запускаю устаревшую версию..'), color)
                        update = false
                      end
                    end
                  end
                )
                end, prefix
              )
            else
              update = false
              print('v'..thisScript().version..': Обновление не требуется.')
            end
          end
        else
          print('v'..thisScript().version..': Не могу проверить обновление.')
          update = false
        end
      end
    end
  )
  while update ~= false do wait(100) end
end
Нажмите для раскрытия...
local script_version_str = "14.03.2020"
autoupdate("https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3", '['..string.upper(thisScript().name)..']: ', "https://jsonbin.io/5e94b24d9148886ed2f9c2ff/3")


Енд не нужен
 
  • Нравится
Реакции: deleted-user-342019
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    49
    Просмотры
    169K
    Lua
    FlouZip
    FlouZip
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    31K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    2K
    Общение
    chromiusj
    chromiusj
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    24
    Просмотры
    13K
    Lua
    Kusnrchik
    Kusnrchik
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    3K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу