data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAMUElEQVR4Xu2dCVBV1xnHv6sUl7gblSpq3BDcF3ADwSiJrY2NWpcZ22ZcptY6Vo1JrBpNXWLUCNa6tJ2MitqqdU2mVkdHkE0QeYogiyCKioi4LyVxbeh8p3NveKLw7nnn8Zjr/8w4zrvvfN+55/9+fPecc797rlZSUlJCKFDATQpoANBNyqNZoQAABAhuVQAAulV+NA4AwYBbFQCAbpUfjQNAMOBWBQCgW+VH4wAQDLhVAQHg2bNn6eHDh9S6dWsqvS6taZrLP1+5coXq1atH3bp1c6sQaNw9CmipqaklDRo0oMqArTy479+/T927d3ePCmjVbQposbGxJa1atRKRbsqUKfT06VPy9/enoqIi46SuXr1Ka9asofDwcFq/fj09ePBA1Gdo9eLs5/z8fAoODnabEGjYPQpoeXl54m4cw9S2bVsaP348paenU9euXamgoEDAxkDyZbJ///4UGhpK9+7dMyKmHjlV/N+mTRv3qIBW3aaAduHChSqTjNCuXTu3CYGG3aOAlpuba0RALy8vunYljwrzL7n8bL4tLqaOPfrYRdL27du7vF00ULUU0HJycowI+LcPAmhJSH2KqRlI3qETqVFrX+Vnm3Z0DwXl/oV+VPKMqi/KIR5f6sXHx0d5e3BYtRXQsrOzjQh47MMB5O3/DnWdtMKITJ7f3qVdHwTT4/+Wf6V+o4YHjdybQZmZmUaPfX197SKcPrFp1qwZvfnXYKqzMp9ycnKMCU3Hjh2rtlo4O+UKaFlZWQZZMR8FUcAnf6fGb/nRo0ePqFatWhT/y+7U700Phxr2+sdlysrKoiZNmtDz58/J09PTgCsyMpKaN29OjRs3poyMDPo+/wxNWbKBzp07Z/j28/NzqB1Uso4CWmZmphEBYz8eSO+uS6aaNWtS3bp16ebNm3RxSm9qU6e60eO3Npyg53eLqGDhyDIqNN2WR9nZ2QaA1atXNyJgdHQ0rV69mpKTk2nnzp3E635z5swRwOqz8E6dOllHWfTEIQW09PT0En0JJX5OCIX+OUkY8mXyxo0blPdbfzsA+TvvpV+XC2CfPn0oNzeXqlWrZpzEsWPHqEePHuJzamqqWMqZO3euiIZ6+126dHHopFHJOgoIAPUIxAAO/lOiXe8u/65PGQBf1f0fb78ixoD6Jbh0PY6Apcvdu3dp/vz5AkC9fQBoHbAc7YmWlpZmjAET5r5Ng8KP29k2bdpUjNsqKjxmvHz58iurvQzABQsWEN+H1gvuB1eksvW+F/eC9QiUOG8whYTFGxGJj4f/vDfN9qtN1X646/ZSFfjrBl9lEicX6BGQJyL65TU2NtbOL0fAhQsXUlpamnEc94KtB1hFPdJSUlKMCJj0aSgFrYyhqKgoMZmYPn065f8+kNrX/WESwuM/T28fypvYuYzvxhG5YuynA/js2TMDrpiYGLv6t2/fpkWLFtGZM2eM4z179qzofPG9xRTQTp8+bUTAkwveocAV0WKGyvd9eYZa9GFwmTFgh/1FlDvKq4wUDTfl0MWLFw0AHz9+bETAuLg4uwh4584dWrx4MaWkpBjHe/XqZTF50Z2KFNBsNpsRAW2fDaX+X0QRLyDzUgzPVm/MDrEDsMO+66R5eNL598uOC18EkMeFeuFLcOnCEXDp0qV06tQp4zAnPaC8XgpoycnJRgQ89cefUN/Pj9qlWj2bH0oNPR0TpdaGNLp27RrVr19fGOgA8lgyPj7ecMKfGcBly5aRzWYz2gsICHCsIdSyjAJaUlKSsQ6YsngYBSw5Yte5jj4+lJVio+KHD8vtdGFhAfn59y+TJ6gblQaQj/Ei9/Lly+nkyZPGZbpv376WERYdcUwB7cSJE8Yl+MySn5H/4sN2Y7UtvwqhWb61HPLmuTZFJLLqkxDOJdRnwbdu3RITG/7MSQfHjx+nFStWUFLS/xe+ufTr18+hdlDJOgpoCQkJIgJySV36HvX87KBITOXbZiNHjqT78961GwO2/+cVIk2jC+NalVUhLIl4eUUHkCczr0rD37dvH61atYoSExONzGqe+KC8XgoIAPV1wLTPh1OPhf+mI0eOiCSBmTNn0n8W/NR+FsyZ05szXroM8/2XiWIGPWDAAGHPM91XZUrv37+fwsLCBIB6+2yH8nopoMXHxxuX4PQv3qdun/7LToHihcMcvhWnA6hHQJ5o6GXz5s3E/7hMmjRJTFQ4yvKlWC9BQUGvl/roLWlxcXFGBMxYPoK6zPvGkIUjU+eS23Qn/DcVS+XhQbc//pqKi4uNuryUU/rBpYiICPHdxIkTiS/B/KATT070CDhw4MCK20ENSymgxcTEGBEwa+Uo6vSH/XTw4EHx8BFPEEJCQpR3mG/X8frf2rVrqfT6oCvaUn7ycKhUAS06OtqIgOe+/AX5frKXGjZsSFu3bhXw6Wt6HMk404WTRl98HJOfnjt//jwNHjzY+I7h5Uc89Uct9bEgp+C3bNmSeAy4bt064lt0egQcNGiQss4x3Hyf2ZnCS0TOLA3xXSEeB3N6mjNl8uTJYlxtxaJFRUUZ64A5YWOow+xdxI9H7tixQ4zVeOlELzyxmDFjBm3cuJHGjRsnIiTDyrl9fP+Yl1cYLi68xMKz6bFjxxr2vEjdokULsVhtOx5N676KIM4T1OFkgFUVnmFzgis/Xipbhg8fTnv37qUaNWpIudizZw8dOHCAtm3bJmXPRvxHxMnBKv84pU/GBYZaZGSkcQk+Hz6WslqOpIKbd8QMdd68eeJhdT1CcfTjNP1GjRpRYWEhXb9+XWznwdt6cAIrz2g5dYv/6jn9np9y08d4XJ+P6f+3OjKLOoZlCnD1MmTIEGVdZABHjx4t/phkS2BgICUkJMia0/bt2+no0aO0ZcsWaR8cRfmqYVkAIyIiSry9vYVAuavH0a+7vkGbPEeQ38D3xDFndzx4mb3tm000q16SeCiJfyCOgHwZnzBhgvQP9aIhAFQmpUsdiUnIkydPBAT1EtdT5+9+SI9S3fKTEg+qoT033H730SmR8MCFL3MqJyEAUPWv5xp/YncsnolyqOfxWWUXHg/yjggq4eM+AMDK/iXl2rPs/oAAUA6IyrYCgOUojkmI63EEgADQ9ZSV0wIABIAA0BUKYAzoClXV+0QERARUT5UJjwAQAJrARX1VAAgA1VNlwiMABIAmcFFfFQACQPVUmfAIAAGgCVzUV7UsgJzLx/vU1KlTR1o1zsXjLeN4o02Zwu8+4Ye0nNn1ix9xmDZtmsjDtGKxLIC88dGoUaPImX2n+VYc72kjCyAnoh4+fFgk98oWTgLmjUKHDh0q66JK21kWQCxEV2nujJMDgBgDupVUAAgAAaArFMAl2BWqqveJCIgIqJ4qEx4BIAA0gYv6qgAQAKqnyoRHAAgATeCivioABIDqqTLhEQACQBO4qK8KAAGgeqpMeASAANAELuqrAkAAqJ4qEx4BIAA0gYv6qpYGcNiwYdS5c9l32jkqI782gvew9vBw7I3xL/rldCzebXbXrl2ONlmmHr9NlN88YNnt2cT2qBYsY8aMET+cM/sDch4f5xTyXtcyhXf+ysnJEZt5ypZLly4R92Xq1KmyLqq0naUjIDaorNLsiZMDgBgDupVSAAgAAaArFEA+oCtUVe8TERARUD1VJjwCQABoAhf1VQEgAFRPlQmPABAAmsBFfVUACADVU2XCIwAEgCZwUV8VAAJA9VSZ8AgAAaAJXNRXBYAAUD1VJjwCQABoAhf1VQEgAFRPlQmPlgaQ32Xcu3dvE3LYVx0xYoTY26927dpSPnbv3k2HDh1y6n3BNpuNvLy8kJAq9Qu40YjfxM4vznam8I8fEBAg7YKTUfll3s744Mb9/f2dSqyV7kAlGFo2AlaCdmhCgQIAUIGIcCGvAACU1w6WChQAgApEhAt5BQCgvHawVKAAAFQgIlzIKwAA5bWDpQIFAKACEeFCXgEAKK8dLBUoAAAViAgX8goAQHntYKlAAQCoQES4kFcAAMprB0sFCgBABSLChbwCAFBeO1gqUAAAKhARLuQVAIDy2sFSgQIAUIGIcCGvAACU1w6WChQAgApEhAt5BQCgvHawVKAAAFQgIlzIKwAA5bWDpQIFAKACEeFCXgEAKK8dLBUoAAAViAgX8goAQHntYKlAAQCoQES4kFcAAMprB0sFCgBABSLChbwCAFBeO1gqUAAAKhARLuQVAIDy2sFSgQIAUIGIcCGvwP8Af58+IFj04kEAAAAASUVORK5CYII=data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAOhUlEQVR4Xu3VwQkAAAjEMN1/abewn7jAQRC64wgQIECAAIF3gX1fNEiAAAECBAiMAHsCAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQIHLFxAWmhEwHPAAAAAElFTkSuQmCC10TIF B. See below.playingfalse3.3.3.5TIF B. See below.playingfalse3.3.3.5X's turn?3.3.3.1 and 3.3.3.5
See 3.3.3.3 above for why we have to test PLAYING.available squares3.3.3 TIF A, here on down. See comment below.available squares1We modify makeBoard for TIF B because drawn lines are behind sprites on the stage, so the win line is hidden by the board. To fix that, we apply a ghost effect (transparency) to the board sprites. The value 30 for the ghost effect was found by experiment. Any more and the board is too faint; any less and the line is.LABEL will stamp text on the stage at the given font size. The direction of the text is the direction the sprite is facing, and color will match the pen color.Hello!121datamapmany1data lists11110i121cont3catchtagcontcatchtagSpriteSpriteI'm kind of bummed that I didn't find a beautiful one-line solution using FIND FIRST, but it just gives the value it finds, not the position in the list, which is what we need to find the line endpoints in WIN LINES. So it's a plain old fashioned FOR loop.true1,2,3,4,5,6,7,8,9true-100,50100,50-100,0100,0-100,-50100,-50-50,100-50,-1000,1000,-10050,10050,-100-100,100100,-100-100,-100100,100