モジュール:IPAc-enのソースを表示

●モジュール ●ノート ●閲覧 ●ソースを閲覧 ●履歴表示ツール操作 ●閲覧 ●ソースを閲覧 ●履歴表示全般 ●リンク元 ●関連ページの更新状況 ●ファイルをアップロード ●特別ページ ●ページ情報 ●短縮URLを取得する ●QRコードをダウンロード ●ウィキデータ項目 ← モジュール:IPAc-en あなたには﹁このページの編集﹂を行う権限がありません。理由は以下の通りです: このページは保護されています。 ●Wikipedia:拡張半保護の方針に基づき拡張半保護されているため、アカウント作成後ある程度期間が経過しある程度の編集経験を持つ利用者以外の方は編集できません。 ●このページに変更を加えたい場合はノートページで{{拡張半保護編集依頼}}をご利用ください。 ●保護の経緯およびその期間はこのページの保護記録で確認できます。 ●このページのノートで保護について議論が行われていることがありますので、ご参照願います。

このページのソースの閲覧やコピーができます。

-- This module implements [[Template:IPAc-en]].

local data = mw.loadData('Module:IPAc-en/data')
local p = {}

-- Global container for tracking categories
local categoryHandler = require('Module:Category handler').main
local categories = {}

-- Trims whitespace from a string
local function trim(<span class="ltr">s</span>)
 return s:match('^%s*(.-)%s*$')
end

-- This implements [[Template:Nowrap]].
local function makeNowrapSpan(<span class="ltr">s</span>)
 local span = mw.html.create('span')
  :addClass('rt-commentedText') -- Works with [[MediaWiki:Gadget-ReferenceTooltips.js]]
  :addClass('nowrap')
  :wikitext(<span class="ltr">s</span>)
 return tostring(span)
end

local function makePronunciationText(<span class="ltr">id</span>)
 id = id and string.lower(trim(<span class="ltr">id</span>))
 if id and id ~= '' and data.pronunciation[<span class="ltr">id</span>] then
  return data.pronunciation[<span class="ltr">id</span>].text
 end
end

-- This adds a tooltip icon to a label. It implements [[Template:H:title]].
local function makeTooltip(label, tooltip)
 local span = mw.html.create('span')
  :attr('title', tooltip)
  :wikitext(label)
 return tostring(span)
end

local function formatPhonemeGroup(phonemes)
 if #phonemes > 0 then
  local span = mw.html.create('span')
   :css('border-bottom', '1px dotted')
   :wikitext(table.concat(phonemes))
  return tostring(span)
 else
  return ''
 end
end

local function renderCategories()
 local ret = ''
 
 if categoryHandler{ true } then
  ret = {}
  for cat in pairs(categories) do
   table.insert(ret, string.format('[[Category:%s]]', cat))
  end
  table.sort(ret)
  ret = table.concat(ret)
 else
  ret = ''
 end
 return ret
end

function p._main(args)
 local ret = {}
 local i = 0 -- Keeps track of numbered args

 -- Pronunciation
 do
  local pron = {}
  while true do
   i = i + 1
   local pronItem = makePronunciationText(args[<span class="ltr">i</span>])
   if pronItem then
    pron[#pron + 1] = pronItem
    pron[#pron + 1] = ' '
   else
    break
   end
  end
  if #pron > 0 then
   ret[#ret + 1] = string.format(
    '<small>%s</small>',
    table.concat(pron)
   )
  end
 end

 -- Phonemes
 do
  -- Loop through the numbered args, separating them into phoneme groups
  -- and separator strings (both called "words" for convenience). We only
  -- underline the phoneme groups, not the separators.
  local words = {}
  words[#words + 1] = '[' -- Opening slash
  i = i - 1 -- Set up i again as it was changed in the pronunciation loop
  local id
  repeat
   local phonemes = {}
   local isWordEnd = false
   while not isWordEnd do
    i = i + 1
    id = args[<span class="ltr">i</span>]
    id = id and trim(<span class="ltr">id</span>)
    if not id then
     isWordEnd = true
     words[#words + 1] = formatPhonemeGroup(phonemes)
    elseif id ~= '' then
     local t = data.phonemes[<span class="ltr">id</span>]
     if not t then
      -- We were passed an invalid id.
      isWordEnd = true
      categories["IPAc-enの指定が間違っている記事"] = true
      words[#words + 1] = formatPhonemeGroup(phonemes)
      words[#words + 1] = makeTooltip(
       string.format(
        "<strong class=\"error\">[無効な指定です: '%s']</strong>",
        id
        ),
       '無効な記号です'
      )
     elseif not t.label then
      -- The data module contains bad data, so throw an error.
      error(string.format(
       "no label was found for id '%s'",
       tostring(<span class="ltr">id</span>)
      ))
     elseif t.tooltip then
      -- We are dealing with a regular phoneme.
      phonemes[#phonemes + 1] = makeTooltip(
       t.label,
       t.tooltip
      )
     else
      -- We are dealing with a separator.
      isWordEnd = true
      words[#words + 1] = formatPhonemeGroup(phonemes)
      words[#words + 1] = t.label      
     end
    end
   end
  until not id
  words[#words + 1] = ']' -- Closing slash

  -- Wrap the words in a link to IPA help.
  local span = mw.html.create('span')
   -- Suppress Navigation popups and Page Previews (aka Hovercards)
   :addClass('IPA nopopups noexcerpt')
   :wikitext(string.format(
    '[[:en:Help:IPA/English|%s]]',
    table.concat(words)
   ))
  
  ret[#ret + 1] = tostring(span)
 end
 
 -- Audio link
 do
  local file = args.audio and trim(args.audio)
  if file and file ~= '' then
   categories["発音ファイルがある記事"] = true
   ret[#ret + 1] = mw.getCurrentFrame():expandTemplate{
    title = 'Template:IPA audio link', args = { file } }
  end
 end
 
 -- Nowrap and categories
 ret = makeNowrapSpan(table.concat(ret)) .. renderCategories()

 -- Reset the categories table in case we are run again.
 categories = {}

 return ret
end

function p.main(frame)
 return p._main(frame:getParent().args)
end

return p

●