Sheet1
'碁盤プログラム(excel-igo)本体
'動作の流れを書き、そこにプログラムを追加していきます。
'碁盤を書く
' Cellsをクリック
'禁止手を確認
'碁石を打つ
'この4つの動作で基本の碁盤は出来上がりです。
'碁盤を書く
'ルールは、中国式(計算が簡単らしい?)
Private Sub DrowBoard()
End Sub
' Cellsをクリック
Private Sub Worksheet_SelectiononChange(ByVal Target As Range)
End Sub
'禁止手を確認
Private Function JUDGMENT(ByVal RX As Integer,ByVal RY As Integer) As Boolean
JUGMENT = False
'空きか?
’劫か?
’自殺手か?
JUGMENT = True
End Sub
碁石を打つ
Private Sub DRAW_STONE(ByVal RX As Integer,ByVal RY As Integer)
End Sub