Módulo:Citar discurso

Fonte: Enciclopédia de conhecimento da Igreja de Deus
Saltar para a navegação Saltar para a pesquisa

A documentação para este módulo pode ser criada na página Módulo:Citar discurso/doc

local d = require('Módulo:Citação/CS1')
--[[--------------------------< d . d i s c u r s o >------------------------------------
Este é o método principal da predefinição {{citar série}}.
]]
d.discurso = function(frame)
				local config, args, A = tratarArgumentos(frame)
				config.CitationClass = ''
				config.naoUsaPage = true
				local B
				local sepc = set_style (A.Mode:lower())
				local ConferenceURLorigin = A:ORIGIN('ConferenceURL')
				A.ConferenceFormat = style_format (A.ConferenceFormat, A.ConferenceURL, 'conference-format', 'conference-url');
				if is_set (A.Conference) then
								if is_set (A.ConferenceURL) then
												A.Conference = external_link( A.ConferenceURL, A.Conference, ConferenceURLorigin, nil );
								end
								A.Conference = sepc .. " " .. A.Conference .. A.ConferenceFormat;
				elseif is_set(A.ConferenceURL) then
								A.Conference = sepc .. " " .. external_link( A.ConferenceURL, nil, ConferenceURLorigin, nil );
				end
				-- Função com o código abstraído
				A, B = citation0( config, args, A)
				--[[
				Este código sobrescreve o valor atribuído a 'TitleNote' (via |department=)
				para " (Discurso)", assim tal anotação seguirá diretamente o título
				]]
				A.TitleNote = " (Discurso)" -- anotação da citação
				if is_set (A.Periodical) then -- se Periodical, caso |website= ou |journal=
								if is_set (A.Conference) then -- se |event= estiver definido
												A.Conference = A.Conference .. sepc .. " " -- pontuação apropriada
								end
				end
				B.tcommon = safe_join( {A.Title, A.TitleNote, A.Conference, A.Periodical, A.Format, A.TitleType
								, A.Series, A.Language, A.Volume, A.Others, A.Edition, B.Publisher, A.Agency}, sepc )
				config.CitationClass = 'speech'
				B.config = config
				return textoFinal(A, B)
end
return d