Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ' See Game_Singleplayer_Load Section for definition of spaces.
- Dim spaces = " "
- ' Tells if X or O is currently up
- Public Whosup = Nothing
- ' Checks if AI on or not
- Dim ai = 0
- Public isclient = 0
- Public port = 7575
- Public netcode = 0
- Public gameid = "1"
- Dim user As String = Nothing
- Dim disconected As String = Nothing
- Dim disconnSock As String = Nothing
- Dim sendall As String = Nothing
- Dim exclude_sock As Integer
- Dim new_sock As Integer
- Dim privSock As Integer
- Dim privSock2 As Integer
- Dim privSock3 As Integer
- Dim privString As String = Nothing
- Dim list As String = Nothing
- Dim list1 As String = Nothing
- Dim list2 As String = Nothing
- Dim countListItems As Integer
- ' Game Board Definitions
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' ROW 1
- ' gameboard_1_1
- ' gameboard_1_2
- ' gameboard_1_3
- ' Gameplay Position
- ' 1 X| |
- ' --|---|--
- ' 2 X| |
- ' --|---|--
- ' 3 X| |
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Row 2
- ' gameboard_2_1
- ' gameboard_2_2
- ' gameboard_2_3
- ' Gameplay Position
- ' 1 | X |
- ' --|---|--
- ' 2 | X |
- ' --|---|--
- ' 3 | X |
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Row 3
- ' gameboard_3_1
- ' gameboard_3_2
- ' gameboard_3_3
- ' Gameplay Position
- ' 1 | | X
- ' --|---|--
- ' 2 | | X
- ' --|---|--
- ' 3 | | X
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Colum 1
- ' gameboard_1_1
- ' gameboard_2_1
- ' gameboard_3_1
- ' Gameplay Position
- ' 1 X| X | X
- ' --|---|--
- ' 2 | |
- ' --|---|--
- ' 3 | |
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Colum 2
- ' gameboard_1_2
- ' gameboard_2_2
- ' gameboard_3_2
- ' Gameplay Position
- ' 1 | |
- ' --|---|--
- ' 2 X| X | X
- ' --|---|--
- ' 3 | |
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Colum 3
- ' gameboard_1_3
- ' gameboard_2_3
- ' gameboard_3_3
- ' Gameplay Position
- ' 1 | |
- ' --|---|--
- ' 2 | |
- ' --|---|--
- ' 3 X| X | X
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Diagonal 1
- ' gameboard_1_1
- ' gameboard_2_2
- ' gameboard_3_3
- ' Gameplay Position
- ' 1 X| |
- ' --|---|--
- ' 2 | X |
- ' --|---|--
- ' 3 | | X
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
- ' Diagonal 2
- ' gameboard_1_3
- ' gameboard_2_2
- ' gameboard_3_1
- ' Gameplay Position
- ' 1 | | X
- ' --|---|--
- ' 2 | X |
- ' --|---|--
- ' 3 X| |
- '=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement