2008-05-07 11:07:47 +02:00
|
|
|
(in-package :common-lisp)
|
2008-04-28 09:18:59 +02:00
|
|
|
|
2008-05-07 11:07:47 +02:00
|
|
|
;(clc:clc-require :cl-ppcre)
|
|
|
|
(asdf:oos 'asdf:load-op :cl-ppcre)
|
|
|
|
(require :sb-bsd-sockets)
|
2008-04-28 09:18:59 +02:00
|
|
|
|
|
|
|
(defpackage gtp-handler
|
2008-05-07 11:07:47 +02:00
|
|
|
(:use :common-lisp :sb-bsd-sockets)
|
2008-05-05 17:39:04 +02:00
|
|
|
(:export :gtp-client))
|
2008-05-05 17:00:06 +02:00
|
|
|
|
|
|
|
(defpackage go-bot
|
2008-05-05 17:39:04 +02:00
|
|
|
(:use :common-lisp)
|
|
|
|
(:export :*name*
|
|
|
|
:*version*
|
2008-05-06 09:53:22 +02:00
|
|
|
:*author*
|
|
|
|
:set-komi
|
|
|
|
:set-boardsize
|
|
|
|
:init-board
|
|
|
|
:init
|
2008-05-07 11:07:47 +02:00
|
|
|
:play
|
|
|
|
:genmove
|
2008-05-06 09:53:22 +02:00
|
|
|
))
|