Hast, Jabberwock'u öldürdün mü?


37

Senin görevin tam dize çıktı

The Jabberwocky

giriş yapmadan. Giriş ve çıkış için normal kurallar geçerlidir, bu nedenle hem fonksiyonlara hem de programlara izin verilir.

Elbette bir avlanma var, avlanmadıkça eğlenceli olmazdı. Programınız alfabetik olmayan karakterlerden sıyrıldığında, Jabberwocky şiirini başlatmalıdır (büyük / küçük harf duyarlı). Şiiri başlatmak için, başlangıçta başlayan şiirin sürekli bir alt dizini olmalıdır. Boş dize gayet iyi (muhtemelen çok iyi puan alamazsınız).

İşte referans metni:

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestoodthejabberwockwitheyesofflamecamewhifflingthroughthetulgeywoodandburbledasitcameonetwoonetwoandthroughandthroughthevorpalbladewentsnickersnackheleftitdeadandwithitsheadhewentgalumphingbackandhastthouslainthejabberwockcometomyarmsmybeamishboyofrabjousdaycalloohcallayhechortledinhisjoytwasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabe

İşte bu özelliği test etmek için kullanabileceğiniz bir program.

Eğer şiirin tükenirse kullanmak olmayabilir herhangi bir ek alfabetik karakterler kullanın.

Alfabetik karakterler karakterdir a- zve A- Zişte tam liste:

ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz

puanlama

Programınız, daha az iyi olmamak kaydıyla kullanılan alfabetik olmayan bayt sayısı ile puanlanacaktır.

İşte cevapları puanlayan bir Haskell programı. (Bu girişlerin geçerli olduğunu varsayar)

Örnek program

Aşağıdaki program geçerli olur:

