TOPLESS(LISTING2

FILE INFORMATION

FILENAME(S): TOPLESS(LISTING2

FILE TYPE(S): PRG

FILE SIZE: 1.1K

FIRST SEEN: 2025-11-30 21:25:51

APPEARS ON: 1 disk(s)

FILE HASH

a87314d5782433572b480de8cb76b4fe4a6c028ca670d23a2b3284e39d192354

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
COMMODORE DOSSIE	TOPLESS(LISTING2	PRG	DuncanTwain	19	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 28 08 64 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |..(.d.. ********|
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 2A  00 4F 08 65 00 8F 20 2A  |********.O.e.. *|
00000030: 2D 44 45 20 47 45 57 45  4E 53 54 45 20 54 45 4B  |-DE GEWENSTE TEK|
00000040: 53 54 28 45 4E 29 20 4F  50 20 44 45 20 20 2A 00  |ST(EN) OP DE  *.|
00000050: 76 08 66 00 8F 20 2A 20  27 54 4F 50 4C 45 53 53  |v.f.. * 'TOPLESS|
00000060: 27 2D 53 43 48 49 4A 46  20 28 3C 52 45 54 55 52  |'-SCHIJF (<RETUR|
00000070: 4E 3E 20 20 20 2A 00 9D  08 67 00 8F 20 2A 20 41  |N>   *...g.. * A|
00000080: 41 4E 20 48 45 54 20 45  49 4E 44 45 21 21 21 29  |AN HET EINDE!!!)|
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 2A 00 C4 08  |            *...|
000000A0: 68 00 8F 20 2A 2D 44 49  54 20 50 52 4F 47 52 41  |h.. *-DIT PROGRA|
000000B0: 4D 4D 41 20 52 55 4E 4E  45 4E 2E 2E 2E 20 20 20  |MMA RUNNEN...   |
000000C0: 20 20 20 2A 00 EB 08 69  00 8F 20 2A 2D 45 56 45  |   *...i.. *-EVE|
000000D0: 4E 20 57 41 43 48 54 45  4E 2C 20 45 4E 20 4F 50  |N WACHTEN, EN OP|
000000E0: 4C 45 54 54 45 4E 21 20  20 20 2A 00 12 09 6A 00  |LETTEN!   *...j.|
000000F0: 8F 20 2A 2D 4E 41 20 45  4C 4B 45 20 3C 52 45 54  |. *-NA ELKE <RET|
00000100: 55 52 4E 3E 20 47 45 45  46 54 20 55 20 27 4A 27  |URN> GEEFT U 'J'|
00000110: 20 2A 00 39 09 6B 00 8F  20 2A 20 42 45 48 41 4C  | *.9.k.. * BEHAL|
00000120: 56 45 20 41 41 4E 20 48  45 54 20 45 49 4E 44 45  |VE AAN HET EINDE|
00000130: 20 56 41 4E 20 55 57 20  2A 00 60 09 6C 00 8F 20  | VAN UW *.`.l.. |
00000140: 2A 20 54 45 4B 53 54 2D  46 49 4C 45 20 20 20 20  |* TEKST-FILE    |
00000150: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |               *|
00000160: 00 87 09 6D 00 8F 20 2A  2D 3C 53 50 41 54 49 45  |...m.. *-<SPATIE|
00000170: 3E 20 49 53 20 27 41 42  4F 52 54 27 20 20 20 20  |> IS 'ABORT'    |
00000180: 20 20 20 20 20 20 2A 00  AE 09 6E 00 8F 20 2A 28  |      *...n.. *(|
00000190: 44 4F 4F 52 20 4A 4F 48  4E 20 56 41 4E 44 45 52  |DOOR JOHN VANDER|
000001A0: 41 41 52 54 29 20 20 20  20 20 20 20 20 2A 00 D5  |AART)        *..|
000001B0: 09 6F 00 8F 20 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.o.. ***********|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001D0: 2A 2A 2A 2A 2A 00 DB 09  70 00 3A 00 F5 09 71 00  |*****...p.:...q.|
000001E0: 9C 3A 53 24 B2 22 20 20  20 20 20 20 20 20 20 20  |.:S$."          |
000001F0: 20 20 20 20 22 00 1A 0A  72 00 99 22 93 05 2A 2A  |    "...r.."..**|
00000200: 2A 54 45 4B 53 54 45 4E  2D 3E 27 54 4F 50 4C 45  |*TEKSTEN->'TOPLE|
00000210: 53 53 27 2A 2A 2A 11 11  11 22 00 20 0A 73 00 3A  |SS'***...". .s.:|
00000220: 00 2B 0A 74 00 8F 20 2A  2A 2A 2A 00 31 0A 75 00  |.+.t.. ****.1.u.|
00000230: 3A 00 51 0A 76 00 85 22  27 54 45 4B 53 54 56 45  |:.Q.v.."'TEKSTVE|
00000240: 52 57 45 52 4B 45 52 27  2D 46 49 4C 45 22 3B 46  |RWERKER'-FILE";F|
00000250: 24 00 6F 0A 77 00 8B 28  C3 28 46 24 29 B2 30 29  |$.o.w..(.(F$).0)|
00000260: B0 28 C3 28 46 24 29 B1  31 34 29 A7 31 31 38 00  |.(.(F$).14).118.|
00000270: 91 0A 78 00 99 3A 85 22  20 20 20 20 20 27 54 4F  |..x..:."     'TO|
00000280: 50 4C 45 53 53 27 2D 42  55 46 46 45 52 22 3B 54  |PLESS'-BUFFER";T|
00000290: 24 00 AF 0A 79 00 8B 28  C3 28 54 24 29 B2 30 29  |$...y..(.(T$).0)|
000002A0: B0 28 C3 28 54 24 29 B1  31 34 29 A7 31 32 30 00  |.(.(T$).14).120.|
000002B0: CA 0A 7A 00 46 24 B2 46  24 AA 22 2C 53 2C 52 22  |..z.F$.F$.",S,R"|
000002C0: 3A 9F 32 2C 38 2C 38 2C  46 24 00 F9 0A 7B 00 54  |:.2,8,8,F$...{.T|
000002D0: 24 B2 22 42 2F 22 AA 54  24 AA C8 28 53 24 2C 31  |$."B/".T$..(S$,1|
000002E0: 34 AB C3 28 54 24 29 29  AA 22 2C 53 2C 57 22 3A  |4..(T$)).",S,W":|
000002F0: 9F 33 2C 38 2C 39 2C 54  24 00 FF 0A 7C 00 3A 00  |.3,8,9,T$...|.:.|
00000300: 0A 0B 7D 00 8F 20 2A 2A  2A 2A 00 10 0B 7E 00 3A  |..}.. ****...~.:|
00000310: 00 1C 0B 7F 00 9F 31 2C  38 2C 31 35 00 24 0B 80  |......1,8,15.$..|
00000320: 00 4C B2 30 00 3E 0B 81  00 3A A1 23 32 2C 41 24  |.L.0.>...:.#2,A$|
00000330: 3A 41 B2 C6 28 41 24 29  3A 99 41 24 2C 41 00 56  |:A..(A$):.A$,A.V|
00000340: 0B 82 00 3A 8B 28 41 B1  33 31 29 AF 28 41 B3 36  |...:.(A.31).(A.6|
00000350: 34 29 A7 31 33 37 00 76  0B 83 00 3A 8B 28 41 B1  |4).137.v...:.(A.|
00000360: 36 33 29 AF 28 41 B3 39  36 29 A7 41 B2 41 AB 36  |63).(A.96).A.A.6|
00000370: 34 3A 89 31 33 37 00 99  0B 84 00 3A 8B 28 41 B1  |4:.137.....:.(A.|
00000380: 31 39 31 29 AF 28 41 B3  32 32 34 29 A7 41 B2 41  |191).(A.224).A.A|
00000390: AB 31 32 38 3A 89 31 33  37 00 A9 0B 85 00 3A 8B  |.128:.137.....:.|
000003A0: 41 B2 31 33 A7 41 B2 33  32 00 C5 0B 86 00 3A 99  |A.13.A.32.....:.|
000003B0: 3A 99 22 45 49 4E 44 45  20 46 49 4C 45 3F 20 28  |:."EINDE FILE? (|
000003C0: 4A 2F 4E 29 22 00 D9 0B  87 00 3A A1 41 24 3A 8B  |J/N)".....:.A$:.|
000003D0: 41 24 B2 22 22 A7 31 33  35 00 EA 0B 88 00 3A 8B  |A$."".135.....:.|
000003E0: 41 24 B2 22 4A 22 A7 31  34 37 00 F8 0B 89 00 3A  |A$."J".147.....:|
000003F0: 98 33 2C C7 28 41 29 3B  00 09 0C 8A 00 3A 84 31  |.3,.(A);.....:.1|
00000400: 2C 42 2C 42 24 2C 43 2C  44 00 18 0C 8B 00 3A 99  |,B,B$,C,D.....:.|
00000410: 42 3B 42 24 3B 43 3B 44  00 27 0C 8C 00 3A 8B 42  |B;B$;C;D.'...:.B|
00000420: B3 B1 30 A7 31 34 37 00  3C 0C 8D 00 3A A1 43 24  |..0.147.<...:.C$|
00000430: 3A 8B 43 24 B2 22 20 22  A7 31 34 37 00 46 0C 8E  |:.C$." ".147.F..|
00000440: 00 4C B2 4C AA 31 00 58  0C 8F 00 8B 4C B3 38 AC  |.L.L.1.X....L.8.|
00000450: 31 30 32 34 A7 31 32 39  00 5E 0C 90 00 3A 00 69  |1024.129.^...:.i|
00000460: 0C 91 00 8F 20 2A 2A 2A  2A 00 6F 0C 92 00 3A 00  |.... ****.o...:.|
00000470: 7C 0C 93 00 A0 31 3A A0  32 3A A0 33 00 82 0C 94  ||....1:.2:.3....|
00000480: 00 80 00 00 00                                    |.....           |

..(.D.. ********************************
.O.E.. *-DE GEWENSTE TEKST(EN) OP DE  *.
V.F.. * 'TOPLESS'-SCHIJF (<RETURN>   *..
.G.. * AAN HET EINDE!!!)            *.D.
H.. *-DIT PROGRAMMA RUNNEN...      *...I
.. *-EVEN WACHTEN, EN OPLETTEN!   *...J.
. *-NA ELKE <RETURN> GEEFT U 'J' *.9.K..
 * BEHALVE AAN HET EINDE VAN UW *.`.L.. 
* TEKST-FILE                   *...M.. *
-<SPATIE> IS 'ABORT'          *...N.. *(
DOOR JOHN VANDERAART)        *.U.O.. ***
*****************************...P.:...Q.
.:S$."              "...R.."..***TEKSTEN
->'TOPLESS'***...". .S.:.+.T.. ****.1.U.
:.Q.V.."'TEKSTVERWERKER'-FILE";F$.O.W..(
C(F$).0).(C(F$).14).118...X..:."     'TO
PLESS'-BUFFER";T$...Y..(C(T$).0).(C(T$).
14).120.J.Z.F$.F$.",S,R":.2,8,8,F$...{.T
$."B/".T$.H(S$,14.C(T$)).",S,W":.3,8,9,T
$...|.:...}.. ****...~.:.....1,8,15.$..
.L.0.>...:.#2,A$:A.F(A$):.A$,A.V...:.(A.
31).(A.64).137.V...:.(A.63).(A.96).A.A.6
4:.137.....:.(A.191).(A.224).A.A.128:.13
7.....:.A.13.A.32.E...:.:."EINDE FILE? (
J/N)".Y...:.A$:.A$."".135.....:.A$."J".1
47.....:.3,G(A);.....:.1,B,B$,C,D.....:.
B;B$;C;D.'...:.B..0.147.<...:.C$:.C$." "
.147.F...L.L.1.X....L.8.1024.129.^...:.I
.... ****.O...:.|... 1: 2: 3.........

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL