From 6a1afedb0e488921829757e55467480ced43c404 Mon Sep 17 00:00:00 2001
From: JoelleTindall <jtindall222@gmail.com>
Date: Thu, 10 Oct 2024 11:48:02 -0400
Subject: [PATCH] Update pulp.lua

Updated __fn_draw function to allow for tiles drawn this way to be animated
---
 pulp.lua | 34 ++++++++++++++++++++++++++++++++--
 1 file changed, 32 insertions(+), 2 deletions(-)

diff --git a/pulp.lua b/pulp.lua
index 6ec3cf3..7b14016 100644
--- a/pulp.lua
+++ b/pulp.lua
@@ -1685,14 +1685,44 @@ function pulp.__fn_label(x, y, len, lines, text)
     end
 end
 
+-- variables to keep track of the current frame for each tile
+currentFrameIndex = {}
+frameCounter = {}
+
+-- function that increments the frame index for a given tile
+function incrementFrameIndex(tileId)
+    local tile = pulp:getTile(tileId)
+    if currentFrameIndex[tileId] == nil then
+        currentFrameIndex[tileId] = 1
+        frameCounter[tileId] = 0
+    else
+        frameCounter[tileId] = frameCounter[tileId] + 1
+        
+        -- Calculate frame update threshold based on fps
+        local frameUpdateThreshold = math.floor(FPS / tile.fps)
+        
+        -- Check if enough frames have been drawn to increment frame
+        if frameCounter[tileId] >= frameUpdateThreshold then
+            currentFrameIndex[tileId] = (currentFrameIndex[tileId] % #tile.frames) + 1
+            frameCounter[tileId] = 0 -- reset frame counter
+        end
+    end
+end
+
+-- modified __fn_draw function to cycle through frames
 function pulp.__fn_draw(x, y, tid)
     local tile = pulp:getTile(tid)
     if tile and tile.frames then
-        local frame = tile.frames[1]
-        pulp.tile_img[frame]:draw(x * GRIDX, y * GRIDY)
+        incrementFrameIndex(tid)
+        local frameIndex = currentFrameIndex[tid]
+        local frame = tile.frames[frameIndex]
+        if frame then
+            pulp.tile_img[frame]:draw(x * GRIDX, y * GRIDY)
+        end
     end
 end
 
+
 function pulp.__fn_restore(name)
     if name == nil then
         for _name in pairs(pulp.store) do