Lua 按根音和和弦名称拆分字符串

Question

我需要将很多和弦名称拆分为键和和弦类型：

name = C
name = C#
name = Db
name = C#maj7b5
name = Cmaj7b5
name = Dbmaj7b5

所以根始终是它自己的字母或带有#或b的字母，它自己的字母或仅带有#或b的字母，默认情况下，根需要= maj。

root = C
chord = maj
root = C#
chord = maj
root = Db
chord = maj
root = C#
chord = maj7b5
root = C
chord = maj7b5
root = Db
chord = maj7b5

我可以得到根名称：

name1 = string.match(name, "%a#") 
name2 = string.match(name, "%ab") 
name3 = string.match(name, "%a")

如果我在 name1 和 name2 中得到 nil 值，那么 root = name3。也只需要和弦名称。

编辑：使用：

chord, pos = nil, 0
chord, p = string.match(region_name, "=%s+([^\n]+)()", pos)
if not p then end
pos = p
root, chord = string.match(region_name, "(%w[#b]?)(.*)$")
if not chord or #chord == 0 then chord = "maj" end

Answer 1

#!/usr/bin/env luajit

local text = [[
   name = C
   name = C#
   name = Db
   name = C#maj7b5
   name = Cmaj7b5
   name = Dbmaj7b5
]]

local chord, pos = nil, 0
while true do
   local chord, p = text:match("=%s+([^\n]+)()", pos) 
   if not p then break end
   pos = p
   local root, chord = chord:match("(%w[#b]?)(.*)$")
   if not chord or #chord == 0 then chord = "maj" end
   print(("root = %s"):format(root))
   print(("chord = %s"):format(chord))
end

解释：

问题的难点在于找到正确的正则表达式。

关于第一个正则表达式：

text:match("=%s+([^\n]+)()", pos) 

您只需获取等号之后的任何内容。正则表达式还会记住匹配的最后一个位置，因此在下一次迭代中，您可以从最后一个位置开始。如果没有匹配，最后一个位置将为零。在这种情况下，程序存在。

现在你得到了和弦，你把它分成两个元素：

chord:match("(%w[#b]?)(.*)$")

第一部分有一个字母 (%w)，然后是字符 '#' 或 'b'，它们被标记为可选 (?)。表达式的另一部分获取任何字符 (.*)，直到字符串结尾。