「モジュール:MOS mode degrees」の版間の差分

Furcht968 (トーク | 投稿記録)
ページの作成:「local p = {} local mos = require("Module:MOS") local tamnams = require("Module:TAMNAMS") local tip = require("Module:Template input parse") local yesno = require("Module:Yesno") -- TODO -- - Split off modmos mode degrees as a separate template -- Global variables for cell colors -- Colors are as follows: -- - Orange and blue for small and large sizes, respectively -- - Darker colors for altered scale degrees -- - No color for period intervals p.cell_color_none =…」
 
Furcht968 (トーク | 投稿記録)
編集の要約なし
112行目: 112行目:
-- Table's title
-- Table's title
-- If it's for a modmos, add the step pattern
-- If it's for a modmos, add the step pattern
result = result .. "|+ style=\"font-size: 105%; white-space: nowrap;\" | " .. string.format("Scale degrees of the modes of %s", scale_sig)
result = result .. "|+ style=\"font-size: 105%; white-space: nowrap;\" | " .. string.format("%sの旋法における音階度数", scale_sig)
.. (is_true_mos and "\n" or string.format(" (%s)\n", step_pattern))
.. (is_true_mos and "\n" or string.format(" (%s)\n", step_pattern))
.. "|-\n"
.. "|-\n"
119行目: 119行目:
result = result
result = result
.. "! rowspan=\"2\" | UDP" .. (is_true_mos and "\n" or " and<br />alterations\n") -- If modmos, add "and alterations" string
.. "! rowspan=\"2\" | UDP" .. (is_true_mos and "\n" or " and<br />alterations\n") -- If modmos, add "and alterations" string
.. "! rowspan=\"2\" | Cyclic<br />order\n"
.. "! rowspan=\"2\" | 循環順序\n"
.. "! rowspan=\"2\" | Step<br />pattern\n"
.. "! rowspan=\"2\" | パターン\n"
-- Add header for scale degrees
-- Add header for scale degrees
result = result .. string.format("! colspan=\"%d\" class=\"unsortable\" | Scale degree (%sdegree)\n", #step_matrices[1], mos_prefix)
result = result .. string.format("! colspan=\"%d\" class=\"unsortable\" | 音階度数 (%sdegree)\n", #step_matrices[1], mos_prefix)
-- Add second row of headers
-- Add second row of headers
189行目: 189行目:
-- Closest-mode search always returns one name
-- Closest-mode search always returns one name
mode_names = {
mode_names = {
"Harmonic minor<br />(Aeolian ♮7)",
"ハーモニックマイナー(和声的短音階)<br />(エオリアン♮7)",
"Locrian ♮6",
"ロクリアン♮6",
"Ionian augmented<br />(Ionian ♯5)",
"イオニアンオーグメンテッド<br />(イオニアン♯5)",
"Dorian ♯4",
"ドリアン♯4",
"Phrygian dominant<br />(Phrygian ♮3)",
"フリジアンドミナント<br />(フリジアン♮3)",
"Lydian ♯2",
"リディアン♯2",
"Altered diminished<br />(Locrian ♭4 𝄫7)",
"オルタードディミニッシュド<br />(ロクリアン ♭4 𝄫7)",
}
}
elseif step_pattern == "LLsLsAs" then
elseif step_pattern == "LLsLsAs" then
201行目: 201行目:
-- Closest-mode search always returns one name
-- Closest-mode search always returns one name
mode_names = {
mode_names = {
"Harmonic major<br />(Ionian ♭6)",
"ハーモニックメジャー(和声的長音階)<br />(イオニアン♭6)",
"Dorian ♭5",
"ドリアン♭5",
"Phrygian ♭4",
"フリジアン♭4",
"Lydian ♭3",
"リディアン♭3",
"Mixolydian ♭2",
"ミクソリディアン♭2",
"Lydian augmented ♯2<br />(Lydian ♯2 ♯5)",
"リディアンオーグメンテッド♯2<br />(リディアン ♯2 ♯5)",
"Locrian 𝄫7",
"ロクリアン𝄫7",
}
}
elseif step_pattern == "LsLLLLs" then
elseif step_pattern == "LsLLLLs" then
213行目: 213行目:
-- Closest-mode search sometimes returns two names
-- Closest-mode search sometimes returns two names
mode_names = {
mode_names = {
"Melodic minor<br />(Ionian ♭3, Dorian ♮7)",
"メロディックマイナー(旋律的短音階)<br />(イオニアン♭3, ドリアン♮7)",
"Dorian ♭2, Phrygian ♮6",
"ドリアン♭2, フリジアン♮6",
"Lydian augmented<br />(Lydian ♯5)",
"リディアンオーグメンテッド<br />(リディアン♯5)",
"Lydian dominant<br />(Lydian ♭7, Mixolydian ♯4)",
"リディアンドミナント<br />(リディアン♭7, ミクソリディアン♯4)",
"Mixolydian ♭6, Aeolian ♮3",
"ミクソリディアン♭6, エオリアン♮3",
"Half-diminished<br />(Aeolian ♭5, Locrian ♮2)",
"ハーフディミニッシュド<br />(エオリアン♭5, ロクリアン♮2)",
"Altered, Altered dominant<br />(Locrian ♭4)",
"オルタード、オルタードドミナント<br />(ロクリアン♭4)",
}
}
elseif step_pattern == "sLLLLLs" then
elseif step_pattern == "sLLLLLs" then
225行目: 225行目:
-- Closest-mode search sometimes returns two names
-- Closest-mode search sometimes returns two names
mode_names = {
mode_names = {
"Neapolitan major<br />(Ionian ♭2 ♭3, Phrigian ♮6 ♮7)",
"ナポリタンメジャー<br />(イオニアン ♭2 ♭3, フリジアン ♮6 ♮7)",
"Lydian augmented ♯6<br />(Lydian ♯5 ♯6)",
"リディアンオーグメンテッド♯6<br />(リディアン ♯5 ♯6)",
"Lydian augmented dominant<br />(Lydian ♯5 ♭7, Mixolydian ♯4 ♯5)",
"リディアンオーグメンテッドドミナント<br />(リディアン ♯5 ♭7, ミクソリディアン ♯4 ♯5)",
"Lydian minor<br />(Lydian ♭6 ♭7, Aeolian ♮3 ♯4)",
"リディアンマイナー<br />(ロクリアン ♭6 ♭7, エオリアン ♮3 ♯4)",
"Major locrian<br />(Mixolydian ♭5 ♭6, Locrian ♮2 ♮3)",
"メジャーロクリアン<br />(ミクソリディアン ♭5 ♭6, ロクリアン ♮2 ♮3)",
"Altered dominant ♮2<br />(Aeolian ♭4 ♭5, Locrian ♮2, ♭4)",
"オルタードドミナント♮2<br />(エオリアン ♭4 ♭5, ロクリアン ♮2, ♭4)",
"Altered dominant 𝄫3<br />(Locrian 𝄫3 ♭4)",
"オルタードドミナント𝄫3<br />(ロクリアン 𝄫3 ♭4)",
}
}
elseif step_pattern == "sLLLsAs" then
elseif step_pattern == "sLLLsAs" then
237行目: 237行目:
-- Closest-mode search always returns one name
-- Closest-mode search always returns one name
mode_names = {
mode_names = {
"Neapolitan minor<br />(Phrygian ♮7)",
"ナポリタンマイナー<br />(フリジアン♮7)",
"Lydian ♯6",
"リディアン♯6",
"Mixolydian augmented<br />(Mixolydian ♯5)",
"ミクソリディアンオーグメンテッド<br />(ミクソリディアン♯5)",
"Aeolian ♯4",
"エオリアン♯4",
"Locrian dominant<br />(Locrian ♮3)",
"ロクリアンドミナント<br />(ロクリアン♮3)",
"Ionian ♯2",
"イオニアン♯2",
"Altered diminished 𝄫3<br />(Locrian 𝄫3 ♭4 𝄫7)",
"オルタードディミニッシュド𝄫3<br />(ロクリアン 3 ♭4 𝄫7)",
}
}
elseif step_pattern == "sAsLsAs" then
elseif step_pattern == "sAsLsAs" then
249行目: 249行目:
-- Closest-mode search sometimes returns two names
-- Closest-mode search sometimes returns two names
mode_names = {
mode_names = {
"Double harmonic<br />(Ionian ♭2 ♭6, Phrygian ♮3 ♮7)",
"ダブルハーモニック<br />(イオニアン ♭2 ♭6, フリジアン ♮3 ♮7)",
"Lydian ♯2 ♯6",
"リディアン♯2 ♯6",
"Altered ♮5 𝄫6<br />(Phrygian ♭4 𝄫7)",
"オルタード♮5 𝄫6<br />(フリジアン ♭4 𝄫7)",
"Double harmonic minor<br />(Lydian ♭3 ♭6, Aeolian ♯4 ♮7)",
"ダブルハーモニックマイナー<br />(リディアン ♭3 ♭6, エオリアン ♯4 ♮7)",
"Mixolydian ♭2 ♭5, Locrian ♮3 ♮6",
"ミクソリディアン ♭2 ♭5, ロクリアン ♮3 ♮6",
"Ionian augmented ♯2<br />(Ionian ♯2 ♯5)",
"イオニアンオーグメンテッド ♯2<br />(イオニアン ♯2 ♯5)",
"Locrian 𝄫3 𝄫7",
"ロクリアン 𝄫3 𝄫7",
}
}
elseif #step_pattern == 0 then
elseif #step_pattern == 0 then
-- True-mos modes
-- True-mos modes
mode_names = {  
mode_names = {  
"Lydian",
"リディアン",
"Ionian (major)",
"イオニアン (長調/メジャー)",
"Mixolydian",
"ミクソリディアン",
"Dorian",
"ドリアン",
"Aeolian (minor)",
"エオリアン(短調/マイナー)",
"Phrygian",
"フリジアン",
"Locrian"
"ロクリアン"
}
}
end
end