xolatile/xhads
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Last push for now...

Browse Source
This commit is contained in:
Ognjen Milan Robovic 2024-02-20 15:37:22 -05:00
parent 614a022831
commit e096e0e842
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
source/core.adb
View File

@ -120,15 +120,17 @@ package body core is
return;
end if;
--
crop_width := data.width - (if x + data.width > u + width then (x + data.width) mod (u + width) else 0);
crop_width := data.width - (if x + data.width > u + width then (x + data.width) mod (u + width) else 0);
crop_height := data.height - (if y + data.height > v + height then (y + data.height) mod (v + height) else 0);
--
--~crop_u := (if x < u then data.width - u mod (x + data.width) else 0);
--~crop_v := (if y < v then data.height - v mod (y + data.height) else 0);
--~crop_u := (if x < u and x < u - data.width then data.width - (x + data.width) mod u else 0);
--~crop_v := (if y < v and y < v - data.height then data.height - (y + data.height) mod v else 0);
crop_u := (if x < u then u mod x + data.width else 0);
crop_v := (if y < v then v mod y + data.height else 0);
--~crop_u := data.width - (if x < u then (x + data.width) mod u else 0);
--~crop_v := data.height - (if y < v then (y + data.height) mod v else 0);
crop_u := data.width - (if x < u then u mod x else 0);
crop_v := data.height - (if y < v then v mod y else 0);
--
render_sprite (data.index, x, y, crop_u, crop_v, crop_width, crop_height);
end view;