cat "Miyav" gider

Hepimiz bir catprogram kavramına aşinayız. Kullanıcı bir şey girer, tekrar kullanıcıya yankılanır. Kolay. Ama catşimdiye kadar gördüğüm tüm programlar bir gerçeği kaçırdı: a cat, “Miyav”. Senin görevin bir program yazmaktır Böylece bütün kopyaları STDINiçin STDOUT SÜRECE girdidir cat, hangi program çıktısı olmalıdır durumda cat goes "Meow".

puanlama

Bu kod-golf , yani puanınız birkaç değiştiriciyle bayt sayınızdır:

• Programınız cat(örneğin cow: cow goes "Moo") dışındaki herhangi bir ek hayvan için çalışıyorsa , her ek hayvan için: -10
• Programınız "cat" kelimesini kullanmıyorsa: -15
• Programınız fox"Tilki ne diyor" ile yanıt veriyorsa : -25

Bir araya gelen hayvanlar ve sesler:

cow goes moo duck goes quack sheep goes baa bees go buzz frogs go croak

Bu listede başka bir şeye izin verilir.

kurallar

• Standart boşluklar uygulanır
• Hiçbir şey yazmamalısın STDERR
• Çift tırnak işareti yerine tek tırnak işareti kullanabilirsiniz.

Liderler Sıralaması

Burada hem düzenli bir lider tablosu hem de kazananların dile göre genel bir bakış oluşturması için bir Stack Snippet'i var.

Cevabınızın göründüğünden emin olmak için, lütfen aşağıdaki Markdown şablonunu kullanarak cevabınızı bir başlık ile başlatın:

## Language Name, N bytes

Gönderinizin Nbüyüklüğü nerede ? Puanınızı artırmak varsa, olabilir onları içinden vurarak, başlığa eski hesapları tutmak. Örneğin:

## Ruby, <s>104</s> <s>101</s> 96 bytes

Başlığınıza birden fazla sayı eklemek istiyorsanız (örneğin, puanınız iki dosyanın toplamı olduğundan veya tercüman bayrağı cezalarını ayrı ayrı listelemek istediğiniz için), gerçek puanın başlıktaki son sayı olduğundan emin olun :

## Perl, 43 + 2 (-p flag) = 45 bytes

Dil adını, daha sonra büyük afiş snippet'inde görünecek bir bağlantı da yapabilirsiniz:

## [><>](http://esolangs.org/wiki/Fish), 121 bytes

var QUESTION_ID=62500;var OVERRIDE_USER=46470;function answersUrl(e){return"http://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"http://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(-?\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Pyth, 231-255 = -24 bayt

-24 * 10 fazladan hayvan, "kedi" dizisi olmadan -15

pzI}zJv.Z"xÚ]Arà E¯âñMOÛ|°
Ø¢mÞ½`&ÉR¯'_ãPÍm1;ñÝ|,F ¹×z#½öÂ÷ÜAPúõMh#Ì©UOC *CÑ°k%¹ö´qÌzj,å<&{jàRFÖ(¥s    ñ`GÂ:çkô#ù\M+üqíéaw ÑuW6Lã,¶w/'87ö×_r]¢:jkz»ÚFÙ¦ÈcÅËØíëûÖOa¿Þµ´6 ø¡ãEþþ:"jk(" goes "N@JzN

Kod bağlantısı

pseudocode

Auto assign z to input
print z
J = decompress animal-sound dict
if z in J:
    print " goes ", J[z], '"'

Bildiği hayvanlar:

{'hare': 'squeak', 'seal': 'bark', 'lion': 'growl', 'rook': 'hiss', 'sheep': 'baa', 'hamster': 'squeak', 'moose': 'bellow', 'grasshopper': 'chirp', 'rhinoceros': 'bellow', 'cat': 'meow', 'tiger': 'growl', 'stag': 'bellow', 'crow': 'caw', 'okapi': 'bellow', 'snake': 'hiss', 'cicada': 'chirp', 'badger': 'growl', 'dog': 'bark', 'cricket': 'chirp', 'tapir': 'squeak', 'bird': 'chirp', 'sparrow': 'chirp', 'lamb': 'baa', "frog": "croak", "raven": "croak"}