twas&*brilliga77812nd Thesli thyt Oves didgy reand Gim bleinth ewab eal lmims ywe""""""""
ret h eb or o g o ve sa n dthemomerAthsoutgrabebewaretheJABBERWOCKmysonthe)(*)()((*98980908(()*(jawsthatbit

Alfabetik karakterlere bırakıldığında:

twasbrilligandTheslithytOvesdidgyreandGimbleinthewabeallmimsyweretheb orogovesandthemomerAthsoutgrabebewaretheJABBERWOCKmysonthejawsthatbit

Hangi şiirin ilk biti ile eşleşir (büyük / küçük harfe duyarsız).

Bu program 59 puan alacaktır, çünkü bu alfabetik olmayan karakterleri içeriyor:

&*77812           """"""""
          )(*)()((*98980908(()*(

6
"Şiiri başlat" derken ne demek istiyorsun?
Pavel

7
Bu, harfleri olmayan dillerde yapmak için önemsizdir.
NoOneIsHere

5
İçimdeki soylu, size şiirin adının Jabberwocky(makale yok) olduğunu, canavarın adının da the Jabberwock( hayırsız ) olduğunu hatırlatmak zorunda olduğunu hissediyor . Tabii ki şimdi gerekli çıktıyı değiştiremezsiniz, ancak ...
DLosc

6
Belirsiz olarak kapatmak için neden bu kadar çok oy var? "İşte bu özelliği test etmek için kullanabileceğiniz bir program." Kısım tamamen ve açıkça geçerli kriterleri belirler.
user202729

Yanıtlar:


42

ÇOK KOD , puan 0

Brainfuck kodunu golf oynadığı için Dennis'e teşekkürler.

TwASbRIlLIgAnDthEsliTHyTOvEsdiDgyreaNdgImbleinthEwaBeaLlmimSywEreThEBoroGoveSAndTheMOmERaTHSoutGRabEbeWArEthEjaBbeRWockMYsONtHEJawsTHaTBiTEThecLawSthATcaTChBeWAReTHeJuBJuBBiRDAndsHUNtHeFRuMIoUSbANdERSnatchheTooKHisvORpaLswORdinhAndLonGtiMetHEmanXomEFoEHeSOUg

Çevrimiçi deneyin!

Bu meydan okuma için kötü haberlerim var ... :(

oODE KOD, her bit için bir harf harfini kullanan sadece bir beyin fırtınası kodlamasıdır. Öyleyse, evet, şiir basan bir Brainfuck programını kapsayacak kadar uzun (veya yeterince kısa çıktı) olduğu için The Jabberwocky(gerçekten golf oynamak için çok uğraşmadan), bu önemsiz bir optimal cevap haline gelir.



@JoKing Çevrimiçi deneyin! ( BF-Crunch ile üretildi )
Dennis,

"kötü haber" ... evet, bu kötü. Unary'in 0 bayt alacağını , kural değiştiğini ve hala 0 puan gönderebileceğini tahmin ettim .
user202729

5
Bence hiç kötü bir haber değil. Bunun, diğer dillerde golf oynamanın ne kadar eğlenceli olduğu üzerine sıfır çıkarımı var.
Lynn,

22

C, skor  104   79  74

Skoru 79'a düşürdüğü için @ gastropner'e, 74'e düşürdüğü @ wizzwizz4'e teşekkürler!

*t,w;a(s,b,rilligand){*(t//he
=s++)="lithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewareThe Jabberwock\0mysonthejawsthat"[b++]?//i
:121;*t>12e1?*++t//hecl
=0:a//wsthatcatchbewarethejubjubbirdandshunthefrumiou
(s,b);}an;der(s,n){a(//tchhetookhi
s,88);}

Çevrimiçi deneyin!



2
//abcdefgh\n1'den daha az karakter olmaz mıydı /*abcdefgh*/?
wizzwizz4

@ wizzwizz4 Evet, olur. Teşekkürler!
Steadybox

20

Fisyon 2 , skor 3

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewaRe"The Jabberwock"mysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestoodthejabberwockwitheyesofflamecamewhifflingthroughthetulgeywoodandburbledasitcameonetwoonetwoandthroughandthroughthevorpalbladewentsnickersnackheleftitdeadandwithitsheadhewentgalumphingbackandhastthouslainthejabberwockcometomyarmsmybeamishboyO

Çevrimiçi deneyin!

açıklama

Küçük harflerin çoğunu görmezden gelebiliriz, sadece atomun enerjisini kod noktalarına koyarlar.

...Re"The Jabberwock"my...oyO

Büyük harf Rprogramın giriş noktasıdır, çünkü doğru giden bir atom oluşturur. Dediğim gibi, görmezden gelebiliriz e. Daha sonra "karşılaştığı tüm karakterleri basan string modunu değiştirir, bize veren STDOUT The Jabberwock. Bu sadece bırakır y. yHemen gelenleri kullanabiliriz y, ancak daha sonra yazdırırken en az bir harf olmayan baytı ( !) ve muhtemelen programı sonlandırırken bir başkasını harcamamız gerekir .

Bunun yerine, sabırla şiirden yhemen önce gelmek için sabırsızlanıyoruz o. O sağlayan Çünkü bize kullanmak Okarakteri yazdırır hangi ve program sonlandırma, atom yok eder. Bu şekilde, ihtiyacımız olan tek harf olmayan karakterler boşluk ve iki alıntıdır.


Çok etkileyici.
Weijun Zhou

14

Alice , 7 puan

"T/was"bri@lligandtheslithytovesdidgyreandgimbleinthewabeallmimsywe
rethe borogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestoodthejabberwockwitheyesofflamecamewhifflingthroughthetulgeywoodandburbledasitcameonetwoonetwoandthroughandthroughthevorpalbl
adewentsn

Çevrimiçi deneyin!

/Aslında yürütülen talimatlar böylece, kenarları kapalı IP çapraz hareket ve sıçrama yapar "The "ono@. n(Sıra modunda) komutu yığınının üst boş ise string "Jabberwocky" iter ve oistifin üst verir.


1
Çok güzel cevap!
Jonathan Allan

3
İş için doğru alet.
Robert Fraser

Güzel, birkaç şey denedim ama bu kadar iyi sonuç veren herhangi bir düzen bulamadım.
Martin Ender

13

Jöle , puan  6  4

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathSOUTGRABEBEWARE“The Jabberwock”m”y


Sonucu basan tam bir program (monadik bir link The Jabberwockolarak yan efekt olarak basar ve karakteri döndürür y)

Karakterleri “ ””şiirin büyük / küçük harf değiştirilmiş bir ön ekine ekler .

Bu çalışır çünkü:

  1. Geçen hönce SOUTGRABEBEWARE“The Jabberwock”m”y(yazılma sırasında en azından!) 'Dir tüm varsayılan girişini alır yeni bir bağlantı haline yapar belirsiz bir atom, 0ve gerçekleştirir bazı monadic fonksiyonlar, SOUTGRABEBEWAREhangi verim 1(aşağıya bakınız).

  2. 1“The Jabberwock”mdaha sonra m, "The Jabberwock"bir dilim büyüklüğünde 1, verimli , modulo dilimleme gerçekleştirir "The Jabberwock".

  3. İzler ”yyeni bir öncü sabit zincirdir, böylece Jelly bu karakter listesini yazdırır ve sonra karakteri verir yve şimdi programın sonu olduğundan, bu daha sonra yazdırılır.

 implicit input = 0
S sum             0
O cast to ordinal 0
U upend           [0]
T truthy indices  []
G group           []
R range           []
A absolute value  []
B to-binary       []
E all-equal?      1
B to-binary       [1]
E all-equal?      1
W wrap            [1]
A absolute value  [1]
R range           [[1]]
E all-equal?      1

Önceki 6 byter:

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware
“The Jabberwock”m1“y

Çevrimiçi deneyin!

Şiir olmayan altı karakter yeni bir satır artı “ ”1“.


Alternatif 6'lar:

“T“wasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewaret“he Jabberwock”m2“y

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewaret
“The Jabberwockmy”ṪṭṖ

İlk program olmadan geçerli değil m1“ymi? Hala basar The Jabberwockve şiirin bir alt kümesi ile başlar
dylnan

1
Hayır, m1“y(ya da olabilir m1”ybiz yazdırmak gerekir çünkü) gereklidir The Jabberwocky, değil The Jabberwock.
Jonathan Allan

7

Kömür , skor 3

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware⎚The Jabberwock⌈my

Çevrimiçi deneyin!

Üç karakter ekledi: ⎚ ⌈

... aynı zamanda bütün şiir ile çalışır .

Nasıl?

twas ... ware⎚The Jabberwock⌈my - no input
twas ... ware                    - print this text     >  twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware
             ⎚                  - clear the screen    >
               The Jabberwock    - print this text     > The Jabberwock
                             ⌈   - (print) maximum of:
                              my -   this text         > The Jabberwocky

5

Yakut ( -p), Puan 12

$_=#twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware
'The Jabberwock'+#m
?y

Çevrimiçi deneyin!

Tüm yorumları kötüye!

İle -pbayrak, yakut ne olursa olsun depolanır yazdırılırken $_. Herhangi bir girişin tek bir satırını gerektirir.


-pGerekli giriş satırı nedeniyle burada kullanabileceğinizi sanmıyorum . "Senin görevin The Jabberwockygiriş yapmadan tam dize çıktı etmektir ."
benj2240

@ benj2240 -pbir komut satırı bayrağı değil bir girdidir.
Bay Xcoder


@Pavel görüyorum, teşekkür ederim
benj2240

5

Kömür , skor: 5 4

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware⎚The Jabberwock¿m¦y

Çevrimiçi deneyin! Düzenleme: sadece @ ASCII-sayesinde 1 bayt kaydedildi. Açıklama: Aşağıdaki ayrıntılı koduna çevirir:

Print("twas...beware");
Clear();
Print("The Jabberwock");
if ("m") Print("y");


@JonathanAllan Sabit!
Neil


4

> <> , Puan: 13 12

\twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware
\"The Jabberwockmy"$~\sonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestoodthejabberwockwitheyeso
fflamecamewhifflingth>ro<

Çevrimiçi deneyin!

Doğrulama ve puanlama .

Hemen "Jabberwockmy" yi yığına ters iterek ikinci satıra yönlendirir. $~aşırı çıkar mve >ro<daha önce de ters baskı bütün yığın.


3

Retina 0.8.2 , skor: 21 20 18 16 13 8 6

|twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware
The Jabberwock0$*my

Çevrimiçi deneyin! Düzenleme: @ Martininder sayesinde puan 2 azaltıldı.


Bunun gibi 6 puan alabilirsiniz: tio.run/… ve ardından 5, Retina 1.0'a geçerek (ve *yerine kullanarak $*).
Martin Ender


2

Yabasic , 13

@ Pavel Ruby cevabı için teşekkürler!

#twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware
?"The Jabberwock";//m
?"y"

Çevrimiçi deneyin!


20 sayı aldım, sanırım yeni satırları saymayı unuttun.
Pavel

Evet, diğer cevapların puanlarında da sorunlar var.
Weijun Zhou

Sadece bir not: Yabasic aşağıdaki gibi TIO adresinden çözümü için bir bağlantı eklemeyi düşünmelisiniz Online Try Hiç de kullanım için mevcuttur bu bir
Taylor Scott

@TaylorScott Bunu nasıl fark edemem? Sabit.
Weijun Zhou

İlk satırın sonunda fazladan bir "" olduğunu düşünüyorum.
12Me21

2

VBA, skor 5

Hemen Pencerede Çalıştır:

?twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware"The Jabberwock"m"y

Nasıl çalışır:

? - Bu çıktıyı bir dizge olarak basar.

-

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware - Açık bildirim olmadan, bu boş bir dize olarak kabul edilir

-

"The Jabberwock"- Dize. 2 değişken / dizgiyi yan yana getirdiğinizde, VBA bunları otomatik olarak birleştirir. (2 değişken olmayan dizeler, çift alıntı eklememek için bir boşluk gerektirir)

-

m - Otomatik olarak birleştirilen başka bir gizli boş dize

-

"y- Başka bir ip. Açık bırakılırsa, Komut Penceresi satırın sonuna geldiğinde otomatik olarak kapanır - tekrar otomatik olarak birleştirilir

-

1 soru işareti, 1 boşluk ve 3 çift tırnak. VBA bunu ?"" & "The Jabberwock" & "" & "y"veya?"The Jabberwocky"


2

Haskell , skor 12

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware="The Jabberwock"++{-m-}"y"

Çevrimiçi deneyin!

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware :: StringÇıkışı olan bir sıfır bağımsız değişken işlevi tanımlar "The Jabberwocky".


2

Java (OpenJDK 9) , skor 11

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware->"The Jabberwock"+//m
"y"

Çevrimiçi deneyin!

Kredi


1
-2 (kullanılmayan null parametresi) olarak değiştirerek ()ve tyorumdaki Voidöncüyü kaldırarak puan t.
Kevin Cruijssen

2
@KevinCruijssen Yorumlarınız için teşekkür ederiz. :-) Ancak, <s>16</s> 14son bir cevap sağlamak için her zaman olduğu gibi herhangi bir StackExchange ağında tercih ederim. Değişikliklerin kendisi revizyon sayfasında listelenerek, herkesin gerçek değişiklikleri görmesini ve cevabın tüm geçmiş ve mevcut bilgileri tek bir okunamayan yazıya koymak yerine zaman içinde nasıl geliştiğini kolaylaştırır.
Olivier Grégoire

Ah tamam, bana göre iyi. :) Düzenleme, 'bayt'ı' puanlamayı 'düzeltmek için yapıldı.
Kevin Cruijssen

1
@KevinCruijssen Nitekim, kredilerdeki değişimini gördüm ve memnuniyetle karşıladılar. Önceki yorumumda sadece başlığı kastediyordum. Hatta bu konuda bir meta-posta oluşturdum . ;-)
Olivier Grégoire

1
Artık ilk satırdaki yorumu kaldırdığınıza göre, satır sonuna artık ihtiyacınız yok.
Buğday Sihirbazı

2

PowerShell , Puan: 19 10

#twasbrilligandTheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethe
'The Jabberwock'+#m
'y'

Çevrimiçi deneyin!

Pavel Limanı'nın Ruby cevabı . -9 puan için Jo King'e teşekkürler.

Dizeler +birlikte birleştirilir. Yorumlar kaldırıldıktan ve kod ayrıştırıldıktan sonra PowerShell bunu olarak görür 'The Jabberwock'+'y'. Bu dize boru hattında bırakılır ve çıktı örtüktür.


Bu kesin cevabı göndermek üzereydim: P
Pavel

Birleştirmek edemez Theve Jabberwocktek dizede? Çevrimiçi deneyin!
Jo King,

@JoKing Gerçekten, teşekkürler. Çizgiyi devam ettirme karakteri olmadan nasıl geçiniyorsunuz komik. Bu ayrıştırma kuralının ne zaman değiştiğini merak ediyorum ...
AdmBorkBork

1

Jöle , skor: 8

“ĠȥṘ®ṖȤ»

Çevrimiçi deneyin!

Sadece dizeyi sıkıştırır ve alfabetik olmayan tüm karakterler kaldırıldığında boş bir dizedir. Can sıkıcı biçimde, en kısa sıkıştırılmış biçim “81Iȯd», hiçbiri tveyaw




1

Tuval , skor 5

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware∙The Jabberwockpm∙yp

Burada dene!


1

SOGL V0.12 , skor 9

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware”The” Jabberwock”:⁄m+ y+

Burada dene!


1

Pip , skor 5

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestOOD|"The Jabberwock"witheyesofflamecamewhifflingthroughthetulge'y

Çevrimiçi deneyin!

Neyse ki, Pip'deki küçük harflerin tümü, ifadelerde kendi başlarına yapamayan değişkenlerdir. Kodun ilginç kısmı:

OOD|"The Jabberwock"

Tarayıcı kırılır OODolarak Oizledi OD. ODnil (falsey) olarak değerlendirilen tanımsız bir değişkendir; Daha sonra mantıklıyız - ya da bununla "The Jabberwock"ve Oyeni bir satır olmadan çıktılar.

'y

Tek karakterli dize y. Programdaki son ifade olduğu için yazdırılır.


1

SmileBASIC, 10 puan

@twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware?"The Jabberwock";
@m?"y

Bu, doğrudan Yabasic'in yanıtından alınmıştır ve SB daha iyi bir dil olduğundan, yorumlar yerine etiketleri kullanarak kısaltabiliriz, bu da bazı satır sonlarına duyulan ihtiyacı ortadan kaldırır.

Aynı boyutta, bu alternatif çözüm de var:

@twasbrillig ... ?"The Jabberwock"+@my[2]

İfadenin içindeki etiket, dize olarak kabul edilir. ( @my == "@my"), bu yüzden karakter 2 alarak "y" verir.


1

C (gcc) , skor 58

// stil yorumlarının + yeni satırların eski stillerden daha ucuz olması, @ wizzwizz4'ün @ Steadybox'ın cevabı hakkındaki yorumundan kaynaklanıyor .

-M32 bayrağı gereklidir.

Bazıları, çağrılacak işlevin uzun ismi ile utanç verici bir ruh haline getirilebilirken, diğerleri haklı olarak bu tür itirazları taklit edebilir; sonunda hepimiz düşük puanlı siren şarkısına kulak vermeliyiz.

twasbrilligan;d(t,h,e,slithytovesdidgyreandgimble)int*h,*e;//wabeallmimsywere
{t--?*h++=*e++,//borogovesan
d(t,h,e):0;}momerathsoutgrabebewar;*e="The Jabberwock\171";mysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoug(h,tsoreste){d(4,h,e);}

Çevrimiçi deneyin!


1

Toplu, skor 15 11

:twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbiteth
@ec%lawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffisht%ho%ughthestood% The Jabberwock%withe%y

Temel olarak sadece echo The Jabberwockykullanılmayan değişkenler ve etiketlerle.

Eski versiyon (puan 24):

:twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestoodthejabberwockwitheyesofflamecamewh
@if %1%fl%i==%ngthroughthetulgeywoodandburbledasitcameonetwoonetwoandthroughandthroughthevorpalbladewentsnickersnackheleftitdeadandwithitsheadhewentgalumphingbackandhastthousla%i n The Jabberwock%cometom%y
:armsmybeamishboyofrabjousdaycalloohcallayh
@echo %*

Kodun n.bataynı dizinden adlandırılmış ve çalıştırılan bir dosyaya kaydedilmesini gerektirir .

Herhangi bir isme sahip olabilecek alternatif versiyon (puan 27):

:twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvorpalswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestoodthejabberwockwitheyesofflamecamewh
@if %1%fl%i==%ngthroughthetulgeywoodandburbledasitcameonetwoonetwoandthroughandthroughthevorpalbladewentsnickersnackheleftitdeadandwithitsheadhewentgalumphingbackandhastthousla%i %~n0 The Jabberwock%cometom%y
:armsmybeamishboyofrabjousdaycalloohcallayh
@echo %*

Açıklama (değişkenler kaldırılmış olarak):

:twas...                         Label (No labels were used, no goto in the poem)
@if %1i==i %~n0 The Jabberwocky  If no command line arguments, run this batch file again
:arms...                          with the arguments 'The Jabberwocky'
@echo %*                         Echo all arguments

1

Perl 5, alt program, puan 11

{twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware;'The Jabberwock'.~'X'}

ancak v134X yerine \ x86 ( ) karakteriyle .

(perlsub, "İmza bir alt rutinin vücudunun bir parçası olduğunu söylüyor. Normalde bir alt rutinin gövdesi sadece bir hazır kod bloğudur.")


Bu yazdırıyor ymu?
Jo King,

@JoKing ayy! Şimdi yapar; Teşekkürler.
msh210

1

Ruby , 9 harf olmayan bayt

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebewarethejabberwockmysonthejawsthatbitetheclawsthatcatchbewarethejubjubbirdandshunthefrumiousbandersnatchhetookhisvor=p alswordinhandlongtimethemanxomefoehesoughtsorestedhebythetumtumtreeandstoodawhileinthoughtandasinuffishthoughthestood="The Jabberwock"+withe=?y

Çevrimiçi deneyin!

Golf versiyonu (okunabilirlik için):

x=p z="The Jabberwock"+w=?y

Birkaç uzun ve işe yaramaz değişken kullanır. Ruby'de whatever_you_want=bir ifadenin önüne koyabilirsiniz ve garip bir şekilde adlandırılmış bir değişken oluşturmanın yan etkisi ile bu ifadeyi yine de döndürür.


1

Kendini değiştiren Brainfuck , skor 16

twasbrilligandtheslithytovesdidgyreandgimbleinthewabeallmimsyweretheborogovesandthemomerathsoutgrabebeware␀The Jabberwock␀my<[<<]>[.>]>>.

Çevrimiçi deneyin!

açıklama

Başlangıçta kaset şöyle kurulur:

  T h e  J a b b e r w o c k  m y < [ < < ] > [ . > ] > > .   

<[<<]

T>[.>]y>>.


Sitemizi kullandığınızda şunları okuyup anladığınızı kabul etmiş olursunuz: Çerez Politikası ve Gizlilik Politikası.
Licensed under cc by-sa 3.0 with attribution required.