Давайте зробимо пошук слова!


35

У цьому виклику ми разом створимо пошук слів, що містить безліч програм на різних мовах.

Я розпочав нас із сітки з 60 пробілами ( ·), деякі з яких замінені символами програми Ruby.

Для відповіді виберіть мову, яка ще не використовувалася. Використовуючи обрану мову, напишіть програму, яка зчитує символ, маркер, рядок або весь вхід з консолі та роздруковує її . Потім вставте свою програму в пошук слів.

Наприклад, припустимо, що для своєї відповіді ви вибрали Python 3 і написати програму print(input()). Тепер ви повинні вставити цю програму в сітку.

Якщо сітка перед вашою відповіддю виглядає так:

···a·24··········
··z····t·········

Тоді ви можете просто помістити свою програму у другий рядок, перекриваючи існуючу t:

···a·24··········
··zprint(input())

Зауважте, що ви можете розміщувати свою програму в будь-якому напрямку: вперед, назад, вгору, вниз або по діагоналі, якщо вона знаходиться по прямій лінії.

Але що робити, якщо існуюча сітка виглядає так:

···a·24··········
··z····q·········

Тут немає можливості підігнати print(input())без зміни існуючих символів, що заборонено. Натомість ви можете змінити програму:

print(
 input())

Ця дворядкова програма акуратно підходить:

···a·24·print(···
··z····q input())

Тут ви замінюєте пробіл ( ·) пробілом ( ). Однак пробіл подібно до будь-якого іншого символу, і його не можна перезаписати в майбутніх програмах.

Так само, як однолінійний, багаторядкова програма може бути розміщена в будь-якому напрямку. Наприклад, у більшій сітці ви можете зробити наступне, обертаючи програму на 135 ° за годинниковою стрілкою.

··········
········ ·
·······i·p
······n·r·
·····p·i··
····u·n···
···t·t····
··(·(·····
·)········
)·········

Оцінка балів

Ваша оцінка за кожну відповідь тридцять ділиться на кількість доданих символів. Не рахуйте символів, які вже існували в сітці, навіть якщо ви самі їх використовуєте.

Ваш загальний бал - це сума балів за всі ваші відповіді, помножена на кількість відповідей. Найвищий результат виграє.

Правила

  • Кожна відповідь повинна бути написана іншою мовою. Мови, які відрізняються лише номером версії (наприклад, Python 2 та Python 3), вважаються однаковими.
  • Кожна відповідь повинна вибудовувати останню дійсну відповідь. Тобто візьміть сітку останньої такої відповіді та вставте в неї свою програму.
  • Щоб вставити програму, замініть принаймні один із пробілів ( ·) на обрані вами символи. Ви можете використовувати наявні символи з сітки у своїй відповіді, але ви не можете змінювати або переміщувати жоден із них.
  • Ви не можете вставляти більше 500 символів у всіх своїх відповідях.
  • Усі вставлені символи повинні бути частиною вашої програми.
  • Ваша програма може складатися лише з друкованих ASCII та нових рядків, але може бути не дві чи більше послідовних нових рядків "назад-назад".
  • Нові рядки не враховуються вашим балом.
  • Потрібна повна програма, а не лише функція чи фрагмент.
  • Один і той же користувач може не писати двох послідовних відповідей.
  • Якщо відповідь когось порушує правило, залиште коментар. Якщо помилка не виправлена ​​за 30 хвилин, її слід видалити.

Використовуваний фрагмент мови

Це фрагмент стека, зроблений ETHproductions, FryAmTheEggman та Mauris, який відстежує кількість користувачів та використовувані мови. Він спочатку був скопійований із дивовижного шаблону Мартіна Бюттнера .

Оригінальний таблиця лідерів:

Нова (експериментальна) версія з використанням модифікованої формули:

Щоб переконатися, що ваш фрагмент розпізнається за фрагментом, використовуйте такий шаблон заголовка:

# Language, X characters added

2
Е, я б просто покладався на те, що громада буде досить прохолодною, щоб не робити чогось нудного :)
Лінн

5
У мене встановлений базовий фрагмент "лідерів", скопійований із дивовижного шаблону Мартіна, який відстежує використовувані мови. Чи можу я відредагувати його до публікації?
ETHproductions

1
Добре, я додав фрагмент. Я видалив лише непотрібну частину HTML, тому сміливо скорочуйте CSS або JS.
ETHproductions

