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

GOSUB LABEL

FILE INFORMATION

FILENAME(S): GOSUB LABEL

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-11-30 21:11:17

APPEARS ON: 1 disk(s)

FILE HASH

a10d6269e85013036cb27f74b84e569e3c3e5cc622825c5c58f90af2a8ee01f8

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
UTILITIES 128 2 GOSUB LABEL PRG DuncanTwain 14 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 31 3A 49 B2 50 53 3A 8D  31 33 30 3A 50 53 24 28  |1:I.PS:.130:PS$(|
00000010: 49 29 B2 53 31 24 AA 22  3A 22 AA 5A 45 24 3A 89  |I).S1$.":".ZE$:.|
00000020: 34 37 30 00 3F 24 CC 01  8B C9 28 50 53 24 28 49  |470.?$....(PS$(I|
00000030: 29 2C 35 29 B3 B1 5A 45  24 A7 50 53 24 28 49 29  |),5)..ZE$.PS$(I)|
00000040: B2 50 53 24 28 49 29 AA  22 20 22 AA 5A 45 24 00  |.PS$(I)." ".ZE$.|
00000050: 4C 24 D6 01 8B 58 B2 30  A7 33 32 30 00 62 24 E0  |L$...X.0.320.b$.|
00000060: 01 8B 58 B2 34 34 A7 53  31 24 B2 22 22 3A 89 33  |..X.44.S1$."":.3|
00000070: 36 30 00 7A 24 EA 01 8B  58 B2 35 38 B0 58 B1 36  |60.z$...X.58.X.6|
00000080: 34 AF 58 B3 39 31 A7 33  33 30 00 AB 24 EF 01 8B  |4.X.91.330..$...|
00000090: 59 31 A7 8B 58 B2 31 33  37 B0 58 B2 31 33 38 B0  |Y1..X.137.X.138.|
000000A0: 58 B2 31 34 30 B0 58 B2  31 34 31 B0 58 B2 32 30  |X.140.X.141.X.20|
000000B0: 33 B0 58 B2 32 31 34 A7  33 35 35 00 BE 24 F0 01  |3.X.214.355..$..|
000000C0: 8B 59 31 A7 8B 58 B2 32  35 34 A7 33 33 36 00 CD  |.Y1..X.254.336..|
000000D0: 24 F2 01 8B 58 B1 31 32  37 A7 33 33 30 00 FC 24  |$...X.127.330..$|
000000E0: F4 01 99 3A 99 22 11 46  4F 55 54 20 49 4E 20 50  |...:.".FOUT IN P|
000000F0: 52 4F 47 52 41 4D 4D 41  20 49 4E 20 52 45 47 45  |ROGRAMMA IN REGE|
00000100: 4C 3A 22 5A 45 24 3A 89  31 33 31 30 00 0F 25 FA  |L:"ZE$:.1310..%.|
00000110: 01 8F 20 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 00  |.. ************.|
00000120: 20 25 FE 01 8F 20 20 20  53 4F 52 54 45 52 45 4E  | %...   SORTEREN|
00000130: 00 33 25 03 02 8F 20 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.3%... *********|
00000140: 2A 2A 2A 00 40 25 08 02  8B 50 53 B2 30 A7 FE 18  |***.@%...PS.0...|
00000150: 00 65 25 09 02 99 22 11  47 45 45 4E 20 52 45 47  |.e%...".GEEN REG|
00000160: 45 4C 2D 53 50 52 4F 4E  47 45 4E 20 41 41 4E 57  |EL-SPRONGEN AANW|
00000170: 45 5A 49 47 2E 00 85 25  0A 02 99 22 11 54 4F 45  |EZIG...%...".TOE|
00000180: 54 53 20 3C 56 3E 20 44  52 55 4B 4B 45 4E 2E 22  |TS <V> DRUKKEN."|
00000190: 3A 89 37 30 30 00 8C 25  0B 02 FE 19 00 AB 25 0C  |:.700..%......%.|
000001A0: 02 53 31 25 B2 31 3A 53  25 28 31 2C 31 29 B2 31  |.S1%.1:S%(1,1).1|
000001B0: 3A 53 25 28 31 2C 32 29  B2 50 53 00 B9 25 0D 02  |:S%(1,2).PS..%..|
000001C0: EB 20 FD 53 31 25 B3 B1  30 00 E1 25 0E 02 4C 25  |. .S1%..0..%..L%|
000001D0: B2 53 25 28 53 31 25 2C  31 29 3A 52 25 B2 53 25  |.S%(S1%,1):R%.S%|
000001E0: 28 53 31 25 2C 32 29 3A  53 31 25 B2 53 31 25 AB  |(S1%,2):S1%.S1%.|
000001F0: 31 00 EE 25 0F 02 EB 20  FD 52 25 B1 4C 25 00 11  |1..%... .R%.L%..|
00000200: 26 10 02 49 25 B2 4C 25  3A 4A 25 B2 52 25 3A 48  |&..I%.L%:J%.R%:H|
00000210: 24 B2 50 53 24 28 B5 28  4C 25 AA 52 25 29 AD 32  |$.PS$(.(L%.R%).2|
00000220: 29 00 1F 26 12 02 EB 20  FD 49 25 B3 B2 4A 25 00  |)..&... .I%..J%.|
00000230: 3C 26 14 02 8B 50 53 24  28 49 25 29 B3 48 24 A7  |<&...PS$(I%).H$.|
00000240: 49 25 B2 49 25 AA 31 3A  89 35 33 32 00 59 26 16  |I%.I%.1:.532.Y&.|
00000250: 02 8B 50 53 24 28 4A 25  29 B1 48 24 A7 4A 25 B2  |..PS$(J%).H$.J%.|
00000260: 4A 25 AB 31 3A 89 35 33  34 00 68 26 18 02 8B 49  |J%.1:.534.h&...I|
00000270: 25 B3 B2 4A 25 A7 FE 18  00 AA 26 1A 02 50 53 24  |%..J%.....&..PS$|
00000280: 28 30 29 B2 50 53 24 28  49 25 29 3A 50 53 24 28  |(0).PS$(I%):PS$(|
00000290: 49 25 29 B2 50 53 24 28  4A 25 29 3A 50 53 24 28  |I%).PS$(J%):PS$(|
000002A0: 4A 25 29 B2 50 53 24 28  30 29 3A 49 25 B2 49 25  |J%).PS$(0):I%.I%|
000002B0: AA 31 3A 4A 25 B2 4A 25  AB 31 00 B1 26 1C 02 FE  |.1:J%.J%.1..&...|
000002C0: 19 00 B7 26 1E 02 EC 00  CB 26 20 02 8B 52 25 AB  |...&.....& ..R%.|
000002D0: 49 25 B1 4A 25 AB 4C 25  A7 FE 18 00 FA 26 22 02  |I%.J%.L%.....&".|
000002E0: 8B 4C 25 B3 4A 25 A7 53  31 25 B2 53 31 25 AA 31  |.L%.J%.S1%.S1%.1|
000002F0: 3A 53 25 28 53 31 25 2C  31 29 0A 2B 45 06 99 22  |:S%(S1%,1).+E.."|
00000300: 20 20 20 20 20 50 52 4F  47 52 41 4D 4D 41 4E 41  |     PROGRAMMANA|
00000310: 41 4D 3A 20 05 20 20 22  46 24 3A 99 22 99 22 54  |AM: .  "F$:."."T|
00000320: 30 24 00 15 2B 4A 06 99  3A 99 22 9F 22 00 35 2B  |0$..+J..:.".".5+|
00000330: 54 06 81 20 56 B2 30 20  A4 20 33 3A 8B 20 54 24  |T.. V.0 . 3:. T$|
00000340: 28 56 29 B2 22 22 20 A7  20 31 37 38 30 00 43 2B  |(V)."" . 1780.C+|
00000350: 5E 06 99 22 20 20 20 20  20 22 3B 00 74 2B 68 06  |^.."     ";.t+h.|
00000360: 8B 20 56 B2 30 20 A7 20  99 22 53 59 53 54 45 45  |. V.0 . ."SYSTEE|
00000370: 4D 2D 56 41 52 49 41 42  45 4C 45 4E 20 45 4E 20  |M-VARIABELEN EN |
00000380: 4B 4F 4E 53 54 41 4E 54  45 4E 22 3B 00 A8 2B 72  |KONSTANTEN";..+r|
00000390: 06 8B 20 56 B2 31 20 A7  20 99 22 4E 55 4D 45 52  |.. V.1 . ."NUMER|
000003A0: 49 45 4B 45 20 46 4C 4F  41 54 49 4E 47 20 4B 4F  |IEKE FLOATING KO|
000003B0: 4D 4D 41 20 56 41 52 49  41 42 45 4C 45 4E 22 3B  |MMA VARIABELEN";|
000003C0: 00 D5 2B 7C 06 8B 20 56  B2 32 20 A7 20 99 22 4E  |..+|.. V.2 . ."N|
000003D0: 55 4D 45 52 49 45 4B 45  20 49 4E 54 45 47 45 52  |UMERIEKE INTEGER|
000003E0: 20 56 41 52 49 41 42 45  4C 45 4E 22 3B 00 F7 2B  | VARIABELEN";..+|
000003F0: 86 06 8B 20 56 B2 33 20  A7 20 99 22 53 54 52 49  |... V.3 . ."STRI|
00000400: 4E 47 2D 56 41 52 49 41  42 45 4C 45 4E 22 3B 00  |NG-VARIABELEN";.|
00000410: 07 2C 90 06 99 22 20 3A  22 3A 99 20 54 30 24 00  |.,..." :":. T0$.|
00000420: 20 2C 9A 06 81 20 49 B2  30 20 A4 20 C3 28 54 24  | ,... I.0 . .(T$|
00000430: 28 56 29 29 AD 35 AB 31  00 43 2C A4 06 59 24 B2  |(V)).5.1.C,..Y$.|
00000440: 22 FF FF FF FF 22 3A 81  20 59 B2 30 20 A4 20 C3  |"....":. Y.0 . .|
00000450: 28 54 24 28 56 29 29 AD  35 AB 31 00 78 2C AE 06  |(T$(V)).5.1.x,..|
00000460: 8B 20 59 24 B1 CA 28 54  24 28 56 29 2C 59 AC 35  |. Y$..(T$(V),Y.5|
00000470: AA 32 2C 34 29 20 A7 20  59 24 B2 CA 28 54 24 28  |.2,4) . Y$..(T$(|
00000480: 56 29 2C 59 AC 35 AA 32  2C 34 29 3A 59 25 B2 59  |V),Y.5.2,4):Y%.Y|
00000490: 00 A1 2C B8 06 82 3A CA  28 54 24 28 56 29 2C 59  |..,...:.(T$(V),Y|
000004A0: 25 AC 35 AA 32 2C 34 29  B2 22 FF FF FF FF 22 3A  |%.5.2,4)."....":|
000004B0: 99 20 59 24 22 20 2D 22  3B 00 BE 2C C2 06 81 20  |. Y$" -";..,... |
000004C0: 4A B2 30 20 A4 20 C3 28  54 41 24 28 59 25 2C 56  |J.0 . .(TA$(Y%,V|
000004D0: 29 29 AD 32 AB 31 00 E6  2C CC 06 8B 20 B5 28 4A  |)).2.1..,... .(J|
000004E0: AD 31 32 29 B2 4A AD 31  32 20 AF 20 4A B1 30 20  |.12).J.12 . J.0 |
000004F0: A7 20 99 3A 99 22 20 20  20 20 20 2D 22 3B 00 2D  |. .:."     -";.-|
00000500: 2D D6 06 99 20 FB 22 23  23 23 23 23 23 22 3B 28  |-... ."######";(|
00000510: C6 28 CA 28 54 41 24 28  59 25 2C 56 29 2C 4A AC  |.(.(TA$(Y%,V),J.|
00000520: 32 AA 31 2C 31 29 29 AC  32 35 36 29 AA C6 28 CA  |2.1,1)).256)..(.|
00000530: 28 54 41 24 28 59 25 2C  56 29 2C 4A AC 32 AA 32  |(TA$(Y%,V),J.2.2|
00000540: 2C 31 29 29 3B 00 39 2D  E0 06 82 20 4A 3A 99 3A  |,1));.9-... J:.:|
00000550: 99 00 45 2D EA 06 82 20  49 3A 99 3A 99 00 4D 2D  |..E-... I:.:..M-|
00000560: F4 06 82 20 56 00 57 2D  FE 06 89 20 37 39 30 00  |... V.W-... 790.|
00000570: 5D 2D 08 07 80 00 00 00                           |]-......        |
1:I.PS:.130:PS$(I).S1$.":".ZE$:.470.?$L.
.I(PS$(I),5)..ZE$.PS$(I).PS$(I)." ".ZE$.
L$V..X.0.320.B$...X.44.S1$."":.360.Z$...
X.58.X.64.X.91.330..$...Y1..X.137.X.138.
X.140.X.141.X.203.X.214.355..$...Y1..X.2
54.336.M$...X.127.330..$...:.".FOUT IN P
ROGRAMMA IN REGEL:"ZE$:.1310..%... *****
*******. %...   SORTEREN.3%... *********
***.@%...PS.0....E%...".GEEN REGEL-SPRON
GEN AANWEZIG...%...".TOETS <V> DRUKKEN."
:.700..%......%..S1%.1:S%(1,1).1:S%(1,2)
.PS..%... .S1%..0..%..L%.S%(S1%,1):R%.S%
(S1%,2):S1%.S1%.1..%... .R%.L%..&..I%.L%
:J%.R%:H$.PS$(.(L%.R%).2)..&... .I%..J%.
<&...PS$(I%).H$.I%.I%.1:.532.Y&...PS$(J%
).H$.J%.J%.1:.534.H&...I%..J%.....&..PS$
(0).PS$(I%):PS$(I%).PS$(J%):PS$(J%).PS$(
0):I%.I%.1:J%.J%.1..&......&....K& ..R%.
I%.J%.L%.....&"..L%.J%.S1%.S1%.1:S%(S1%,
1).+E.."     PROGRAMMANAAM: .  "F$:."."T
0$..+J..:.".".5+T.. V.0 . 3:. T$(V)."" .
 1780.C+^.."     ";.T+H.. V.0 . ."SYSTEE
M-VARIABELEN EN KONSTANTEN";..+R.. V.1 .
 ."NUMERIEKE FLOATING KOMMA VARIABELEN";
.U+|.. V.2 . ."NUMERIEKE INTEGER VARIABE
LEN";..+... V.3 . ."STRING-VARIABELEN";.
.,..." :":. T0$. ,... I.0 . C(T$(V)).5.1
.C,..Y$."....":. Y.0 . C(T$(V)).5.1.X,..
. Y$.J(T$(V),Y.5.2,4) . Y$.J(T$(V),Y.5.2
,4):Y%.Y..,...:J(T$(V),Y%.5.2,4)."....":
. Y$" -";..,B.. J.0 . C(TA$(Y%,V)).2.1..
,L.. .(J.12).J.12 . J.0 . .:."     -";.-
-V.. ."######";(F(J(TA$(Y%,V),J.2.1,1)).
256).F(J(TA$(Y%,V),J.2.2,1));.9-... J:.:
..E-... I:.:..M-... V.W-... 790.]-......
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL