Update dongguk.js

Fix Yale Romanization

Author: judith04

dongguk.js

@@ -25,6 +25,7 @@ if (!音韻地位) return [
 
 const is推導例外 = 選項.推導原書部分例外讀音;
 const is推導現代 = 選項.推導現代讀音;
+const is耶魯轉寫 = 選項.注音方案 === '耶魯轉寫';
 
 const 轉寫 = {
   '耶魯轉寫': {
@@ -35,11 +36,11 @@ const 轉寫 = {
     ᄉ: 's', 　        ᄊ: 'ss', 　        ᅀ: 'z',
     ᅙ: 'q', ᄒ: 'h',  ᅘ: 'hh', 　        ᄋ: '',
 
-    ᆞ: 'o', ᆡ: 'oy', ᅩ: 'wo', ᅬ: 'woy', ᅭ: 'yo',
-    ᅳ: 'u', ᅴ: 'uy', ᅮ: 'wu', ᅱ: 'wuy', ᅲ: 'yu', ᆔ: 'yuy',
-    ᅵ: 'i',
-    ᅡ: 'a', ᅢ: 'ay', ᅪ: 'wa', ᅫ: 'way', ᅣ: 'ya', ᅤ: 'yay',
-    ᅥ: 'e', ᅦ: 'ey', ᅯ: 'we', ᅰ: 'wey', ᅧ: 'ye', ᅨ: 'yey', ᆑ: 'yuye', ᆒ: 'yuyey',
+    ᆞ: 'o', ᆡ: 'oy', 　        　         ᅩ: 'wo', ᅬ: 'woy', ᅭ: 'ywo',
+    ᅳ: 'u', ᅴ: 'uy', 　        　         ᅮ: 'wu', ᅱ: 'wuy', ᅲ: 'ywu', ᆔ: 'ywuy',
+    ᅵ: 'i', 　        　        　      // ᅱ: 'wi',
+    ᅡ: 'a', ᅢ: 'ay', ᅣ: 'ya', ᅤ: 'yay', ᅪ: 'wa', ᅫ: 'way',
+    ᅥ: 'e', ᅦ: 'ey', ᅧ: 'ye', ᅨ: 'yey', ᅯ: 'we', ᅰ: 'wey', ᆑ: 'ywe', ᆒ: 'ywey',
 
     ᇰ: 'ng', ᆨ: 'k',  ᆼ: is推導現代 ? 'ng' : '',
     ᆫ: 'n',  ᇙ: 'lq', ᆯ: 'l',
@@ -61,6 +62,7 @@ const 轉寫 = {
 };
 
 function 音變(音節) {
+  const hasᅵ = 'ᅵᅭᅣᅲᅧᅨ'.includes(音節.中聲);
   function 替換(key, rule, condition = true) {
     if (condition) Object.entries(rule).forEach(([k, v]) => {
       音節[key] = 音節[key].replace(k, v);
@@ -74,8 +76,8 @@ function 音變(音節) {
   替換('中聲', { ᆞ: 'ᅡ', ᆡ: 'ᅢ', ᆔ: 'ᅲ', ᆑ: 'ᅧ', ᆒ: 'ᅨ' });
   替換('終聲', { ᇢ: '', ᆼ: '', ᇰ: 'ᆼ', ᇙ: 'ᆯ' });
   替換('初聲', { ᄅ: 'ᄂ' }, 選項.應用頭音法則);
-  替換('初聲', { ᄂ: 'ᄋ' }, 'ᅵᅭᅣᅲᅧᅨ'.includes(音節.中聲) && 選項.應用頭音法則);
-  替換('初聲', { ᄃ: 'ᄌ', ᄐ: 'ᄎ' }, 'ᅵᅭᅣᅲᅧᅨ'.includes(音節.中聲));
+  替換('初聲', { ᄂ: 'ᄋ' }, hasᅵ && 選項.應用頭音法則);
+  替換('初聲', { ᄃ: 'ᄌ', ᄐ: 'ᄎ' }, hasᅵ);
   替換('中聲', { ᅭ: 'ᅩ', ᅣ: 'ᅡ', ᅲ: 'ᅮ', ᅧ: 'ᅥ', ᅨ: 'ᅦ' }, 'ᄌᄎᄉ'.includes(音節.初聲));
   替換('中聲', { ᅳ: 'ᅮ' }, 'ᄇᄆ'.includes(音節.初聲));
   替換('中聲', { ᅴ: 'ᅵ' }, !'ᄒᄋ'.includes(音節.初聲));
@@ -260,13 +262,18 @@ function 聲調() {
   }
   return {
     諺文: { 平: '', 上: '〯', 去: '〮', 入: '〮' },
-    耶魯轉寫: { 平: '', 上: '̌', 去: '́', 入: '́' },
+    耶魯轉寫: { 平: '̀', 上: '̌', 去: '́', 入: '́' },
   }[選項.注音方案][音韻地位.聲];
 }
 
 音節 = 音節.初聲 + 音節.中聲 + 音節.終聲;
-if (選項.注音方案 !== '諺文') Object.entries(轉寫[選項.注音方案]).forEach(([k, v]) => {
-  音節 = 音節.replace(k, v);
-});
-if (選項.注音方案 === '耶魯轉寫') return 音節.replace(/.*[aeiou]/, "$&" + 聲調());
+if (選項.注音方案 !== '諺文') Object.entries(轉寫[選項.注音方案]).forEach(([k, v]) => { 音節 = 音節.replace(k, v); });
+if (選項.注音方案 === '耶魯轉寫') {
+  if (is推導現代) {
+    音節 = 音節.replace('wo', 'o');
+    if (is`脣音` || 音節.includes('ywu')) 音節 = 音節.replace('wu', 'u');
+    音節 = 音節.replace('wuy', 'wi');
+  }
+  return 音節.replace(/.*[aeiou]/, "$&" + 聲調());
+}
 return 音節 + 聲調();