Moduł:Sandbox/Draco flavus/TestAllPagesUniv

Dokumentacja dla tego modułu może zostać utworzona pod nazwą Moduł:Sandbox/Draco flavus/TestAllPagesUniv/opis

local p = {}
function p.EvaluateAllPages(frame)

-- Wywołanie: {{#invoke: Sandbox/Draco flavus/TestAllPages | EvaluateAllPages | Strona:Tadeusz Dołęga-Mostowicz - Ostatnia brygada.djvu|pattern}}
-- Wynik: Zgrabna lista stron z początkiem i końcem sekcji.
-- Pattern to szukany tekst np. {{c.Rozdział [%d]+}}

    local SubPageResult = frame.args[2]..string.char(10)..string.char(10)
    local SubPageName = ""
    local n = tonumber(1)
    SubPageName=frame.args[1] .. "/" .. n
    
    while (mw.title.new(SubPageName):getContent() ~= nil) do
    	
    	if (string.match(mw.title.new(SubPageName):getContent(), frame.args[2]) ~= nil ) then
    		SubPageResult = SubPageResult .. string.char(10) .. string.char(10) .. n .. "◇"
    		for w in  string.gmatch(mw.title.new(SubPageName):getContent(), frame.args[2]) do
        		SubPageResult = SubPageResult .. w
    		end
    	end
		n=n+1
		SubPageName=frame.args[1] .. "/" .. n
    end
    
	return SubPageResult
	
end

return p