Полезный скрипт для РП-серверов

[MrCuckoo]

Помогите сделать скрипт на Lua в котором при вводе команды в чат открывается диалог с номерами статей, например УК, после того как вы выбрали статью, текст статьи пишется в чате только для себя.

Буду очень благодарен если вы напишете скрипт, а я уже туда впишу статьи. Спасибо за отклик, огромное спасибо за помощь.​

 

[bomber!]

http://bit.ly/2dw12Bb

 

[Сэнд]

http://bit.ly/2dw12Bb

он на Lua просит

 

[4el0ve4ik]

он на Lua просит

сделай ему побыстрому)

 

[Сэнд]

сделай ему побыстрому)

если б я шарил
да и я щас над своим недопроектом сижу

 

[4el0ve4ik]

если б я шарил
да и я щас над своим недопроектом сижу

изи же :D

 

[Сэнд]

изи же :D

я и в клео с диалогами путался

 

[4el0ve4ik]

я и в клео с диалогами путался

у меня идея не с диалогами сделать, а полностью создать интерфейс, как в табе

 

[itsLegend]

В ANSI

help_items = [[Статья 1
Статья 2
Статья 3
Статья 4]]

help_messages = {}
help_messages["Статья 1"] = [[Очень много текста. Ага!]]

help_messages["Статья 2"] = [[Тут тоже впринципе много текста1
23
45
67
8]]