TeaScript , 29 - 15 = 14 bayt

Dize kullanmaz cat.

xr(/^c\at$/,'$& goes "Meow"')

"Tilki ne diyor" (uzunluk = 21) bonusun değerinden daha uzun.

CJam, 12 bayt

q_:)"dbu"=" goes \"Meow\""*

Program 27 bayt uzunluğunda ve cat( -15 bayt ) kelimesini kullanmıyor .

CJam tercüman içinde satır içi deneyin .

Nasıl çalışır

q_                e# Read all input and push a copy.
:)                e# Increment all code points of the copy.
"dbu"=            e# Push 1/0 if the result is/isn't "dbu".
" goes \"Meow\""* e# Repeat the string that many times.

APL (Dyalog) , 28 - 15 = 13 bayt

{⍵,' goes "Meow"'/⍨⍵≡⌽'tac'}

Girdi tersine çevrilip goes "Meow"eşdeğerse, girişi takip edin tac.

Çevrimiçi deneyin!

{… } Anonim işlev

 ⌽'tac' stringi ters çevir (karakterlerden kaçınarak -15 bonusu almak için cat)

 ⍵≡ Argümanın bununla aynı olup olmadığı için Boole

 ' goes "Meow"'/⍨ dizeyi filtrelemek için bunu kullanın (örneğin, yanlışsa boş dizeyi döndürür)

 ⍵, tartışmaya ekle

Yığın , 51 bayt

'' input dup 'cat' = { 'cat goes "meow"' } if print

JavaScript, 45 - 15 = 30/264 - 235 = 29

alert((s=(d='MeowBuzzSongMooMooCawBarkQuackCroakHissOinkBaaSingRoarLowCooCawBarkBaaHissCryRoarSingC\x61tBeeBirdCattleCowCrowDogDuckFrogHorseHogLambLarkLionOxPigeonRookSealSheepSnakeSwanTigerWhale'.split(/(?=[A-Z])/))[d.indexOf(i=prompt())-23])?i+' goes "'+s+'"':i)

Dezavantajı: Hayvanın adını büyük harfle ilk harf, küçük harfle yazmanız gerekir. Bunu düzelten başka bir sürüm için aşağıya bakın. Bu sürüm akediyle birlikte kaçar ve \x61bu listedeki 22 ekstra hayvanın kodunu içerir (buna değecek kadar kısa kelimeleri olan izin verilen tüm hayvanlar):

arı vızıltı 7
kuş şarkı 8
sığır moo 9
inek moo 6
karga gak 7
köpek havlama 7
ördek vak 9
kurbağa croak 9
atı 9 hiss
domuz 7 oink
kuzu baa 7
Tarlakuşum 8 şarkı
aslan kükremesi 8
öküz düşük 5
güvercin coo 9
kale gak 7
mühür kabuğu 8
koyun baa 8
yılan hiss 9
kuğu ağla 7
kaplan kükreme 9
balina şarkı 9

(bu listeyi sıkıcı bir şekilde yapmamda bana yardım ettiği için arkadaşım için teşekkür ederim)

Ungolfed kod:

data = 'MeowBuzzSongMooMooCawBarkQuackCroakHissOinkBaaSingRoarLowCooCawBarkBaaHissCryRoarSingC\x61tBeeBirdCattleCowCrowDogDuckFrogHorseHogLambLarkLionOxPigeonRookSealSheepSnakeSwanTigerWhale'.split(/(?=[A-Z])/);

input = prompt();
index = data.indexOf(input);
sound = data[index-23];
result = sound ? input + ' goes "' + sound + '"' : input;
alert(result);

İlk sürüm, 45 bayt - 15 bonus = 30

alert((i=prompt())=='\x63at'?i+' goes "Meow"':i)

Evet biliyorum. ALL ile bu ek iş 30 ila 29 gittim. Eğlenceliydi!

Tam küçük harf girişi sağlayan sürüm, 294 bayt - 235 bonus = 59

