• R/O
  • SSH
  • HTTPS

shoginextmove: コミット


コミットメタ情報

リビジョン60 (tree)
日時2014-09-16 12:53:02
作者bellyoshi

ログメッセージ

自分の駒を取れないように

変更サマリ

差分

--- ShogiNextMove/Board/KomaMoveValidater.vb (revision 59)
+++ ShogiNextMove/Board/KomaMoveValidater.vb (revision 60)
@@ -211,6 +211,9 @@
211211 Dim locationList As KomaLocation() = GetToLocation(kyokumen, te.FromLocation, te.Piece.Value)
212212 For Each l As KomaLocation In locationList
213213 If l.Col = te.ToLocation.Col AndAlso l.Row = te.ToLocation.Row Then
214+ If kyokumen.GetMasu(l).Which = te.Which Then
215+ Return False
216+ End If
214217 Return True
215218 End If
216219 Next
旧リポジトリブラウザで表示