fixed last potion val logic in janet/fennel ports

This commit is contained in:
Luxferre
2026-06-08 21:21:33 +03:00
parent cc15e10652
commit 33b640f9ea
2 changed files with 2 additions and 2 deletions
+1 -1
View File
@@ -136,7 +136,7 @@
(if (. state :drank) (if (. state :drank)
(print "Already drank a potion here! Discarding...") (print "Already drank a potion here! Discarding...")
(do (do
(if (and (= (length room) 1) (= (length deck) 0)) (if (and (= (length room) 0) (= (length deck) 0))
(set last-potion-val val)) (set last-potion-val val))
(tset state :hp (+ (. state :hp) val)) (tset state :hp (+ (. state :hp) val))
(if (> (. state :hp) 20) (tset state :hp 20)) (if (> (. state :hp) 20) (tset state :hp 20))
+1 -1
View File
@@ -128,7 +128,7 @@
(if (state :drank) (if (state :drank)
(print "Already drank a potion here! Discarding...") (print "Already drank a potion here! Discarding...")
(do (do
(if (and (= (length room) 1) (= (length deck) 0)) (if (and (= (length room) 0) (= (length deck) 0))
(set last-potion-val val)) (set last-potion-val val))
(+= (state :hp) val) (+= (state :hp) val)
(if (> (state :hp) 20) (put state :hp 20)) (if (> (state :hp) 20) (put state :hp 20))