Files
cacaus-arcade/data/caco.lua

93 lines
2.5 KiB
Lua

local arcade_config = require("arcade_config")
o2aX = arcade_config.org2arc_escala
cxr2 = arcade_config.character_per_row_base2
cw = arcade_config.character_width
ch = arcade_config.character_height
caco={}
function caco.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=19,
wait=0,
step=0,
hit=caco.hit,
update=caco.update_normal,
draw=caco.draw,
jumpfwd=false,
anim={19,19,20,21},
bb={x=2,y=4,w=12,h=8} }
end
function caco: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 caco:update_normal()
self.wait=0
self.step=self.step+1
if self.step<50 then
self.frame=19
elseif self.step==70 then
self.frame=20
elseif self.step==80 then
self.frame=21
elseif self.step==90 then
self.step=0
end
local step = 1
if self.flip then step = -step end
if arc_check_tile(self.x+step,self.y+self.h)<tiletype.block 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 caco: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=21
else
self.frame=-1
end
elseif self.step>=40 then
self.frame=19
self.step=0
self.wait=0
self.update=caco.update_normal
end
end
end
function caco:hit()
self.update=caco.update_hit
end