From 4deace5af508f4ef1efc2d0fb6d05f0676bc9c15 Mon Sep 17 00:00:00 2001 From: Jaidyn Ann <10477760+JadedCtrl@users.noreply.github.com> Date: Sat, 24 Jun 2023 22:29:56 -0500 Subject: [PATCH] =?UTF-8?q?Fix=20dialogue-printing=20for=20players?= =?UTF-8?q?=E2=80=99=20lines?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dialogue.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/dialogue.lisp b/dialogue.lisp index 1b38c15..2802e5e 100644 --- a/dialogue.lisp +++ b/dialogue.lisp @@ -262,7 +262,7 @@ direction specified relative to the focal point. Return nil if no such placement is found, otherwise return a list of the coordinates, max-column, and max-row (for use with RENDER-STRING)." (let* ((text-y-margin (if downp - (+ (getf coords :y) 1) + (+ (getf coords :y) 2) (- (getf coords :y) 2))) (text-height (if downp (- height text-y-margin) @@ -296,7 +296,7 @@ and max-row; for use with RENDER-STRING. Like so: ((:x X :y Y) MAX-COLUMN MAX-ROW)" (let* ((speaker-id (dialogue-speaker dialogue)) (direction (🌍:getf-entity-data map speaker-id :direction)) - (playerp (eq speaker-id 'player)) + (playerp (eq speaker-id '🌍:player)) (leftp (not (eq direction '🌍:right))) (text (getf dialogue :text)) (coords (🌍:world-coords->screen-coords (🌍:getf-entity-data map speaker-id :coords))))