2
Я б припустив, що наступного разу хтось зробить щось подібне, щоб вони обмежилися мовами, помітними для того, щоб мати запис у Вікіпедії, чи щось подібне. Це насправді не схоже на справжній пошук слів із десятками записів на один-два символи з езотеричних мов, про які ніхто ніколи не чув.
ТадеусB

3
Хтось повинен розширити фрагмент, щоб мати таблицю лідерів, в якій перелічуються оцінки за автора.
Лінн

Відповіді:


12

Java, додано 124 символи

Поки ще є місце!

class C{public static void main(String[]a) throws Throwable{
System.out.println(new java.util.Scanner(System.in).next());
}}

Сітка зараз

····························································
···········i········a·······································
··········?pio;·····l·······································
··········,u········e·······································
··········.t········r·······································
··········@s········t·······································
··········· ··printf(·······································
···········g··    input('','s'))····························
···········e·····n··r·······································
········write(read-host)····································
·········E·s········m·······································
········C·E·········p·······································
·······H·T··········t·····················r·················
······O· ···········(·······································
····· ·/············)·······································
····%·P·············)·······································
···A· ······················································
··%·A·······················································
···=························································
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc    
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS    
··························································}}
····························································
····························································
····························································

Зробив редагування ніндзя та змінив код у сітці, оскільки стан OP код може бути зворотним. Потім переобладнали його на наступну відповідь


11

Свинка, додано 23 символи

Ще раз вибачте за те, що пропустіли одну вимогу у питанні.

ось моє нове подання:

s t=" " r t#50:20 w !,t,!

Це встановлює змінну t пробілом, потім зчитує щонайбільше 50 символів зі стандартного вводу з 20-секундним тайм-аутом, записує новий рядок, змінну, потім інший новий рядок. (Багато терміналів свинки стають ніби безладними, якщо цього не зробити ...)

Сітка зараз:

····························································
···········i········a·······································
··········?pio;·····l·······································
··········,u········e·······c·······························
··········.t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
········write(read-host)····a·······························
·········E·s········m·······n·······························
········C·E·········p·······(·······························
·······H·T··········t·······,·············r·················
······O· ···········(·······'·······························
····· ·/············)·······'·······························
····%·P·············)·······)·······························
···A· ······················)·······························
··%·A·······················································
···=························································
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc    
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS    
··························································}}
····························································
····························································
····························································

що гомоване подання на R зробило це трохи складніше написати ... :-)


10

Бітник , додано 29 символів

Get a chr!
Outputs it
and 'BZam.

Пояснення найближчі :)

Отримайте # проігноровано зі значеннями скребблювання під 5
chr! # оцінка 8, введіть символ і натисніть його значення
Результати # оцінка 9 , введіть число і виведіть його символом
і # проігноруйте з балами під 5
'BZam. # бал 17 припиняє програму

Нова сітка

·········v---H\·············································
·········>qir@uH····a·······································
Get a chr!?pio;·····l·······································
Outputs it,u········e·······c·······························
and 'BZam..t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
········write(read-host)····a·······························
·········E·s········m·······n·······························
········C·E·········p·······(·······························
·······H·T··········t·······,·············r·················
······O· ···········(·······'·······························
····· ·/············)·······'·······························
····%·P·············)·······)·········1·····················
···A· ······················)········n······················
··%·A·······························-·······················
···=······························· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc    
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS    
································e···a·····················}}
·······························h···=························
··································<·························
·································>··························

Я думаю, що Б'Зам повинен бути "БЗам, оскільки апостроф у середині технічно складає два слова". 'BZam набрав би 17 пунктів і припинить програму. Крім того, можна стверджувати, що це невірно, оскільки перекладач може знущатися над вами за те, що низький бал "отримати", "це" і "і". Я думаю, це все добре.
Майк Буфардечі

@MikeBufardeci Я думаю, що ти можеш помилитися на BZam. Зміниться, оскільки це не вплине на наступну відповідь
MickyT

9

C, додано 27 символів

Хтось згадав C, і я побачив, що це все-таки можливо.

main( ){printf("%c",  (getchar()));}

Нова сітка:

