Давайте сделаем поиск слова!

35

В этой задаче мы вместе создадим поиск слов, содержащий множество программ на разных языках.

Я начал с сетки с пробелами 60 на 25 ( ·), некоторые из которых заменены персонажами программы 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
Ypnypn
источник
2
Эх, я бы просто полагался на то, что сообщество достаточно круто, чтобы не делать что-то скучное :)
Линн
5
У меня есть базовый фрагмент списка лидеров, скопированный из удивительного шаблона Мартина, который отслеживает используемые языки. Могу ли я отредактировать его в посте?
ETHproductions
1
Хорошо, я добавил фрагмент. Я удалил только ненужную часть HTML, поэтому не стесняйтесь сокращать CSS или JS.
ETHproductions
2
Я бы предположил, что в следующий раз, когда кто-то сделает что-то подобное, он ограничит это языками, достаточно заметными, чтобы иметь запись в Википедии, или что-то подобное. На самом деле это не похоже на настоящий поиск слов с десятками одно-двухсимвольных записей из эзотерических языков, о которых никто никогда не слышал.
ThaddeusB
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 утверждает, что код может быть задом наперед. Затем переоборудовал его в следующий ответ

daniero
источник
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 представление сделало это немного сложнее, чтобы написать ... :-)

zmerch
источник
10

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

Get a chr!
Outputs it
and 'BZam.

Объяснение грядет :)

Получите # игнорируемый со значениями скрэббл до 5
chr! # Score 8, введите символ и нажмите его значение.
Outputs # Score 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···=························
··································<·························
·································>··························
MickyT
источник
Я думаю, что B'Zam должен быть 'BZam, так как апостроф в середине технически делает его двумя словами. «BZam будет 17 очков и прекратить программу. Кроме того, можно утверждать, что это недопустимо, так как переводчик может высмеивать вас за низкие баллы «получить», «это» и «и». Я думаю, что это хорошо, хотя.
Майк Буфардечи
@MikeBufardeci Я думаю, что вы можете быть правы на BZam.
Изменится,
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·········
··································<·························
·································>··························
DLosc
источник
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+?/;···················
Timwi
источник
5

Ruby, добавлено 9 символов

puts gets

Сетка теперь:

····························································
····························································
···········p················································
···········u················································
···········t················································
···········s················································
··········· ················································
···········g················································
···········e················································
···········t················································
···········s················································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
Ypnypn
источник
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···=························
··································<·························
·································>··························
ThaddeusB
источник
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·····················}}
···································=························
··································<·························
·································>··························
ThaddeusB
источник
Ваша диагональная программа неверна. Посмотрите пример поворота на 135 градусов. Есть пустая диагональная линия, которая вам понадобится.
mbomb007
@ mbomb007 Ах, должно быть исправлено, я думаю.
ThaddeusB
Вы отбросили предыдущий ответ из сетки :)
MickyT
@ MickyT Спасибо за редактирование. :)
ThaddeusB
5

Quipu , добавлено 3 персонажа

Программа для кошек в Quipu состоит из четырех символов:

\/
/\

Я повернул это на 90 ° и снова использовал один из слешей из Rail .

Новая сетка:

·········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····>··························
Timwi
источник
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
plannapus
источник
Так как вам нужно прочитать только один символ, он 00\n]]бы тоже это сделал.
Мартин Эндер
Верно. Я забыл, что чтение одного символа было возможно.
Plannapus
4

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

w

Сетка теперь:

····························································
····························································
··········?pio··············································
··········,u················································
··········.t················································
···········s················································
··········· ················································
···········g················································
···········e················································
········w··t················································
···········s················································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
FryAmTheEggman
источник
4
w__t_Я вижу, что вы сделали там
PurkkaKoodari
@ Pietu1998 нужно планировать заранее! Не хочу, чтобы это передавалось так быстро, как эволюция hello world: ^)
FryAmTheEggman
4

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

write(read-host)

Я буду милым и дам людям больше места для дыхания. :)

Сетка сейчас

····························································
···········i················································
··········?pio;·············································
··········,u················································
··········.t················································
···········s················································
··········· ················································
···········g················································
···········e················································
········write(read-host)····································
···········s················································
····························································
··········································r·················
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
AdmBorkBork
источник
Ах, пропустил это
Патрик Робертс
4

Алгол 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·········
··································<·························
·································>··························
ThaddeusB
источник
4

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

HAI 1.4
GIMMEH V
VISIBLE V
KTHXBYE

Справа от середины повернут на 90 o . Бодался красиво против -, и dтам. Между тем, пакетные файлы и 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·········
··································<·························
·································>··························

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

AdmBorkBork
источник
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
DLosc
источник
4

oOo CODE , добавлен 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, чтобы он не вел себя как программа cat. 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
··························································}}
····························································
····························································
····························································
MickyT
источник
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·········
··································<·························
·································>··························
ThaddeusB
источник
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···=························
··································<·························
·································>··························
g.rocket
источник
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·········
··································<·························
·································>··························
FryAmTheEggman
источник
Отличное использование существующих 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

Retina , добавлен 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+?/;···················
MickyT
источник
Если бы вы не добавили это, я бы поместил туда 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
plannapus
источник
3

Хаскель, 16 символов добавлено

main = interact id

Копирует стандартный ввод в стандартный вывод. Код начинается со строки 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
plannapus
источник
2

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

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

Можем ли мы получить C? : 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·················
····················(·······································
····················)·······································
····················)·······································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
····························································
FryAmTheEggman
источник