Đưa ra hai đầu vào chuỗi của "Rock", "Paper" hoặc "Kéo", xác định kết quả của vòng RPS . Xuất 1 nếu người chơi thứ nhất thắng, -1 nếu người chơi thứ hai thắng hoặc 0 cho hòa.

Rock Rock -> 0
Rock Paper -> -1
Rock Scissors -> 1
Paper Rock -> 1
Paper Paper -> 0
Paper Scissors -> -1
Scissors Rock -> -1
Scissors Paper -> 1
Scissors Scissors -> 0

Bạn phải sử dụng các chuỗi chính xác "Đá", "Giấy" và "Kéo" làm đầu vào. Bạn có thể chọn lựa chọn của người chơi đầu tiên (nhất quán) được đưa ra đầu tiên hay thứ hai. Bạn cũng có thể lấy chúng làm đầu vào đơn với một ký tự đơn hoặc dấu phân cách trống. Đầu vào được đảm bảo một trong 9 cặp có thể có của ba lựa chọn trong định dạng đầu vào của bạn.

Đầu ra phải là số 1, 0 hoặc -1 hoặc biểu diễn chuỗi của nó. Phao vẫn ổn. Vì vậy +1, +0,và -0.

Liên quan: Mã hóa một trò chơi RPS

Bảng xếp hạng:

var QUESTION_ID=106496,OVERRIDE_USER=20260;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/106496/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>

Groovy, 67 56 50 byte

{a,b->Math.sin(1.3*((int)b[0]-(int)a[0])).round()}

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

Hóa ra trò chơi đá, giấy, kéo có một tài sản khá tuyệt.
Cho các chuỗi a và b, lấy chữ cái đầu tiên của mỗi chuỗi, điều này dẫn đến hai trong số sau:R,P,S

Danh sách đầy đủ các giá trị có thể là (Khi kết hợp 2 lựa chọn):

XX=ASCII=Y=Wanted output
RR=82-82=0=0
PP=80-80=0=0
SS=83-83=0=0
RS=82-83=-1=1
RP=82-80=2=-1
PS=80-83=-3=-1
PR=80-82=-2=1
SR=83-82=1=-1
SP=83-80=3=1

Sắp xếp lại danh sách để:

-3->-1
-2->1
-1->1
0->0
1->-1
2->-1
3->1

Cung cấp cho chúng tôi một chuỗi trông ngược hình sin và bạn thực sự có thể biểu diễn công thức này xấp xỉ (và gần như tôi có nghĩa là chỉ vừa đủ để làm việc, bạn có thể có một phương trình đã chết nhưng tốn nhiều byte hơn):

-sin((4*a[0]-b[0])/PI).roundNearest() = sin(1.3*(b[0]-a[0])).roundNearest()

Việc đơn giản hóa 4 / pi thành 1.3 được đề xuất trước tiên bởi @flawr và sau đó được @titus kiểm tra với tổng mức tiết kiệm là 6 byte.

Sử dụng các thuộc tính làm tròn gấp đôi của Groovy, điều này dẫn đến kết quả đầu ra chính xác cho kéo giấy bằng đá.

05AB1E , 10 byte (không cạnh tranh)

