From 285184f28cec8d8c5ed18e202bd45c4726a44401 Mon Sep 17 00:00:00 2001 From: stefandevai Date: Mon, 27 Apr 2020 00:18:39 +0200 Subject: [PATCH] Remove debug invincibility --- source/header.fnl | 4 ++++ source/main.fnl | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/source/header.fnl b/source/header.fnl index 591fa32..5a09adf 100644 --- a/source/header.fnl +++ b/source/header.fnl @@ -4,3 +4,7 @@ ;; script: fennel ;; input: keyboard ;; saveid: AmethystWaters + +;; NOTE: This code is minified in order to save space. You +;; can find the full source code on GitHub: +;; https://github.com/stefandevai/amethyst-waters diff --git a/source/main.fnl b/source/main.fnl index b95fe98..0e31cf2 100644 --- a/source/main.fnl +++ b/source/main.fnl @@ -900,8 +900,8 @@ (tset *player* :hurt (fn [self damage] (when (and (not= self.state :hurt) (not= *game-state* "game-over")) - (dec self.health 0) - ;(dec self.health (math.max 1 (r (- damage 5) damage))) + ;(dec self.health 0) + (dec self.health (math.max 1 (r (- damage 5) damage))) (if (<= self.health 0) (do (global *time-elapsed* 0) (set self.state :dead)