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

6-21

FILE INFORMATION

FILENAME(S): 6-21

FILE TYPE(S): PRG

FILE SIZE: 735b

FIRST SEEN: 2025-11-30 21:12:26

APPEARS ON: 2 disk(s)

FILE HASH

79500b3d8b2f99d3640f37782c85d71b3d6db7fc7edcb06f5898337a167ae862

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LOTUS SOFT 6-21 PRG DuncanTwain 22 0 DOWNLOAD FILE
PROG 64 WEST 6-21 PRG DuncanTwain 22 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 27 08 00 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |..'.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00  4D 08 01 00 8F 20 2A 2A  |*******.M.... **|
00000030: 2A 2A 20 50 52 49 4E 54  20 55 53 49 4E 47 20 44  |** PRINT USING D|
00000040: 45 4D 4F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 00 73 08  |EMO *********.s.|
00000050: 02 00 8F 20 2A 20 4E 45  45 44 53 20 27 50 52 49  |... * NEEDS 'PRI|
00000060: 4E 54 20 55 53 49 4E 47  27 20 4D 4C 20 20 20 20  |NT USING' ML    |
00000070: 20 20 2A 00 99 08 03 00  8F 20 2A 20 46 52 4F 4D  |  *...... * FROM|
00000080: 20 27 50 52 4F 47 20 54  48 45 20 43 36 34 27 2C  | 'PROG THE C64',|
00000090: 20 36 2D 32 30 20 20 20  2A 00 BF 08 04 00 8F 20  | 6-20   *...... |
000000A0: 2A 20 49 4E 53 54 41 4C  4C 45 44 20 46 52 4F 4D  |* INSTALLED FROM|
000000B0: 20 34 39 31 35 32 2E 20  20 20 20 20 20 20 2A 00  | 49152.       *.|
000000C0: E5 08 05 00 8F 20 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..... **********|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000E0: 2A 2A 2A 2A 2A 00 0B 09  06 00 8F 20 2A 20 44 45  |*****...... * DE|
000000F0: 4D 4F 20 55 53 45 53 20  56 41 52 49 41 42 4C 45  |MO USES VARIABLE|
00000100: 20 4E 41 4D 45 53 20 20  20 20 2A 00 31 09 07 00  | NAMES    *.1...|
00000110: 8F 20 2A 20 57 48 49 43  48 20 41 52 45 20 41 53  |. * WHICH ARE AS|
00000120: 20 4D 45 41 4E 49 4E 47  46 55 4C 20 41 53 20 20  | MEANINGFUL AS  |
00000130: 2A 00 57 09 08 00 8F 20  2A 20 50 4F 53 53 49 42  |*.W.... * POSSIB|
00000140: 4C 45 20 57 49 54 48 49  4E 20 52 45 53 54 52 49  |LE WITHIN RESTRI|
00000150: 43 54 49 4F 4E 53 2A 00  7D 09 09 00 8F 20 2A 20  |CTIONS*.}.... * |
00000160: 49 4D 50 4F 53 45 44 20  42 59 20 42 41 53 49 43  |IMPOSED BY BASIC|
00000170: 20 4B 45 59 57 4F 52 44  53 20 20 20 2A 00 A3 09  | KEYWORDS   *...|
00000180: 0A 00 8F 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |... ************|
00000190: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001A0: 2A 2A 2A 00 A9 09 0B 00  3A 00 FB 09 0C 00 50 52  |***.....:.....PR|
000001B0: 4E 54 B2 34 39 33 30 35  3A 20 53 57 49 54 43 48  |NT.49305: SWITCH|
000001C0: B2 34 39 31 35 32 3A 20  4C 4E 47 54 48 B2 34 39  |.49152: LNGTH.49|
000001D0: 31 35 33 3A 20 44 45 43  50 54 53 B2 34 39 31 35  |153: DECPTS.4915|
000001E0: 34 3A 20 43 48 41 52 B2  34 39 31 35 35 3A 4C 44  |4: CHAR.49155:LD|
000001F0: 47 43 48 41 52 B2 34 39  32 35 30 00 15 0A 0F 00  |GCHAR.49250.....|
00000200: 81 20 4A B2 AB 31 30 20  A4 20 31 30 30 20 A9 20  |. J..10 . 100 . |
00000210: 31 30 3A 20 99 00 56 0A  14 00 97 20 53 57 49 54  |10: ..V.... SWIT|
00000220: 43 48 2C 30 3A 20 97 20  4C 4E 47 54 48 2C 34 3A  |CH,0: . LNGTH,4:|
00000230: 20 97 20 43 48 41 52 2C  34 32 3A 20 97 20 4C 44  | . CHAR,42: . LD|
00000240: 47 43 48 41 52 2C C6 28  22 2A 22 29 3A 20 9E 20  |GCHAR,.("*"): . |
00000250: 28 50 52 29 20 4A 00 88  0A 1E 00 97 20 53 57 49  |(PR) J...... SWI|
00000260: 54 43 48 2C 31 3A 20 97  20 4C 4E 47 54 48 2C 37  |TCH,1: . LNGTH,7|
00000270: 3A 20 97 20 43 48 41 52  2C 33 32 3A 97 20 4C 44  |: . CHAR,32:. LD|
00000280: 47 43 48 41 52 2C 33 32  00 A7 0A 1F 00 97 20 44  |GCHAR,32...... D|
00000290: 45 43 50 54 53 2C 34 3A  20 9E 20 28 50 52 29 20  |ECPTS,4: . (PR) |
000002A0: 31 AD 28 31 AA 4A 29 00  D6 0A 28 00 97 20 4C 44  |1.(1.J)...(.. LD|
000002B0: 47 43 48 41 52 2C C6 28  22 24 22 29 3A 20 97 20  |GCHAR,.("$"): . |
000002C0: 44 45 43 50 54 53 2C 32  3A 20 9E 20 28 50 52 29  |DECPTS,2: . (PR)|
000002D0: 20 31 30 30 AA 4A 00 DC  0A 32 00 82 00 00 00     | 100.J...2..... |
..'.... *******************************.
M.... **** PRINT USING DEMO *********.S.
... * NEEDS 'PRINT USING' ML      *.....
. * FROM 'PROG THE C64', 6-20   *...... 
* INSTALLED FROM 49152.       *...... **
*****************************...... * DE
MO USES VARIABLE NAMES    *.1.... * WHIC
H ARE AS MEANINGFUL AS  *.W.... * POSSIB
LE WITHIN RESTRICTIONS*.}.... * IMPOSED 
BY BASIC KEYWORDS   *...... ************
*******************.....:.....PRNT.49305
: SWITCH.49152: LNGTH.49153: DECPTS.4915
4: CHAR.49155:LDGCHAR.49250...... J..10 
. 100 . 10: ..V.... SWITCH,0: . LNGTH,4:
 . CHAR,42: . LDGCHAR,F("*"): . (PR) J..
.... SWITCH,1: . LNGTH,7: . CHAR,32:. LD
GCHAR,32...... DECPTS,4: . (PR) 1.(1.J).
V.(.. LDGCHAR,F("$"): . DECPTS,2: . (PR)
 100.J...2.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL