humza/sml-projects
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adjustment to player sprite, allowing the inside of the sprite to be a chosen colour

Browse Source
This commit is contained in:
Humza Shahid
2025-02-18 12:48:55 +00:00
parent d3200745d0
commit b426ddbdd1
2 changed files with 126 additions and 112 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
fcore/player/player.sml
View File

@@ -496,34 +496,18 @@ struct
(* block is placeholder asset *)
fun helpGetDrawVec
(x, y, realWidth, realHeight, width, height, attacked, mainAttack) =
case mainAttack of
MAIN_NOT_ATTACKING =>
(case attacked of
NOT_ATTACKED =>
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height)
| ATTACKED amt =>
if amt mod 5 = 0 then
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height)
else
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height))
| MAIN_THROWING =>
(case attacked of
NOT_ATTACKED =>
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height)
| ATTACKED amt =>
if amt mod 5 = 0 then
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height)
else
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height))
| MAIN_ATTACKING _ =>
(case attacked of
NOT_ATTACKED =>
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height)
| ATTACKED amt =>
if amt mod 5 = 0 then
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height)
else
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height))
let
val (r, g, b) =
case attacked of
NOT_ATTACKED => (1.0, 1.0, 1.0)
| ATTACKED amt =>
if amt mod 5 = 0 then
(1.0, 1.0, 1.0)
else
(1.0, 0.75, 0.75)
in
PlayerSprite.lerp (x, y, realWidth, realHeight, width, height, r, g, b)
end
fun getDrawVec (player: player, width, height) =
let