·········v---H\·············································
······,··>qir@uH···IaP.·····································
Get a chr!?pio;·····l·······································
Outputs it,u········e·······c··········print(readline())····
and 'BZam..t········r·······a·······························
········~,@s······s t=" " r t#50:20 w !,t,!·················
······main( ){printf("%c",  (getchar()));}··················
···········g·>    input('','s'))····························
···········e·····n··r·······c·········g·····················
·······(write(read-host)····a)········r······ ··············
·······))E·s········m·······n)········e·····················
········C·E·········p·······((·······{print;exit}····K······
·······H·T··········t·······,t········ ···r·················
······O· ···········(·······'u········-·····················
····· ·/············)·······'p········m·····················
····%·P·············)·······)n········1·····················
···A· ······················)io······n ·····················
··%·A························(······-·.·····················
···=·························t\···· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

8

??? , Додано 1 символ

?!

Сітка зараз:

·········v---H\·············································
·········>qir@uH····a·······································
·········!?pio;·····l·······································
··········,u········e·······c·······························
··········.t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
········write(read-host)····a·······························
·········E·s········m·······n·······························
········C·E·········p·······(·······························
·······H·T··········t·······,·············r·················
······O· ···········(·······'·······························
····· ·/············)·······'·······························
····%·P·············)·······)·········1·····················
···A· ······················)········n······················
··%·A·······························-·······················
···=······························· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc    
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS    
································e···a·····················}}
·······························h···=························
··································<·························
·································>··························

6

Урна , додано 3 символи

(:::)

Нова сітка:

·········v---H\··v+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C·············A·USE: io·········>····
Get a chr!?pio;····Ol···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·E····
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;····
O·········)g·>    input('','s'))·················h_··)·P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)···KVGH·e·print n$!·m····;····
········C·E·········p·······((···TIIA{print;exit}·pYEK·*····
$'main'H·T··········t·······,t···HSMI· ···r·······(·········
 \/\··O· ···········(·······'u···XIM ·-···········$·········
  \/· ·/(println····)·······'p···BBE1·m···········a·········
   \%·PQ  (read-line))······)n···YLH.·1···········r·········
   A\     /-io-\············)io··EE 4n ·····`·····g·········
  % A\-e-<     |·············(···· V-·.··di _r(a)·v·········
 $ =      \----#·············t\···V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts····>i:1+?/;···················

5

Рубі, додано 9 символів

puts gets

Сітка зараз:

····························································
····························································
···········p················································
···········u················································
···········t················································
···········s················································
··········· ················································
···········g················································
···········e················································
···········t················································
···········s················································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································

5

LISP, додано 3 символи

(write(read
))

Нова сітка:

·········v---H\·············································
·········>qir@uH····a·······································
Get a chr!?pio;·····l·······································
Outputs it,u········e·······c·······························
and 'BZam..t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
·······(write(read-host)····a)······························
·······))E·s········m·······n)······························
········C·E·········p·······((······························
·······H·T··········t·······,t············r·················
······O· ···········(·······'u······························
····· ·/············)·······'p······························
····%·P·············)·······)n········1·····················
···A· ······················)i·······n······················
··%·A························(······-·······················
···=·························t····· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a·····················}}
·····························p·h···=························
··································<·························
·································>··························

5

Perl, додано 6 символів

die
$  a=<>

Сітка зараз:

·········v---H\·············································
·········>qir@uH····a·······································
··········?pio;·····l·······································
··········,u········e·······c·······························
··········.t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
········write(read-host)····a·······························
·········E·s········m·······n·······························
········C·E·········p·······(·······························
·······H·T··········t·······,·············r·················
······O· ···········(·······'·······························
····· ·/············)·······'·······························
····%·P·············)·······)·······························
···A· ······················)·······························
··%·A·······················································
···=···································$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc    
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS    
····································a·····················}}
···································=························
··································<·························
·································>··························

Ваша діагональна програма неправильна. Перегляньте приклад обертання на 135 градусів. Існує порожня діагональна лінія, яку вам потрібно було б мати.
mbomb007

@ mbomb007 Ах, треба виправити, я думаю.
ThaddeusB


@MickyT Дякую за редагування :)
ThaddeusB

5

Квіпу , додано 3 символи

Програма для кішок у Quipu - чотири символи:

\/
/\

Я повернув це на 90 ° і повторно застосував одну з косої частини залізниці програми .

Нова сітка:

·········v---H\··v+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C·············A·USE: io·········>····
Get a chr!?pio;····Ol···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;···;····
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?···E····
G·····main( ){printf("%c",  (getchar()));}·······pr>···;····
O··········g·>    input('','s'))·················h_····P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)···KVGH·e·print n$··m····;····
········C·E·········p·······((···TIIA{print;exit}·pYEK·*····
$'main'H·T··········t·······,t···HSMI· ···r·······(·········
 \/\··O· ···········(·······'u···XIM ·-···········$·········
  \/· ·/(println····)·······'p···BBE1·m···········a·········
   \%·P·  (read-line))······)n···YLH.·1···········r·········
   A\     /-io-\············)io··EE 4n ·····`·····g·········
  % A\-e-<     |·············(···· V-·.··di _r(a)·v·········
 $ =      \----#·············t\···V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni·····<·························
···};s<<tuoc::dts;s>>nic::dts····>··························

5

Marbelous , додано 7 символів

00
\\/\]]

