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

PHONE-FILE.BAT

FILE INFORMATION

FILENAME(S): PHONE-FILE.BAT

FILE TYPE(S): SEQ

FILE SIZE: 407b

FIRST SEEN: 2025-10-20 14:31:49

APPEARS ON: 1 disk(s)

FILE HASH

0cf1ae65ffca354367f94456c76a66a3b0d5dc8805879a23def3582db5cd98a0

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
KEYDOS ROM DISK PHONE-FILE.BAT SEQ Treasure Chest - Klaus Der Suhler 19 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 46 41 53 54 3A 55 50 24  3D 43 48 52 24 28 31 34  |FAST:UP$=CHR$(14|
00000010: 35 29 2B 43 48 52 24 28  31 34 35 29 2B 43 48 52  |5)+CHR$(145)+CHR|
00000020: 24 28 31 34 35 29 3A 50  52 49 4E 54 43 48 52 24  |$(145):PRINTCHR$|
00000030: 28 31 34 37 29 3B 0D 50  52 49 4E 54 20 55 50 24  |(147);.PRINT UP$|
00000040: 20 22 2A 2A 2A 20 C9 CD  D0 CF D2 D4 C1 CE D4 20  | "*** ......... |
00000050: D0 C8 CF CE C5 20 CE D5  CD C2 C5 D2 D3 20 2A 2A  |..... ....... **|
00000060: 2A 20 28 50 52 45 53 53  20 41 4E 59 20 4B 45 59  |* (PRESS ANY KEY|
00000070: 29 22 3A 57 41 49 54 32  30 38 2C 31 3A 50 4F 4B  |)":WAIT208,1:POK|
00000080: 45 32 30 38 2C 30 0D 50  52 49 4E 54 20 55 50 24  |E208,0.PRINT UP$|
00000090: 20 22 D0 4F 4C 49 43 45  20 44 45 50 41 52 54 4D  | ".OLICE DEPARTM|
000000A0: 45 4E 54 20 28 45 4D 45  52 47 45 4E 43 49 45 53  |ENT (EMERGENCIES|
000000B0: 29 3A 20 20 20 20 20 20  39 31 31 22 3A 57 41 49  |):      911":WAI|
000000C0: 54 32 30 38 2C 31 3A 50  4F 4B 45 32 30 38 2C 30  |T208,1:POKE208,0|
000000D0: 0D 50 52 49 4E 54 20 55  50 24 20 22 D0 4F 4C 49  |.PRINT UP$ ".OLI|
000000E0: 43 45 20 44 45 50 41 52  54 4D 45 4E 54 20 28 42  |CE DEPARTMENT (B|
000000F0: 55 53 49 4E 45 53 53 29  3A 20 20 20 20 35 35 35  |USINESS):    555|
00000100: 2D 31 31 31 31 22 3A 57  41 49 54 32 30 38 2C 31  |-1111":WAIT208,1|
00000110: 3A 50 4F 4B 45 32 30 38  2C 30 0D 50 52 49 4E 54  |:POKE208,0.PRINT|
00000120: 20 55 50 24 20 22 D0 49  5A 5A 41 20 48 4F 54 4C  | UP$ ".IZZA HOTL|
00000130: 49 4E 45 20 28 44 45 4C  49 56 45 52 49 45 53 29  |INE (DELIVERIES)|
00000140: 3A 20 20 20 20 20 20 35  35 35 2D 32 32 32 32 22  |:      555-2222"|
00000150: 3A 57 41 49 54 32 30 38  2C 31 3A 50 4F 4B 45 32  |:WAIT208,1:POKE2|
00000160: 30 38 2C 30 0D 50 52 49  4E 54 20 55 50 24 3A 53  |08,0.PRINT UP$:S|
00000170: 4C 4F 57 3A 50 4F 4B 45  31 35 33 2C 30 3A 44 43  |LOW:POKE153,0:DC|
00000180: 4C 4F 53 45 20 4F 4E 20  55 28 50 45 45 4B 28 31  |LOSE ON U(PEEK(1|
00000190: 38 36 29 29 0D 0D 82                              |86))...         |

FAST:UP$=CHR$(145)+CHR$(145)+CHR$(145):P
RINTCHR$(147);.PRINT UP$ "*** IMPORTANT 
PHONE NUMBERS *** (PRESS ANY KEY)":WAIT2
08,1:POKE208,0.PRINT UP$ "POLICE DEPARTM
ENT (EMERGENCIES):      911":WAIT208,1:P
OKE208,0.PRINT UP$ "POLICE DEPARTMENT (B
USINESS):    555-1111":WAIT208,1:POKE208
,0.PRINT UP$ "PIZZA HOTLINE (DELIVERIES)
:      555-2222":WAIT208,1:POKE208,0.PRI
NT UP$:SLOW:POKE153,0:DCLOSE ON U(PEEK(1
86))...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL