任务

在这个挑战中，您的任务是编写三个程序，这些程序形成一种相互类似quine的系统。让我们把这些程序A，B和C。如果其中一个程序被提供了另一个程序的源作为输入，则它应输出第三个程序的源。例如，如果A给出B作为输入，则输出C。如果给程序提供了它们自己的源作为输入，则它们应输出三个字符串"three"，"mutual"和"quines"（不带引号）。在所有情况下，它们都可能输出一个附加的尾随换行符。对于任何其他输入，程序可能会执行任何操作，包括崩溃。

例

例如，假设的源代码A，B和C是aSdf，ghJk和zxcV。然后，程序应表现如下。

Source Input  Output
--------------------
aSdf   aSdf   three
aSdf   ghJk   zxcV
aSdf   zxcV   ghJk
ghJk   aSdf   zxcV
ghJk   ghJk   mutual
ghJk   zxcV   aSdf
zxcV   aSdf   ghJk
zxcV   ghJk   aSdf
zxcV   zxcV   quines

规则和计分

该解决方案A，B并且C可以是功能或完整的程序，但他们必须是完全独立的：没有共享的代码是允许的。 由于存在标准漏洞和quine规则，因此程序无法以任何方式访问其自身的源代码。

你的分数是结合字节数A，B以及C较低的分数更好。

CJam，165个 147 114 108 99字节

2 _ri^_q+@"quinesmutualthree"6/=?

1 _ri^_q+@"quinesmutualthree"6/=?

3 _ri^_q+@"quinesmutualthree"6/=?

感谢@MartinBüttner的建议，该建议有助于节省48个字节！

在CJam解释器中在线尝试。

验证

$ cat A
2 _ri^_q+@"quinesmutualthree"6/=?
$ cat B
1 _ri^_q+@"quinesmutualthree"6/=?
$ cat C
3 _ri^_q+@"quinesmutualthree"6/=?
$ 

$ cjam A < A
three
$ cjam A < B
3 _ri^_q+@"quinesmutualthree"6/=?
$ cjam A < C
1 _ri^_q+@"quinesmutualthree"6/=?
$ 

$ cjam B < A
3 _ri^_q+@"quinesmutualthree"6/=?
$ cjam B < B
mutual
$ cjam B < C
2 _ri^_q+@"quinesmutualthree"6/=?
$ 

$ cjam C < A
1 _ri^_q+@"quinesmutualthree"6/=?
$ cjam C < B
2 _ri^_q+@"quinesmutualthree"6/=?
$ cjam C < C
quines

理念

集合{0，1，2，3}是操作^（二进制异或）下的一个组，其中每个元素都是其自己的逆。

如果除了第一个字符（元素{0,1,2,3}）之外的所有三个程序都相同，我们可以轻松区分并打印它们：

• 我们首先对源代码和输入开头的数字进行异或运算。

• 如果结果为0，则源和输入匹配。

  因此，我们将打印由该公共数字选择的三个单词之一。

• 如果结果不为0，则为的元素 {1，2，3}既不在源中也不在输入中。

  因此，我们先打印它，然后打印其余的输入。

怎么运行的

2                                  e# Push the number N on the stack.
  _                                e# Push a copy.
    r                              e# Read a token from STDIN, i.e., the input up
                                   e# to and excluding the next whitespace char.
     i                             e# Cast to integer.
      ^                            e# XOR it with the copy of N. Result: X
       _                           e# Push a copy of the result.
        q+                         e# Append the rest of the input.
          @                        e# Rotate N on top of the stack.
           "quinesmutualthree"6/   e# Push ["quines" "mutual" "three"].
                                =  e# Select the word at index N.
                                 ? e# If X is non-zero, select the modified input;
                                   e# otherwise, select the word.