jadedctrl/ flora-search-aurora
1
0
Disbranĉigi 0
Fontkodo Issues Tirpetoj Eldonoj 1 Activity

Fix sheriff-trigger bug

This commit is contained in:
Jaidyn Ann 2023-07-15 01:21:54 -05:00
parent c7724e2857
commit 763fb6afc5
1 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
flora-search-aurora.lisp
View File

@ -673,11 +673,11 @@ avoid triggering this."
(defun sheriff-trigger (map &optional trigger-plist) (defun sheriff-trigger (map &optional trigger-plist)
(declare (ignore trigger-plist)) (declare (ignore trigger-plist))
(when (not (getf-act map :sheriff-met)) (if (not (getf-act map :sheriff-met))
(progn
(setf (getf-act map :sheriff-met) 't) (setf (getf-act map :sheriff-met) 't)
(make-dialogue-state (make-dialogue-state map (sheriff-trigger-dialogue map)))
map (list :parameters (list :map map))))
(sheriff-trigger-dialogue map))))
@ -1208,9 +1208,8 @@ Initializes the current instance of the game, and such."
(defparameter *flashback-casino-map* (🌍:plist->map (metacopy:copy-thing *flashback-casino-map-plist*))) (defparameter *flashback-casino-map* (🌍:plist->map (metacopy:copy-thing *flashback-casino-map-plist*)))
(defparameter *flashback-school-map* (🌍:plist->map (metacopy:copy-thing *flashback-school-map-plist*))) (defparameter *flashback-school-map* (🌍:plist->map (metacopy:copy-thing *flashback-school-map-plist*)))
(defparameter *outdoors-map* (🌍:plist->map (metacopy:copy-thing *outdoors-map-plist*))) (defparameter *outdoors-map* (🌍:plist->map (metacopy:copy-thing *outdoors-map-plist*)))
(make-flashback-state (third (flashbacks)))))
;; (make-flashback-state (alexandria:random-elt (flashbacks))))) ;; (make-flashback-state (alexandria:random-elt (flashbacks)))))
;; (make-overworld-state *base-map*))) (make-overworld-state *outdoors-map*)))
(defun main-menu () (defun main-menu ()