Маленькая помощь по LUA!

Статус
В этой теме нельзя размещать новые ответы.
Ф

Флэмч

Участник
Автор темы
77
1
Привет, может кто сможет помочь, есть скриптик, чтобы при вводе команды игроку, при выдаче наказания, писался бы текст, но он то пишется, то не пишется (Текст о скриншоте), хде ошибка?
Код: 
textpm = "В случае подачи жалобы обязательно сделайте ScreenShot(F8)."
function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("mute", mute)
    sampRegisterChatCommand("jail", jail)
    sampRegisterChatCommand("kick", kick)
    sampRegisterChatCommand("apunish", apunish)
    sampRegisterChatCommand("warn", warn)
    sampRegisterChatCommand("ban", ban)
    sampRegisterChatCommand("sban", sban)
    while true do wait(0)
    end
end

function mute(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/mute "..id.." "..time.." "..reason)
end

function jail(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/jail "..id.." "..time.." "..reason)
end

function kick(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/kick "..id.." "..reason)
end

function apunish(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/apunish "..id.." "..time.." "..reason)
end

function warn(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/warn "..id.." "..reason)
end

function ban(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/ban "..id.." "..time.." "..reason)
end

function sban(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/sban "..id.." "..time.." "..reason)
end
 
Решение
paulohardy
Lua: 
textpm = "В случае подачи жалобы обязательно сделайте ScreenShot(F8)."
function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("mute", mute)
    sampRegisterChatCommand("jail", jail)
    sampRegisterChatCommand("kick", kick)
    sampRegisterChatCommand("apunish", apunish)
    sampRegisterChatCommand("warn", warn)
    sampRegisterChatCommand("ban", ban)
    sampRegisterChatCommand("sban", sban)
    while true do wait(0)
    end
end

function mute(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/mute "..id.." "..time.." "..reason)
end

function jail(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")...
Сортировка по дате Сортировка по голосам
paulohardy

paulohardy

вы еще постите говно? тогда я иду к вам
Всефорумный модератор
1,920
1,292
Edvarddd написал(а):
Привет, может кто сможет помочь, есть скриптик, чтобы при вводе команды игроку, при выдаче наказания, писался бы текст, но он то пишется, то не пишется (Текст о скриншоте), хде ошибка?
Код: 
textpm = "В случае подачи жалобы обязательно сделайте ScreenShot(F8)."
function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("mute", mute)
    sampRegisterChatCommand("jail", jail)
    sampRegisterChatCommand("kick", kick)
    sampRegisterChatCommand("apunish", apunish)
    sampRegisterChatCommand("warn", warn)
    sampRegisterChatCommand("ban", ban)
    sampRegisterChatCommand("sban", sban)
    while true do wait(0)
    end
end

function mute(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/mute "..id.." "..time.." "..reason)
end

function jail(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/jail "..id.." "..time.." "..reason)
end

function kick(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/kick "..id.." "..reason)
end

function apunish(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/apunish "..id.." "..time.." "..reason)
end

function warn(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/warn "..id.." "..reason)
end

function ban(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/ban "..id.." "..time.." "..reason)
end

function sban(param)
    local id, time, reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/sban "..id.." "..time.." "..reason)
end
Нажмите для раскрытия...
где id и time замени на param:match("(%d+) (%d+) (.*)")
 
Позитивный голос 0 Негативный голос
Ф

Флэмч

Участник
Автор темы
77
1
Привет. Тогда вот что мне пишет

Lua: 
[20:27:07.779005] (error)    text.lua: C:\Games\Grand Theft Auto San Andreas\moonloader\text.lua:16: unexpected symbol near ':'
[20:27:07.779005] (error)    text.lua: Script died due to an error. (1059453C)

Сам код новый уже:
Lua: 
textpm = "В случае подачи жалобы обязательно сделайте ScreenShot(F8)."
function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("mute", mute)
    sampRegisterChatCommand("jail", jail)
    sampRegisterChatCommand("kick", kick)
    sampRegisterChatCommand("apunish", apunish)
    sampRegisterChatCommand("warn", warn)
    sampRegisterChatCommand("ban", ban)
    sampRegisterChatCommand("sban", sban)
    while true do wait(0)
    end
end

function mute(param)
    local param:match("(%d+) (%d+) (.*)") reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/mute "..id.." "..time.." "..reason)
end

function jail(param)
    local param:match("(%d+) (%d+) (.*)") reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/jail "..id.." "..time.." "..reason)
end

function kick(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/kick "..id.." "..reason)
end

function apunish(param)
    local param:match("(%d+) (%d+) (.*)") reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/apunish "..id.." "..time.." "..reason)
end

function warn(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/warn "..id.." "..reason)
end

function ban(param)
    local param:match("(%d+) (%d+) (.*)") reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/ban "..id.." "..time.." "..reason)
end

function sban(param)
    local param:match("(%d+) (%d+) (.*)") reason = param:match("(.*) (.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/sban "..id.." "..time.." "..reason)
end
 
Последнее редактирование:
Позитивный голос 0 Негативный голос
paulohardy

paulohardy

вы еще постите говно? тогда я иду к вам
Всефорумный модератор
1,920
1,292
Lua: 
textpm = "В случае подачи жалобы обязательно сделайте ScreenShot(F8)."
function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("mute", mute)
    sampRegisterChatCommand("jail", jail)
    sampRegisterChatCommand("kick", kick)
    sampRegisterChatCommand("apunish", apunish)
    sampRegisterChatCommand("warn", warn)
    sampRegisterChatCommand("ban", ban)
    sampRegisterChatCommand("sban", sban)
    while true do wait(0)
    end
end

function mute(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/mute "..id.." "..time.." "..reason)
end

function jail(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/jail "..id.." "..time.." "..reason)
end

function kick(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/kick "..id.." "..reason)
end

function apunish(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/apunish "..id.." "..time.." "..reason)
end

function warn(param)
    local id, reason = param:match("(.*) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/warn "..id.." "..reason)
end

function ban(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/ban "..id.." "..time.." "..reason)
end

function sban(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/sban "..id.." "..time.." "..reason)
end
 
Позитивный голос 0 Негативный голос
paulohardy

paulohardy

вы еще постите говно? тогда я иду к вам
Всефорумный модератор
1,920
1,292
Lua: 
textpm = "В случае подачи жалобы обязательно сделайте ScreenShot(F8)."
function main()
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand("mute", mute)
    sampRegisterChatCommand("jail", jail)
    sampRegisterChatCommand("kick", kick)
    sampRegisterChatCommand("apunish", apunish)
    sampRegisterChatCommand("warn", warn)
    sampRegisterChatCommand("ban", ban)
    sampRegisterChatCommand("sban", sban)
    while true do wait(0)
    end
end

function mute(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/mute "..id.." "..time.." "..reason)
end

function jail(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/jail "..id.." "..time.." "..reason)
end

function kick(param)
    local id, reason = param:match("(%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/kick "..id.." "..reason)
end

function apunish(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/apunish "..id.." "..time.." "..reason)
end

function warn(param)
    local id, reason = param:match("(%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/warn "..id.." "..reason)
end

function ban(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/ban "..id.." "..time.." "..reason)
end

function sban(param)
    local id, time, reason = param:match("(%d+) (%d+) (.*)")
    sampSendChat("/pm "..id.." 0 "..textpm)
    sampSendChat("/sban "..id.." "..time.." "..reason)
end
 
Позитивный голос 0 Негативный голос
Решение
Статус
В этой теме нельзя размещать новые ответы.

Похожие темы

  1. M
    • Решено
    Маленькая помощь с .lua, активация по команде
    Ответы
    2
    Просмотры
    640
    Помощь
    Mailovskiy
    M
  2. ///rock
    • Закрыта
    • Решено
    Требуется маленькая помощь скриптера
    Ответы
    2
    Просмотры
    461
    Вопросы
    MLycoris
    MLycoris
  3. DarkP1xel
    • Закрыта
    • Закреплено
    Эксклюзив Неактуально Избранное ASI AntiStealer
      • Нравится
      • Влюблен
      • Грустно
    Ответы
    4K
    Просмотры
    854K
    Модификации
    DarkP1xel
    DarkP1xel
  4. Стэнфорд
    Lua Анти-подмена L/i в никах
      • Bug
      • Нравится
    Ответы
    10
    Просмотры
    3K
    Модификации
    Удалённый пользователь 416401
    У
  5. EvgeN 1137
    • Статья
    SA-MP RCE — всё, что вы хотели знать
      • Нравится
      • Вау
      • Грустно
    Ответы
    60
    Просмотры
    23K
    Reverse-Engineering
    Blueneck
    B
Сверху Снизу