alert((s=(d='MeowBuzzSongMooMooCawBarkQuackCroakHissOinkBaaSingRoarLowCooCawBarkBaaHissCryRoarSingC\x61tBeeBirdCattleCowCrowDogDuckFrogHorseHogLambLarkLionOxPigeonRookSealSheepSnakeSwanTigerWhale'.split(/(?=[A-Z])/))[d.indexOf((i=prompt())[0].toUpperCase()+i.slice(1))-23])?i+' goes "'+s+'"':i)

Ayrıca veri dizisinden kasayı çıkarmayı da denedim .join().toLowerCase().split(',')ama bunun yerine 297 karakter aldı.

JavaScript, 81 - 20 - 15 = 46 bayt 50 - 15 = 35 bayt

(o=prompt()=="ca"+"t")&&o+=' goes "Meow"';alert(o)

GNU sed, 37 - 15 = 22 bayt

sed -r 's/^(\x63at)$/\1 goes "Meow"/'

MATLAB, 58 - 15 = 43 bayt

Oldukça yalındır cat, kodda kullanmadığınız için bonus :

x=input('');if isequal(x,'dbu'-1);x=[x ' goes "Meow"'];end;x

Girdi tek tırnak içine verilmelidir: ' '.

Javascript, 117 bayt

for(c=0,s="bee.Buzz.bird.Song.c\at.Meow.cow.Moo.crow.Caw.dog.Bark.oxen.Low.owl.Who.rook.Caw.sheep.Baa.swan.Cry".split('.'),p=prompt(),a=![];c<s.length;c+=2){if(p==s[c])a=c}if(!a)alert(p=='fox'?'What does the fox say':p);else alert(s[a]+' goes "'+s[a+1]+'"')

Kesinlikle burada kazanmadım, ama bir sürü ekstra hayvan ele aldım.

Javascript, 31 bayt

p=prompt();alert(p=='c\at'?p+' goes "Meow"':p)

HALT , 71 - 15 = 56 bayt

1 IF "cat" 2 ELSE 3
2 TYPE "MEOW";HALT
3 SET 0;NEXT
4 INCREMENT;STORE 0

HALT, dize işlemesi için tasarlanan I (@Downgoat) dilidir, tek sorun biraz uzun olmasıdır.

biçimlendirilmiş

1              IF "cat" 2 ELSE 3
2 TYPE "MEOW"; HALT
3 SET 0      ; GOTO 6
4 INCREMENT  ; STORE 0

Python 3, 81 70 55 46 - 15 = 31 bayt

Stewie Griffin'e 15 bayt kaydettiği için teşekkürler

8 bayt kaydettiğin için grc teşekkürler.

Dize kullanmamak, cat-15 bayt verir.

y=input()
print(y+' goes "Meow"'*(y=="ca""t"))

JavaScript, 48 - 15 = 33 bayt

Kullanımları \x61için bir yedek olarak ain cat.

i=prompt();alert(i=="c\x61t"?i+' goes "Meow"':i)

Perl, 46 - 15 = 31

$_=join'',<>;s/(?<=^ca)t$/t goes "Meow"/;print

Ruby, 49 46 50 - 15 = 35 bayt

Oldukça yalındır sanırım. Kedi kullanmamak.

