Haskellの勉強として、コンピュータ対戦型○×ゲームを作り中です。 と言っても、コンピュータは今は順番に置くだけと言う…
$ runhaskell tic_tac_toe.hs
game start !!
-A-B-C-
1| | | |
-------
2| | | |
-------
3| | | |
-------
"MoveEnd"
-A-B-C-
1|X| | |
-------
2| | | |
-------
3| | | |
-------
"MoveEnd"
input?[A1-C3]:
a2
"MoveEnd"
-A-B-C-
1|X| | |
-------
2|O| | |
-------
3| | | |
-------
-A-B-C-
1|X| | |
-------
2|O| | |
-------
3|X| | |
-------
"MoveEnd"
input?[A1-C3]: