Давайте використовувати доповнену реальність для полювання на маленьких істот, захованих у вихідному коді. Напишіть програму quine, яка виводить власне джерело коду, за винятком 5 послідовних символів, які будуть змінені та відображатимуть PCG-mon :(^_^)

У 5 послідовних символів можуть бути розташовані в будь-якому місці в вихідному коді (від позиції 0до n-5, nбудучи довжиною вихідного коду). Вихідний код повинен мати мінімальну довжину 5 символів. Рядок (^_^)або будь-яка його підрядка довжиною> = 2 не повинні відображатися в початковому вихідному коді, лише у вихідному.

Приклад дійсного подання:

• вихідний код my source code, вихідmy (^_^)e code

Недійсний:

• вихідний код (^_^) copy;, вихід(^_^) (^_^)

Критерії виграшу

Виграє найкоротший код у байтах.

Javascript ES6, 44 байти

$=_=>`$=(\^\_\^\)${($+'').slice(5)};$()`;$()

Вихід:

$=(^_^)=(\^\_\^\)${($+'').slice(5)};$()`;$()

Все ще працюю над гольфом, але це працює зараз.

Вім, 33 , 27 натискань клавіш

qqqqqS(<C-v>94_<C-v>94)q@q<esc>hh"qPq@q

Зауважте, що <C-v>означає ctrl + v, і є байтом, 0x16і <esc>є символом втечі, і є байтом 0x1B.

Це просто використовує трохи модифіковану версію мого Гольфу. відповідь.

Виходи:

(^_^)S(^V94_^V94)q@q^[hh"qPq@q

Це справедливо, оскільки ^Vце спосіб представлення vim <C-v>та ^[спосіб представлення vim <esc>.

Основна ідея - просто ввести текст (^_^)його кодовими точками, щоб ми могли уникнути введення цих символів у вихідний код. У режимі <C-v>numberвставки вставить символ ASCII "числа". Однак, оскільки виклик говорить:

Рядок (^_^)або будь-яка його підрядка довжиною> = 2 не повинні відображатися в початковому вихідному коді, лише у вихідному.

Це відповідь на зловживання «подстроки» правило тільки введення кодових з ^символів, і введення (, _і )безпосередньо.

Ось подарунок, який дозволяє вам бачити це рішення в дії і ставить вихідний код та вихідний бік поруч для порівняння:

CJam , 13 11 байт

"(_)"
_p'^*

Онлайн-перекладач (-2 байти завдяки @MartinEnder) .

"(_)"             Push string
      _p          Duplicate and print repr with newline
        '^*       Join string with '^'

Пітон, 115 111 107 байт

def f():s='def f():s=%r;print s%%s.replace(s[:5],"^".join("(_)"))';print s%s.replace(s[:5],"^".join("(_)"))

Виклик f()і вихід:

def f():s='(^_^)():s=%r;print s%%s.replace(s[:5],"^".join("(_)"))';print s%s.replace(s[:5],"^".join("(_)"))

Частиною надихнула ця відповідь на подібне запитання .

CJAM, 16 15 байт

Спробуйте тут .

{"^(_)"(*}_~sss

Перехід (голанг), 131 байт

На цей виклик має бути відповідь у програмі Go!

package main;import"fmt";func main(){a:="package main;import\"fmt\";func(%c_%[1]c)(){a:=%q;fmt.Printf(a,94,a)}";fmt.Printf(a,94,a)}

Спробуйте в Інтернеті!

JavaScript (ES6), 91 байт

Відповідь на JavaScript вже є, але відповідь JS, що не читає джерела, не існує:

a="a=%s;co%s.log(a,uneval(a),`(${'^'}_${'^'})`)";console.log(a,uneval(a),`(${'^'}_${'^'})`)

Це ґрунтується на моїй відповіді, що не читає джерела, щоб Golf ви стали великим добром! . Виходи

a="a=%s;co%s.log(a,uneval(a),`(${'^'}_${'^'})`)";co(^_^).log(a,uneval(a),`(${'^'}_${'^'})`)

Це можна легко змінити, переміщаючись по другому %sв рядку. Наприклад,

a="a=%s;console.log(a,uneval(a),`($%s_${'^'})`)";console.log(a,uneval(a),`(${'^'}_${'^'})`)

виходи

a="a=%s;console.log(a,uneval(a),`($%s_${'^'})`)";console.log(a,uneval(a),`($(^_^)_${'^'})`)

Желе , 22 байти

“4094959441b³ỌØV”ṘVabc

Доступний на TryItOnline

Використовує вбудований корисного навантаження , здатної Куайном на кінці тільки наповнювач повинен бути замінений Перетворює ціле число в базу 100, в результаті чого зліпків до символів, в результаті Таким чином, весь результат“ØV”ṘV
abc
b³[40,94,95,94,41]
Ọ(^_^)
“4094959441b³ỌØV”(^_^)

C # 5,0, 715 байт

Я знаю, це величезна кількість. Просто хотів додати рішення C #.

/*^()_*/using System.CodeDom;namespace System{class P{static void Main(){var b="/*^()_*/using System.CodeDom;namespace System{{class P{{static void Main(){{var b={0};var f=new string(new[]{{b[3],b[2],b[5],b[2],b[4]}});var w=new IO.StringWriter();CodeDom.Compiler.CodeDomProvider.CreateProvider(\"CSharp\").GenerateCodeFromExpression(new CodePrimitiveExpression(b),w,null);Console.WriteLine(b.Replace(\"[4]}}}}}}}}\",f),w);Console.ReadKey();}}}}}}";var f=new string(new[]{b[3],b[2],b[5],b[2],b[4]});var w=new IO.StringWriter();CodeDom.Compiler.CodeDomProvider.CreateProvider("CSharp").GenerateCodeFromExpression(new CodePrimitiveExpression(b),w,null);Console.WriteLine(b.Replace("[4]}}}}",f),w);Console.ReadKey();}}}

Вихід:

/*^()_*/using System.CodeDom;namespace System{class P{static void Main(){var b="/*^()_*/using System.CodeDom;namespace System{{class P{{static void Main(){{var b={0};var f=new string(new[]{{b[3],b[2],b[5],b[2],b[4]}});var w=new IO.StringWriter();CodeDom.Compiler.CodeDomProvider.CreateProvider(\"CSharp\").GenerateCodeFromExpression(new CodePrimitiveExpression(b),w,null);Console.WriteLine(b.Replace(\"[4]}}}}}}}}\",f),w);Console.ReadKey();}}}}}}";var f=new string(new[]{b[3],b[2],b[5],b[2],b[4]});var w=new IO.StringWriter();CodeDom.Compiler.CodeDomProvider.CreateProvider("CSharp").GenerateCodeFromExpression(new CodePrimitiveExpression(b),w,null);Console.WriteLine(b.Replace("(^_^)}}",f),w);Console.ReadKey();}}}

Доступний на Ideone.com

MATL , 14 байт

')_`_*i't&Dwqh

Виробляє вихід ')_`_*i'(^_^)h.

Спробуйте в Інтернеті!

Пояснення

')_`_*i'  % Push this string
t&D       % Duplicate and get string representation (i.e. enclose with quotes)
w         % Swap
q         % Subtract 1. Transforms ')_`_*i' into the code points of '(^_^)h'
h         % Concatenate. Automatically casts code points to chars. Implicitly display

Баш, 178 байт

Q='#(8_8)
printf "Q=\47"
echo -n "$Q"|sed -r "s~(_|\()8~\1^~g"
echo -e "\x27"
tail<<<"$Q" -n4'
printf "Q=\47"
echo -n "$Q"|sed -r "s~(_|\()8~\1^~g"
echo -e "\x27"
tail<<<"$Q" -n4

Пффф, я не хороший в лайках: / Будь-яка пропозиція про те, щоб пограти в гольф більше, ніж вітається! :-)