Just_Tom

Untitled

Mar 24th, 2024
35
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VisualBasic 0.85 KB | Source Code | 0 0
  1. If ChessGame.ColourPicked = PieceColour.White Then
  2.     PieceBoard = {{-3, -5, -4, -2, -1, -4, -5, -3},
  3.                   {-6, -6, -6, -6, -6, -6, -6, -6},
  4.                   {0, 0, 0, 0, 0, 0, 0, 0},
  5.                   {0, 0, 0, 0, 0, 0, 0, 0},
  6.                   {0, 0, 0, 0, 0, 0, 0, 0},
  7.                   {0, 0, 0, 0, 0, 0, 0, 0},
  8.                   {6, 6, 6, 6, 6, 6, 6, 6},
  9.                   {3, 5, 4, 2, 1, 4, 5, 3}}
  10. ElseIf ChessGame.ColourPicked = PieceColour.Black Then
  11.     PieceBoard = {{3, 5, 4, 1, 2, 4, 5, 3},
  12.                   {6, 6, 6, 6, 6, 6, 6, 6},
  13.                   {0, 0, 0, 0, 0, 0, 0, 0},
  14.                   {0, 0, 0, 0, 0, 0, 0, 0},
  15.                   {0, 0, 0, 0, 0, 0, 0, 0},
  16.                   {0, 0, 0, 0, 0, 0, 0, 0},
  17.                   {-6, -6, -6, -6, -6, -6, -6, -6},
  18.                   {-3, -5, -4, -1, -2, -4, -5, -3}}
  19. End If
Add Comment
Please, Sign In to add comment