Модуль:RandomPageFromCategory - История изменений

Patarakin в 05:54, 23 апреля 2026

2026-04-23T05:54:21Z

← Предыдущая версия		Версия от 08:54, 23 апреля 2026
Строка 1:		Строка 1:
			-- Module:RandomPageFromCategory
	local p = {}		local p = {}

	function p.fromCategory(frame)		function p.fromCategory(frame)
	local cat = frame.args[1] or "Book"		local cat = frame.args[1] or "Book"
	~~local label = frame.args[2] or ("Случайная страница из «" .. cat .. "»")~~		return "[[Special:RandomInCategory/" .. cat .. "\|случайная страница из " .. cat .. "]]"
	return "[[Special:RandomInCategory/" .. cat .. "\|" .. ~~label~~ .. "]]"
	end		end

	return p		return p

Patarakin в 05:52, 23 апреля 2026

2026-04-23T05:52:04Z

← Предыдущая версия		Версия от 08:52, 23 апреля 2026
Строка 1:		Строка 1:
	~~-- Module:RandomPageFromCategory~~
	local p = {}		local p = {}

	function p.fromCategory(frame)		function p.fromCategory(frame)
	local cat = frame.args[1] or "Book"		local cat = frame.args[1] or "Book"
	return "[[Special:RandomInCategory/" .. cat .. "\|~~случайная страница из~~ " .. ~~cat~~ .. "]]"		local label = frame.args[2] or ("Случайная страница из «" .. cat .. "»")
			return "[[Special:RandomInCategory/" .. cat .. "\|" .. label .. "]]"
	end		end

	return p		return p

Patarakin в 05:48, 23 апреля 2026

2026-04-23T05:48:22Z

@@ Строка 2: / Строка 2: @@
 local p = {}
 function p.fromCategory(frame)
    local cat = frame.args[1] or "Book"
+   return "[[Special:RandomInCategory/" .. cat .. "|случайная страница из " .. cat .. "]]"
 end
 return p

Patarakin в 05:44, 23 апреля 2026

2026-04-23T05:44:50Z

