_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

SPRITEXCOR.L

FILE INFORMATION

FILENAME(S): SPRITEXCOR.L

FILE TYPE(S): SEQ

FILE SIZE: 139b

FIRST SEEN: 2025-12-01 01:48:21

APPEARS ON: 3 disk(s)

FILE HASH

e254abe8f977862299be4ce1bb75e03b4363d71bf6570189642c3991b413c3a7

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CCS COMAL SPRITEXCOR.L SEQ hedning, Mattias H00r 8 9 DOWNLOAD FILE
CCS COMAL SPRITEXCOR.L SEQ hedning, Mattias H00r 8 9 DOWNLOAD FILE
COMAL A SPRITEXCOR.L SEQ hedning, Helsinborg 8 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 39 30 30 30 20 46 55 4E  43 20 53 50 52 49 54 45  |9000 FUNC SPRITE|
00000010: 58 43 4F 52 28 4E 55 4D  29 20 43 4C 4F 53 45 44  |XCOR(NUM) CLOSED|
00000020: 0D 39 30 31 30 20 58 3A  3D 28 50 45 45 4B 28 35  |.9010 X:=(PEEK(5|
00000030: 33 32 36 34 29 20 4D 4F  44 20 32 5E 28 4E 55 4D  |3264) MOD 2^(NUM|
00000040: 2B 31 29 29 20 44 49 56  20 32 5E 4E 55 4D 0D 39  |+1)) DIV 2^NUM.9|
00000050: 30 32 30 20 52 45 54 55  52 4E 20 58 2A 32 35 36  |020 RETURN X*256|
00000060: 2B 50 45 45 4B 28 35 33  32 34 38 2B 32 2A 4E 55  |+PEEK(53248+2*NU|
00000070: 4D 29 0D 39 30 33 30 20  45 4E 44 46 55 4E 43 20  |M).9030 ENDFUNC |
00000080: 53 50 52 49 54 45 58 43  4F 52 0D                 |SPRITEXCOR.     |

9000 FUNC SPRITEXCOR(NUM) CLOSED.9010 X:
=(PEEK(53264) MOD 2^(NUM+1)) DIV 2^NUM.9
020 RETURN X*256+PEEK(53248+2*NUM).9030 
ENDFUNC SPRITEXCOR.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL