diff options
| author | El-BG-1970 <elouan.gros.fr@gmail.com> | 2022-08-25 21:22:54 +0200 |
|---|---|---|
| committer | El-BG-1970 <elouan.gros.fr@gmail.com> | 2022-08-25 21:22:54 +0200 |
| commit | ba291bd4a870048e48b5527878604c9fc31ef07c (patch) | |
| tree | 4cdbfabea69223b4a9b550f36a4c716821a1d74c /src/game.lisp | |
| parent | d6ff28e518c4dec62d8520f74a8f4d1a527a47bc (diff) | |
| download | transacc-ba291bd4a870048e48b5527878604c9fc31ef07c.tar.gz | |
added gui top banner with name and current zone
Diffstat (limited to 'src/game.lisp')
| -rw-r--r-- | src/game.lisp | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/game.lisp b/src/game.lisp index 08184fc..24f5581 100644 --- a/src/game.lisp +++ b/src/game.lisp @@ -6,6 +6,7 @@ :change-zone :get-profit :get-profit-in-zone + :get-cur-zone :commodities-panel)) (in-package :game) @@ -16,7 +17,8 @@ (zones :initarg :zones :accessor zones) (cur-zone :initarg :start-zone - :accessor cur-zone))) + :accessor cur-zone + :reader get-cur-zone))) (defun new-game (player start-zone zones) (make-instance 'game |