Zombies arounding i caco upgradat

data/zombie.lua

@@ -0,0 +1,100 @@
+local arcade_config = require("arcade_config")
+o2aX = arcade_config.org2arc_escala
+cxr = arcade_config.character_per_row-1
+cxr2 = arcade_config.character_per_row_base2
+cw = arcade_config.character_width
+ch = arcade_config.character_height
+
+zombie={}
+
+function zombie.new(_hab,_x,_y,_flip)
+    local world_x, world_y = arc_mapa_get_coords(_hab,_x,_y)
+    return {hab=_hab,
+            x=world_x,
+            y=world_y,
+            w=arcade_config.sprite_size.w,
+            h=arcade_config.sprite_size.h,
+            flip=_flip,
+            frame=0,
+            wait=0,
+            step=0,
+            hit=zombie.hit,
+            update=zombie.update_normal, 
+            draw=zombie.draw,
+            jumpfwd=false,
+            anim={16,17,16,18},
+            bb={x=4,y=0,w=26,h=32}}
+end
+
+function zombie:draw()
+    -- if self.frame>0 then draw.surf((self.frame&7)*16,(self.frame>>3)*16,16,16,self.x,self.y,16,16,self.flip) end
+	-- if self.frame>0 then draw.surf((self.frame&7)*cw,(self.frame>>cxr2)*ch,cw,ch,self.x*o2aX,self.y*o2aX,cw,ch,self.flip) end
+    if self.frame>0 and viewp:inside(self.x, self.y, self.w, self.h) then
+        local scr_x, scr_y = viewp:screen_coords( self.x, self.y )
+        draw.surf((self.frame&7)*cw, (self.frame>>cxr2)*ch, cw, ch, scr_x, scr_y, cw, ch, self.flip)
+    end
+end
+
+function zombie:update_normal()
+    self.wait=self.wait+1
+    
+    if self.wait==18 then
+        self.wait=0
+        self.step=(self.step+1)%4
+        self.frame=self.anim[self.step+1]
+    end
+    
+    local step = 1
+    if self.flip then step = -step end
+    local inc = 0
+    if self.flip then inc = self.bb.w end
+    
+    local check_x = self.x+self.bb.x+step
+    local check_ywall = self.y+self.h-2
+    local check_yhole = self.y+self.h+1
+    if not self.flip then
+        check_x = self.x+self.bb.w+self.bb.x+step
+    end
+    
+    local check_no_wall= arc_check_tile(check_x,check_ywall)<tiletype.block
+    local check_no_hole= arc_check_tile(check_x,check_yhole)~=tiletype.void
+    if check_no_wall and check_no_hole then
+        self.x=self.x+step
+    else
+        self.flip=not self.flip
+    end
+
+    -- if self.hab==abad.hab then
+    --     if aabb(abad,self) then
+    --         abad_hurt(1)
+    --     end
+    -- end
+    
+        --if check_tile(self.hab,self.x+4,self.y+16)==tiletype.void and ((self.x+4)&7==0 or check_tile(self.hab,self.x+12,self.y+16)==tiletype.void) then
+        --    self.flip=not self.flip
+        --end
+end
+
+function zombie:update_hit()
+    self.wait=self.wait+1
+
+    if self.wait==6 then
+        self.wait=0
+        self.step=self.step+1
+        if self.step<40 then
+            if self.step%2==0 then
+                self.frame=16
+            else
+                self.frame=-1
+            end
+        elseif self.step>=40 then
+            self.step=0
+            self.wait=0
+            self.update=zombie.update_normal
+        end
+    end
+end
+
+function zombie:hit()
+    self.update=zombie.update_hit
+end