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

PROC.REPEAT'KEYS

FILE INFORMATION

FILENAME(S): PROC.REPEAT'KEYS

FILE TYPE(S): SEQ

FILE SIZE: 133b

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

APPEARS ON: 2 disk(s)

FILE HASH

f768746d5fa6f2938219a7af000bb32f960708724d9934eaf8fc48f2356bb5fe

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
COMAL 2 PROC.REPEAT'KEYS SEQ hedning, Mattias H00r 13 0 DOWNLOAD FILE
CCS COMAL 2 PROC.REPEAT'KEYS SEQ hedning, Mattias H00r 13 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 30 30 31 30 20 D0 D2 CF  C3 20 52 45 50 45 41 54  |0010 .... REPEAT|
00000010: 27 4B 45 59 28 53 54 41  54 45 29 20 0D 30 30 32  |'KEY(STATE) .002|
00000020: 30 20 20 20 C9 C6 20 53  54 41 54 45 20 D4 C8 C5  |0   .. STATE ...|
00000030: CE 0D 30 30 33 30 20 20  20 20 20 D0 CF CB C5 20  |..0030     .... |
00000040: 36 35 30 2C 31 32 38 0D  30 30 34 30 20 20 20 C5  |650,128.0040   .|
00000050: CC D3 C5 20 0D 30 30 35  30 20 20 20 20 20 D0 CF  |... .0050     ..|
00000060: CB C5 20 36 35 30 2C 30  0D 30 30 36 30 20 20 20  |.. 650,0.0060   |
00000070: C5 CE C4 C9 C6 20 0D 30  30 37 30 20 C5 CE C4 D0  |..... .0070 ....|
00000080: D2 CF C3 20 0D                                    |... .           |

0010 PROC REPEAT'KEY(STATE) .0020   IF S
TATE THEN.0030     POKE 650,128.0040   E
LSE .0050     POKE 650,0.0060   ENDIF .0
070 ENDPROC .
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL