Добрый вечер, дамы и господа.
Сегодня вечером - у нас есть проблема с кодом. Соревнование, которое будет определяться не количеством очков (а-ля астероиды), а просто тем, сможешь ли ты его закончить (а-ля Зельда). И для сравнения, количество байтов (э-э ... но вы сказали ...).
Ваша задача - составить единую квинну, которая будет компилироваться как в WhiteSpace, так и на любом другом языке по вашему выбору. Обе квины должны иметь абсолютно одинаковый вывод (который, как и лебедка, абсолютно идентичен исходному коду). Ваша квина должна быть более 3 байтов в длину.
Ваша оценка - это размер вашего исходного кода в байтах.
Учитывая, что в этом задании участвует WhiteSpace, пожалуйста, избегайте ответов, чтобы они были четкими - желательно в стиле C. Ваша оценка - это исходный источник в байтах, а не экранированная версия.
Удачи.
Ответы:
Пробелы и Perl,
992975 символовДобрый вечер, дамы и господа.
Начнем с того, что моя заявка закодирована в base64, и я считаю, что это лучший способ сообщить о большой программе Whitespace. (Вы действительно не хотите использовать кодировку, которая оставляет все пробелы как есть, поэтому нет смысла выбирать что-то более «читабельное».)
Вот выдержка, которая выделяет все видимые части источника.
⇥используется для обозначения вкладки и↲для перехода на новую строку.Perl был естественным выбором для второго языка в этой задаче, поскольку он был одним из лучших языков общего назначения для написания компактных квини. Мой самый короткий Perl Quine - 19 байт:
- и вы можете видеть, как это было семенем для Perl половина двойного квина. Моя лучшая квинета Whitespace, по сравнению с ней, имеет длину 541 байт. (Хотя более короткие из них существуют - 445 байтов - лучшее, что я видел.)
С точки зрения интерпретатора Perl, первая строка исходного файла двойной квине содержит два оператора, составляющих всю программу, так как оставшееся содержимое - две строки в кавычках. Первая строка является повторяющейся строкой Perl и ограничена пустой третьей строкой. Вторая строка полностью пустая и проходит от четвертой строки исходного кода до
0разделителя внизу файла.Когда они взяты как программа Whitespace, первые четыре строки содержат три инструкции, которые в основном бесполезны. (Их эффект заключается в том, что они помещают два нулевых значения в стек, а затем отбрасывают второе.) Они включены только для того, чтобы безопасно пройти через новые строки, которые требуются программе Perl - настоящая программа запускается после этого. Вместо того чтобы цитировать нечитаемый источник дальше, вот перефразирование инструкций, составляющих программу Whitespace, в формате, подобном сборке:
Гигантские числа в верхней части - это то, что мы, пользователи Whitespace, должны использовать вместо реальных строк. Не пытайтесь запустить это на интерпретаторе Whitespace, который не имеет надлежащей поддержки bignum.
Наконец, снова программа, но на этот раз с побегами в стиле C, поскольку она была специально запрошена:
источник