• R/O
  • HTTP
  • SSH
  • HTTPS

reversi: コミット

修復のためにファイルを作り直しています


コミットメタ情報

リビジョン928f3d4d9a05a4a742e4934f2d3cfab49c7cb629 (tree)
日時2017-04-15 15:58:49
作者fuke masasi <yamat0jp@yaho...>
コミッターfuke masasi

ログメッセージ

Hard level changed by deleting 1 line in codes

変更サマリ

差分

--- a/Unit1.pas
+++ b/Unit1.pas
@@ -163,7 +163,6 @@ const
163163 Y: 6), (X: 7; Y: 6), (X: 1; Y: 7), (X: 6; Y: 7));
164164 worth: array [1 .. 4] of TPoint = ((X: 0; Y: 0), (X: 7; Y: 0), (X: 0; Y: 7),
165165 (X: 7; Y: 7));
166-label Last;
167166 procedure Easy;
168167 var
169168 m, n: integer;
@@ -216,7 +215,7 @@ begin
216215 begin
217216 Score := 0;
218217 result := true;
219- if FTurnIndex < 50 then
218+// if FTurnIndex < 50 then
220219 inc(Score, AddScore(X, Y, waste));
221220 dec(Score, AddScore(X, Y, worth));
222221 case Stone of
旧リポジトリブラウザで表示