data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAFSNJREFUeF7tnQm4TVUbgL/ToKRZSnMpSpPmQVERmYfMEklKEZlnN0XS3988D2TIL2VKpgyROXIp3FxjpCjSXDT4n3dpbftsZ5+zz3XZp3O/9Tw94qy91t7fec+3vmmtHdm1a9cu0aYSCEkCEQUwJMnrtEYCCqCCEKoEFMBQxa+TK4DKQKgSUABDFb9OrgAqA6FKQAEMVfw6uQKoDIQqAQUwVPHr5AqgMhCqBBTAUMWvkyuAykCoElAAQxW/Tq4AKgOhSkABDFX8OrkB8Omnn5ZrrrnmgEvj66+/llKlSkmhQoUO+Nw6YWpIILJ+/frQC1Lnz58v9erVSw2J6F0cUAlE1q1bZwA899xz5a+//pInn3xS2rVrJ02bNpWBAweam1m7dq2cc8458tNPP8m33367X27wrLPO2i/j6qCpLYHImjVrDIDFihWTjIwMeeihh+SVV16Re+65Rw499FDZuXOndO3aVe666y4pXLiwfPPNN/vliYoUKbJfxtVBU1sCkdWrV4e+BCMiNKy2vCeBSHZ2tgHwmGOOkSOOOOKASQAHxN2KFi16wObWiVJHApGVK1caAAe0ry09Lvje3NnIQk1k+yEFc/0uC+/8UqpsG2HGLdBriazatNWZAxNAW96TQCQrK2tXJBKRgS1ulB5X55Ot930k/J3dmjgGo4YMNP8fr0UiIpeXKuNcZ693/7lp0yY5+OCD5fjjj5eTXy8rBbrOl+wtP5mx6XfeeeflPenrE4sBEDm8ed9NckLlDlKrVi1HLENrXCT1zjwskJiKvfedTJo0SexSetBBBznXbd68WY466ij55ZdfhJDLH3/8Ie3vbigrN//o9Dn//PMDzaOd0ksCkeXLlxsAB7csIw2f+UAISr/88suyceNGGVu3hFQ5NV/UExcZlCVrmxTfSwpeAN0d5syZIz169JAVK1bISy+9JPnz55eWjW6TrK92L/m0Cy64IL0kq08TSAKRZcuWGQCHtCprAASOM844QzZs2CDj6l+2F4DFxm6T7Op724cWwIoVK8qaNWtMTNEuwXPnzpUrrrjC0YDM17pJHVmxabtzkxdeeGGgG9ZO6SWByKeffmoAfKt1Oan/1CQDIA5Bdna2jG94xV4A+j2+VwP++eefTlcAPPbYY+WUU06RzMxM+f3336XNnXVl2cZtTp+LL744vSSrTxNIApGlS5caAIe1KS/1npxoALStcKGC8k3TYM5B5L8LTMbEOizuzAYA7tixwxn3t99+k7Z31ZfPNuzxgi+55JJAN6yd0ksCkczMTAPg8LYVpM4T4+Xwww93nvDjqRNk++DegZ64yv8Wy7p16xwATz/9dGcJxvFA69klGQBxQpau35NVufTSSwPNo53SSwKRxYsXGwDfbldRaj0+zmjAX3/91QSlJze5Vqp6nJCgSzCQ2TZv3rwoDcj4He9pJEvWbXH6XHbZZeklWX2aQBKILFq0yMQBR7SvJDUfG2sApDRrwYIFMrVpySgbEDsvu9rxUrBBZ9n2v/5RE3htQEIutqEB3Uswn3Vu0Vgy12524oCXX355oBvWTuklgcjChQsNgO90qCzVHx0tt956qyxfvly2bdsm05vdEA3gmK2yoUtF2bFumezasUfDIRIL4I033ijE/X744QdnyQVm9xKMBuxyXxNZvOZrB0C8ZG15TwKRBQsWGABHdqoqVfuMjHJCZjQvnWMvGABtA0CvBuzWsqksWrXJAfCqq67Ke9LXJxYDIHIY1bmaVHnk3SgAWY6DBog/+eQTX3F6Afz555+lxwPNZGH2l841V199da5+HYMGDZLPP/98n8YcOXKknHrqqTkeg1WEH2LDhg1zPMbWrVulU6dOToYpxwOl6IWRefPmGQDHdK0hlXqPMF6w9VYHNC4jbYpGZ0L8nqP4uOhUHMK343z//ffy2WefOX8HwF5tmsuCzzc4w1177bW5KiK+9HfeeUdWr15t5k22kZsmmP7uu++a/HVO2oABA0xR70cffSRnnnlm0kN06NBBJkyYIO+9956UKVMm6ev/DRdE5s6dawAc262mVMgYLpUrVzb2GrG7OfeXjVqCT+8/UTZ2rhjzubxOCL9cdyOwTTHrDTfcYIT6UNt7ZX7WF06X6667LlflBYA4Nt27dxc8cnduOtFEBQsWlMaNG8ubb74p27fvyda4r6tevbrMmjXL/BP7WsaOHbvXsBT3ooXffvtt+eKLL0yGKWgjdfncc8+ZHy4/orQFcPbs2QbAcT1qSfmew4wGLFeunEydOlXmtSq3dyruH0/YK0gLIEJ79tlnncppW+1i+/N3ihZ6t2shc5evc4a5/vrrg343gfoB4GOPPWaKHxo1amTSgFR4J2onnniiWTLJiR933HFRAFJEwQYqYH7++eelZs2aZrjRo0dLq1at5O+//zZbFuw8AAg8gIw58+GHH5ofYKLGdU899ZRZvkmJpjWAs2bNMgC+37O23NJ9qLBcbtmyRQgML2h9axSARUdvkVU1T5LIoflk1x87o+To1YB4wn4NDdinY0uZs2yt0yXIF5Poi3N/bgFE62CDAjgQHnaYf3UP9i4ZmeHDh5uhAHDUqFHJTBuo78033+zbb9iwYdKsWTOjtWlpD+DMmTMNgBMy6kqZroOjnJDs7jWl1LF/BxKqF8Cvvvoq6rqbbrrJaAjsoYkTJ0rfTq1k1qernT6lS5cONE/QTm4AuYblkmXsxx9/jHpGOx6BcOw+Cx//jsYC3Hz5gtnBie4N23fhwoVmnw3hLm8bOnSotGjRwmg+aifzBIAzZswwYRgAvLnLIPPloP7btm2bSJ45+pwvFLusX5fWBkC7RO9vALnZ6dOnmy+e3X3ulGP58uWNZhw3bpzzTGigjz/+WIhr5mabMWOGNGjQQPDSmde2mTNnyi233GLsbwtfngBw+vTpBsBJvetL6Y4DZMiQIUZLACFVzLaddtpp8uWXe8Im9t9ff/11ozWwGW3ji2aZ8XqfQIaNiHbs3+1Bmbkk2wEQDZmbzasB7dgAwBcNhPzYcCD4EcyePTtqejQ1ZsjRRx+dm7cl7IUhQoDGxUu+4447jMOHbGKZCGm/BE+bNs0AOPnhBlKy7asm5MCXwheEBrCtRIkS5otiOSKTwa+4X79+8sQTT8iYMWNMCReGOa1+/fpSsmRJad26tXM9mgTnhH/r3Lmz/KdHO5mRudIBMJ5dlBMC/AC0WoWwCLWL/BiWLFmy1xQsv8QmKROjygdnBk898faE3dsZ/BqRABwV7E1+AP379zf7sAnUH3LIIXtdlvYATp061UhrSp/b5YfzaxonBJD4k+oW2/jF4gESG0OLEKAFQMI2nGpAKf7KlStlypQpZlM7YQc0IQ24nnnmGWnTpo35c9WqVfJiv54y/ZMsZ/yyZcvmhDPfa+IBaO+J5+DH5C5BswPGApBYpY1t2n5vvPGGkQF7pmn28++++86YMcyBLGyzAFKAy4pC1dBrr70md999d8xnSXsAp0yZYgCc2reR2ZQ0p8xrpiT/3nvvNbaI+9fsFT42zAcffOAIzvs5f8e7ffHFFw18VgP+3r2I2ZQ0bdEK51qWxdxs8QDs1q2bMTXYKkDdIkY/e1bczQ9AoMEcwbOmaINnJHduM0ZuALt06WKcCnehhQWQcA//8QM44YQTjIyaNGmS9zTg5MmTDYCzX+kmnc7dXZ83+JcSkrlj9y86N1v5/GulYv5VZsgCGUtlyuyF5v8JdQB9bjY/AHv27Gk0jg0ToY0xHwDLnXZDc1155ZVy5JFH5uZtmfgoWo3cN8F6gt5EB7A1uTfME3dLew3Yrl27XdYbs8tIrkrcZzALAPBxFEhut1gAsiGqT58+Uc4V8+JsWSfLQohWRLNhy+ZmIxx0++23CzWS3jwzfycG+PDDDztTpj2A6fq2TC+AZCMeeOABs9zGSstZe8xqJQhgGc5N5whzBs3K0uu3Cevkk0825/D07dvXQKgA5ubP/wCO5QaQwDf7nQkEx8sJEx7BHiMCwNLrzYRYGIEokTfs96hkZhKdg8OyjCZ8/PHHFcADyEyuTmUBJO6GI0T2IUhVDJBij7Ev+qKLLjK5YJwVlmg8VgLG/PfII484aT0bQsGsAFrbbC6YoDOBbhyXoIW3jEM4i5PJ0joXnM5LcLVq1UwhAtmFWDE2P+LJghQoUMBoQYLyLMW2WS2I40BIika0IJZmBUCcHKphsPmSLbolVonG7N27d/pWw6QrgGgr7LpkwPMCyd5mWw+I1iOGmUxDmzIGgAbRvrHG5nocJ9KX6djS9pDy2267zZRJEUxP9vRVUmLEBatWrSoPPvhgjh0RNCDai4wLFUDJNmxByrzIwFSoUCHZy/8V/dMWQGxAwhnE+IAwaEUyyzVbUslk8OVToeJuLL2kKklTupdggtLkj91LsbUB+XdSeuPHjw8MBfCRJyZNpzZgYLGlTkfrhOA84AAAQaKqa2w/4LNeMPajG0BSixTrErck3WirVgCR0nuyR6QibfWyBZAxyCsD76JFixIKCS8Z7UtRrIZhEoorNTu4wzBUMpPvpRLbL+WHs8EpsWwdsEfMuQEkgFylShUTR4zX8KAnT55sYHcDyDV+lTfu8dCUaG02RNEUwNTkK+FdeQPRhGHwbKn589pThFGoD6Qqhqof2yyAaC7K7O2Sm2hylmGgJ1TD8unWomSdcCxsoYZ7LLxk4Kcq2jYFMJG0U/TzWKk47DucCwLTVhNaMN3/5gUQWwwwevXqFehpcTwo8yKr4QWQASiK5V7wrG3jfgDcHfJRDRhI3KnZya8YAeCoeaT4gT7YhyyZsXadWQ2IdiSkkkxIhyWfwoJYACKx2rVrG3tw/fr1Jt+MlqXm0NtUA6YmXwnvKl45Fmk0nA2+dILENWrUiDmeBZAl1R64mXDifzrgoFDd4gcg3ZgXjcfZie6aQfccCmBQiadYv0QFqWg+AKRIgeqUWM0CiObDpksmmIzNSPA4HoDEKskrYxYogCkG0L7eTjwAqUZhKwG2Hek2v2JQCyDaEu83yL5ie99A1b59e18AgRMzgAKIOnXqmJNjgVWX4H395lPkej8Aqbmj3AkPlYYWJFZISby7Do/PLIDs21i8eLFZroM0Km+I+xFXjKUBcWbYzOXeukr1C2Ei90YwdUKCSDtF+8QCkOoWlj0vaDxCrGJQCyA2I8sw1cxkKOI1W9IF2HjDXgDZCYdt6AWNMQGTPSbuz9QGTFHAEt2WF0DeBoq3OXjwYN9LqQhHOz766KOmjzsQDQhkKCi58oMQ+BgDzxagvYFoyrJatmxpKmz86hI5E+bVV191jjZRABN90yn6uRtA9vcSx+O0rEQNuFiOWXa9qTg04EknnSTsYSZ0Y09MIJBNcBuHgj72BdxuAAmxUMrFJqREzgzhG+zDPHE2TLqWY1kAAYM4HjZc0AaEbBQnc+ItRmAM0mTYbPbUVzxqlk73W6boZwGkqIE0HDZh0Fhix44dDYTLli0z711J29Ox0hlAjjZDS8U7PNMPSqpn2BudKPcbD2psOqqgp02blnRRLONiLqCNydLk9r7poD/G/d0vbcuxSOhTjbyvjbQZ+0SSbTgu7pxuste7+/MsbPpPx5a2ALL8kV+Nd+wbqTD2/vo19mWgBdkfQqgmmQa0LKNsTo+3gYnTsriHeHYh+0hyosWTud+w+uYpACkyxTsFCALFVJ9QWMrGI2ws4nDuk6kAEKcCG5JyrKB7hIGP7Aol/N7TIkjpYZdSDcP4xAv5IeAZ05cQjPdIYAUwrJ/HPszr1YCc4EURaVZWVswSfQLTGRkZUcd02BNSgQYIKTZNdIoXr50FMIpJaW4AgYy8L/FBYoHeRvimePHi5ui2unXrOh8rgPsAQliXugHEk0TTEAKJ14CTM14Ajjid+4hecsGk5Cird5/r5x6PcA/22ogRu98K7wbQ1hRyL0AWrzEPtYn2LfIKYFgU7cO8bgAJfVBO5T6U0m9oDlEi+MuGJu8Z0cT7yB2///77e51witYjfPPWW29FDW01ICEatlhy7mKiRskYoR1rOyqAiSSWgp9bADmZiiyI98jgeLeM9kNjeQHkGgshWs4eUs6yDCzuAlOvBky2pIu5if9hDyqAKQhYoluyAGKLNW/ePOaZzH5joOVwTKiaifWaBkrq2ftByozsCvuP/bxUqwHZb5JMTJHYIcFtQjkKYKJvOwU/twCipTDuyWoEbTgKvCmAvK7fe0LsabGA5X0ninseCyDpOU5GDdoY/+yzzzb3rgAGlVoK9bMAcsAPJ5Umc8oVGpCQDXlfPwBJ9bHVk8/96gndTghQE1MM2gj7EMbhZAYFMKjUUqifBZAAMlqQgs+gzdpr2F+xACSEwt5gYoTYisQUgSXWMbtWAxJfDLqrjvvEYeHgdzxhBTDoN5dC/dxecDIOADYd1SgcTB7LCaFU64UXXoiq2QNCzqLxHi7p1oBU43Dmnzu+F09cgMu4/KkAphBYQW/FDSBBaKDy23dhx8TDZTcbYRBCN14AOf2AU/45OSFW81ZbuwFkTMamIibRi28YB43KzjmaAhj0W0+hft5MCPs/2IEW610n3DbH8XIqAScjELahuQEkO3H//fcb+OIdconnTFEr76lzA8j/U1BAEJpgtN9rcLmemKK7cFYBTCGwgt5KrGIEypoqVapk0mGclM9rFygsJTiMfYY36z6U3AJISRX1gbb+L9E94BlzTgwOkDcXTECcXDE2IQcPUW1DsSrLM04Kp2hxmpa7KYCJJJ6Cn/tVwxDewMMlxkYRANUyvEoh1rIIgGQ9CDQnU0yKOLAJOTGL4tVY1TAsyRSc8oYmAMOBwemJVRWjAKYgYIluCQA5F/DOO+9M1NX3c7xbNBYOibtKJuiA5IbxonN6njTzMD9vmdJyrKBST5F+ZCncLx/MyW3xpfPiapbUnDY2vtuigpyOQXW2fQ1aTsdI1evSth4wVQWu9xUtAQVQiQhVAgpgqOLXyRVAZSBUCSiAoYpfJ1cAlYFQJaAAhip+nVwBVAZClYACGKr4dXIFUBkIVQIKYKji18kVQGUgVAkogKGKXydXAJWBUCWgAIYqfp1cAVQGQpWAAhiq+HVyBVAZCFUCCmCo4tfJFUBlIFQJKIChil8nVwCVgVAloACGKn6dXAFUBkKVgAIYqvh1cgVQGQhVAgpgqOLXyRVAZSBUCSiAoYpfJ1cAlYFQJaAAhip+nVwBVAZClYACGKr4dXIFUBkIVQL/BxXikU31AK/tAAAAAElFTkSuQmCC110i121I'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.X's turn?3.3.3.1 and 3.3.3.5
See 3.3.3.3 above for why we have to test PLAYING.data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAAAXNSR0IArs4c6QAADoVJREFUeF7t1cEJAAAIxDDdf2m3sJ+4wEEQuuMIECBAgACBd4F9XzRIgAABAgQIjAB7AgIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+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+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECByxcQFpoRMBzwAAAABJRU5ErkJggg==10TIF B: First of all, we don't want Square, the sprite with nine clones to show the board, to move around. So I added another sprite, named Sprite. It's hidden, but can draw lines with its thick red pen. (Click on Sprite at the right to see its code.) The actual work is done in procedure DRAW WIN LINE. But instead of running DRAW WIN LINE in the Square sprite (this one), we TELL Sprite TO do it. We 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.3.3.3.3: If the ninth move, the one that fills the board, causes a win, then the game isn't a tie even though no more moves are possible.3.3.3.TIF B starts here. The instruction below only needs to be run once. It makes a list of the two endpoints of each of the lines to mark a win. It must be in the same order as POSSIBLE WINNING TRIPLES. 3.3.3.5: There are many ways to do this. The way shown here uses a /flag variable/, i.e., a variable whose value is true or false. In this case, PLAYING is true if further moves are allowed.falseX,O,X,X,O,X,O,X,Otrue-100,50100,50-100,0100,0-100,-50100,-50-50,100-50,-1000,1000,-10050,10050,-100-100,100100,-100-100,-100100,100