Tic Tac Toe by ttmh

(do((b(format()" X |   |   ~2@{
---+---+---
   |   |   ~}

"t))(s'(29 57 9 49 53 25))(c #\O(if(eq(setf(elt(princ b)(pop s))c)#\X)#\O #\X)))(/))

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page