Attribute VB_Name = "Module1" Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Public GameOpen As Boolean Public TotalTime As Integer Public Komi As Single Public Byo As Integer Public Periods As Integer Public BlackName As String Public WhiteName As String Public Hosting As Boolean Public Joining As Boolean Public CurrGameTitle As String Public HostingName As String Public JoiningName As String Public ConnIP As String Public JoinPort As String Public Opening As Boolean Public SquareTags(1 To 361) As String Public CurrStoneTag As String Public LBHS As New CLBHScroll Public LBHSJ As New CLBHScroll Public LBHSG As New CLBHScroll Public ConnectingWin As Boolean Public SpotTaken(361) As Boolean Public BlackTurn As Boolean Public WhiteCaptured As Integer Public BlackCaptured As Integer Public NumberGroups As Integer Public GroupAmount() As Integer Public WhiteTime As Integer Public BlackTime As Integer Public WhiteByo As Integer Public BlackByo As Integer Public WhitePer As Integer Public BlackPer As Integer Public Passes As Integer Public Gameover As Boolean Public UndoNumbers As Integer