Spexeah/Asuro
4
1 Fork 0
Code Issues 20 Pull Requests Actions Packages Projects 1 Releases Wiki Activity

git-svn-id: https://spexeah.com:8443/svn/Asuro@537 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c

Browse Source
This commit is contained in:
kieron committed 2018-04-26 13:34:49 +00:00
1 parent f77075fa35
commit c5f62e8008
8 files changed
+4 -4
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

src/driver/hid/mouse.pas
+4 -4
View File
@@ -149,16 +149,16 @@ begin
Packet.y_overflow:= (f AND $80) = $80;
if not(Packet.x_overflow) and not(Packet.y_overflow) then begin
If (Packet.x_sign) and (Packet.x_movement > 0) then begin
dec(Current.x);
dec(Current.x, Packet.x_movement);
end;
If not(Packet.x_sign) and (Packet.x_movement > 0) then begin
inc(Current.x);
inc(Current.x, Packet.x_movement);
end;
If not(Packet.y_sign) and (Packet.y_movement > 0) then begin
dec(Current.y);
dec(Current.y, Packet.y_movement);
end;
If (Packet.y_sign) and (Packet.y_movement > 0) then begin
inc(Current.y);
inc(Current.y, Packet.y_movement);
end;
if Current.x < 0 then Current.x:= 0;
if Current.y < 0 then Current.y:= 0;