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

SPRITESTATE.L

FILE INFORMATION

FILENAME(S): SPRITESTATE.L

FILE TYPE(S): SEQ

FILE SIZE: 119b

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

APPEARS ON: 2 disk(s)

FILE HASH

fa41e2fd425284bbad738bc99f5e7a4ebe29a001585ec8be1d9a9ee6d19bfc4b

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CCS COMAL SPRITESTATE.L SEQ hedning, Mattias H00r 8 8 DOWNLOAD FILE
CCS COMAL SPRITESTATE.L SEQ hedning, Mattias H00r 8 8 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: 53 54 41 54 45 28 4E 55  4D 29 20 43 4C 4F 53 45  |STATE(NUM) CLOSE|
00000020: 44 0D 39 30 31 30 20 58  3A 3D 28 50 45 45 4B 28  |D.9010 X:=(PEEK(|
00000030: 32 37 32 37 36 29 20 4D  4F 44 20 32 5E 28 4E 55  |27276) MOD 2^(NU|
00000040: 4D 2B 31 29 29 20 44 49  56 20 32 5E 4E 55 4D 0D  |M+1)) DIV 2^NUM.|
00000050: 39 30 32 30 20 52 45 54  55 52 4E 20 58 0D 39 30  |9020 RETURN X.90|
00000060: 33 30 20 45 4E 44 46 55  4E 43 20 53 50 52 49 54  |30 ENDFUNC SPRIT|
00000070: 45 53 54 41 54 45 0D                              |ESTATE.         |

9000 FUNC SPRITESTATE(NUM) CLOSED.9010 X
:=(PEEK(27276) MOD 2^(NUM+1)) DIV 2^NUM.
9020 RETURN X.9030 ENDFUNC SPRITESTATE.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL