i i i i i i i ooooo o ooooooo ooooo ooooo I I I I I I I 8 8 8 8 8 o 8 8 I \ `+' / I 8 8 8 8 8 8 \ `-+-' / 8 8 8 ooooo 8oooo `-__|__-' 8 8 8 8 8 | 8 o 8 8 o 8 8 ------+------ ooooo 8oooooo ooo8ooo ooooo 8 Welcome to GNU CLISP 2.49 (2010-07-07) Copyright (c) Bruno Haible, Michael Stoll 1992, 1993 Copyright (c) Bruno Haible, Marcus Daniels 1994-1997 Copyright (c) Bruno Haible, Pierpaolo Bernardi, Sam Steingold 1998 Copyright (c) Bruno Haible, Sam Steingold 1999-2000 Copyright (c) Sam Steingold, Bruno Haible 2001-2010 Type :h and hit Enter for context help. [1]> (load "ttt3.lsp") ;; Loading file ttt3.lsp ... ;; Loading file two_lisp_ditties.lsp ... ;; Loaded file two_lisp_ditties.lsp ;; Loaded file ttt3.lsp T [2]> (demo-random-random) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting W for my move END RANDOM PLAYER MOVE ... -- -- -- X1 -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting N for my move END RANDOM PLAYER MOVE ... -- O1 -- X1 -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting E for my move END RANDOM PLAYER MOVE ... -- O1 -- X1 -- X2 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting C for my move END RANDOM PLAYER MOVE ... -- O1 -- X1 O2 X2 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NE for my move END RANDOM PLAYER MOVE ... -- O1 X3 X1 O2 X2 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SW for my move END RANDOM PLAYER MOVE ... -- O1 X3 X1 O2 X2 O3 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NW for my move END RANDOM PLAYER MOVE ... X4 O1 X3 X1 O2 X2 O3 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting S for my move END RANDOM PLAYER MOVE ... X4 O1 X3 X1 O2 X2 O3 O4 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SE for my move END RANDOM PLAYER MOVE ... (W N E C NE SW NW S SE) X4 O1 X3 X1 O2 X2 O3 O4 X5 L NIL [3]> (demo-random-random) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting N for my move END RANDOM PLAYER MOVE ... -- X1 -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting E for my move END RANDOM PLAYER MOVE ... -- X1 -- -- -- O1 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting W for my move END RANDOM PLAYER MOVE ... -- X1 -- X2 -- O1 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SW for my move END RANDOM PLAYER MOVE ... -- X1 -- X2 -- O1 O2 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting C for my move END RANDOM PLAYER MOVE ... -- X1 -- X2 X3 O1 O2 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NW for my move END RANDOM PLAYER MOVE ... O3 X1 -- X2 X3 O1 O2 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NE for my move END RANDOM PLAYER MOVE ... O3 X1 X4 X2 X3 O1 O2 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting S for my move END RANDOM PLAYER MOVE ... O3 X1 X4 X2 X3 O1 O2 O4 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SE for my move END RANDOM PLAYER MOVE ... (N E W SW C NW NE S SE) O3 X1 X4 X2 X3 O1 O2 O4 X5 D NIL [4]> (demo-random-random) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting W for my move END RANDOM PLAYER MOVE ... -- -- -- X1 -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NW for my move END RANDOM PLAYER MOVE ... O1 -- -- X1 -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting N for my move END RANDOM PLAYER MOVE ... O1 X2 -- X1 -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NE for my move END RANDOM PLAYER MOVE ... O1 X2 O2 X1 -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting S for my move END RANDOM PLAYER MOVE ... O1 X2 O2 X1 -- -- -- X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting C for my move END RANDOM PLAYER MOVE ... O1 X2 O2 X1 O3 -- -- X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting E for my move END RANDOM PLAYER MOVE ... O1 X2 O2 X1 O3 X4 -- X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SW for my move END RANDOM PLAYER MOVE ... O1 X2 O2 X1 O3 X4 O4 X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SE for my move END RANDOM PLAYER MOVE ... (W NW N NE S C E SW SE) O1 X2 O2 X1 O3 X4 O4 X3 X5 L NIL [5]> (demo-random-random) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NW for my move END RANDOM PLAYER MOVE ... X1 -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NE for my move END RANDOM PLAYER MOVE ... X1 -- O1 -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting N for my move END RANDOM PLAYER MOVE ... X1 X2 O1 -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SW for my move END RANDOM PLAYER MOVE ... X1 X2 O1 -- -- -- O2 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting S for my move END RANDOM PLAYER MOVE ... X1 X2 O1 -- -- -- O2 X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting W for my move END RANDOM PLAYER MOVE ... X1 X2 O1 O3 -- -- O2 X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting C for my move END RANDOM PLAYER MOVE ... X1 X2 O1 O3 X4 -- O2 X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting E for my move END RANDOM PLAYER MOVE ... X1 X2 O1 O3 X4 O4 O2 X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SE for my move END RANDOM PLAYER MOVE ... (NW NE N SW S W C E SE) X1 X2 O1 O3 X4 O4 O2 X3 X5 W NIL [6]> (demo-random-human) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NW for my move END RANDOM PLAYER MOVE ... X1 -- -- -- -- -- -- -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (N NE W C E SW S SE) c END HUMAN PLAYER MOVE X1 -- -- -- O1 -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting E for my move END RANDOM PLAYER MOVE ... X1 -- -- -- O1 X2 -- -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (N NE W SW S SE) ne END HUMAN PLAYER MOVE X1 -- O2 -- O1 X2 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SW for my move END RANDOM PLAYER MOVE ... X1 -- O2 -- O1 X2 X3 -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (N W S SE) w END HUMAN PLAYER MOVE X1 -- O2 O3 O1 X2 X3 -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting N for my move END RANDOM PLAYER MOVE ... X1 X4 O2 O3 O1 X2 X3 -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (S SE) s END HUMAN PLAYER MOVE X1 X4 O2 O3 O1 X2 X3 O4 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SE for my move END RANDOM PLAYER MOVE ... (NW C E NE SW W N S SE) X1 X4 O2 O3 O1 X2 X3 O4 X5 D NIL [7]> (demo-random-human) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting C for my move END RANDOM PLAYER MOVE ... -- -- -- -- X1 -- -- -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (NW N NE W E SW S SE) nw END HUMAN PLAYER MOVE O1 -- -- -- X1 -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting S for my move END RANDOM PLAYER MOVE ... O1 -- -- -- X1 -- -- X2 -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (N NE W E SW SE) n END HUMAN PLAYER MOVE O1 O2 -- -- X1 -- -- X2 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NE for my move END RANDOM PLAYER MOVE ... O1 O2 X3 -- X1 -- -- X2 -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (W E SW SE) w END HUMAN PLAYER MOVE O1 O2 X3 O3 X1 -- -- X2 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting E for my move END RANDOM PLAYER MOVE ... O1 O2 X3 O3 X1 X4 -- X2 -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (SW SE) sw END HUMAN PLAYER MOVE O1 O2 X3 O3 X1 X4 O4 X2 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting SE for my move END RANDOM PLAYER MOVE ... (C NW S N NE W E SW SE) O1 O2 X3 O3 X1 X4 O4 X2 X5 L NIL [8]> (demo-random-human) -- -- -- -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting N for my move END RANDOM PLAYER MOVE ... -- X1 -- -- -- -- -- -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (NW NE W C E SW S SE) ne END HUMAN PLAYER MOVE -- X1 O1 -- -- -- -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting NW for my move END RANDOM PLAYER MOVE ... X2 X1 O1 -- -- -- -- -- -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (W C E SW S SE) e END HUMAN PLAYER MOVE X2 X1 O1 -- -- O2 -- -- -- BEGIN RANDOM PLAYER MOVE ... randomly selecting S for my move END RANDOM PLAYER MOVE ... X2 X1 O1 -- -- O2 -- X3 -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (W C SW SE) sw END HUMAN PLAYER MOVE X2 X1 O1 -- -- O2 O3 X3 -- BEGIN RANDOM PLAYER MOVE ... randomly selecting C for my move END RANDOM PLAYER MOVE ... X2 X1 O1 -- X4 O2 O3 X3 -- BEGIN HUMAN PLAYER MOVE ... Please select a move from (W SE) se END HUMAN PLAYER MOVE X2 X1 O1 -- X4 O2 O3 X3 O4 BEGIN RANDOM PLAYER MOVE ... randomly selecting W for my move END RANDOM PLAYER MOVE ... (N NE NW E S SW C SE W) X2 X1 O1 X5 X4 O2 O3 X3 O4 W NIL [9]> (bye) Bye.