help_messages["Статья 3"] = [[А вот здесь ничего:(]]
help_messages["Статья 4"] = [[Статейка №4]]

---------------------------------------------------------------------------------------------

require "lib.moonloader"
require "lib.sampfuncs"

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
 
    while not isSampAvailable() do
        wait(400)
    end
 
    sampRegisterChatCommand("rphelp", cmd_showDialog)
    isDialogVisible = false
 
    local res, btn, list_item
    while true do
        if isDialogVisible then
            res, btn, list_item = sampHasDialogRespond(450)
            if res then
                isDialogVisible = false
         
                if btn == 1 then showHelp(sampGetListboxItemText(list_item)) end
            end
         
            --[[res, btn = sampHasDialogRespond(451)
            if res then
                isDialogVisible = false

                if btn == 1 then cmd_showDialog() end
            end]]
        end

        wait(0)
    end
end

function cmd_showDialog()
    _sampShowDialog(450, "УК", help_items, "Выбрать", "Закрыть", DIALOG_STYLE_LIST)
end

function _sampShowDialog(--[[int]] id, --[[string]] caption, --[[string]] text, --[[string]] button1, --[[string]] button2, --[[int]] style)  -- 0B3B
    isDialogVisible = true

    sampShowDialog(id, caption, text, button1, button2, style)
end

function showHelp(name)
    if name == nil then return end

    local msg = help_messages[name]
    if msg ~= nil then
        --_sampShowDialog(451, name, msg, "В главное меню", "Закрыть", DIALOG_STYLE_MSGBOX)

        sampAddChatMessage(name .. ":", 0xFFFF00)
        for _,v in ipairs(msg:split("\n")) do
            sampAddChatMessage(v, 0xFFFFFF)
        end
    end
end

function string:split(delimiter) -- jaredallard/string.split.lua
  local result = { }
  local from  = 1
  local delim_from, delim_to = string.find( self, delimiter, from  )
  while delim_from do
    table.insert( result, string.sub( self, from , delim_from-1 ) )
    from  = delim_to + 1
    delim_from, delim_to = string.find( self, delimiter, from  )
  end
  table.insert( result, string.sub( self, from  ) )
  return result
end

 

[CAPTA!N]

В ANSII

help_items = [[Статья 1
Статья 2
Статья 3
Статья 4]]

help_messages = {}
help_messages["Статья 1"] = [[Очень много текста. Ага!]]

help_messages["Статья 2"] = [[Тут тоже впринципе много текста1
23
45
67
8]]

help_messages["Статья 3"] = [[А вот здесь ничего:(]]
help_messages["Статья 4"] = [[Статейка №4]]

---------------------------------------------------------------------------------------------

require "lib.moonloader"
require "lib.sampfuncs"

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
  
    while not isSampAvailable() do
        wait(400)
    end
  
    sampRegisterChatCommand("rphelp", cmd_showDialog)
    isDialogVisible = false
  
    local res, btn, list_item
    while true do
        if isDialogVisible then
            res, btn, list_item = sampHasDialogRespond(450)
            if res then
                isDialogVisible = false
          
                if btn == 1 then showHelp(sampGetListboxItemText(list_item)) end
            end
          
            --[[res, btn = sampHasDialogRespond(451)
            if res then
                isDialogVisible = false

                if btn == 1 then cmd_showDialog() end
            end]]
        end

        wait(0)
    end
end

function cmd_showDialog()
    _sampShowDialog(450, "УК", help_items, "Выбрать", "Закрыть", DIALOG_STYLE_LIST)
end

function _sampShowDialog(--[[int]] id, --[[string]] caption, --[[string]] text, --[[string]] button1, --[[string]] button2, --[[int]] style)  -- 0B3B
    isDialogVisible = true

    sampShowDialog(id, caption, text, button1, button2, style)
end

function showHelp(name)
    if name == nil then return end

    local msg = help_messages[name]
    if msg ~= nil then
        --_sampShowDialog(451, name, msg, "В главное меню", "Закрыть", DIALOG_STYLE_MSGBOX)

        sampAddChatMessage(name .. ":", 0xFFFF00)
        for _,v in ipairs(msg:split("\n")) do
            sampAddChatMessage(v, 0xFFFFFF)
        end
    end
end

function string:split(delimiter) -- jaredallard/string.split.lua
  local result = { }
  local from  = 1
  local delim_from, delim_to = string.find( self, delimiter, from  )
  while delim_from do
    table.insert( result, string.sub( self, from , delim_from-1 ) )
    from  = delim_to + 1
    delim_from, delim_to = string.find( self, delimiter, from  )
  end
  table.insert( result, string.sub( self, from  ) )
  return result
end

local msg = help_messages[name]

Это тоже самое что и key в расширенном for?

 

[MrCuckoo]

В ANSII

help_items = [[Статья 1
Статья 2
Статья 3
Статья 4]]

help_messages = {}
help_messages["Статья 1"] = [[Очень много текста. Ага!]]

help_messages["Статья 2"] = [[Тут тоже впринципе много текста1
23
45
67
8]]

help_messages["Статья 3"] = [[А вот здесь ничего:(]]
help_messages["Статья 4"] = [[Статейка №4]]

---------------------------------------------------------------------------------------------

require "lib.moonloader"
require "lib.sampfuncs"

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
  
    while not isSampAvailable() do
        wait(400)
    end
  
    sampRegisterChatCommand("rphelp", cmd_showDialog)
    isDialogVisible = false
  
    local res, btn, list_item
    while true do
        if isDialogVisible then
            res, btn, list_item = sampHasDialogRespond(450)
            if res then
                isDialogVisible = false
          
                if btn == 1 then showHelp(sampGetListboxItemText(list_item)) end
            end
          
            --[[res, btn = sampHasDialogRespond(451)
            if res then
                isDialogVisible = false

                if btn == 1 then cmd_showDialog() end
            end]]
        end

        wait(0)
    end
end

function cmd_showDialog()
    _sampShowDialog(450, "УК", help_items, "Выбрать", "Закрыть", DIALOG_STYLE_LIST)
end

function _sampShowDialog(--[[int]] id, --[[string]] caption, --[[string]] text, --[[string]] button1, --[[string]] button2, --[[int]] style)  -- 0B3B
    isDialogVisible = true

    sampShowDialog(id, caption, text, button1, button2, style)
end

function showHelp(name)
    if name == nil then return end

    local msg = help_messages[name]
    if msg ~= nil then
        --_sampShowDialog(451, name, msg, "В главное меню", "Закрыть", DIALOG_STYLE_MSGBOX)

        sampAddChatMessage(name .. ":", 0xFFFF00)
        for _,v in ipairs(msg:split("\n")) do
            sampAddChatMessage(v, 0xFFFFFF)
        end
    end
end

function string:split(delimiter) -- jaredallard/string.split.lua
  local result = { }
  local from  = 1
  local delim_from, delim_to = string.find( self, delimiter, from  )
  while delim_from do
    table.insert( result, string.sub( self, from , delim_from-1 ) )
    from  = delim_to + 1
    delim_from, delim_to = string.find( self, delimiter, from  )
  end
  table.insert( result, string.sub( self, from  ) )
  return result
end

Огромное тебе спасибо. Репутацию поднял

 

[itsLegend]

local msg = help_messages[name]

Это тоже самое что и key в расширенном for?

?
msg - value
name - key