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

COD.MOBTNK

FILE INFORMATION

FILENAME(S): COD.MOBTNK

FILE TYPE(S): DEL

FILE SIZE: 1.3K

FIRST SEEN: 2025-11-30 21:27:38

APPEARS ON: 1 disk(s)

FILE HASH

317f78e573a6536a3a064e5bbde90aefe644d0b0d32b1f92b09b71c797c76708

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
OPSLAG1 COD.MOBTNK DEL DuncanTwain 16 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: C1 CE C4 22 3B 3A 8D 31  32 30 00 DC 23 3C 23 8D  |...";:.120..#<#.|
00000010: 38 35 31 30 00 EA 23 46  23 4E 46 B2 32 3A 8D 35  |8510..#F#NF.2:.5|
00000020: 30 30 00 F7 23 50 23 49  55 B2 31 3A 49 B2 31 00  |00..#P#IU.1:I.1.|
00000030: 18 24 5A 23 8D 35 34 30  3A 8B 49 4E 24 B2 22 40  |.$Z#.540:.IN$."@|
00000040: 22 A7 4E 53 28 49 55 29  B2 49 3A 89 39 30 37 30  |".NS(IU).I:.9070|
00000050: 00 36 24 64 23 53 41 24  28 49 55 2C 49 29 B2 49  |.6$d#SA$(IU,I).I|
00000060: 4E 24 3A 49 B2 49 AA 31  3A 89 39 30 35 30 00 4F  |N$:I.I.1:.9050.O|
00000070: 24 6E 23 8B 49 55 B2 31  A7 49 B2 31 3A 49 55 B2  |$n#.IU.1.I.1:IU.|
00000080: 32 3A 89 39 30 35 30 00  58 24 78 23 8D 35 38 30  |2:.9050.X$x#.580|
00000090: 00 5E 24 82 23 8E 00 80  24 30 75 8F 20 20 42 55  |.^$.#...$0u.  BU|
000000A0: 44 47 45 54 20 49 53 20  45 45 4E 20 50 52 4F 47  |DGET IS EEN PROG|
000000B0: 52 41 4D 4D 41 20 4F 4D  00 A0 24 3A 75 8F 20 20  |RAMMA OM..$:u.  |
000000C0: 55 57 20 49 4E 4B 4F 4D  53 54 45 4E 20 45 4E 20  |UW INKOMSTEN EN |
000000D0: 55 49 54 47 41 56 45 4E  00 C4 24 44 75 8F 20 20  |UITGAVEN..$Du.  |
000000E0: 4E 55 20 45 45 4E 53 20  4E 45 54 4A 45 53 20 4F  |NU EENS NETJES O|
000000F0: 50 20 45 45 4E 20 52 49  4A 54 4A 45 00 D6 24 4E  |P EEN RIJTJE..$N|
00000100: 75 8F 20 20 54 45 20 5A  45 54 54 45 4E 2E 00 F3  |u.  TE ZETTEN...|
00000110: 24 58 75 8F 20 20 42 49  4A 20 44 45 20 55 49 54  |$Xu.  BIJ DE UIT|
00000120: 56 4F 45 52 20 57 4F 52  44 45 4E 00 11 25 62 75  |VOER WORDEN..%bu|
00000130: 8F 20 20 50 52 49 4E 54  45 52 20 45 4E 20 44 49  |.  PRINTER EN DI|
00000140: 53 4B 47 45 42 52 55 49  4B 00 25 25 6C 75 8F 20  |SKGEBRUIK.%%lu. |
00000150: 20 4F 4E 44 45 52 53 54  45 55 4E 44 2E 00 49 25  | ONDERSTEUND..I%|
00000160: 76 75 8F 20 20 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |vu.  ===========|
00000170: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000180: 3D 00 65 25 80 75 8F 20  20 47 45 42 52 55 49 4B  |=.e%.u.  GEBRUIK|
00000190: 54 45 20 56 41 52 49 41  42 45 4C 45 4E 00 7E 25  |TE VARIABELEN.~%|
000001A0: 8A 75 8F 20 20 48 4F 2C  56 45 2C 49 4E 2C 43 4E  |.u.  HO,VE,IN,CN|
000001B0: 2C 43 54 2C 53 52 00 96  25 94 75 8F 20 20 43 48  |,CT,SR..%.u.  CH|
000001C0: 20 3D 20 4B 45 55 5A 45  4E 55 4D 4D 45 52 00 B4  | = KEUZENUMMER..|
000001D0: 25 9E 75 8F 20 20 43 31  20 3D 20 48 55 4C 50 56  |%.u.  C1 = HULPV|
000001E0: 41 52 2E 20 4B 45 55 5A  45 4E 52 2E 00 D3 25 A8  |AR. KEUZENR...%.|
000001F0: 75 8F 20 20 49 55 20 3D  20 49 4E 2F 55 49 54 56  |u.  IU = IN/UITV|
00000200: 4F 45 52 4B 45 55 5A 45  4E 52 2E 00 F7 25 B2 75  |OERKEUZENR...%.u|
00000210: 8F 20 20 4D 58 20 3D 20  4D 41 58 49 4D 55 4D 20  |.  MX = MAXIMUM |
00000220: 49 4E 56 4F 45 52 56 41  52 49 41 42 45 4C 45 00  |INVOERVARIABELE.|
00000230: 0F 26 BC 75 8F 20 20 52  45 20 3D 20 52 45 47 45  |.&.u.  RE = REGE|
00000240: 4C 4E 55 4D 4D 45 52 00  2E 26 C6 75 8F 20 20 49  |LNUMMER..&.u.  I|
00000250: 20 20 3D 20 46 4F 52 2F  4E 45 58 54 20 4C 55 53  |  = FOR/NEXT LUS|
00000260: 54 45 4C 4C 45 52 00 49  26 D0 75 8F 20 20 47 44  |TELLER.I&.u.  GD|
00000270: 20 3D 20 49 4E 56 4F 45  52 43 4F 4E 54 52 4F 4C  | = INVOERCONTROL|
00000280: 45 00 62 26 DA 75 8F 20  20 4E 52 20 3D 20 49 4E  |E.b&.u.  NR = IN|
00000290: 56 4F 45 52 54 45 4C 4C  45 52 00 7D 26 E4 75 8F  |VOERTELLER.}&.u.|
000002A0: 20 20 50 52 20 3D 20 50  52 49 4E 54 45 52 50 4F  |  PR = PRINTERPO|
000002B0: 49 4E 54 45 52 00 98 26  EE 75 8F 20 20 54 31 20  |INTER..&.u.  T1 |
000002C0: 3D 20 49 4E 4B 4F 4D 53  54 45 4E 53 41 4C 44 4F  |= INKOMSTENSALDO|
000002D0: 00 B2 26 F8 75 8F 20 20  54 32 20 3D 20 55 49 54  |..&.u.  T2 = UIT|
000002E0: 47 41 56 45 4E 53 41 4C  44 4F 00 C4 26 02 76 8F  |GAVENSALDO..&.v.|
000002F0: 20 20 44 4C 20 3D 20 44  45 4C 45 52 00 E5 26 0C  |  DL = DELER..&.|
00000300: 76 8F 20 20 4E 46 20 3D  20 42 45 53 54 41 4E 44  |v.  NF = BESTAND|
00000310: 53 55 49 54 56 4F 45 52  20 56 41 52 2E 00 02 27  |SUITVOER VAR...'|
00000320: 16 76 8F 20 20 56 31 20  3D 20 48 55 4C 50 56 41  |.v.  V1 = HULPVA|
00000330: 52 2E 20 56 4F 4F 52 20  56 45 00 1F 27 20 76 8F  |R. VOOR VE..' v.|
00000340: 20 20 48 31 20 3D 20 48  55 4C 50 56 41 52 2E 20  |  H1 = HULPVAR. |
00000350: 56 4F 4F 52 20 48 4F 00  3F 27 2A 76 8F 20 20 4E  |VOOR HO.?'*v.  N|
00000360: 53 28 29 20 3D 20 49 4E  2F 55 49 54 47 41 56 45  |S() = IN/UITGAVE|
00000370: 4E 54 45 4C 4C 45 52 00  58 27 34 76 8F 20 20 47  |NTELLER.X'4v.  G|
00000380: 45 42 52 55 49 4B 54 45  20 53 54 52 49 4E 47 53  |EBRUIKTE STRINGS|
00000390: 00 6B 27 3E 76 8F 20 20  49 4E 24 2C 53 52 24 2C  |.k'>v.  IN$,SR$,|
000003A0: 4E 46 24 00 85 27 3F 76  8F 20 20 51 24 20 3D 20  |NF$..'?v.  Q$ = |
000003B0: 54 45 52 4D 49 4A 4E 53  54 52 49 4E 47 00 A2 27  |TERMIJNSTRING..'|
000003C0: 40 76 8F 20 20 48 31 24  2C 48 32 24 20 3D 20 48  |@v.  H1$,H2$ = H|
000003D0: 55 4C 50 53 54 52 49 4E  47 53 00 BC 27 41 76 8F  |ULPSTRINGS..'Av.|
000003E0: 20 20 54 24 20 3D 20 54  45 52 4D 49 4A 4E 53 54  |  T$ = TERMIJNST|
000003F0: 52 49 4E 47 00 DE 27 48  76 8F 20 20 53 41 24 28  |RING..'Hv.  SA$(|
00000400: 58 2C 59 29 20 3D 20 47  45 47 45 56 45 4E 53 20  |X,Y) = GEGEVENS |
00000410: 53 54 52 49 4E 47 00 06  28 52 76 8F 20 20 49 55  |STRING..(Rv.  IU|
00000420: 24 28 29 20 3D 20 49 4E  4B 4F 4D 53 54 45 4E 2F  |$() = INKOMSTEN/|
00000430: 55 49 54 47 41 56 45 4E  20 54 49 54 45 4C 00 2E  |UITGAVEN TITEL..|
00000440: 28 00 7D 8F 20 20 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |(.}.  ==========|
00000450: 3D 3D 3D 3D 3D 3D 3D 3D  3D 3D 3D 3D 3D 3D 3D 3D  |================|
00000460: 3D 3D 3D 3D 3D 3D 00 43  28 0A 7D 8F 20 20 47 45  |======.C(.}.  GE|
00000470: 4D 41 41 4B 54 20 44 4F  4F 52 3A 00 59 28 14 7D  |MAAKT DOOR:.Y(.}|
00000480: 8F 20 20 4B 2E 20 56 2E  44 2E 20 57 49 53 53 45  |.  K. V.D. WISSE|
00000490: 4C 00 70 28 1E 7D 8F 20  20 4E 49 45 55 57 53 54  |L.p(.}.  NIEUWST|
000004A0: 52 41 41 54 20 33 30 36  00 8B 28 28 7D 8F 20 20  |RAAT 306..((}.  |
000004B0: 33 32 30 31 20 45 47 20  53 50 49 4A 4B 45 4E 49  |3201 EG SPIJKENI|
000004C0: 53 53 45 00 9E 28 32 7D  8F 20 20 30 31 38 38 30  |SSE..(2}.  01880|
000004D0: 2D 31 33 33 39 38 00 B9  28 3C 7D 8F 20 20 4F 50  |-13398..(<}.  OP|
000004E0: 20 45 45 4E 20 4C 41 53  45 52 20 58 54 32 20 50  | EEN LASER XT2 P|
000004F0: 43 00 CE 28 46 7D 8F 20  20 4E 4F 56 45 4D 42 45  |C..(F}.  NOVEMBE|
00000500: 52 20 31 39 38 39 00 D4  28 50 7D 8F 00 EF 28 5A  |R 1989..(P}...(Z|
00000510: 7D 8F 20 54 52 4F 53 2D  52 41 44 49 4F 20 44 44  |}. TROS-RADIO DD|
00000520: 20 39 30 30 35 33 30 00  00 00                    | 900530...      |
AND";:.120..#<#.8510..#F#NF.2:.500..#P#I
U.1:I.1..$Z#.540:.IN$."@".NS(IU).I:.9070
.6$D#SA$(IU,I).IN$:I.I.1:.9050.O$N#.IU.1
.I.1:IU.2:.9050.X$X#.580.^$.#...$0U.  BU
DGET IS EEN PROGRAMMA OM. $:U.  UW INKOM
STEN EN UITGAVEN.D$DU.  NU EENS NETJES O
P EEN RIJTJE.V$NU.  TE ZETTEN...$XU.  BI
J DE UITVOER WORDEN..%BU.  PRINTER EN DI
SKGEBRUIK.%%LU.  ONDERSTEUND..I%VU.  ===
=========================.E%.U.  GEBRUIK
TE VARIABELEN.~%.U.  HO,VE,IN,CN,CT,SR..
%.U.  CH = KEUZENUMMER..%.U.  C1 = HULPV
AR. KEUZENR..S%.U.  IU = IN/UITVOERKEUZE
NR...%.U.  MX = MAXIMUM INVOERVARIABELE.
.&.U.  RE = REGELNUMMER..&FU.  I  = FOR/
NEXT LUSTELLER.I&PU.  GD = INVOERCONTROL
E.B&ZU.  NR = INVOERTELLER.}&.U.  PR = P
RINTERPOINTER..&.U.  T1 = INKOMSTENSALDO
..&.U.  T2 = UITGAVENSALDO.D&.V.  DL = D
ELER..&.V.  NF = BESTANDSUITVOER VAR...'
.V.  V1 = HULPVAR. VOOR VE..' V.  H1 = H
ULPVAR. VOOR HO.?'*V.  NS() = IN/UITGAVE
NTELLER.X'4V.  GEBRUIKTE STRINGS.K'>V.  
IN$,SR$,NF$..'?V.  Q$ = TERMIJNSTRING..'
@V.  H1$,H2$ = HULPSTRINGS..'AV.  T$ = T
ERMIJNSTRING..'HV.  SA$(X,Y) = GEGEVENS 
STRING..(RV.  IU$() = INKOMSTEN/UITGAVEN
 TITEL..(.}.  ==========================
======.C(.}.  GEMAAKT DOOR:.Y(.}.  K. V.
D. WISSEL.P(.}.  NIEUWSTRAAT 306..((}.  
3201 EG SPIJKENISSE..(2}.  01880-13398..
(<}.  OP EEN LASER XT2 PC.N(F}.  NOVEMBE
R 1989.T(P}...(Z}. TROS-RADIO DD 900530.
..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL