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

fix calculated distance for helpGetRightwardsPath (reused same distance calculate as in helpGetUpwardsPath before)

Browse Source
This commit is contained in:
Humza Shahid
2025-01-18 13:52:21 +00:00
parent d59b6eab82
commit c99999c0c9
1 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
fcore/enemy-behaviour.sml
View File

@@ -251,10 +251,13 @@ struct
if isReachableFromRight (prevPlat, currentPlat) then if isReachableFromRight (prevPlat, currentPlat) then
(* is reachable, so reach *) (* is reachable, so reach *)
let let
val {y = cy, ...} = currentPlat (* considering horizontal distance only.
val {y = py, ...} = prevPlat * todo: can consider diagonal/vertical distance too
* (by pythagoras) *)
val {x = cx, ...} = currentPlat
val {x = px, ...} = prevPlat
val diff = py - cy val diff = cx - px
val platDist = dist + diff val platDist = dist + diff
val (newDist, newPath) = getRightwardsPath val (newDist, newPath) = getRightwardsPath
@@ -405,6 +408,10 @@ struct
else else
let let
val currentPlat = Platform.find (id, platforms) val currentPlat = Platform.find (id, platforms)
(* considering vertical distance only.
* This is okay because the scan box is a simple square
* directly above prev platform which does not care about
* top right or top left). *)
val {y = cy, ...} = currentPlat val {y = cy, ...} = currentPlat
val {y = py, ...} = prevPlat val {y = py, ...} = prevPlat