2023-01-22 15:20:23 +01:00
|
|
|
(*
|
2023-02-01 14:36:55 +01:00
|
|
|
Copyright 2016, 2023 Anton Krotov
|
2023-01-22 15:20:23 +01:00
|
|
|
|
|
|
|
This file is part of fb2read.
|
|
|
|
|
|
|
|
fb2read is free software: you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU General Public License as published by
|
|
|
|
the Free Software Foundation, either version 3 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
fb2read is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with fb2read. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
*)
|
|
|
|
|
|
|
|
MODULE Cursor;
|
|
|
|
|
|
|
|
|
2023-02-01 14:36:55 +01:00
|
|
|
IMPORT SYSTEM;
|
2023-01-22 15:20:23 +01:00
|
|
|
|
|
|
|
|
|
|
|
PROCEDURE [stdcall] cur;
|
|
|
|
BEGIN
|
2023-02-01 14:36:55 +01:00
|
|
|
SYSTEM.CODE(
|
2023-01-22 15:20:23 +01:00
|
|
|
000H, 000H, 002H, 000H, 001H, 000H, 020H, 020H, 000H, 000H,
|
|
|
|
005H, 000H, 000H, 000H, 0A8H, 00CH, 000H, 000H, 016H, 000H,
|
|
|
|
000H, 000H, 028H, 000H, 000H, 000H, 020H, 000H, 000H, 000H,
|
|
|
|
040H, 000H, 000H, 000H, 001H, 000H, 018H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 080H, 00CH, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 055H, 055H, 055H, 0BBH, 0BBH, 0BBH, 0BBH, 0BBH, 0BBH,
|
|
|
|
0BBH, 0BBH, 0BBH, 0AAH, 0AAH, 0AAH, 033H, 033H, 033H, 0AAH,
|
|
|
|
0AAH, 0AAH, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 033H, 033H, 033H, 0BBH, 0BBH, 0BBH,
|
|
|
|
0EEH, 0EEH, 0EEH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0EEH,
|
|
|
|
0EEH, 0EEH, 0AAH, 0AAH, 0AAH, 0EEH, 0EEH, 0EEH, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H,
|
|
|
|
0BBH, 0BBH, 0BBH, 0EEH, 0EEH, 0EEH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0EEH, 0EEH,
|
|
|
|
0EEH, 0FFH, 0FFH, 0FFH, 0AAH, 0AAH, 0AAH, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
033H, 033H, 033H, 0BBH, 0BBH, 0BBH, 0EEH, 0EEH, 0EEH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0CCH, 0CCH, 0CCH, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 055H, 055H, 055H, 0EEH,
|
|
|
|
0EEH, 0EEH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 088H,
|
|
|
|
088H, 088H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 055H, 055H, 055H, 0EEH, 0EEH, 0EEH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 088H, 088H, 088H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0DDH, 0DDH,
|
|
|
|
0DDH, 0FFH, 0FFH, 0FFH, 0DDH, 0DDH, 0DDH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0EEH, 0EEH,
|
|
|
|
0EEH, 0BBH, 0BBH, 0BBH, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H,
|
|
|
|
033H, 0DDH, 0DDH, 0DDH, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H,
|
|
|
|
000H, 000H, 000H, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0CCH, 0CCH, 0CCH,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 033H, 033H, 033H, 0DDH, 0DDH, 0DDH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H, 000H, 000H, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0CCH, 0CCH, 0CCH, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
055H, 055H, 055H, 0FFH, 0FFH, 0FFH, 0BBH, 0BBH, 0BBH, 000H,
|
|
|
|
000H, 000H, 033H, 033H, 033H, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0CCH,
|
|
|
|
0CCH, 0CCH, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 055H,
|
|
|
|
055H, 055H, 022H, 022H, 022H, 000H, 000H, 000H, 033H, 033H,
|
|
|
|
033H, 0FFH, 0FFH, 0FFH, 0EEH, 0EEH, 0EEH, 088H, 088H, 088H,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 088H, 088H, 088H, 0E5H,
|
|
|
|
0E5H, 0E5H, 044H, 044H, 044H, 0E5H, 0E5H, 0E5H, 033H, 033H,
|
|
|
|
033H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 033H, 033H, 033H, 0FFH, 0FFH, 0FFH,
|
|
|
|
0E5H, 0E5H, 0E5H, 044H, 044H, 044H, 0F4H, 0F4H, 0F4H, 0E5H,
|
|
|
|
0E5H, 0E5H, 044H, 044H, 044H, 0E5H, 0E5H, 0E5H, 000H, 000H,
|
|
|
|
000H, 033H, 033H, 033H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
033H, 033H, 033H, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H,
|
|
|
|
000H, 000H, 0AAH, 0AAH, 0AAH, 022H, 022H, 022H, 000H, 000H,
|
|
|
|
000H, 033H, 033H, 033H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0FFH,
|
|
|
|
0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H, 000H, 000H, 033H, 033H,
|
|
|
|
033H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 033H, 033H, 033H, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H,
|
|
|
|
0E5H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H,
|
|
|
|
033H, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 044H, 044H, 044H, 0EEH, 0EEH, 0EEH,
|
|
|
|
0E5H, 0E5H, 0E5H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 044H, 044H, 044H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
|
|
|
|
000H, 000H, 000H, 000H, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
|
|
|
|
0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0F8H, 027H, 0FFH, 0FFH,
|
|
|
|
0F8H, 007H, 0FFH, 0FFH, 0F0H, 007H, 0FFH, 0FFH, 0E0H, 003H,
|
|
|
|
0FFH, 0FFH, 0C0H, 003H, 0FFH, 0FFH, 0C0H, 001H, 0FFH, 0FFH,
|
|
|
|
0C0H, 001H, 0FFH, 0FFH, 080H, 001H, 0FFH, 0FFH, 000H, 001H,
|
|
|
|
0FFH, 0FFH, 000H, 001H, 0FFH, 0FFH, 000H, 001H, 0FFH, 0FFH,
|
|
|
|
090H, 001H, 0FFH, 0FFH, 0F0H, 003H, 0FFH, 0FFH, 0F0H, 00FH,
|
|
|
|
0FFH, 0FFH, 0F0H, 07FH, 0FFH, 0FFH, 0F0H, 0FFH, 0FFH, 0FFH,
|
|
|
|
0F0H, 0FFH, 0FFH, 0FFH, 0F0H, 0FFH, 0FFH, 0FFH, 0F9H, 0FFH,
|
|
|
|
0FFH, 0FFH)
|
|
|
|
END cur;
|
|
|
|
|
|
|
|
|
|
|
|
PROCEDURE GetCursor* (): INTEGER;
|
2023-02-01 14:36:55 +01:00
|
|
|
RETURN SYSTEM.ADR(cur) + 3
|
2023-01-22 15:20:23 +01:00
|
|
|
END GetCursor;
|
|
|
|
|
|
|
|
|
|
|
|
END Cursor.
|