মডিউল:ইংরেজি শনাক্তকরণ/খেলাঘর

মডিউল নথি[দেখুন] [সম্পাদনা] [ইতিহাস] [শোধন]

{{ইংরেজি শনাক্তকরণ}} দেখুন

উপরোক্ত নথিটি মডিউল:ইংরেজি শনাক্তকরণ/নথি থেকে প্রতিলিপ্ত। (সম্পাদনা | ইতিহাস)
সম্পাদনাকারীগণ খেলাঘর (সম্পাদনা | পার্থক্য) এবং পরীক্ষা পাতায় (তৈরি করুন) এই মডিউল সংক্রান্ত পরীক্ষা-নিরীক্ষা করতে পারেন।
দয়া করে /নথি উপপাতায় বিষয়শ্রেণী যোগ করুন। এই মডিউলের উপপাতাসমূহ।

local function getCategoryByNamespace(namespace)
    if namespace == 0 then
        return '[[বিষয়শ্রেণী:উইকিপিডিয়ার নিবন্ধসমূহ অনুবাদ করা প্রয়োজন]]'
    elseif namespace == 6 then
        return '[[বিষয়শ্রেণী:চিত্রের সারাংশ বাংলায় অনুবাদ করা প্রয়োজন]]'
    elseif namespace == 10 then
        return '[[বিষয়শ্রেণী:টেমপ্লেট বাংলায় অনুবাদ করা প্রয়োজন]]'
    else
        return ''
    end
end

local commonCategory = '[[বিষয়শ্রেণী:বাংলায় অনুবাদ করা প্রয়োজন পাতাসমূহ]]'
local span = '<span style="color:red"><abbr title="অনুগ্রহ করে এখানকার ইংরেজি লেখা বাংলায় অনুবাদ করুন">'
local close = '</abbr></span>'

local function main(frame)
    local args = frame:getParent().args
    local text = args[1] or ''

    local t = {} -- table of html-like tags removed from text

    for tag in text:gmatch ('%b<>') do
        table.insert(t, tag)
        text = text:gsub(tag, '~', 1)
    end

    local result, count = text:gsub('(%a+)', span .. '%1' .. close)
    local namespace = mw.title.getCurrentTitle().namespace
    local category = getCategoryByNamespace(namespace)

    for _, tag in ipairs(t) do
        result = result:gsub('~', tag, 1)
    end

    if count > 0 then
        if category ~= '' then
            category = category .. ' ' .. commonCategory
        else
            category = commonCategory
        end
    end

    if category ~= '' then
        return result .. category
    else
        return result
    end
end

return { main = main }