Ç¥13T/*.½ò

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

Câu trả lời tương tự được chuyển đến 05AB1E bằng cách sử dụng các lệnh mới được thêm vào ngày 26/10/2017.

C, 50 35 byte

#define f(i)*(short*)(i+7)%51%4%3-1

Gọi fvới một chuỗi chứa cả hai người chơi, không có dấu phân cách và nó sẽ trả về cho dù người đầu tiên thắng.

Giải trình:

Bằng cách nhìn vào chín chuỗi có thể, hóa ra các cặp chữ cái trên cột 7 và 8 là duy nhất:

       vv
RockPaper
PaperScissors
ScissorsRock
RockRock         // Sneakily taking advantage of the terminating zero
PaperPaper
ScissorsScissors
RockScissors
PaperRock
ScissorsPaper
       ^^

Sự bù trừ và man rợ để short*lấy các cặp chữ cái này và diễn giải chúng thành các số:

29285
29545
21107
107
25968
21363
29555
27491
20595

Sau đó, đó là vấn đề vũ lực để tìm 51và 4phần còn lại, áp dụng liên tiếp giảm những con số này thành:

3 0 0 1 1 1 2 2 2

Điều này là hoàn hảo để giải quyết một phần còn lại ở cuối, và bù đắp kết quả.

Xem nó trực tiếp trên Coliru

MATLAB / Octave , 63 54 52 byte

Điều rất thuận tiện là mã ASCII của các chữ cái đầu tiên Rock,Paper,Scissorslà R=82,P=80,S=83. Nếu chúng ta trừ đi, 79chúng ta sẽ có được một cách thuận tiện 3,1,4, bây giờ chúng ta sẽ sử dụng như các chỉ số ma trận: Ở đây một ma trận 4 x 4 được mã hóa cứng, trong đó i,jmục thứ-1 tương ứng với kết quả nếu bạn cắm các giá trị từ trước đó:

     1   2   3   4
  +---------------
1 |  0   0   1  -1
2 |  0   0   0   0
3 | -1   0   0   1
4 |  1   0  -1   0

A(5,5)=0;A(4:7:18)=1;A=A-A';@(x,y)A(x(1)-79,y(1)-79)

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

Bash thuần khiết, 31

Mượn công thức của @ Dennis :

a=$1$1$2
echo $[(${#a}^67)%3-1]

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

Câu trả lời trước:

Bash tinh khiết, 43 35

echo $[(7+(${#2}^3)-(${#1}^3))%3-1]

• Lấy chiều dài chuỗi của mỗi arg ( 4, 5, 8lần lượt cho Rock, Paper, Scissors)

• XOR mỗi 3 để cung cấp cho 7, 6, 11(mà khi lấy mod 3 Cho 1, 0, 2)

• Sau đó trừ và fiddle với mod 3 để có được kết quả mong muốn.

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

Python , 40 30 byte

lambda x,y:(len(2*x+y)^67)%3-1

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

Lý lịch

Tôi đã bắt đầu với mẫu hàm

lambda x,y:(len(a*x+b*y)^c)%d-e

và thực hiện tìm kiếm brute-force cho các tham số phù hợp bằng chương trình sau, sau đó chọn một tham số có độ dài tối thiểu.

RPS = 'Rock Paper Scissors'.split()
g = lambda x,y:2-(94>>len(6*x+y)%7)%4
r = range(1,10)
R = range(100)

def f(a, b, c, d, e):
    h = lambda x,y:(len(a*x+b*y)^c)%d-e
    return all(g(x, y) == h(x, y) for x in RPS for y in RPS)

[
    print('%2d ' * 5 % (a, b, c, d, e))
    for e in r
    for d in r
    for c in R
    for b in r
    for a in r
    if f(a, b, c, d, e)
]

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

Toán học, 32 byte

Mod[{1,-1}.(Length/@#-3)!,3,-1]&

Hàm không tên lấy một cặp danh sách các ký tự, chẳng hạn như {{"R","o","c","k"},{"P","a","p","e","r"}}và trả về -1|0|1.

Tôi muốn mã không chỉ tránh ba từ đầu vào mà còn cả tên hàm quá dài ToCharacterCode; Vì vậy, tôi đã làm việc với độ dài 4,5,8của các từ đầu vào thay vào đó và tìm kiếm một hàm ngắn của các độ dài đó đã đưa ra các câu trả lời riêng biệt modulo 3. (Phép chia số nguyên cho 2 có triển vọng về mặt toán học, nhưng các hàm đó có tên quá dài trong Mathicala.)

Hóa ra việc lấy giai thừa của (độ dài - 3) sẽ cho các câu trả lời 1,2,120là 1,-1,0modulo 3. Sau đó, chúng ta chỉ cần tính toán, modulo 3, sự khác biệt của hai giá trị (thông qua sản phẩm dấu chấm {1,-1}.{x,y} = x-y, một cách tốt khi hai giá trị nằm trong một danh sách).

Ruby, 36 35 30 byte

a=->a,b{(a+b)[12]?a<=>b:b<=>a}

Dùng thử trên ideone.com

Đầu ra thử nghiệm:

a=->a,b{(a+b)[12]?a<=>b:b<=>a}

puts a.call("Rock", "Rock")
puts a.call("Rock", "Paper")
puts a.call("Rock", "Scissors")
puts a.call("Paper", "Rock")
puts a.call("Paper", "Paper")
puts a.call("Paper", "Scissors")
puts a.call("Scissors", "Rock")
puts a.call("Scissors", "Paper")
puts a.call("Scissors", "Scissors")

0
-1
1
1
0
-1
-1
1
0

Lợi dụng thực tế là 7 trong số 9 kết quả chính xác được tạo ra chỉ bằng cách thực hiện so sánh từ điển bằng cách sử dụng toán tử tàu vũ trụ <=>. Chỉ (a+b)[12]cần đảo ngược các đầu vào để so sánh nếu các đầu vào là Papervà Scissors(và cũng có thể Scissors Scissors- nhưng đó là 0một trong hai cách).

Cảm ơn Horváth Dávid đã cứu tôi một nhân vật và cảm ơn GB vì đã cứu tôi thêm 5 người nữa.

Python , 39 36 34 33 byte

lambda x,y:2-(94>>len(6*x+y)%7)%4

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

Làm thế nào nó hoạt động

Chúng ta hãy xem một vài giá trị về độ dài sáu bản sao của x và một bản sao của y modulo 7 .

                                l(x,y) =:
x        y        len(x) len(y) len(6*x+y)%7
--------------------------------------------
Rock     Rock          4      4            0
Rock     Paper         4      5            1
Rock     Scissors      4      8            4
Paper    Rock          5      4            6
Paper    Paper         5      5            0
Paper    Scissors      5      8            3
Scissors Rock          8      4            3
Scissors Paper         8      5            4
Scissors Scissors      8      8            0

Chúng ta có thể mã hóa các kết quả ( {-1, 0, 1} ) bằng cách ánh xạ chúng vào tập {0, 1, 2, 3} . Ví dụ, ánh xạ t 2 - t đạt được điều này và là nghịch đảo của chính nó.

Hãy biểu thị kết quả của x và y theo o (x, y) . Sau đó:

x        y        l(x,y) o(x,y) 2-o(x,y) (2-o(x,y))<<l(x,y)
-----------------------------------------------------------
Rock     Rock          0      0        2                10₂
Rock     Paper         1     -1        3               110₂
Rock     Scissors      4      1        1            010000₂
Paper    Rock          6      1        1          01000000₂
Paper    Paper         0      0        2                10₂
Paper    Scissors      3     -1        3             11000₂
Scissors Rock          3     -1        3             11000₂
Scissors Paper         4      1        1            010000₂
Scissors Scissors      0      0        2                10₂

May mắn thay, tất cả các bit trong các cột cuối cùng đồng ý với nhau, vì vậy chúng ta có thể HOẶC chúng để tạo thành một số nguyên n duy nhất và truy xuất o (x, y) là 2 - ((n ≫ o (x, y))% 4) . Giá trị của n là 94 .

Võng mạc , 35 31 byte

G`k P|r S|s R
*\)`.+
-
D`\w+
 .

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

Giải trình

Điều này hoạt động trong hai bước. Đầu tiên, chúng tôi in các dấu trừ cho các đầu vào có liên quan. Sau đó, chúng tôi in một 0mối quan hệ và 1khác.

G`k P|r S|s R
*\)`.+
-

Đây là hai giai đoạn. Ở )giai đoạn thứ hai nhóm chúng lại với nhau, *làm cho chúng chạy khô (có nghĩa là chuỗi đầu vào sẽ được khôi phục sau khi chúng được xử lý, nhưng kết quả sẽ được in) và \ngăn chặn việc in một dòng cấp dữ liệu. Hai giai đoạn cùng nhau sẽ in một -nếu áp dụng.

Giai đoạn đầu tiên là một Ggiai đoạn đại diện mà chỉ giữ dòng nếu nó có chứa một trong hai k P, r Shoặc s R. Chúng tương ứng với các trường hợp chúng ta cần xuất -1. Nếu đó không phải là một trong những trường hợp đó, đầu vào sẽ được thay thế bằng một chuỗi trống.

Giai đoạn thứ hai thay thế .+(toàn bộ chuỗi, nhưng chỉ khi nó chứa ít nhất một ký tự) với -. Vì vậy, điều này in một -cho ba trường hợp và không có gì khác.

D`\w+
 .

Đây là hai giai đoạn nữa. Giai đoạn đầu tiên là một sự Dtrùng lặp. Nó phù hợp với các từ và loại bỏ trùng lặp. Vì vậy, nếu và chỉ khi đầu vào là một tie, điều này giảm từ thứ hai.

Giai đoạn thứ hai đếm số lượng trận đấu ., là khoảng trắng theo sau bởi bất kỳ nhân vật nào. Nếu đầu vào là một ràng buộc và từ thứ hai đã bị xóa, điều này dẫn đến 0. Mặt khác, từ thứ hai vẫn còn, và có một từ trùng khớp, vì vậy nó sẽ in ra 1.

05AB1E , 18 17 15 10 9 byte

6 byte được lưu với thủ thuật độ dài đầu vào của Digital Trauma

€g3^Æ>3%<

Đưa đầu vào là [SecondPlayersChoice,FirstPlayersChoice]

Hãy thử trực tuyến! hoặc Xác thực tất cả các trường hợp thử nghiệm

Giải pháp thay thế 9 byte: íø¬ÇÆ>3%<

Giải trình

€g          # length of each in input
  3^        # xor 3
    Æ       # reduce by subtraction
     >      # increment
      3%    # modulus 3
        <   # decrement

Giải pháp 15 byte trước đó

A-D{„PSÊiR}Ç`.S

Hãy thử trực tuyến! hoặc Xác thực tất cả các trường hợp thử nghiệm

Giải trình

 A-               # remove the lowercase alphabet from the input (leaves a 2 char string)
   D{             # sort a copy of the leftover
     „PSÊ         # check if the copy isn't "PS" (our special case)
         iR}      # if true, reverse the string to get the correct sign
            Ç`    # convert the two letters to their character codes
              .S  # compare their values

Thạch , 8 byte

L€Iµ-*×Ṡ

Hãy thử trực tuyến! (bộ kiểm tra, chuyển thành số nguyên cho rõ ràng)

Làm thế nào nó hoạt động

L€Iµ-*×Ṡ  Main link. Argument: A (string array)

L€        Take the length of each string.
  I       Increments; compute the forward difference of the length.
   µ      Begin a new chain with the difference d as argument.
    -*    Compute (-1)**d.
      ×Ṡ  Multiply the result with the sign of d.

Python 2 , 46 40 byte

lambda x,y:+(x!=y,-1)[x[0]+y[0]in'RPSR']

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

Cảm ơn @Dennis rất nhiều vì đã cho tôi mượn mã thử nghiệm trực tuyến của anh ấy và đã tiết kiệm cho tôi 6 byte.

Biên tập

@ hashcode55 - Khá nhiều như bạn mô tả. (x! = y, -1) là chuỗi hai phần tử và [x [0] + y [0] in'RPSR '] là tính toán phần tử nào sẽ lấy. Nếu chữ cái đầu tiên của x + chữ cái đầu tiên của y nằm trong danh sách ký tự thì nó sẽ đánh giá thành True hoặc 1 vì vậy (x! = Y, -1) [1] sẽ được trả về. Nếu không thì (x! = Y, -1) [0]. Đây là nơi nó có một chút khó khăn. Yếu tố đầu tiên tự nó có hiệu quả khác nếu. Nếu x! = Y thì phần tử đầu tiên sẽ là True nếu không nó sẽ là Sai vì vậy nếu x [0] + y [0] in'RPSR 'là false thì True hoặc false sẽ được trả về tùy thuộc vào x == y. + Là một chút lén lút và một lần nữa cảm ơn @Dennis cho cái này. X! = Y sẽ trả về đúng hoặc sai theo nghĩa đen. Chúng tôi cần 1 hoặc 0. Tôi vẫn không biết làm thế nào nhưng + thực hiện chuyển đổi này. Tôi chỉ có thể giả sử rằng bằng cách sử dụng một toán tử toán học trên True / false, nó buộc nó phải được xem như là số nguyên tương đương. Rõ ràng dấu + ở phía trước -1 vẫn sẽ trả về -1.

Hi vọng điêu nay co ich!

JavaScript (ES6), 46 38 byte

(a,b)=>(4+!b[4]+!b[5]-!a[4]-!a[5])%3-1

Làm cho việc sử dụng thực tế là Rock-Paper-Kéo là chu kỳ. JavaScript không có tàu vũ trụ cũng như các toán tử ternary cân bằng, nếu không câu trả lời sẽ là (a,b)=>((b<=>'Rock')-(a<=>'Rock'))%%3.

Chỉnh sửa: Đã lưu 8 byte nhờ @WashingtonGuedes.

MATL , 14 13 byte

TTt_0vic1Z)d)

Hãy thử trực tuyến! Hoặc xác minh tất cả các trường hợp thử nghiệm .

Giải trình

Nếu mã ASCII của chữ cái đầu tiên của chuỗi thứ nhất bị trừ khỏi mã của chuỗi thứ hai, chúng ta sẽ nhận được giá trị trong cột D bên dưới. Lấy modulo 5 cung cấp cho các giá trị M . Giá trị cuối cùng trong ngoặc là kết quả mong muốn, R .

                        D        M     R
                       ---      ---   ---
Rock Rock          ->   0   ->   0   ( 0) 
Rock Paper         ->  −2   ->   3   (−1)
Rock Scissors      ->   1   ->   1   ( 1)
Paper Rock         ->   2   ->   2   ( 1)
Paper Paper        ->   0   ->   0   ( 0)
Paper Scissors     ->   3   ->   3   (−1)
Scissors Rock      ->  −1   ->   4   (−1)
Scissors Paper     ->  −3   ->   2   ( 1)
Scissors Scissors  ->   0   ->   0   ( 0)

Do đó, nếu chúng ta tính D và sau đó là M , để có được R, chúng ta chỉ cần ánh xạ 0 đến 0; 1 và 2 đến 1; 3 và 4 đến −1. Điều này có thể được thực hiện bằng cách lập chỉ mục vào một mảng gồm năm mục bằng 0, 1 hoặc −1. Vì lập chỉ mục trong MATL là dựa trên 1 và mô-đun, nên mảng phải là [1, 1, −1, −1, 0](mục đầu tiên có chỉ số 1, cuối cùng có chỉ mục 5 hoặc tương đương 0). Cuối cùng, thao tác modulo 5 may mắn có thể tránh được, bởi vì nó được thực hiện hoàn toàn bằng cách lập chỉ mục mô-đun.

TT     % Push [1 1]
t_     % Duplicate, negate: pushes [−1 −1]
0      % Push 0
v      % Concatenate vertically into the 5×1 array [1; 1; −1; −1; 0]
i      % Input cell array of strings
c      % Convert to 2D char array, right-padding with zeros if necessary
1Z)    % Take the first column. Gives a 2×1 array of the initial letters
d      % Difference
)      % Index into array. Implicit display

CJam , 12 byte

0XXWW]rcrc-=

Hai đầu vào được phân tách không gian. Thứ tự của họ bị đảo ngược với điều đó trong văn bản thách thức.

Hãy thử trực tuyến! Hoặc xác minh tất cả các trường hợp thử nghiệm .

Giải trình

Bản dịch câu trả lời MATL của tôi . Điều này khai thác thực tế là trong CJam c(convert thành char) được áp dụng trên một chuỗi có ký tự đầu tiên của nó. Ngoài ra, mảng cho ánh xạ là khác nhau vì lập chỉ mục trong CJam là dựa trên 0.

0XXWW    e# Push 0, 1, 1, -1, -1
]        e# Pack into an array
rc       e# Read whitespace-separated token as a string, and take its first char
rc       e# Again
-        e# Subtract code points of characters
=        e# Index into array. Implicitly display

CJam, 15 14 12 byte

rW=rW=-J+3%(

Lấy mã ascii của ký tự cuối cùng của mỗi chuỗi, sau đó trả về:

(a1 - a2 + 19) % 3 - 1

Kiểm tra nó ở đây !

Python 3, 54 byte

lambda o,t:(o!=t)*[-1,1]['RPS'['PS'.find(t[0])]!=o[0]]

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

Java 7, 82 byte

int c(String...a){int x=(a[0].charAt(1)-a[1].charAt(1))%5/2;return x%2==x?x:x/-2;}

Ung dung:

int c(String... a){
   int x = (a[0].charAt(1) - a[1].charAt(1)) % 5 / 2;
   return x%2 == x
           ? x
           : x / -2;
}

Giải trình:

• Các chữ cái thứ hai là o, avà c, với các số thập phân ASCII 111, 97và 99.
• Nếu chúng ta trừ chúng cho các trường hợp thử nghiệm, chúng ta có kết quả như sau:
  • 0 (Đá, Đá)
  • 14 (Giấy đá)
  • 12 (Giấy, Kéo)
  • -14 (Giấy, Đá)
  • 0 (Giấy, Giấy)
  • -2 (Giấy, Kéo)
  • -2 (Kéo, Đá)
  • 2 (Kéo, giấy)
  • 0 (Kéo, Kéo)
• Nếu chúng ta lấy modulo 5 cho mỗi, chúng tôi nhận 4, 2, -4, -2, -2, 2.
• Chia cho 2 xbây giờ là sau cho các trường hợp thử nghiệm:
  • x = 0 (Đá, Đá)
  • x = 2 (Đá, Giấy)
  • x = 1 (Giấy, Kéo)
  • x = -2 (Giấy, Đá)
  • x = 0 (Giấy, Giấy)
  • x = -1 (Giấy, Kéo)
  • x = -1 (Kéo, Đá)
  • x = 1 (Kéo, giấy)
  • x = 0 (Kéo, Kéo)
• Chỉ 2và -2không chính xác, và nên có -1và 1thay vào đó. Vì vậy, nếu x%2 != x(mọi thứ ở trên 1hoặc bên dưới -1), chúng tôi chia -2ra để sửa hai 'trường hợp cạnh' này.

Mã kiểm tra:

Hãy thử nó ở đây.

class M{
  static int c(String...a){int x=(a[0].charAt(1)-a[1].charAt(1))%5/2;return x%2==x?x:x/-2;}

  public static void main(String[] a){
    String R = "Rock",
           P = "Paper",
           S = "Scissors";
    System.out.println(c(R, R)); // 0
    System.out.println(c(R, P)); // -1
    System.out.println(c(R, S)); // 1
    System.out.println(c(P, R)); // 1
    System.out.println(c(P, P)); // 0
    System.out.println(c(P, S)); // -1
    System.out.println(c(S, R)); // -1
    System.out.println(c(S, P)); // 1
    System.out.println(c(S, S)); // 0
  }
}

Đầu ra:

0
-1
1
1
0
-1
-1
1
0

đc, 18

1?Z9+2/rZ1+2/-3%-p

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

Lưu ý rằng hai đối số được truyền (cách nhau bằng dấu cách) trên một dòng tới STDIN. Các đối số được chứa trong dấu ngoặc vuông [ ]vì đây là cách dcthích chuỗi của nó.

dccó khả năng xử lý chuỗi rất hạn chế, nhưng hóa ra một trong những điều bạn có thể làm là sử dụng Zlệnh để có được độ dài chuỗi, điều may mắn là khác biệt đối với "Rock", "Paper" và "Kéo", và có thể khá đơn giản về mặt đối xứng Thao tác để cho kết quả mong muốn.

PHP, 34 byte

<?=md5("BMn$argv[1]$argv[2]")%3-1;

Bình thường, 16

t%+7h.+mx3ldQ3

Có lẽ có thể ngắn hơn.

        x3ld      # lambda to get string length then XOR with 3
       m    Q     # map over the input (array of 2 strings)
     .+           # difference of the two results
    h             # flatten one-element array
  +7              # add 7
 %           3    # mod 3
t                 # subtract 1 and implicit print

Trực tuyến .

C #, 85 84 byte

Đã lưu 1 byte, nhờ TheLethalCoder

a=>b=>a==b?0:(a[0]=='R'&b[0]=='S')|(a[0]=='P'&b[0]=='R')|(a[0]=='S'&b[0]=='P')?1:-1;

Nó chấp nhận hai chuỗi làm đầu vào và xuất ra một số nguyên. Có một sự ràng buộc, nếu hai chuỗi bằng nhau, nếu không, nó sẽ kiểm tra ký tự đầu tiên của chuỗi, để xác định xem người chơi nào thắng.

JavaScript, 37 , 32 , 31 byte

a=>b=>a==b?0:!(a+b)[12]^a>b||-1

Nếu a bằng b, đầu ra bằng không.

Mặt khác, xor kết quả của việc kiểm tra nếu chiều dài không lớn hơn 12 (so sánh Kéo và Giấy) với so sánh lớn hơn b.
Nếu điều này trả về 1, trả lại nó.

Nếu nó trả về 0, sử dụng toán tử OR để thay thế bằng -1.

Hàng loạt, 116 byte

@if %1==%2 echo 0&exit/b
@for %%a in (RockScissors PaperRock ScissorsPaper)do @if %%a==%1%2 echo 1&exit/b
@echo -1

Perl, 33 byte

32 byte mã + -pcờ.

$_=/(.+) \1/?0:-/k P|r S|s R/||1

Để chạy nó:

perl -pe '$_=/(.+) \1/?0:-/k P|r S|s R/||1' <<< "Rock Paper"

Đã lưu 3 byte bằng cách sử dụng biểu thức chính của câu trả lời Retina của Martin Ender . (regex trước đây của tôi là /R.*P|P.*S|S.*R/)

Giải trình:

Đầu tiên, /(.+) \1/kiểm tra xem đầu vào có chứa hai lần cùng một từ hay không, nếu vậy, kết quả là 0. Nếu không, /k P|r S|s R/giao dịch với trường hợp câu trả lời là -1. Nếu regex cuối cùng này là false, thì -/k P|r S|s R/là false, vì vậy chúng tôi quay lại 1.

Thạch , 9 byte

L€^3Iæ%1.

Điều này sử dụng thuật toán từ câu trả lời Bash của @ DigitalTrauma .

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

Làm thế nào nó hoạt động

L€^3Iæ%1.  Main link. Argument: A (string array)

L€         Take the length of each string.
  ^3       XOR the lengths bitwise with 3.
    I      Increments; compute the forward difference of both results.
     æ%1.  Balanced modulo 1.5; map the results into the interval (-1.5, 1.5].

Japt , 19 byte

-Ms(4*(Uc -Vc)/MP¹r

Hãy thử nó ở đây!

_{Lấy cảm hứng từ giải pháp của carusocomputing}

Giải pháp cũ 53 byte

W=Ug c X=Vg c W¥X?0:W¥82©X¥83?1:W¥80©X¥82?1:W¥83©X¥80?1:J

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

_{Cảm ơn một lần nữa, ETHproductions!}

PHP, 55 53 byte

<?=(3-(ord($argv[2])%6%4-ord($argv[1])%6%4+3)%3*2)%3;

• lấy các giá trị ascii của các chữ cái đầu tiên (từ các đối số dòng lệnh): 82,80,83
• % 6: 4.2,5
• % 4: 0,2,1
• sự khác biệt (ba):
  • PS: 1-2, SR: 2-0, RP: 2-0 -> -1 hoặc 2; + 3,% 3 -> 2
  • SP: 2-1, RS: 0-2, PR: 0-2 -> -2 hoặc 1; + 3,% 3 -> 1
  • RR, PP, SS: 0; + 3,% 3: 0
• (3-2 * x): -1,1,3
• % 3: -1,1,0

phiên bản sin, 49 46 byte

<?=2*sin(1.3*(ord($argv[2])-ord($argv[1])))|0;

một cổng golfed của câu trả lời carusocomputing's :

3 byte được lưu bởi @ user59178

Perl, 25 byte

$_=/kS|rR|sP/-/kP|rS|sR/

Mã 24 byte +1 byte cho -ptùy chọn.

Đầu vào phải ở trên stdin không có dấu phân cách, ví dụ:

echo PaperRock | perl -pe'$_=/kS|rR|sP/-/kP|rS|sR/'

Các tìm kiếm regex đầu tiên cho người chơi đầu tiên giành chiến thắng, lần thứ hai cho sự mất mát của anh ta. Sự khác biệt được in.

Scala, 148 byte

object R extends App{val t=Seq('R','P','S')
val(a,b)=(args(0)(0),args(1)(0))
print(if(a==b)0 else if(t.indexOf(a)%3==(t.indexOf(b)-1)%3)-1 else 1)}

Rất may, vì dấu chấm phẩy được yêu cầu để tách nhiều lệnh trên cùng một dòng, Scala có lợi từ việc có mã golf có thể định dạng được!

Trong nỗ lực chơi gôn này, tôi đã học được rằng bạn có thể thay thế

"somestring".charAt(index) 

với

"somestring"(index) 

bởi vì Scala cho phép bạn coi các chuỗi là mảng cho mục đích nhận các ký tự.