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

better visual positioning for cursor

Browse Source
This commit is contained in:
Humza Shahid
2025-09-27 08:14:22 +01:00
parent 2c388899ca
commit 5e9872e4d6
2 changed files with 11 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
fcore/rect.sml
View File

@@ -14,28 +14,22 @@ struct
#[ #[
xToNdc (xOffset, 0.000000000000000, scale, halfWidth), xToNdc (xOffset, 0.000000000000000, scale, halfWidth),
yToNdc (yOffset, 13.000000000000000, scale, halfHeight), yToNdc (yOffset, 13.000000000000000, scale, halfHeight),
z, z, r, g, b,
r, g, b, xToNdc (xOffset, 7.000000000000000, scale, halfWidth),
xToNdc (xOffset, 6.000000000000000, scale, halfWidth),
yToNdc (yOffset, 13.000000000000000, scale, halfHeight), yToNdc (yOffset, 13.000000000000000, scale, halfHeight),
z, z, r, g, b,
r, g, b,
xToNdc (xOffset, 0.000000000000000, scale, halfWidth), xToNdc (xOffset, 0.000000000000000, scale, halfWidth),
yToNdc (yOffset, 0.000000000000000, scale, halfHeight), yToNdc (yOffset, 0.000000000000000, scale, halfHeight),
z, z, r, g, b,
r, g, b,
xToNdc (xOffset, 0.000000000000000, scale, halfWidth), xToNdc (xOffset, 0.000000000000000, scale, halfWidth),
yToNdc (yOffset, 0.000000000000000, scale, halfHeight), yToNdc (yOffset, 0.000000000000000, scale, halfHeight),
z, z, r, g, b,
r, g, b, xToNdc (xOffset, 7.000000000000000, scale, halfWidth),
xToNdc (xOffset, 6.000000000000000, scale, halfWidth),
yToNdc (yOffset, 13.000000000000000, scale, halfHeight), yToNdc (yOffset, 13.000000000000000, scale, halfHeight),
z, z, r, g, b,
r, g, b, xToNdc (xOffset, 7.000000000000000, scale, halfWidth),
xToNdc (xOffset, 6.000000000000000, scale, halfWidth),
yToNdc (yOffset, 0.000000000000000, scale, halfHeight), yToNdc (yOffset, 0.000000000000000, scale, halfHeight),
z, z, r, g, b
r, g, b
] ]
end end
end end

4
fcore/text-builder/text-builder-utils.sml
View File

@@ -150,7 +150,7 @@ struct
(* different functions to make vectors of different things we want to draw. *) (* different functions to make vectors of different things we want to draw. *)
fun makeCursor (posX, posY, env: env_data) = fun makeCursor (posX, posY, env: env_data) =
Rect.lerp Rect.lerp
( Real32.fromInt (posX - 1) ( Real32.fromInt (posX - 2)
, Real32.fromInt posY , Real32.fromInt posY
, #cursorZ env , #cursorZ env
, TC.scale , TC.scale
@@ -163,7 +163,7 @@ struct
fun makeHighlight (posX, posY, env: env_data) = fun makeHighlight (posX, posY, env: env_data) =
Rect.lerp Rect.lerp
( Real32.fromInt (posX - 1) ( Real32.fromInt (posX - 2)
, Real32.fromInt posY , Real32.fromInt posY
, #highlightZ env , #highlightZ env
, TC.scale , TC.scale