Trong trò chơi Stratego, cơ chế trò chơi chính là khi bạn tấn công quân cờ của đối thủ. Trong thử thách này, công việc của bạn là mô phỏng một trong những trận chiến này và nói ai sống sót.

Thông số kỹ thuật

Bạn sẽ nhận được như là một cặp chuỗi đại diện cho các mảnh Stratego. Các mảnh là một trong "S 1 2 3 4 5 6 7 8 9 10 B"( Slà Spy, và Blà bom). Người đầu tiên của cặp sẽ là kẻ tấn công, và người thứ hai là kẻ tấn công.

Dưới đây là các quy tắc để xác định kết quả của một trận chiến:

• Số càng cao thì số càng thấp : ["4", "6"] -> ["6"].
• Nếu cả hai đều giống nhau, thì cả hai đều chết : ["7", "7"] -> [].
• Các gián điệp ở phía dưới, bên dưới thậm chí 1: ["S", "2"] -> ["2"].
• Tuy nhiên, nếu một điệp viên tấn công 10, thì điệp viên đó sẽ thắng : ["S", "10"] -> ["S"].
• Nhưng các quy tắc thông thường vẫn được áp dụng nếu đó 10là một cuộc tấn công : ["10", "S"] -> ["10"].
• Nếu bất cứ thứ gì tấn công một quả bom, quả bom sẽ thắng : ["5", "B"] -> ["B"].
• Tuy nhiên, một người thợ mỏ (một 3), có thể xoa dịu một quả bom: ["3", "B"] -> ["3"].
• Một quả bom sẽ không bao giờ là kẻ tấn công.
• Một spotter (a 1), có thể tấn công bằng cơ chế bình thường, nhưng họ cũng có thể cố gắng "đoán" thứ hạng của người chơi khác, có thể được biểu thị bằng bất kỳ ký hiệu lành mạnh nào.
• Nếu họ đoán đúng, mảnh kia sẽ chết : ["1(5)", "5"] -> ["1"].
• Nếu họ đoán sai, không có gì xảy ra : ["1(3)", "5"] -> ["1", "5"].
• Spotters có thể phát hiện ra bom : ["1(B)", "B"] -> ["1"].

Đây là mã golf , vì vậy mã ngắn nhất tính bằng byte sẽ thắng!

(Bạn có thể sử dụng các ví dụ trên đó làm trường hợp thử nghiệm, vì tôi quá lười để đặt tất cả chúng vào cùng một danh sách).

Haskell, 131 byte

Giải pháp này ở dạng hàm infix #với loạiString -> String -> String

Đầu vào được chấp nhận thông qua hai đối số chuỗi. Định dạng cho đầu vào spotter là 1 xnơi xđoán. Đầu ra được đưa ra dưới dạng một chuỗi. Trong trường hợp cả hai đơn vị tồn tại, chuỗi trả về chứa cả hai cách nhau bởi một khoảng trắng.

Giải pháp ban đầu của tôi không may mắc lỗi và việc sửa chữa khiến tôi mất vài byte.

('1':' ':x)#y|x==y="1"|1>0="1 "++y
"S"#"10"="S"
"3"#"B"="3"
_#"B"="B"
x#y|x==y=[]
t@"10"#_=t
_#t@"10"=t
"S"#x=x
x#"S"=x
x#y=max x y

Python, 180 153 byte

def f(a,d,g=0):T=([[d]],[[a]]);return([[a]+[d]*(g!=d)]*(g!=0)+[[]]*(a==d)+T[d=="10"]*(a=="S")+T[1]*(d=="S")+T[a=="3"]*(d=="B")+T[int(a,36)>int(d,36)])[0]

Hàm này lấy kẻ tấn công, người phòng thủ và tùy ý đoán của người phát hiện (nếu kẻ tấn công là người phát hiện) làm đối số. Nó trả về một mảng chứa các mảnh còn sống.

Ung dung

def f(a,d,g=0):
 if g: return [a] if g==d else [a,d]
 if a==d: return []
 if a=="S": return [a] if d=="10" else [d]
 if d=="S": return[a]
 if d=="B": return [a] if a=="3" else [d]
 return [a] if int(a)>int(d) else [d]

Bản giới thiệu

https://repl.it/C6Oz/2