(Якби я правильно зрозумів, як працює Marbelous ...)

·········v---H\OIv+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C········LAMBDA·USE: io·········>····
Get a chr!?pio;····Ol···········ZEROY·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))·o<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·E····
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;····
O·········)g·>    input('','s'))·················h_··)·P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)···KVGH·e·print n$!·m····;····
········C·E·········p·······((···TIIA{print;exit}·pYEK·*····
$'main'H·TUPTUO·····t·00····,t···HSMI· ···r·······(·········
 \/\··O· ·TUPNI···S (I\\/\]]'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·m···········a·········
   \%·PQ  (read-line))······)n···YLH.·1··print(io.read())···
   A\     /-io-\············)io··EE 4n ····,`·····g·········
  % A\-e-<     |··········)#_(···· V-·.··di _r(a)·v·········
 $ =      \----#·············t\·c&V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;][gnirtStupnI@tnirP

Оскільки вам потрібно прочитати лише один символ, 00\n]]зробив би це також.
Мартін Ендер

Справді. Я забув, що читання одного персонажа - це можливість.
планнапус

4

Pyth, додано 1 символ

w

Сітка зараз:

····························································
····························································
··········?pio··············································
··········,u················································
··········.t················································
···········s················································
··········· ················································
···········g················································
···········e················································
········w··t················································
···········s················································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································

4
w__t_Я бачу, що ви там зробили
PurkkaKoodari

@ Pietu1998 треба заздалегідь планувати! Не хочу, щоб воно перейшло так швидко лише в езоланг, як це зробила еволюція привітного світу: ^)
FryAmTheEggman

4

PowerShell, додано 14 символів

write(read-host)

Мені буде приємно і дам людям набагато більше місця для дихання. :)

Сітка зараз

····························································
···········i················································
··········?pio;·············································
··········,u················································
··········.t················································
···········s················································
··········· ················································
···········g················································
···········e················································
········write(read-host)····································
···········s················································
····························································
··········································r·················
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································

Ах, пропустив це
Патрік Робертс

4

ALGOL 68, 7 символів додано

print(read 
string)

Нова сітка:

·········v---H\········································;····
······,··>qir@uH···IaP.················USE: io·········>····
Get a chr!?pio;·····l··················readln··········;····
Outputs it,u········e·······c··········print(readline())····
and 'BZam..t········r·······a··········string)·········;····
········~,@s······s t=" " r t#50:20 w !,t,!············E····
······main( ){printf("%c",  (getchar()));}·············;····
···········g·>    input('','s'))·······················P····
···········e·····n··r·······c·········g················;····
·······(write(read-host)····a)········r·input n········(····
·······))E·s········m·······n)········e·print n········;····
········C·E·········p·······((·······{print;exit}····K·*····
·······H·T··········t·······,t········ ···r·················
······O· ···········(·······'u········-·····················
····· ·/············)·······'p········m·····················
····%·P·············)·······)n········1·····················
···A· ······················)io······n ·····················
··%·A························(······-·.·····················
···=·························t\···· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

4

LOLCODE , 31 символів додано

HAI 1.4
GIMMEH V
VISIBLE V
KTHXBYE

Просто праворуч від середини, повернутий на 90 o . Буцалося красиво проти -, іd там. Між цим, Batch файлами та PowerShell, я майже впевнений, що я не збираюсь вигравати на основі очок. :-)

Сітка зараз:

·········v---H\··v+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C·············A·USE: io·········>····
Get a chr!?pio;····Ol···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;···;····
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?···E····
G·····main( ){printf("%c",  (getchar()));}·······pr>···;····
O··········g·>    input('','s'))·················h_····P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)···KVGH·e·print n$··m····;····
········C·E·········p·······((···TIIA{print;exit}·pYEK·*····
·······H·T··········t·······,t···HSMI· ···r·······(·········
······O· ···········(·······'u···XIM ·-···········$·········
····· ·/(println····)·······'p···BBE1·m···········a·········
····%·P·  (read-line))······)n···YLH.·1···········r·········
···A· ······················)io··EE 4n ·····`·····g·········
··%·A························(···· V-·.··di _r(a)·v·········
·$·=·························t\···V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

(Я також виправив четвертий рядок знизу)


4

Пролог (SWI), додано 14 символів

:-get(C),
put(C).

Читає один символ і виводить його. У Ideone це працює, але виводиться на stderr. З swiplUbuntu він робить наступне:

dlosc@dlosc:~/tests$ swipl -qs getput.prolog
|: X
X?-

де Xвведений символ і ?-підказка. Ви можете вийти з підказки за допомогою Ctrl-D.

Нова сітка (код читається зверху вниз, справа наліво біля верхнього правого кута):

·········v---H\OIv+C+<D_··············S·Psgv···········;····
G`····,··>qir@uH·  IaP.C········LAMBDA·USE: io·········>····
Get a chr!?pio;p···Ol···········ZEROY·Lreadln(write(···;····
Outputs it,u··a$ ohce·······c······ ·L·print(readline())····
and 'BZam..t···a daer·······a·····ai ··string))·o<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·Eu-··
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;tg··
O·········)g·>    input('','s'))·················h_··)·P(e··
a··········e·····n··r·····^·c·········g··········pd····;Ct··
·······(write(read-host)····a)········r·input n$!?u····()(··
·······))E·s········m·······n)···KVGH·e·print n$!·m····;.C··
········C·E·········p·······((···TIIA{print;exit}·pYEK·*·)··
$'main'H·TUPTUO·····t·00····,t···HSMI· ···r·······(······,··
 \/\I^O= ·TUPNI···S (I\\/\]]'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·m···········a·········
   \%·PQ  (read-line))······)n···YLH.·1··print(io.read())···
   A\     /-io-\············)io··EE 4n ··@.,`·····g·········
  % A\-e-<     |··········)#_(···· V-·.··di _r(a)^v·········
 $ =      \----#·············t\·c&V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;][gnirtStupnI@tnirP

