เราทุกคนเห็นสัญญาณของโมเต็ลบอกเราว่ามีที่ว่างหรือไม่:

โดยปกติแล้วตัวอักษรเหล่านี้จะมีตัวอักษรVACANCYสว่างขึ้นอย่างถาวรและมีตัวอักษรNO lit up หากไม่มีห้องใดในโมเต็ล

ความท้าทาย

โมเต็ลเฉลี่ยในสหรัฐอเมริกามี 200 ห้อง

คุณจะเขียนโปรแกรม / ฟังก์ชั่นที่ใช้จำนวนเต็มT (สำหรับห้องที่ถ่ายไว้) เป็นอินพุตเท่านั้น โปรแกรมของคุณแล้วจะแสดงคำว่า
NO VACANCYตัวอักษรของVACANCYจะถูกพิมพ์ด้วยสีแดง
หากT ≥ 200 ตัวอักษรของNOจะถูกพิมพ์ด้วยสีแดง

ตัวอย่างเช่นสมมติว่าa.outโปรแกรมของคุณและ "input" = อาร์กิวเมนต์บรรทัดคำสั่ง: ^{(ฉันพิมพ์ผิดและระบบของฉันไม่สนใจขนาดตัวพิมพ์)}

กฎระเบียบ

• โปรแกรม / ฟังก์ชั่นของคุณจะต้องแสดง (หรือถ้าแลมบ์ดาคืนค่า ) สตริงที่แน่นอนNO VACANCYรวมถึงตัวพิมพ์เล็กและตัวพิมพ์ใหญ่
• โปรแกรม / ฟังก์ชั่นของคุณอาจตั้งค่าสีพื้นหน้าของข้อความเป็นสีแดงไม่ใช่พื้นหลัง
• หากคุณต้องการคุณสามารถใช้รหัสหลบหนี ANSI เพื่อพิมพ์สีแดง - ใช้\x1b[31mงานได้
• โปรแกรม / ฟังก์ชั่นของคุณอาจไม่เปลี่ยนสีข้อความของเชลล์หลังจากเสร็จสิ้น
• โปรแกรม / ฟังก์ชั่นของคุณจะต้องยุติลงตามปกติ
• โปรแกรม / ฟังก์ชั่นของคุณจะต้องพิมพ์ไปยังเอาต์พุตมาตรฐานเท่านั้น
• โปรแกรม / ฟังก์ชั่นของคุณต้องใช้สีพื้นหลังเริ่มต้นของเชลล์ / เทอร์มินัล / IDE (ถ้าคุณเลือกที่จะมีเอาต์พุตกราฟิกคุณอาจเลือกสีที่คุณต้องการยกเว้นสีแดง)
• หากT ≤ 200 ตัวอักษรของNOต้องพิมพ์ด้วยสีพื้นหน้าเริ่มต้นของเชลล์ / เทอร์มินัล / IDE ของคุณ (หากคุณเลือกที่จะมีเอาต์พุตกราฟิกคุณสามารถเลือกสีที่ต้องการได้อีกครั้ง)
• หากด้วยเหตุผลบางประการสีพื้นหน้า / พื้นหลัง / สีเริ่มต้นของเชลล์ / เทอร์มินัล / IDE ของคุณเป็นสีแดงคุณจะต้องพิมพ์ด้วยพื้นหลังสีดำและพื้นหน้าสีขาวเริ่มต้น
• หากคุณเลือกที่จะใช้เอาต์พุตกราฟิกคุณสามารถใช้สีแดงได้เฉพาะเมื่อมีการระบุในโปรแกรม (เช่นสีพื้นหลังหรือสีข้อความเริ่มต้นอาจไม่เป็นสีแดง)

ผู้ชนะ

เช่นเคยกับcode-golfโปรแกรมที่สั้นที่สุดชนะ! จุดบราวนี่สำหรับการแสดงผลกราฟิก
ฉันจะยอมรับคำตอบที่สั้นที่สุดในหนึ่งสัปดาห์ มีความสุขในการเล่นกอล์ฟ!

ลีดเดอร์บอร์ด

var QUESTION_ID=123146,OVERRIDE_USER=61563;function answersUrl(e){return"https://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"https://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>

เยลลี่ , 29 26 ไบต์

<200o-“NO“ɓ31m”m“=ȤŻ»Œu“ɓm

สิ่งนี้ใช้<CSI>( 0x9b ) ซึ่งสั้นกว่า<ESC>[( 0x1b 0x5b )

มันรีเซ็ตสีพื้นหน้าด้วย<CSI>mแทนที่จะ<CSI>0mเป็น0เป็นนัย

การตรวจสอบ

โปรดทราบว่าเทอร์มินัลอีมูเลเตอร์ของคุณ (เช่น Konsole) จะต้องตั้งค่าเป็น ISO 8859-1 หรือคล้ายกัน

มันทำงานอย่างไร

<200o-“NO“ɓ31m”m“=ȤŻ»Œu“ɓm  Main link. Argument: n (integer)

<200                        Compare with 200, yielding 1 if true, 0 if not.
    o-                      Logical OR -1; map 0 to -1 (and 1 to 1).
      “NO“ɓ31m”             Yield ["NO", "\x9b31m"].
               m            Take the list "modulo" 1 or -1, keeping it as is for 1,
                            reversing it for -1.
                “=ȤŻ»       Implicitly print the previous result and yield the
                            string " vacancy". This is achieved by indexing into
                            Jelly's in-built dictionary.
                     Œu     Convert to uppercase.
                       “ɓm  Implicitly print the previous result and yield the
                            string "\x9bm", which is printed on exit.

Javascript (ES6), 60 ไบต์

(เปิดคอนโซลของเบราว์เซอร์ของคุณขณะเรียกใช้ตัวอย่างเพื่อดูผลลัพธ์ที่เป็นสี)

f=
n=>console.log((n>199?'%cNO':'NO%c')+' VACANCY','color:red')

<input oninput=f(this.value)>

Ruby (* เทอร์มินัลสไตล์ nix), 54 48 45 44 43 ไบต์

บันทึกได้ 1 ไบต์ด้วย Value Ink

␛ ย่อมาจากตัวอักษร esc ไบต์ (ASCII 27)

->x{"#{x>199?"␛[31m":p}NO␛[31m VACANCY␛[m"}

พอร์ตของคำตอบหลามของฉันที่เป็นไบต์หลายไบต์สั้น ฉันใหม่กับทับทิมกอล์ฟ แต่อยากเรียนรู้เพื่อให้ข้อเสนอแนะชื่นชม

Python 3 (* เทอร์มินัลสไตล์ nix), 55 54 ไบต์

lambda x:"\033[31m"*(x-199)+"NO\033[31m VACANCY\033[m"

วิธีนี้ใช้รหัสหลบหนีของ ANSI \033[31mทำให้เทอร์มินัลแดงถ้า x น้อยกว่า 200 เราจะเริ่มต้นด้วยการทำให้เป็นNOสีแดงมิฉะนั้นเราจะได้หนึ่งอันหลังจากNOทำให้เป็นสีแดงอยู่ดี เมื่อเราทำการ\033[mล้างสีจากเทอร์มินัลแล้ว

HTML, 72 71 ไบต์

<input min=200 type=number><x>NO <y>VACANCY<style>:valid+x,y{color:red}

Java (OpenJDK 9) , 102 89 88 51 ไบต์

ใช่ชวา : P ใช้งานได้กับเทอร์มินัล * nix เท่านั้น

x->(x>199?"\033[31m":"")+"NO\033[31m VACANCY\033[m"

ทุบตี, 41 ไบต์

echo ␛[$[($1>199)*31]mNO ␛[31mVACANCY␛[0m

โดยที่␛หมายถึงอักขระ ESC ตามตัวอักษร (ASCII \ 033)

Go , 82 81 ไบต์

ใช้งานได้กับเทอร์มินัล * nix เท่านั้น ฉันสงสัยว่าการพอร์ตนี้ไปยัง Java ... ทำได้ง่ายเพียงใด

func f(x int)string{v:="NO\033[31m VACANCY\033[m";if(x>199){v=v[2:7]+v};return v}

BASH / MKSH, 48 47 46 ไบต์

(($1>199))&&a=^[[31m;echo $a^MNO ^[[31mVACANCY^[[m

หมายเหตุ: ^ [หมายถึงอักขระ ESC กว้าง 1 ไบต์: 0x1b หรือทศนิยม 27

^ M หมายถึงอักขระ CR แบบกว้าง 1 ไบต์: 0x0d, ทศนิยม 13

Excel VBA, _{76 73} 72 ไบต์

ฟังก์ชันหน้าต่างแบบไม่ระบุชื่อ VBE แบบทันทีที่รับอินพุตชนิดที่คาดหวังIntegerจากเซลล์[A1]และส่งสัญญาณ VACANCY (NO) ข้ามเซลล์A2:B2

[A2]="NO":[B2]="VACANCY":Range([If(A1>199,"A2:B2","B2")]).Font.Color=255

-3 ไบต์สำหรับการเปลี่ยนrgbRedเป็น255

HTML + CSS + JavaScript (ES6), 74 59 ไบต์

จะเข้าเป็นอาร์กิวเมนต์ของฟังก์ชั่นเช่นff(100)

HTML

<x id=n>NO <j id=r>VACANCY

CSS

#r{color:red

JavaScript (ES6)

f=a=>a>199?n.id="r":0

ตัวอย่างการทดสอบ

f=a=>a>199?n.id="r":0

f(prompt("Enter a number"))

#r{color:red

<x id=n>NO <j id=r>VACANCY

Haskell , 54 53 ไบต์

แก้ไข:

• -1 ไบต์: จาก @ Dennis's Jelly ตอบ0อาร์กิวเมนต์ในลำดับ escape สุดท้ายสามารถถูกดร็อปได้

fรับจำนวนเต็มและส่งคืนสตริง putStrLn$f 200ใช้เป็น

f t|t>199="\27[31m"++f 0|0<1="NO \27[31mVACANCY\27[m"

ลองออนไลน์! อนิจจาสีไม่ปรากฏใน TIO แต่คุณจะเห็นว่ารหัส ANSI ถูกวางไว้อย่างถูกต้อง

การตีกอล์ฟดูเหมือนจะปีนออกไปได้อย่างรวดเร็วด้วยอันนี้ - แม้จะไม่ได้ตั้งชื่อให้กับสตริงการหลบหนีดูเหมือนว่าจะช่วยอะไรก็ตาม บิตที่ฉลาดที่สุดจะเรียกซ้ำด้วยf 0เพื่อใช้สาขาอื่นเป็นสตริงย่อย ความพยายามที่แตกต่างกันสามวิธีในการใช้ความเข้าใจในรายการทั้งหมดเปิดขึ้นอีกหนึ่งไบต์อีกต่อไป บางทีฉันพบที่อร่อยที่สุด:

f t=foldr drop"\27[31mNO \27[31mVACANCY\27[m"[5|t<200]

Bash script ขนาด 60 ไบต์

c="\e[1;31m";((199<$1))&&printf $c;printf "NO$c VACANCY\e[m"

Mathematica, 67 ไบต์

Print[s=Style[#,FontColor->Red]&;If[#>200,s,#&]@"NO",s@" VACANCY"]&

หรือ (60 ไบต์ แต่อาจถูกพิจารณาว่าเป็นการโกง)
นี่เป็นเรื่องจริงTimes["NO","VACANCY"]แต่ดูเหมือนจะถูกต้อง

(s=Style[#,FontColor->Red]&;If[#>200,s,#&]@"NO")s@"VACANCY"&

BASH ขนาด 100 ไบต์

if(($1<200));then
echo -n NO
else
echo -ne '\033[31mNO\033[0m'
fi
echo -e '\033[31m VACANCY\033[0m'

นี่อาจจะเป็นสนามกอล์ฟ แต่ฉันมีเวลาน้อย ฉันจะกลับมาในภายหลัง

-5 ไบต์ขอบคุณ @R Kap

Mathematica, 47 ไบต์

(If[#>199,Style[NO,Red],NO]Style[VACANCY,Red])&

C (* เทอร์มินัลสไตล์ nix), 50 55 52 51 ไบต์

^{-1 ต้องขอบคุณ Wheat Wizard}

f(t){printf("␛[%dmNO ␛[31mVACANCY␛[m",t>199?31:0);}

␛ย่อมาจาก ESC ไบต์ตัวอักษร ASCII 27

โทรด้วยf(200)200 หมายเลข พิมพ์NO VACANCYสีตามสเป็ค

PHP, 41 ไบต์

␛[<?=$argn<200?31:''?>mNO␛[31m VACANCY␛[m

␛แสดงถึงตัวละคร Escape

shortC , 48 ไบต์

f(t){R"␛[%dmNO ␛[31mVACANCY␛[m",t>199?31:0

โดยที่␛หมายถึง ASCII 27 ไบต์ของ ESCAPE

GW-BASIC , 78 74 65 ไบต์

^{-12 ขอบคุณ Orjan Johansen}

1INPUT X:IF X>199THEN COLOR 4
2?"NO ";:COLOR 4:?"VACANCY":COLOR 7

แจ้งให้ผู้ใช้สำหรับจำนวนเต็ม เอาท์พุท:

Tcl / Tk, 96 ไบต์

grid [label .n -text NO -fg [expr \$argv>199?"red":"tan"]]
grid [label .v -text VACANCY -fg red]