Pocket7878_dev https://blog.hatena.ne.jp/Pocket7878_dev/ Let's write β https://tech-blog.pocket7878.com/ Lisp 迷路を生成したいとおもい、Lispで簡単なクラスタリング法で生成してみました。 ;;迷路のデータ構造 (defclass <maze> () ((width :initarg :w :accessor w) (height :initarg :h :accessor h) (rooms :initarg :rooms :accessor rooms))) ;;部屋の情報を管理するリストをつくる (defun make-room-list (w h) (let ((array (make-array (* w h) :initial-element 0))) (loop for idx from… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Ftech-blog.pocket7878.com%2Fentry%2F2013%2F01%2F26%2F182544" title="迷路生成をLispで - Let&#39;s write β" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2013-01-26 18:25:44 rich https://tech-blog.pocket7878.com/entry/2013/01/26/182544 1.0 100%