https://fa.imamatpedia.com/w/index.php?action=history&feed=atom&title=%D9%BE%D9%88%D8%AF%D9%85%D8%A7%D9%86%3APoetryNew پودمان:PoetryNew - تاریخچهٔ نسخه‌ها 2026-04-21T06:16:21Z تاریخچهٔ نسخه‌ها برای این صفحه در ویکی MediaWiki 1.41.0 https://fa.imamatpedia.com/w/index.php?title=%D9%BE%D9%88%D8%AF%D9%85%D8%A7%D9%86:PoetryNew&diff=1306903&oldid=prev Ali: صفحه‌ای تازه حاوی «local aliases = { width = {'عرض'}, title = {'عنوان'}, shaer = {'شاعر'}, bahar = {'قالب'}, nass = {1, 'متن'}, shaterbyshater = {'پلکانی'}, fasil = {'فاصله','separator','جداکننده'}, free = {'نو', 'شعر نو'}, } local string = mw.ustring local function argument_wrapper(arg) local nilargs = {} return setmetatable({}, { __index = function ( tbl, k ) local v = rawget(...» ایجاد کرد 2024-06-18T12:42:32Z <p>صفحه‌ای تازه حاوی «local aliases = { width = {&#039;عرض&#039;}, title = {&#039;عنوان&#039;}, shaer = {&#039;شاعر&#039;}, bahar = {&#039;قالب&#039;}, nass = {1, &#039;متن&#039;}, shaterbyshater = {&#039;پلکانی&#039;}, fasil = {&#039;فاصله&#039;,&#039;separator&#039;,&#039;جداکننده&#039;}, free = {&#039;نو&#039;, &#039;شعر نو&#039;}, } local string = mw.ustring local function argument_wrapper(arg) local nilargs = {} return setmetatable({}, { __index = function ( tbl, k ) local v = rawget(...» ایجاد کرد</p> <p><b>صفحهٔ تازه</b></p><div>local aliases = {<br /> width = {&#039;عرض&#039;},<br /> title = {&#039;عنوان&#039;},<br /> shaer = {&#039;شاعر&#039;},<br /> bahar = {&#039;قالب&#039;},<br /> nass = {1, &#039;متن&#039;},<br /> shaterbyshater = {&#039;پلکانی&#039;},<br /> fasil = {&#039;فاصله&#039;,&#039;separator&#039;,&#039;جداکننده&#039;},<br /> free = {&#039;نو&#039;, &#039;شعر نو&#039;},<br /> }<br /> local string = mw.ustring<br /> <br /> local function argument_wrapper(arg)<br /> local nilargs = {}<br /> return setmetatable({},<br /> {<br /> __index = function ( tbl, k )<br /> local v = rawget(tbl,k)<br /> if v then<br /> return v<br /> elseif nilargs[k] then<br /> return nil<br /> end<br /> local list = (type(k)==&quot;number&quot;) and k or aliases[k];<br /> for _,arglist in ipairs(arg) do<br /> if type( list ) == &#039;table&#039; then<br /> for _, alias_key in ipairs( list ) do<br /> if arglist[alias_key] then<br /> v = arglist[alias_key]<br /> break;<br /> end<br /> end<br /> elseif list ~= nil then<br /> v = arglist[list]<br /> end<br /> <br /> if v then<br /> break;<br /> end<br /> end<br /> if v == nil then<br /> nilargs[k] = true<br /> else<br /> rawset( tbl, k, v )<br /> end<br /> return v<br /> end,<br /> });<br /> end<br /> <br /> local function validString(s)<br /> if(type(s) == &#039;string&#039;) then<br /> s = mw.text.trim(s) <br /> if( s ~= &#039;&#039; ) then return s end<br /> end<br /> return nil<br /> end<br /> <br /> local function poetry(frame)<br /> local A = argument_wrapper({frame:getParent().args, frame.args,mw.loadData(&quot;Module:Art pref/data&quot;)[&quot;اشعار&quot;] or {}})<br /> <br /> local mashtoor = false<br /> local header = &#039;&#039;<br /> local free = A.free and (A.free ~= &quot;0&quot;)<br /> local fasil = A.fasil and string.gsub(A.fasil, &#039;[%%%^%$%(%)%[%]%.%*%+%-%?]&#039;, &#039;%%%1&#039;) or &quot;\\\\&quot;<br /> local fasil_s,fasil_e = string.find(mw.text.trim(A.nass),fasil)<br /> <br /> local sdrdiv = &#039;&lt;div class=&quot;poetry-sdr&quot;&gt;&#039;<br /> if not fasil_s and not A[2] then<br /> mashtoor=true<br /> sdrdiv = &#039;&lt;div&gt;&#039;<br /> end<br /> local nass= &quot;&quot;<br /> local ret = &#039;&lt;div class=&quot;poetry-wrapper&#039; .. (mashtoor and &#039; mashtoor&#039; or &#039;&#039;) .. (free and &#039; free&#039; or &#039;&#039;) ..<br /> (A.shaterbyshater and &#039; poetry-shaterbyshater&#039; or &#039;&#039;) .. <br /> &#039;&quot; style=&quot;width:&#039; .. (A.width or &#039;fit-content&#039;) .. &#039;;&quot;&gt;&#039;<br /> <br /> if A.title then<br /> header = header .. &quot;&lt;center&gt;&#039;&#039;&#039;&quot; .. A.title .. &quot;&#039;&#039;&#039;&lt;/center&gt;&quot;<br /> end<br /> if A.shaer then<br /> header = header .. &quot;&lt;center&gt;&quot; .. A.shaer .. &quot;&lt;/center&gt;&quot;<br /> end<br /> if A.bahar then<br /> header = header .. &quot;&lt;center&gt;&#039;&#039;[از &quot; .. A.bahar .. &quot;]&#039;&#039;&lt;/center&gt;&quot;<br /> end<br /> <br /> -- سبک سازگار با سبک های قالب قدیمی<br /> if A[2] then<br /> local shater_num =1<br /> local aa,bb<br /> aa = validString(A[shater_num])<br /> bb = validString(A[shater_num+1])<br /> while aa ~= nil or bb ~= nil do<br /> if aa~= nil and bb ~= nil then<br /> ret=ret .. &#039;&lt;div class=&quot;poetry-sdr&quot;&gt;&#039; ..aa .. &quot;&lt;/div&gt;&quot;<br /> ret=ret .. &#039;&lt;div class=&quot;poetry-ajz&quot;&gt;&#039; ..bb .. &quot;&lt;/div&gt;\n&quot;<br /> else<br /> ret=ret .. &#039;&lt;div class=&quot;poetry-single_bayt&quot;&gt;&#039; ..(aa or bb) .. &quot;&lt;/div&gt;\n&quot;<br /> end<br /> shater_num=shater_num+2<br /> aa = validString(A[shater_num])<br /> bb = validString(A[shater_num+1])<br /> end<br /> else<br /> -- سبک ابیات<br /> nass = mw.text.trim(A.nass)<br /> if fasil_s == 1 then<br /> ret = ret .. &#039;&lt;div class=&quot;poetry-single_bayt&quot;&gt;&#039;<br /> nass = string.sub(nass,fasil_e+1)<br /> else<br /> ret = ret .. sdrdiv<br /> end<br /> <br /> nass=string.gsub(nass,&quot;\n&quot;..fasil,&#039;&lt;/div&gt;&lt;div class=&quot;poetry-single_bayt&quot;&gt;&#039;)<br /> nass=string.gsub(nass,&quot;\n([^|])&quot;,&#039;&lt;/div&gt;&#039; .. sdrdiv ..&#039;%1&#039;)<br /> nass=string.gsub(nass, fasil,&#039;&lt;/div&gt;&lt;div class=&quot;poetry-ajz&quot;&gt;&#039;)<br /> end<br /> return header .. ret .. nass .. &quot;&lt;/div&gt;&lt;/div&gt;&quot;<br /> end<br /> <br /> return {poetry=poetry}</div> Ali