$<.map{|l|puts l==?c+'at
'??c+'at goes "Meow"':l}

Düzenleme: 3 bayt kaydettiğiniz için @ w0lf için teşekkürler!

PHP, 1204 - (10 * 64) - 15 - 20 = 529 bayt

<?php $i = $argv[1];$s = json_decode(gzuncompress(hex2bin("78da555351b2db200cbc8a27dfee057a1b192bc018104f40dcbccebb7b25d9499d8fcc588b10abddcddf1b64e4e8a04c3bd1eac86db7df3774e136dfa0744c5451805688bb400bac1e5900cfb42703ba1e3bc6e3ce82dabe8cef6f2d22af52b910b95ad93b72d173a22c8083f4d0f63bc75c131aa2e332d2ae45886e43ed7769082f438afc52027df46b20182af457b83c24537ad2c199484b99f6fe669dd9afcd6cc70ef67972a03bb8c10915abb12aa995bc7206deac48555818a9e80ea46cf8142020fe0aa0ccd761327e0db00e046f745426d0c531610d22af609d47aea8dade91d998ad447aebcef6aef0b32d7d64b8df4ddd84a0173c436b816a35475efbf8110bc254a3bf6a1420b76e7d1788f1a346ceb14f8e61b98c0bc44ddb0a46afe284582b55ea9087e1af2004236b3999278a452726c8cb8bef3c2d0086b14ad362f1f3b4032fe67b8aa59cae88742744aab26ccff3f47a2583af11ad0f344c0a1119910553b2d864929562270577b14a87d10635ea351a3e0895572ffd11f0f8ac0867fadf36898668249c65a732448e387de481c1c96931272598863c8ed09ec6b17020874c5792ac1e5bea8ee234c7c238df1a42faff449360552b55c05660d3d5426c4dcb0a7c26f874ac75f0d7a7da0e079da7145d74f848418fc71f5a75d652947a4e1edd469715fae023e29e96c3b0c748027e847a87c4ef4cc893820438722f666bc9a6cb69facf3f28e87499")));echo array_key_exists($i,$s)?"$i goes {$s->$i}":($i=="fox"?"What does the $i say":$i);

Bir json kodlu gz sıkıştırılmış hayvan sesleri dizisi kullanıyorum. Bu, izin verilen 65 hayvanın hepsiyle çalıştığı anlamına gelir, ancak senaryom çok büyük. Ayrıca tilkiyle çalışır ve içinde kedi kelimesi yoktur.

MATLAB, 46 bayt

regexprep(input(''),'^cat$','cat goes "Meow"')

Kuşkusuz önemsiz. Giriş tek tırnak şeklinde verilmelidir.

Kiriş , 208 206 - 15 = 191 bayt

Rekabetçi bir giriş değil, biraz eğlenceli. Girişin ilk harflerini aleyhinde kontrol eder cat. Eğer bir uyuşmazlık olursa, standart kedi programına geçecektir. Eşleşirse ekleyecektirgoes "Meow"

'''''''''>`\/n@>`)'''>`++\
/++++++++++/r /SP''+(++++/
\+)'PSrn@--S/ \rn@`>`)rn'''''>`++++++)++@P'p++++@'p-----@`p++@'p-@``p@++@'''''>`+++++++++)--@'p++@'p-----@++++++++@``p++@H
/@<  (`<     < `<    ''<
>ruH

Java = 222 bayt (sıkıştırılmış)

public class A {public static void main(String[] args) {Scanner a=new Scanner(System.in);for(;;){String b=a.nextLine();if(!b.equalsIgnoreCase("cat"))System.out.println(b);else {System.out.println("meow");System.exit(0);}}}

Veya onu açabilirim.

Toplu iş = 52 bayt

set /p k=
if "k"=="cat" (echo cat) ELSE (echo %k%)

Javascript: 48 Karakter, 48 Bayt

function(s){return (s=="cat")?"cat goes meow":s}

Ölçek

=>"Köpek"

<="Köpek"

=>"kedi"

<="kedi miyavlar"

Haskell, 52-15 = 37 bayt

c"\99at"="\99at goes \"Meow\""
c s=s
main=interact c

Kullanılması \99böylece “kedi” in c için bir yedek olarak ikramiye byte 15 olsun.

O , 22 16 14 bayt

29 bayt - 15

Q "tac" `J = J" gider \ "Miyav \" "+ Q?

Uzun ve daha çok golf oynayabilir

𝔼𝕊𝕄𝕚𝕟 , 23-15 = 8 karakter / 58-15 = 43 bayt

ïċɘ㴃탵ˠⓀ㐀攁退胦ްおр夁䰰ᷗȿ 쨀#

Try it here (Firefox only).

Bayt char oranı gerçek.

Pyth, 82-95 = -13 bayt

+z*}zKc."atÜiÃ'4ãl¾Eªîiû<-È&e"\jjk[d"goes"dNr@c."bw««[áÅ3ÏB"\c%x`Kz3 3N

Sonunda yeni fonksiyonel Python 2 girişimi Pyth'e çevirmeye başladım. En iyi yarışmacısını geçmiyor. Daha fazla hayvanın birlikte daha büyük bir sözlüğe sıkıştırılması, hayvanları zekice seslerle ilişkilendirmekten daha hızlı skoru azaltır. Bu, kedinin yanı sıra 8 hayvanı da destekler: gergedan, okapi, geyik, aslan, kaplan, porsuk, su aygırı ve geyik.

Çevrimiçi deneyin

Japt, 25-15 = 10 24-15 = 9 bayt

Japt'i ilk kez deniyorum:

N¦`¯t`?N:`¯t goƒ \"´ow\"

ƒyazdırılamaz karakter ile değiştirilmelidir U+0083 derler

N!="cat"?N:"cat goes \"meow\""

Eski çözüm:

N¥`¯t`?`¯t goƒ \"´ow\"`:N

Burada dene

Pyth, 26-15 ("kedi" yok) = 11 bayt

Benim ilk Pyth programım!

Iqz_"tac"+z" goes meow";Ez

Burada dene

Açıklama

   _"tac"                   # Reverse the string "tac"
Iqz                         # If the input equals "tac" reversed
         +z" goes meow";    # Append " goes meow"
                        Ez  # Else, use the input.
                            # Implicit: print the input, if it's used.

C ++ 11, 316 - 11 * 10 - 15 = 191 bayt

#include <map>
#define t(a,b){#a,#b},
using s=std::string;int main(){std::map<s,s>m{t(cow,moo)t(crow,caw)t(dog,bark)t(hog,oink)t(lark,sing)t(lion,roar)t(oxen,low)t(rook,caw)t(seal,bark)t(sheep,baa)t(swan,cry){"c""at","meow"}};s l;while(int i=~getchar())l+=~i;printf("%s",(m[l]==""?l:l+" goes \""+m[l]+'"').c_str());}

VisualStudio ile iyi derler. GCC benden #include <string>ve beni istiyor #include <cstdio>. Bonus almayacak olsaydım daha kısa olurdu, ama yine de yazarın bonusları revize edeceğini umuyorum. Ben tanımlayan dilin düşünemiyorum cow -> mooya da öylesine yol yol 10bytes daha kısadır. Madenin 3+key+valueek hayvan için bayt maliyeti ve 22+17yapı tanımlamak için düz bayt

Ungolfed

#include <map>

#define t(a, b) { #a, #b },
using s = std::string;
int main()
{
    std::map<s, s> m{
        t(cow,moo)
        t(crow,caw)
        t(dog,bark)
        t(hog,oink)
        t(lark,sing)
        t(lion,roar)
        t(oxen,low)
        t(rook,caw)
        t(seal,bark)
        t(sheep,baa)
        t(swan,cry)
        { "c""at", "meow" }
    };
    s l;
    while (int i = ~getchar())
        l += ~i;
    printf("%s", (m[l] == "" ? l : l + " goes " + m[l]).c_str());
}

Pyth, 31 - 15 = 16 bayt

Burada deneyebilirsiniz

In+C99"at"zz;E+z" goes \"Meow\"

Açıklama:

I                                # If-statement
 n                               # not equal
  +C99"at"                       # Adds the char 99 with the string "at" = "cat"
          z                      # z, the user input
           z                     # Print the user input
            ;                    # Ends all open parentheses
             E                   # Else-statement
              +z" goes \"Meow\"  # Adds ' goes "Meow"' to z and prints the result

C, 76 bayt

main(){char a[99];gets(a);printf("%s%s",a,strcmp(a,"cat")?"":" goes meow");}

PHP, 70-15 = 55 bayt

<?=$l=rtrim(stream_get_contents(STDIN),~òõ),$l==~œž‹?~ߘšŒßݲšˆÝ:'';

(ISO-8859-1 olarak kaydedildi)

Dizge değişmezleri olarak ters tanımsız sabitleri kullanır:

• ~òõ == "\r\n"
• ~œž‹ == 'cat'
• ~ߘšŒßݲšˆÝ == ' goes "Meow"'

Her şey tek bir yankı deyiminde birleştirilir, <?=