アスキーアートチェス盤


12

この課題では、下にチェス盤を描き、動きを可能にします。

1.描画

白い正方形にはそれぞれ5x9のスペースがあります。

各黒い正方形には5x9のコロンがあります。

ボードはコロンの境界線に囲まれています。

ピースの幅は5文字で、中央の正方形の一番下の行にあります。

ポーンの幅は4文字です。中央から少し右にずれており、左側に3つの空白の正方形、右側に2つの空白の正方形があります。彼らは、正方形の底の1行上に座っています。

オプションの末尾の改行を除き、ボードの領域の外側に空白があってはなりません。

ボードとチェスマンは、以下を除き、示されているとおりに正確に描かれなければなりません。

  1. あなたはsubsituteも:異なるシンボルのための黒い四角との国境で、あなたが置換してもよい@異なるシンボルのための黒い部分での(黒い四角のために使用したのと同じものをではなく。)

  2. 必要に応じて、ポーンを1文字左に移動できます。

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:         :::::::::         :::www:::   _+_   :::::::::         ::::::::::
:  |_|_|  :: _,,:::   (/)   :::)@(:::   )@(   :::(/):::   _,,   ::|_|_|:::
:   |@|   ::"- \~::   |@|   :::|@|:::   |@|   :::|@|:::  "- \~  :::|@|::::
:   |@|   :::|@|:::   |@|   :::|@|:::   |@|   :::|@|:::   |@|   :::|@|::::
:  /@@@\  ::/@@@\::  /@@@\  ::/@@@\::  /@@@\  ::/@@@\::  /@@@\  ::/@@@\:::
::::::::::         :::::::::         :::::::::         :::::::::         :
:::::():::    ()   ::::():::    ()   ::::():::    ()   ::::():::    ()   :
:::::)(:::    )(   ::::)(:::    )(   ::::)(:::    )(   ::::)(:::    )(   :
::::/@@\::   /@@\  :::/@@\::   /@@\  :::/@@\::   /@@\  :::/@@\::   /@@\  :
::::::::::         :::::::::         :::::::::         :::::::::         :
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
:         :::::::::         :::::::::         :::::::::         ::::::::::
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
::::::::::         :::::::::         :::::::::         :::::::::         :
:         :::::::::         :::::::::         :::::::::         ::::::::::
:    ()   ::::():::    ()   ::::():::    ()   ::::():::    ()   ::::()::::
:    )(   ::::)(:::    )(   ::::)(:::    )(   ::::)(:::    )(   ::::)(::::
:   /__\  :::/__\::   /__\  :::/__\::   /__\  :::/__\::   /__\  :::/__\:::
:         :::::::::         :::::::::         :::::::::         ::::::::::
::::::::::         :::::::::   www   :::_+_:::         :::::::::         :
:::|_|_|::   _,,   :::(/):::   ) (   :::) (:::   (/)   :::_,,:::  |_|_|  :
::::| |:::  "- \~  :::| |:::   | |   :::| |:::   | |   ::"- \~::   | |   :
::::| |:::   | |   :::| |:::   | |   :::| |:::   | |   :::| |:::   | |   :
:::/___\::  /___\  ::/___\::  /___\  ::/___\::  /___\  ::/___\::  /___\  :
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

2.移動

列には、左から右にAH、下から上に1から8のラベルが付いています。ユーザーは、次の形式で移動を入力できる必要があります。

<start column><start row><space><destination column><destination row>

たとえばB1 C3、ナイトを司教のポーンの前の広場に移動することを意味します(ゲームが始まったと仮定します)。

あるいは、ICCFシステムを使用することもできます。ICCFシステムでは、列にAからHの代わりに1から8のラベルが付けられます。したがって、上記のナイトの動きはになり21 33ます。

次の画像(source)は、両方のシステムを明確にしています:

ここに画像の説明を入力してください

移動が実行され、新しいボードが表示されます。結果として生じる捕獲は、移動するチェスマンが目的の広場のチェスマンをボードから取り除くことで行われます。

それは、他の課題でカバーされているように法的なチェスの動きをチェックする必要はありません:最小のチェスプログラム最小のチェスアービタは、ユーザーが空の角から移動しようとする場合は、あなたのプログラムや機能が動きを無視すべきです。ユーザーが友好的なピースをキャプチャしようとする場合、移動を無視するか、静止したピースのキャプチャを許可することができます。

通行人やキャスティングをサポートする必要はありません。

入力が適切に形成されている、つまり常に上記の形式であると仮定することができます。手紙は常に同じケースになります、あなたはそれがどのケースであるかを決めることができます。

3.スコアリングとボーナス

これはコードゴルフです。最短のコードが優先されます。

プログラムまたは機能がプロモーションを許可している場合、-10%のボーナス。ユーザーは3番目の入力、今度は次の文字のいずれかを入力します。QBRN。これは、移動が最後の行のポーンで終了する場合のみ許可されます。ポーンは、指定されたピースと交換されます。QBRN。

プログラムまたは機能が動きの反転のために特別な「元に戻す」動きを実装する場合、-10%のボーナス(必要に応じてゲームの開始までさかのぼります)。それらを元に戻します。この「元に戻す」動作のためにユーザーが入力する必要がある入力を定義できます(常に同じである必要があります)。ユーザーがゲームの開始を超えて元に戻す場合の動作は未定義です。

ボーナスの合計。つまり、両方のボーナスに行くと、-20%が得られます。


最初は「動きを入力してください」と言いますが、私にとっては「1つの動き」を意味します。次に、「最初まで」アンドゥのボーナスがあります。1つだけではなく、
一連の動き

@ edc65それは完全な一連の動きです。最初の行「移動を許可する」を参照してください。指定しなかった1つのことは、ループの終了条件です。王の一人が捕らえられたらやめるという考えだったかもしれませんが、既存の答えには無限ループがあります。
レベルリバーセント

黒い四角の2人の騎士のフォーマットが一致しません。どちらが正しい?
JWT

@JWTうわー、誰も前に気づかなかった!この段階で、両方を受け入れなければなりません。あなたはもう少し答えをゴルフしましたね。私はあなたの答えをテストし、受け入れを変更する前に、終わりましたか?
レベルリバーセント

@ steveverril終わった、はい。
JWT

回答:


4

オクターブ、776 688バイト

688:

  • メインループにインライン化された関数(両方とも一度だけ使用された)、
  • {'foo','bar'}{i}少し長い代わりにセル表記を使用['foo';'bar'](i,:)

まだボーナスは実装されていません。


ICCFシステムを使用します。

したがって、移動説明および単一の空白文字で区切る必要があり、送信元と宛先フィールドには先頭のスペースがなくてもよい42 44が、正確である 42 4442 44されません。

R=@repmat;s=[t='BFJbRJFB';R(('@    A')',1,8);t+1]';while 1q=' ';c=R(':',42,74);m=R([m=R(q,5,9) l=m+26;l m],4,4);c(2:41,2:73)=m;for i=1:8 for j=1:8 f=s(i,j);z=@(c)bitand(+f,c);if z(64)b=z(1)+1;W={') (',')@('}{b};U=43-5*j;Z=9*i-2;T=Z-2:Z;Q=Z-3:Z+1;if z(2)c(U+3,Q)={'/___\','/@@@\'}{b};a=c(U+2,T)={'| |','|@|'}{b};if z(4)c(U+1,Q)='"- \~';c(U,Z-3:Z)=' _,,';else c(U+1,T)=a;if z(8)c(U,T)='(/)';elseif z(16)||z(32)c(U,T)=W;c(U-1,T)={'_+_','www'}{1+z(32)/32};else c(U,Q)='|_|_|';end
end
else c(U+2,Z-2:Z+1)={'/__\','/@@\'}{b};c(U:U+1,Z-1:Z)=['()';')('];end;end;end;end;c
m=input(q,'s')-'0';x=m(1);y=m(2);X=m(4);Y=m(5);if s(x,y)~=q&&(s(X,Y)==q||mod(s(x,y)-s(X,Y),2))s(X,Y)=s(x,y);s(x,y)=q;end
end

やや未使用版:

# draw an empty chessboard
function n=cb
R=@repmat;
n=R(':',42,74);
m=R([m=R(' ',5,9) m+26;m+26 m],4,4);
n(2:41,2:73)=m;
end

# function n=put(n,f,c,r) :
#
# put a chessman f on column c and row r of chessboard n,
# returning new chessboard
# chessman is described by single character defined following way
# (please excuse naming bits by value rather than position):
# bit valued  127 -     unused
# bit valued  64  -     0 = field empty, 64 = field occupied.
# bits valued 32,16,8 - 0 = rook, 8 = bishop, 16 = king, 32 = queen
# bit valued  4 -       0 = not knight 4 = knight (only checked if "other piece" bit is set)
# bit valued  2 -       0 = pawn       2 = other piece
# bit valued  1 -       0 = white      1 = black

# this gives the following chars:

# pawns   - 64      (+1)  => @ , A
# knights - 64+4+2  (+1)  => F , G
# rooks   - 64+2    (+1)  => B , C
# bishops - 64+8+2  (+1)  => J , K
# kings   - 64+16+2 (+1)  => R , S
# queens  - 64+32+2 (+1) =>  b , a
# empty space - any character with bit valued 64 unset (space char does)

function n=put(n,f,c,r)
z=@(n)bitand(f-0,n);
if z(64)
    b=z(1);
    W=') ()@('(1+3*b:3+3*b);
    R=5*r;C=9*c;
    if z(2)
            n(46-R,C-5:C-1)='/___\/@@@\'(1+5*b:5+5*b);
            a=n(45-R,C-4:C-2)='| ||@|'(1+3*b:3+3*b);
            if z(4) # knight
                    n(44-R,C-5:C-1)='"- \~';
                    n(43-R,C-5:C-2)=' _,,';
            else
                    n(44-R,C-4:C-2)=a;
                    if z(8) # bishop
                            n(43-R,C-4:C-2)='(/)';
                    elseif z(16) # king
                            n(43-R,C-4:C-2)=W;
                            n(42-R,C-4:C-2)='_+_';
                    elseif z(32) # queen
                            n(43-R,C-4:C-2)=W;
                            n(42-R,C-4:C-2)='www';
                    else  # rook
                            n(43-R,C-5:C-1)='|_|_|';
                    end
            end
    else
            n(45-R,C-4:C-1)='/  \/@@\'(1+4*b:4+4*b);
            n(43-R:44-R,C-3:C-2)=['()';')('];
    end
end
end

# here we can easily define the chessboard.
s=['BFJbRJFB';repmat(('@    A')',1,8);'CGKcSKGC']';
c=cb;for i=1:8 for j=1:8 c=put(c,s(i,j),i,j);end;end
c

# We scan five characters. They must be positions in ICCF without leading spaces separated by single space.
while m=input('','s')-'0'
x=m(1)
y=m(2)
X=m(4)
Y=m(5)
# if the move is not allowed (capture piece of the same color or the start field is blank,
# do nothing
if s(x,y)==' ' || (s(X,Y) ~=' ' && mod(s(x,y)-s(X,Y),2)==0) continue; end;
# make the move
s(X,Y)=s(x,y);
s(x,y)=' ';
# redraw the board
c=cb;for i=1:8 for j=1:8 c=put(c,s(i,j),i,j);
end end
c
end

ideone.comでこれを実行し、ボードを表示しましたが、入力を受け付けることができませんでした。tutorialspoint.com/codingground.htmでうまく機能します(キングとクイーンを逆にした場合を除きます-経験豊富なチェスプレイヤーなら違いを教えてくれます)。できれば、まともな説明のためにもう1つ。
レベルリバーセント

@steveverrill実際、キングとクイーンのポジションは逆転しました。これを指摘してくれてありがとう。現在修正されています。
pawel.boczarski

5

ルビー、 715 696 693 683バイト

これはかなり厄介な解決策ですが、現時点ではさらにクリーンアップする忍耐がありません。

どちらのボーナスも行われません。

ICCFシステムを使用します。

a,b,c=->f,x,y,p{p.map{|ln|ln.gsub(/\d/){|z|f*(z.to_i)}.tr('AB',x+y)}},Array.new(64){|i|((i%56<8?[4,2,3,5,6,3,2,4][i%56]:(i-8)%40<8?1:0)<<2)+(i<16?2:0)},':'*74
loop{puts c
b.each_slice(8).with_index{|r,y|d,*e=r.map.with_index{|v,x|a[*([[' '],[':']][(x+y)%2]+[[' ','_'],['@','@']][v&2==2?1:0]+[('9@9@9@9@9;9@4()3@4)(3@3/BB\2@9;9@3_,,3@2"- \~2@3|A|3@2/BBB\2;9@3(/)3@3|A|3@3|A|3@2/BBB\2;9@2|_|_|2@3|A|3@3|A|3@2/BBB\2;3www3@3)A(3@3|A|3@3|A|3@2/BBB\2;3_+_3@3)A(3@3|A|3@3|A|3@2/BBB\2'.split(';').map{|s|s.split '@'})[v>>2]])]}
d.zip(*e).each{|r|puts ":#{r.join}:"}}
puts c
gets.scan(/(.)(.) (.)(.)/){|f,g,h,i|j,k=63+(f.to_i)-(g.to_i)*8,63+(h.to_i)-(i.to_i)*8
b[k],b[j]=b[j]>0?b[j]: b[k],0}}

素晴らしい、完璧に動作するようです!
レベルリバーセント

@LevelRiverStこの回答は、現在受け入れられている回答よりも短いようです。
エリックアウトゴルファー

3

Python、1136 890 753バイト

部分的な答えをおologiesびしますが、私は初心者であり、この挑戦​​を本当に楽しんでいます。私はそれがおそらく非常に冗長であることを知っていますが、ここに私の大まかなドラフトがあります:

y=':'*9
z=' '*9
b='::/___\::'
c=':::|@|:::'
d=':::)@(:::'

ps = {'r': [y,'::|*|*|::', c, c,b],'n': [y,':::,,::::', '::"- \~::', c,b],'b': [y,':::(/):::',c,c,b],'k': [':::www:::',d,c,c,b],'q': [':::*+*:::',d,c,c,b],'p': [y, '::::():::','::::)(:::',':::/__\::',y]}

def cell(p,c):
  if p == '!':
    return ([z]*5,[y]*5)[c]
  s = []
  for l in ps[p.lower()]:
    l = (l.replace('@', ' '), l.replace('_', '@'))[p.islower()]
    l = (l.replace(':', ' '), l)[c].replace('*', '_')
    s.append(l)
  return s


b = {8:'rnbkqbnr',7:'p'*8,2:'P'*8}
b[1] = b[8].upper()
for i in range(3,7):
  b[i] = '!'*8

o=[y*8]
c=0
for r in b:
  l=['']*5
  for p in b[r]:
    cc=cell(p,c)
    for i in range(0,5):
      l[i]+=cc[i]
    c=not c
  o.extend(l)
  c=not c
o.append(o[0])
for l in o:
  print ':'+l+':'

答えてくれてありがとう。言語とバイト数とともに、回答にタイトル行を含めるのが私たちの習慣です。これは何語ですか?Pythonのように見えますが、ideone.com
Level River Stで

1
の周囲のすべてのスペースを削除します。a または=aの内部に1行しかない場合は、すべて同じ行に配置できます。Pythonでのゴルフのヒントをご覧ください。forif
mbomb007
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.