4

oOo КОД , додано 1 символ

ROYALr

Нова сітка:

·········v---H\OIv+C+<D_··············S·Psgv···········;····
G`····,··>qir@uH·  IaP.C········LAMBDA·USE: io·········>····
Get a chr!?pio;p···Ol···········ZEROYALreadln(write(···;····
Outputs it,u··a$ ohce·······c······ ·L·print(readline())····
and 'BZam..t···a daer·······a·····ai ··string))·o<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·Eu-··
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;tg··
O·········)g·>    input('','s'))·················h_··)·P(e··
a··········e·····n··r·····^·c·········g··········pd····;Ct··
·······(write(read-host)····a)········r·input n$!?u····()(··
·······))E·s········m·······n)···KVGH·e·print n$!·m····;.C··
········C·E·········p·······((···TIIA{print;exit}·pYEK·*·)··
$'main'H·TUPTUO·····t·00····,t···HSMI· ···r·······(······,··
 \/\I^O= ·TUPNI···S (I\\/\]]'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·m···········a·········
   \%·PQ  (read-line))······)n···YLH.·1··print(io.read())···
   A\     /-io-\············)io··EE 4n ··@.,`·····g·········
  % A\-e-<     |··········)#_(···· V-·.··di _r(a)^v·········
 $ =      \----#·············t\·c&V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;][gnirtStupnI@tnirP

3

Лабіринт , додано 1 персонаж

,.@

Читає та пише персонаж.

Сітка зараз

····························································
···········i········a·······································
··········?pio;·····l·······································
··········,u········e·······································
··········.t········r·······································
··········@s········t·······································
··········· ··printf(·······································
···········g··    input('','s'))····························
···········e·····n··r·······································
········write(read-host)····································
·········E·s········m·······································
········C·E·········p·······································
·······H·T··········t·····················r·················
······O· ···········(·······································
····· ·/············)·······································
····%·P·············)·······································
···A· ······················································
··%·A·······················································
···=························································
····························································
····························································
····························································
····························································
····························································
····························································

3

Промінь, додано 11 символів

Додатковий H додається, щоб перестати вести себе як програма для котів. qІ iігноруються. Я, мабуть, міг би з цим збільшитися, але це здавалося трохи схожим на обман.

v---H\
>qir@uH

Сітка зараз

