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

GETKEY.SRC

FILE INFORMATION

FILENAME(S): GETKEY.SRC

FILE TYPE(S): PRG

FILE SIZE: 310b

FIRST SEEN: 2025-11-30 01:12:43

APPEARS ON: 3 disk(s)

FILE HASH

4e9ee07a1c71ac3906aad142b0e2f15ae8849ab06a94181304e1e9ad91338154

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10710 10 87 GETKEY.SRC PRG C64er 14 1 DOWNLOAD FILE
15829 SEITE B GETKEY.SRC PRG C64er, DuncanTwain 27 7 DOWNLOAD FILE
64 ER 10 87 A GETKEY.SRC PRG DuncanTwain 14 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F E5 1F 0A 00 2E 42  41 24 30 43 30 30 00 FC  |.......BA$0C00..|
00000010: 1F 0B 00 2E 45 51 20 43  53 52 4F 55 54 20 3D 20  |....EQ CSROUT = |
00000020: 24 43 44 36 46 00 13 20  0C 00 2E 45 51 20 43 53  |$CD6F.. ...EQ CS|
00000030: 52 49 4E 20 20 3D 20 24  43 44 39 46 00 2A 20 0D  |RIN  = $CD9F.* .|
00000040: 00 2E 45 51 20 47 45 54  49 4E 20 20 3D 20 24 46  |..EQ GETIN  = $F|
00000050: 46 45 34 00 41 20 0E 00  2E 45 51 20 42 53 4F 55  |FE4.A ...EQ BSOU|
00000060: 54 20 20 3D 20 24 46 46  44 32 00 5D 20 14 00 4C  |T  = $FFD2.] ..L|
00000070: 30 20 4A 53 52 43 53 52  4F 55 54 3B 43 55 52 53  |0 JSRCSROUT;CURS|
00000080: 4F 52 20 45 49 4E 00 6B  20 1E 00 4C 31 20 4C 44  |OR EIN.k ..L1 LD|
00000090: 41 24 44 30 00 77 20 28  00 20 4F 52 41 24 44 31  |A$D0.w (. ORA$D1|
000000A0: 00 82 20 32 00 20 42 45  51 4C 31 00 9B 20 3C 00  |.. 2. BEQL1.. <.|
000000B0: 20 4A 53 52 43 53 52 49  4E 3B 43 55 52 53 4F 52  | JSRCSRIN;CURSOR|
000000C0: 20 41 55 53 00 B7 20 46  00 20 4A 53 52 47 45 54  | AUS.. F. JSRGET|
000000D0: 49 4E 3B 5A 45 49 43 48  45 4E 20 48 4F 4C 45 4E  |IN;ZEICHEN HOLEN|
000000E0: 00 D6 20 50 00 20 4A 53  52 42 53 4F 55 54 3B 5A  |.. P. JSRBSOUT;Z|
000000F0: 45 49 43 48 45 4E 20 41  55 53 47 45 42 45 4E 00  |EICHEN AUSGEBEN.|
00000100: F6 20 5A 00 20 43 4D 50  23 24 30 44 3B 41 55 46  |. Z. CMP#$0D;AUF|
00000110: 20 52 45 54 55 52 4E 20  50 52 55 45 46 45 4E 00  | RETURN PRUEFEN.|
00000120: 01 21 64 00 20 42 4E 45  4C 30 00 0A 21 6E 00 20  |.!d. BNEL0..!n. |
00000130: 52 54 53 00 00 00                                 |RTS...          |

X......BA$0C00......EQ CSROUT = $CD6F.. 
...EQ CSRIN  = $CD9F.* ...EQ GETIN  = $F
FE4.A ...EQ BSOUT  = $FFD2.] ..L0 JSRCSR
OUT;CURSOR EIN.K ..L1 LDA$D0.W (. ORA$D1
.. 2. BEQL1.. <. JSRCSRIN;CURSOR AUS.. F
. JSRGETIN;ZEICHEN HOLEN.V P. JSRBSOUT;Z
EICHEN AUSGEBEN.. Z. CMP#$0D;AUF RETURN 
PRUEFEN..!D. BNEL0..!N. RTS...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL