电子技术论坛_中国专业的电子工程师学习交流社区-中电网技术论坛

标题: BF 科普 & BF 解释器的 JS 实现（2） [打印本页]

作者: look_w 时间: 2019-3-11 20:10 标题: BF 科普 & BF 解释器的 JS 实现（2）

BF 解释器的 JS 函数实现
代码奉上：

function brainLuck(code, input) {          // @1
   const inputChars = input.split('');       // @2

   const codes = code.split('');             // @3
   let codeIdx = 0;

   const arr = [];                            // @4
   let arrIdx = 0;
   let outputStr = '';                      // @5

   while (codeIdx < code.length) {          // @6
      const ops = codes[codeIdx];

      const handleLeftBracket = () => {       // @7
      if (~~arr[arrIdx] === 0) {
         let cnt = 1;

         while (cnt) {
            codeIdx++;
            if (codes[codeIdx] === '[') {
            cnt += 1;
            }
            if (codes[codeIdx] === ']') {
            cnt -= 1;
            }
         }
      }
      };

      const handleRightBracket = () => {       // @8
      if (~~arr[arrIdx] !== 0) {
         let cnt = 1;

         while (cnt) {
            codeIdx--;
            if (codes[codeIdx] === ']') {
            cnt += 1;
            }
            if (codes[codeIdx] === '[') {
            cnt -= 1;
            }
         }
      }
      };

      switch (ops) {                         // @9
      case '>':
         arrIdx += 1;
         break;
      case '<':
         arrIdx -= 1;
         break;
      case '+':
         arr[arrIdx] = (~~arr[arrIdx] + 1) % 256;
         break;
      case '-':
         arr[arrIdx] = (~~arr[arrIdx] || 256) - 1;
         break;
      case ',':
         const iptChar = inputChars.shift();
         arr[arrIdx] = iptChar ? iptChar.charCodeAt(0) : arr[arrIdx];
         break;
      case '.':
         outputStr += String.fromCharCode(arr[arrIdx]);
         break;
      case '[':
         handleLeftBracket();
         break;
      case ']':
         handleRightBracket();
         break;
      }

      codeIdx++;                            // @10
   }

   return outputStr;                         // @11
}

欢迎光临电子技术论坛_中国专业的电子工程师学习交流社区-中电网技术论坛 (http://bbs.eccn.com/)