← Предыдущая версия		Версия от 08:44, 23 апреля 2026
Строка 2:		Строка 2:
	local p = {}		local p = {}

			-- Вспомогательная: случайный элемент массива
			local function random_item(t)
			if not t or #t == 0 then
			return nil
			end
			local i = math.random(1, #t)
			return t[i]
			end

			-- Вернуть ссылку на случайную страницу из категории
	function p.fromCategory(frame)		function p.fromCategory(frame)
			-- имя категории без префикса "Category:"
	local cat = frame.args[1] or "Book"		local cat = frame.args[1] or "Book"

	-- mw.~~smw~~.~~ask принимает таблицу параметров точно как #ask~~		-- подстрахуемся: сбросить сид, чтобы random менялся
	local query = {		math.randomseed(os.time())
	"[[Category:" .. cat ~~.. "]]"~~,
	~~mainlabel~~ = "~~title~~",		-- Вызов MediaWiki API module (если включён)
	~~limit~~ = "~~500~~"		local api = mw.ext and mw.ext.ApiFrame and mw.ext.ApiFrame.new
			if not api then
			return "Lua: модуль API недоступен на этой вики."
			end

			-- Базовый запрос к api.php?action=query&list=categorymembers
			local req = api{
			action = "query",
			list = "categorymembers",
			cmtitle = "Category:" .. cat,
			cmlimit = "500",
			cmnamespace = "0" -- только статьи; можно убрать/изменить при желании
	}		}

	local ~~res~~ = mw.~~smw~~.~~ask(~~query)		local data = req and req.query and req.query.categorymembers
			if not data or #data == 0 then
	~~-- отладка: показать что вернул запрос~~		return 'Нет страниц в категории "' .. cat .. '".'
	if not ~~res~~ then
	return ~~"mw.smw.ask вернул nil для~~ категории: " .. cat
	~~end~~
	~~if type(res) == "string" then~~
	~~return "Ошибка запроса: "~~ .. ~~res~~
	~~end~~
	~~if #res == 0 then~~
	~~return "Пустой результат для категории:~~ " .~~. cat~~
	end		end

	~~-- случайный элемент~~		local row = random_item(data)
	~~math.randomseed(os.clock() * 100000)~~		if not row or not row.title then
	local row = ~~res[ math.random~~(~~1, #res~~) ]		return "Не удалось получить заголовок страницы."

	~~-- заголовок лежит в поле "title" (наш mainlabel)~~
	~~local title =~~ row~~.title~~ or row~~[1]~~
	~~if not~~ title then
	~~-- показать что реально пришло, для отладки~~
	~~local keys = {}~~
	~~for k, v in pairs(row) do~~
	~~table.insert(keys, tostring(k) .. "=" .. tostring(v))~~
	~~end~~
	return "~~Нет title. Поля: " .. table~~.~~concat(keys, ",~~ ")
	end		end

	return "[[" .. title .. "]]"		return "[[" .. row.title .. "]]"
	end		end

	return p		return p

Patarakin в 05:42, 23 апреля 2026

2026-04-23T05:42:19Z

← Предыдущая версия		Версия от 08:42, 23 апреля 2026
Строка 2:		Строка 2:
	local p = {}		local p = {}

	~~-- Вспомогательная функция: случайный элемент таблицы~~
	~~local function random_item(t)~~
	~~if not t or #t == 0 then~~
	~~return nil~~
	~~end~~
	~~-- math.random(1, #t) даёт целое число от 1 до #t включительно~~
	~~local i = math.random(1, #t)~~
	~~return t[i]~~
	~~end~~

	~~-- Основная функция: вернуть ссылку на случайную страницу из категории~~
	function p.fromCategory(frame)		function p.fromCategory(frame)
	~~-- 1‑й параметр: имя категории без префикса "Category:"~~
	local cat = frame.args[1] or "Book"		local cat = frame.args[1] or "Book"

	-- ~~Запрос SMW: все страницы в указанной категории~~		-- mw.smw.ask принимает таблицу параметров точно как #ask
	local query = ~~string.format(~~"[[Category:%s]]\|limit=500"~~, cat)~~		local query = {
	~~local res = mw.smw and mw.smw.ask and mw.smw.ask(query) or nil~~		"[[Category:" .. cat .. "]]",
			mainlabel = "title",
			limit = "500"
			}

	if not res or #res == 0 then		local res = mw.smw.ask(query)
	return ~~string.format(~~"~~Нет страниц в~~ категории ~~\"%s\~~".", cat)
			-- отладка: показать что вернул запрос
			if not res then
			return "mw.smw.ask вернул nil для категории: " .. cat
			end
			if type(res) == "string" then
			return "Ошибка запроса: " .. res
			end
			if #res == 0 then
			return "Пустой результат для категории: " .. cat
	end		end

	-- ~~Выбираем случайную страницу из результата~~		-- случайный элемент
	~~local row = random_item~~(~~res~~)		math.randomseed(os.clock() * 100000)
	local ~~title~~ = ~~row~~.~~fulltext or row["fulltext"] or row[~~1]		local row = res[ math.random(1, #res) ]

			-- заголовок лежит в поле "title" (наш mainlabel)
			local title = row.title or row[1]
	if not title then		if not title then
	return "~~Не удалось получить заголовок страницы~~."		-- показать что реально пришло, для отладки
			local keys = {}
			for k, v in pairs(row) do
			table.insert(keys, tostring(k) .. "=" .. tostring(v))
			end
			return "Нет title. Поля: " .. table.concat(keys, ", ")
	end		end

	~~-- Возвращаем обычную вики‑ссылку~~		return "[[" .. title .. "]]"
	return ~~string.format(~~"[[%s]]"~~, title)~~
	end		end

	return p		return p

Patarakin: Новая страница: «-- Module:RandomPageFromCategory local p = {} -- Вспомогательная функция: случайный элемент таблицы local function random_item(t) if not t or #t == 0 then return nil end -- math.random(1, #t) даёт целое число от 1 до #t включительно local i = math.random(1, #t) return t[i] end -- Основная функция: вернуть ссылку на случайную ст...»

2026-04-23T05:29:59Z

Новая страница: «-- Module:RandomPageFromCategory local p = {} -- Вспомогательная функция: случайный элемент таблицы local function random_item(t) if not t or #t == 0 then return nil end -- math.random(1, #t) даёт целое число от 1 до #t включительно local i = math.random(1, #t) return t[i] end -- Основная функция: вернуть ссылку на случайную ст...»

Новая страница

-- Module:RandomPageFromCategory
local p = {}

-- Вспомогательная функция: случайный элемент таблицы
local function random_item(t)
if not t or #t == 0 then
return nil
end
-- math.random(1, #t) даёт целое число от 1 до #t включительно
local i = math.random(1, #t)
return t[i]
end

-- Основная функция: вернуть ссылку на случайную страницу из категории
function p.fromCategory(frame)
-- 1‑й параметр: имя категории без префикса "Category:"
local cat = frame.args[1] or "Book"

-- Запрос SMW: все страницы в указанной категории
local query = string.format("[[Category:%s]]|limit=500", cat)
local res = mw.smw and mw.smw.ask and mw.smw.ask(query) or nil

if not res or #res == 0 then
return string.format("Нет страниц в категории \"%s\".", cat)
end

-- Выбираем случайную страницу из результата
local row = random_item(res)
local title = row.fulltext or row["fulltext"] or row[1]

if not title then
return "Не удалось получить заголовок страницы."
end

-- Возвращаем обычную вики‑ссылку
return string.format("[[%s]]", title)
end

return p