Javascript ES6, 98 86 byte

(a,b,g)=>a==1?b==g?a:[a,b]:b=="B"?a==3?a:b:a=="S"?b==10?a:b:b=="S"?a:a==b?[]:+a>+b?a:b

Chấp nhận 3 đối số (kẻ tấn công, người bảo vệ, người đoán điểm).

Ví dụ chạy:

f("4","6")     -> "6"
f("7","7")     -> []
f("S","2")     -> "2"
f("S","10")    -> "S"
f("10","S")    -> "10"
f("5","B")     -> "B"
f("3","B")     -> "3"
f("1","5","5") -> "1"
f("1","5","3") -> ["1","5"]
f("1","B","B") -> "1"

Javascript, 179 166 160 byte

f=(a,c,b,n="")=>{if(c)if(c==b)return[a];else return[a,b];if(a==b)return[];a+b=="3B"&&(b=n);a=b=="B"?n:a;b=b=="S"?n:b;a+b=="S10"&&(a=n,b="S");return[+a>+b?a:b]}

Hàm này có 3 đối số - đầu tiên là kẻ tấn công, thứ hai được sử dụng cho người chạy nước rút (phỏng đoán của họ) và thứ ba là người bảo vệ.

f = ( a, c, b, n = "" ) =>
{
	//Takes attacker (a), guess (c) and defender (b), n is only declaration
	//c should never be set unless a == 1 
	if ( c )
		if ( c == b ) return [ a ];
		else return[ a, b ]; //Spotters
	
	if( a == b ) return [ ]; //Kill each other if same

	a + b == "3B" && ( b = n ); //Miners destroy bombs
	a = b == "B" ? n : a; //Bomb kills almost everything
	b = b == "S" ? n : b; //Spy dies if anything attacks him
	a + b == "S10" && ( a = n, b = "S" ); //Spies kill 10s

	console.log( JSON.stringify( [a,b] ) );

	return [ +a > +b ? a : b ] //Higher number wins
}

function fight( )
{
	var input = [ [ attacker.value, guess.value], defender.value ];
	out.innerHTML += JSON.stringify( input ) + "   ->   " + JSON.stringify( f( input[0][0], input[0][1], input[1] ) ) + "<br>";
}

#sword
{
	width: 40px;
	height: auto;
	margin: 10px;
	cursor: pointer;
	
}

#guess
{
	width: 40px;
}

textarea
{
	height: 20px;
	margin-top: 0px;
}

.panel
{
	background-color: #DDDDDD;
	padding: 5px;
	border: 3px solid black;
}

#out
{
	border: 3px solid black;
	font-family: monospace;
	padding: 10px;
}

<table>
	<tr>
		<td class=panel>
			<textarea id=attacker placeholder="Attacker"></textarea>
			<textarea id=guess></textarea>
		</td>
		
		<td>
			<img onclick="fight()" id=sword src="http://cliparts.co/cliparts/8cx/Kjq/8cxKjqAKi.png"></img>
		</td>
		
		<td class=panel>
			<textarea id=defender placeholder="Defender"></textarea>
		</td>
	</tr>
		
	<tr>
		<td colspan=3>
			<div id=out></div>
		</td>
	</tr>
</table>

_{^{Biểu tượng thanh kiếm đến từ cliparts.co}}

TSQL, 162 124 byte

Chơi gôn

DECLARE @1 varchar(2)='1',@ varchar(2)='3',@s varchar(2)='4'

PRINT IIF(@s>'',IIF(@=@s,@1,@1+','+@),IIF(@1=@,'',IIF(@1+@
IN('S10','3B')or'S'=@,@1,IIF(@='B'or'S'=@1,@,IIF(@1/1<@,@1,@)))))

Ung dung:

DECLARE 
  @1 varchar(2)='1', -- first piece
  @  varchar(2)='3',  -- second piece
  @s varchar(2)='4'  -- spotter(only fill this value for spotters)

PRINT
  IIF(@s>'',
    IIF(@=@s,@1,@1+','+@),
      IIF(@1=@,'',
        IIF(@1+@ IN('S10','3B')or'S'=@,@1,
          IIF(@='B'or'S'=@1,@,
            IIF(@1/1<@,@1,@)))))

Vĩ cầm