クラスをマクロ化していく中で、工夫が必要な点がでた ;; Step13 <Stage Class> <----------- step 14 correct;; ----------------------------------------------------------------------------------------------- ;(defclass stage (); ((%stage-flag :initarg :stage</stage>…

そういえば「楽しみ」のマクロが残っていた。 step3でクラスを作ったが、もっとカッコよくするには？ ;;step3 <Character object>;; -----------------------------------------------------------------------------------------------(defclass object () ((%imageid :initar</character>…

このシューティングゲームの完成形はこんな感じ 初めてCommon Lispでプログラムを作ったため、やっつけ仕事感ありありだけど、とりあえず動けば目的達成！ common-shooter.lisp ⇒ ;;;; The Common-Shooter ;;; step1 <Game Frame>;;; step2 <Audio>;;; step3 <Sprite Sheets> <Character Object> <Draw Images> <Initialize>;;; step4 <Scroll> <Scroll Counter>;;; </scroll></scroll></initialize></draw></character></sprite></audio></game>…

Step16はスタンドアローンの実行ファイルの作成 プログラム（common-shooter.lisp)に以下を追加 ;;; step1 <Game Frame>;;; step2 <Audio>;;; step3 <Sprite Sheets> <Character Object> <Draw Images> <Initialize>;;; step4 <Scroll> <Scroll Counter>;;; step5 <Font> <Score Panel>;;; step6 <Key State>;;; step7 <Game Field>;;; step8 <Shot>;;; ste…</shot></game></key></score></font></scroll></scroll></initialize></draw></character></sprite></audio></game>

まだネタが残っていたので少々追加 Step15はパッケージ化 パッケージ化が必要かどうかはさておき、これまで作成したSTEP14までのプログラムstep14.lispをcommon-shooter.lispに変更し、common-shooter.asd、package.lispを作成する まずはpackage.lisp ⇒ ;;;…