Vim là một trình soạn thảo văn bản tuyệt vời cho các hệ thống unix, nhưng nó nổi tiếng là khó thoát.

Viết một chương trình đầy đủ sẽ xuất ra :qđể thoát Vim. Sau đó, nó sẽ đọc một dòng đầu vào, vì sau đó nó sẽ được cung cấp một dấu nhắc bash, trong trường hợp đó lối ra thành công hoặc lỗi, trong trường hợp đó có những thay đổi chưa được lưu.

Dấu nhắc bash sẽ là:

E37@vimmachine: /var/override)

Trong khi lỗi sẽ là:

E37: No write since last change (add ! to override)

Khi được đưa ra dấu nhắc bash, công việc của chương trình được thực hiện và nó sẽ không cung cấp thêm bất kỳ đầu ra nào (ngoại trừ khoảng trắng).

Khi bị lỗi, chương trình của bạn sẽ ngẫu nhiên (tức là mỗi khả năng có xác suất được chọn bằng không) :q!, để thoát mà không lưu, hoặc :x, để lưu và thoát.

Đây là môn đánh gôn để có ít byte nhất trong mỗi ngôn ngữ !

Python 2 , 66 byte

Đã lưu 3 byte nhờ @ Mr.Xcoder và 4 nhờ @Mayube!

from random import*
if'('in input(':q'):print choice([':x',':q!'])

Hãy thử trực tuyến!

Ruby , 35 byte