·········v---H\·············································
·········>qir@uH····a·······································
··········?pio;·····l·······································
··········,u········e·······c·······························
··········.t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
········write(read-host)····a·······························
·········E·s········m·······n·······························
········C·E·········p·······(·······························
·······H·T··········t·······,·············r·················
······O· ···········(·······'·······························
····· ·/············)·······'·······························
····%·P·············)·······)·······························
···A· ······················)·······························
··%·A·······················································
···=························································
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··························································}}
····························································
····························································
····························································

3

ferNANDo , додано 31 символу

a b c d e f g h i
b c d e f g h i

Нова сітка:

·········v---H\·············································
·········>qir@uH···IaP.·····································
Get a chr!?pio;·····l·······································
Outputs it,u········e·······c·······························
and 'BZam..t········r·······a·······························
········~,@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·········g·····················
·······(write(read-host)····a)········r······ ··············
·······))E·s········m·······n)········e·····················
········C·E·········p·······((·······{print;exit}····K······
·······H·T··········t·······,t········ ···r·················
······O· ···········(·······'u········-·····················
····· ·/············)·······'p········m·····················
····%·P·············)·······)n········1·····················
···A· ······················)i·······n ·····················
··%·A························(······-·.·····················
···=·························t····· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

3

Схема, 8 символів додано

(write(
read
))

Нова сітка:

·········v---H\·······················S·P··············;····
······,··>qir@uH···IaP.··············A·USE: io·········>····
Get a chr!?pio;·····l···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))········;····
········~,@s······s t=" " r t#50:20 w !,t,!············E····
······main( ){printf("%c",  (getchar()));}·············;····
···········g·>    input('','s'))·······················P····
···········e·····n··r·····^·c·········g················;····
·······(write(read-host)····a)········r·input n$!?·····(····
·······))E·s········m·······n)········e·print n$·······;····
········C·E·········p·······((·······{print;exit}····K·*····
·······H·T··········t·······,t········ ···r·················
······O· ···········(·······'u········-·····················
····· ·/············)·······'p········m·····················
····%·P·············)·······)n········1·····················
···A· ······················)io······n ·····`···············
··%·A························(······-·.··di _r(a)···········
·$·=·························t\···· ···$;di $a··············
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

3

Баш, додано 6 символів

head -n1

Сітка зараз:

·········v---H\·············································
·········>qir@uH····a·······································
··········?pio;·····l·······································
··········,u········e·······c·······························
··········.t········r·······a·······························
··········@s······s t=" " r t#50:20 w !,t,!·················
··········· ··printf(·······(·······························
···········g··    input('','s'))····························
···········e·····n··r·······c·······························
········write(read-host)····a·······························
·········E·s········m·······n·······························
········C·E·········p·······(·······························
·······H·T··········t·······,·············r·················
······O· ···········(·······'·······························
····· ·/············)·······'·······························
····%·P·············)·······)·········1·····················
···A· ······················)········n······················
··%·A·······························-·······················
···=······························· ···$·d··················
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc    
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS    
································e···a·····················}}
·······························h···=························
··································<·························
·································>··························

3

itflabtijtslwi , додано 5 символів

GGOaGGOa

Це /// мова, але із введенням користувача, коли оточений GG. Це "названо" все, що відбувається між ними. Тому це просто перегукується з першим персонажем STDIN. (Оскільки цей текст читає лише 1 символ, ім'я 2 символів означає, що воно завжди зупинятиметься після заміни Oa на те, що ви вводите)

Додано вгорі ліво вертикально від (поперек, вниз) = (0,1) до (0,9)

Нова сітка:

·········v---H\··v+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C·············A·USE: io·········>····
Get a chr!?pio;····Ol···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;···;····
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?···E····
G·····main( ){printf("%c",  (getchar()));}·······pr>···;····
O··········g·>    input('','s'))·················h_····P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)········e·print n$··m····;····
········C·E·········p·······((·······{print;exit}·pYEK·*····
·······H·T··········t·······,t········ ···r·······(·········
······O· ···········(·······'u········-···········$·········
····· ·/(println····)·······'p········m···········a·········
····%·P·  (read-line))······)n········1···········r·········
···A· ······················)io······n ·····`·····g·········
··%·A························(······-·.··di _r(a)·v·········
·$·=·························t\···· ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

Велике використання існуючих GOa! +1
ETHproductions

3

PHP, додано 24 символи

<?php
var_dump($argv)
;?>

Сітка зараз:

·········v---H\··v+C+<D_··············S·P··············;····
·`····,··>qir@uH·  IaP.C·············A·USE: io·········>····
Get a chr!?pio;····Ol···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;···;····
········~,@s······s t=" " r t#50:20 w !,t,!······?a?···E····
······main( ){printf("%c",  (getchar()));}·······pr>···;····
···········g·>    input('','s'))·················h_····P····
···········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)········e·print n$··m····;····
········C·E·········p·······((·······{print;exit}·p··K·*····
·······H·T··········t·······,t········ ···r·······(·········
······O· ···········(·······'u········-···········$·········
····· ·/(println····)·······'p········m···········a·········
····%·P·  (read-line))······)n········1···········r·········
···A· ······················)io······n ·····`·····g·········
··%·A························(······-·.··di _r(a)·v·········
·$·=·························t\···· ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

1
Якщо код повинен виконуватися за допомогою перемикача -r, ви можете видалити тег відкриття. Крім того, вам не потрібен тег закриття (він не повинен використовуватися в будь-якому випадку). Ваша повна програма зараз var_dump($argv);. Ви можете використовувати print_r($args)замість цього і зберегти 1 байт.
Ісмаїл Мігель

3

Сітківка , додано 1 персонаж

G`

Це по суті cat. Gактивує режим grep, тобто програма друкує кожен рядок програми, який відповідає заданому регулярному вираженню. Але регулярний вираз є порожнім, тому кожен рядок є збігом, і весь вхід друкується назад до STDOUT.

·········v---H\··v+C+<D_··············S·P··············;····
·`····,··>qir@uH·  IaP.C·············A·USE: io·········>····
Get a chr!?pio;····Ol···············Y·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))········;····
········~,@s······s t=" " r t#50:20 w !,t,!············E····
······main( ){printf("%c",  (getchar()));}·············;····
···········g·>    input('','s'))·······················P····
···········e·····n··r·····^·c·········g················;····
·······(write(read-host)····a)········r·input n$!?·····(····
·······))E·s········m·······n)········e·print n$·······;····
········C·E·········p·······((·······{print;exit}····K·*····
·······H·T··········t·······,t········ ···r·················
······O· ···········(·······'u········-·····················
····· ·/············)·······'p········m·····················
····%·P·············)·······)n········1·····················
···A· ······················)io······n ·····`···············
··%·A························(······-·.··di _r(a)···········
·$·=·························t\···· ···$;di $a··············
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
·····························r··e···a b c d e f g h i·····}}
·····························p·h···=b c d e f g h i·········
··································<·························
·································>··························

3

RunR , додано 8 символів

Один останній на даний момент

S (I\
FO) /

Додано близько до середини, вниз і трохи залишилося. Нова сітка є

·········v---H\·Iv+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C········LAMBDA·USE: io·········>····
Get a chr!?pio;····Ol···········ZEROY·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·E····
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;····
O·········)g·>    input('','s'))·················h_··)·P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)···KVGH·e·print n$!·m····;····
········C·E·········p·······((···TIIA{print;exit}·pYEK·*····
$'main'H·T··········t·······,t···HSMI· ···r·······(·········
 \/\··O· ·········S (I\·····'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·m···········a·········
   \%·PQ  (read-line))······)n···YLH.·1···········r·········
   A\     /-io-\············)io··EE 4n ·····`·····g·········
  % A\-e-<     |·············(···· V-·.··di _r(a)·v·········
 $ =      \----#·············t\···V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;···················

Якби ви цього не додавали, я б помістив F # туди.
Тімві

@Timwi, вибач за це
MickyT

3

Mathematica, додано 19 символів

Print@InputString[];

Нова сітка:

·········v---H\OIv+C+<D_··············S·P··············;····
G`····,··>qir@uH·  IaP.C········LAMBDA·USE: io·········>····
Get a chr!?pio;····Ol···········ZEROY·Lreadln(write(···;····
Outputs it,u········e·······c······ ·L·print(readline())····
and 'BZam..t········r·······a·····ai ··string))··<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·E····
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;····
O·········)g·>    input('','s'))·················h_··)·P····
a··········e·····n··r·····^·c·········g··········pd····;····
·······(write(read-host)····a)········r·input n$!?u····(····
·······))E·s········m·······n)···KVGH·e·print n$!·m····;····
········C·E·········p·······((···TIIA{print;exit}·pYEK·*····
$'main'H·TUPTUO·····t·······,t···HSMI· ···r·······(·········
 \/\··O· ·TUPNI···S (I\·····'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·m···········a·········
   \%·PQ  (read-line))······)n···YLH.·1··print(io.read())···
   A\     /-io-\············)io··EE 4n ····,`·····g·········
  % A\-e-<     |·············(···· V-·.··di _r(a)·v·········
 $ =      \----#·············t\·c·V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;][gnirtStupnI@tnirP

3

Haskell, додано 16 символів

main = interact id

Копії stdin до stdout. Код починається з рядка 15, графік 39.

·········v---H\OIv+C+<D_Include C by GS·Psgv···········;····
G`····,··>qir@uH·  IaP.C.·······LAMBDA·USE: io·········>····
Get a chr!?pio;p···Ol···Z: say TZEROYALreadln(write(···;····
Outputs it,u··a$ ohce·······c······ ·L·print(readline())····
and 'BZam..t···a daer·······a·····ai ··string))·o<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:·Eu-··
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;tg··
O·········)g·>    input('','s'))(enildr ,tnirp···h_··)·P(e··
a··········e·····n··r·····^·c·········g··········pd····;Ct··
·······(write(read-host)····a)········r·input n$!?u····()(··
·······))E·s········m·······n)···KVGH·e·print n$!·m····;.C··
········C·E·········p·······((···TIIA{print;exit}·pYEK·*·)··
$'main'H·TUPTUO·····t·00····,t···HSMI· ···r·······(······,··
 \/\I^O= ·TUPNI···S (I\\/\]]'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·main = interact id····
   \%·PQ  (read-line))······)n···YLH.·1··print(io.read())···
   A\     /-io-\············)io··EE 4n ··@.,`·····g·········
  % A\-e-<     |··········)#_(···· V-·.··di _r(a)^v·········
 $ =      \----#·············t\·c&V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
···········>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<····················
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;][gnirtStupnI@tnirP

3

Ой! , Додано 19 символів

Ook. Ook! Ook! Ook.

Розміщений на 24-му рядку.

·········v---H\OIv+C+<D_Include C by GS·Psgv···········;····
G`····,.·>qir@uH·  IaP.C.%······LAMBDA·USE: io·········>····
Get a chr!?pio;p···Ol···Z: say TZEROYALreadln(write(···;····
Outputs it,u··a$ ohce····.··c······ ·L·print(readline())····
and 'BZam..t···a daer····x··a·····ai ··string))·o<v;i:j;p:j·
G·······~,@s······s t=" " r t#50:20 w !,t,!······?a?·:,Eu-··
G·····main( ){printf("%c",  (getchar()));}·······pr>·:·;tg··
O·········)g·>    input('','s'))(enildr ,tnirp···h_··)·P(e··
a··········e·····n··r·····^·c·········g··········pd····;Ct··
·······(write(read-host)····a)········r·input n$!?u····()(··
·······))E·s········m·······n)···KVGH·e·print n$!·m····;.C··
········C·E·········p·······((···TIIA{print;exit}·pYEK·*·)··
$'main'H·TUPTUO·····t·00····,t···HSMI· ···r·······(······,··
 \/\I^O= ·TUPNI···S (I\\/\]]'u···XIM ·-···········$·········
  \/· ·/(println··FO) /·····'p···BBE1·main = interact id····
   \%·PQ  (read-line))······)n···YLH.·1··print(io.read())···
   A\     /-io-\············)io··EE 4n ··@.,`·····g·········
  % A\-e-<     |··········)#_(o··· V-·.··di _r(a)^v·········
 $ =      \----#·············t\·c&V ···$;di $a····)·········
{elbaworhT sworht )a][gnirtS(niam diov citats cilbup{C ssalc
;))(txen.)ni.metsyS(rennacS.litu.avaj wen(nltnirp.tuo.metsyS
··`[x.````?10xx][x.````?10xx]r··e···a b c d e f g h i·····}}
··········;>maertsoi<edulcni#p·h···=b c d e f g h i·········
····;s gnirts::dts{)(niam tni····v<   o<Ook. Ook! Ook! Ook.·
···};s<<tuoc::dts;s>>nic::dts···o>i:1+?/;][gnirtStupnI@tnirP

2

Октав / Матлаб, додано 23 символи

printf(
    input('','s'))

Чи можемо ми зайти С? : D

Сітка зараз:

····························································
···········i········a·······································
··········?pio;·····l·······································
··········,u········e·······································
··········.t········r·······································
···········s········t·······································
··········· ··printf(·······································
···········g··    input('','s'))····························
···········e·····n··r·······································
········write(read-host)····································
···········s········m·······································
····················p·······································
····················t·····················r·················
····················(·······································
····················)·······································
····················)·······································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.