p:q
p %i(q! x)[rand 2]if/\(/=~gets

Hãy thử trực tuyến!

05AB1E , 19 byte

„:q,'Nåi„:x…:q!‚.R,

Hãy thử trực tuyến!

„:q,                # Print the string ":q"
    'Nåi            # If N is in the input
        „:x         #   Push the string ":x"
           …:q!     #   Push the string ":q!"
               ‚    #   Wrap them into an array
                .R, #   Randomly print one of them

Python 2 , 76 75 72 69 byte

Câu trả lời này đã được đưa ra ngoài .

-1 byte nhờ Rod. -3 byte nhờ Mayube. -3 byte nhờ Artyer.

from random import*
print'::qx!'[random()>.5:('N'in input(':q'))*5:2]

Hãy thử trực tuyến!

Vimscript, 45 41 byte

ec"q"|exe"/("|ec["q!","x"][getpid()%2]

Cạo 4 byte bằng cách sử dụng getpid()để lấy số. (Có ai có thể nghĩ ra một cách ngắn hơn để có được một số không giống nhau ở mọi nơi không?)

Giả sử +3 byte để gọi Vim -cđể chạy tập lệnh trên và -đọc đầu vào từ stdin:

vim -c 'ec"q"|exe"/("|ec["q!","x"][reltime()[1]%2]' -

JavaScript, 52 46 byte

Đã lưu 6 byte nhờ @ETH sản phẩm

prompt(':q')[30]&&alert(new Date%2?':q!':':x')

C # (.NET Core) , 140 139 138 byte

using static System.Console;class P{static void Main(){Write(":q");if(ReadLine()[3]==':')Write(new System.Random().Next()>9?":x":":q!");}}

Hãy thử trực tuyến!

• Lưu 1 byte nhờ LiefdeWen!
• Lưu 1 byte nhờ Mord Zuber!

> <> , 32 30 29 byte

• Có một dư thừa !o.
• -1 byte nhờ Aaron.

iii0["@!qx:q:"ooi{=?;o!ox~oo;

Hãy thử trực tuyến!

Giải thích (cũ)

"@!qx:q:"ooi~i~i~i{=?;o!ox~oo;
"@!qx:q:"                        Push @!qx:q: on the stack (in reverse)
         oo                      Print :q [stack: @!qx:]
           i~i~i~                Remove first 3 input characters
                 i               Load @ or : from the input (= i)
                  {              Shift stack to the left [stack: !qx:i@]
                   =?            If 4th character was @
                     ;              Exit
                                 Else
                      o             Print :
                       !o           Jump to
                         x          Random direction (left or right because
                                    up and down retrigger x)
                                       Left:
                     ;o!o                 Print x and exit.
                                       Right:
                          ~oo;            Remove x, print q! and exit.

(sẽ cập nhật sớm)

Trên thực tế , 27 byte

":q"ü[":x",":q!"]`⌂`J'!,cIƒ

Hãy thử trực tuyến! (Lưu ý: Vì TIO không chơi tốt với stdin, tôi đã thay thế ,(đọc từ stdin) bằng chuỗi ký tự, bạn có thể thay đổi để kiểm tra nó. Ngoài ra, bạn sẽ cần phải tắt bộ đệm đầu ra để có được một phản ứng khác nhau với đầu ra ngẫu nhiên.)

Giải trình:

":q"ü[":x",":q!"]`⌂`J'!,cIƒ
":q"ü                       - Push the literal :q and print
     [":x",":q!"]           - Push the list of literals :x and :q!
                 `⌂`J       - Push function literals ⌂ (terminate) and J (choose random element from list)
                     '!     - Push the literal !
                       ,    - Read from stdin
                        c   - Pop top two values a,b and return "a".count(b)
                         I  - Pop top three values a,b,c and return b if a is truthy and c if a is falsy
                          ƒ - Pop a function from the stack and call it

APL (Dyalog) , 27 byte

':q'⋄('!'∊⍞)/':q!' ':x'⊃⍨?2

Hãy thử trực tuyến!

':q' in cái này

⋄ sau đó

?2 số nguyên ngẫu nhiên giữa hai số đầu

⊃⍨ sử dụng để chọn từ

':q!' ':x' danh sách hai chuỗi này

(... )/ lặp lại điều đó với, tức là làm cho n bản sao của mỗi phần tử trong đó, nơi n là

 '!'∊⍞ dấu chấm than là một thành viên của văn bản nhập? (Boolean, tức là 0 hoặc 1)

Mẻ, 98 byte

@echo :q
@set/ps=
@if %s:~3,1%==@ exit/b
@set/an=%random%%%2
@if %n%==0 (echo :x)else echo :q!

Ruby , 33 byte (mã 32, +1 cho cờ -n)

p:q;$_[?!]? p([:q!,:x][$$%2]): p

Tôi không chắc lắm về $$%2đoạn trích. Tôi đang sử dụng nó để tạo ra một bit ngẫu nhiên để lập chỉ mục cho mảng của mình bằng cách lấy pid modulo 2 của quy trình ruby ​​hiện tại, và nó sẽ khá khó đoán. .samplethêm một byte phụ.

Hãy thử trực tuyến!

JavaScript, 76 71 50 byte

prompt(":q")[3]<"@"?alert(new Date%2?":q!":":x"):0

Đã lưu một loạt byte nhờ Artyer và Neil, cũng như cô đọng những chú chim nhạn của tôi và chuyển cảnh báo đầu tiên sang dấu nhắc (duh).

Python 2 , 64 byte

import time
if'w'in input(':q'):print'::qx!'[time.time()%2>1::2]

Hãy thử trực tuyến!

Vì đây chỉ là một kết tụ của cả của những câu trả lời Python, tôi đã đánh dấu đây là wiki cộng đồng.

Python 2 , 47 byte

print'::qx!'[id(0)%3<2:('N'in input(':q'))*5:2]

Dùng thử trực tuyến

Giải trình:

Nguồn gốc của sự ngẫu nhiên là id(0)%3<2. Hàm idtrả về vị trí bộ nhớ của tham số. Vượt qua bất cứ điều gì sẽ cung cấp một địa chỉ bộ nhớ không xác định. Kết quả sẽ luôn là số chẵn, nhưng đôi khi sẽ chỉ chia hết cho 3. Kết quả modulo 3 khác nhau. Vì vậy, đây có thể là một nguồn ngẫu nhiên. Sử dụng <2có nghĩa là khoảng 2/3 thời gian, boolean kết quả là True.

Phần còn lại của câu trả lời được lấy cảm hứng từ điều này .

keg ,14 12 byte

\:~2%[q\!|x]

Điều này đẩy một số ngẫu nhiên và đầu ra chính xác đến số ngẫu nhiên.

TCL, 95 byte

puts :q;puts [if [string match *!* [gets stdin]] {puts [lindex ":q! :x" [expr round(rand())]]}]

Một giải pháp đơn giản và khá dài trong ...

Hội nghị cuộc gọi hệ thống Linux 86Bytes

global _start
_start:
mov edx,4
mov ecx,g 
mov ebx,1
mov eax,4
int 0x80
g db ':q!',10

LOGO, 37 36 byte

pr[:q]if 4<count rl[pr pick[:q! :x]]

Hãy thử trực tuyến tại Anarchy Golf Performance checker .

Giải trình:

pr[:q]if 4<count rl[pr pick[:q! :x]]   Main program.
pr                                     Print
  [:q]                                 the list `[:q]` without delimiter `[]`
      if           [              ]    If...
         4<                            4 is less than...
           count                       the number of word in the...
                 rl                    ReadLine (from stdin),
                    pr                 print
                       pick            a random word picked from the list...
                           [:q! :x]    [:q! :x]

(vì E37@vimmachine: /var/override)có 2 từ, trong khi E37: No write since last change (add ! to override)có 10 từ)

Perl 5 (với cờ -E), 35 byte

say":q";<>=~l&&say qw(:q! :x)[$$%2]

Chạy cái này với perl -E 'say":q";<>=~l&&say qw(:q! :x)[$$%2]'.

Hãy thử trực tuyến!

Ung dung:

say(":q");
if(<> =~ /l/){ #read a line and check if it contains 'l'
    @a=(":q!",":x");
    say($a[$$ % 2]); #print one element from array based on PID
}