TC800 CHECKDIGIT

FILE INFORMATION

FILENAME(S): TC800 CHECKDIGIT

FILE TYPE(S): DEL

FILE SIZE: 1.6K

FIRST SEEN: 2025-11-30 21:28:24

APPEARS ON: 1 disk(s)

FILE HASH

f3f4ae45aef7f139b259ce3df4b4744d4f0068c5a1d29fcf67fee13e0bbaf51b

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
0017B	TC800 CHECKDIGIT	DEL	DuncanTwain	12	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 10 0D 10 05 00 8D 31  30 3A 89 39 30 00 47 10  |.......10:.90.G.|
00000010: 0A 00 99 22 93 11 11 42  45 52 45 4B 45 4E 49 4E  |..."...BEREKENIN|
00000020: 47 20 43 48 45 43 4B 44  49 47 49 54 53 11 44 41  |G CHECKDIGITS.DA|
00000030: 54 55 4D 2F 1D 52 45 46  2E 4E 52 2F 20 4C 49 44  |TUM/.REF.NR/ LID|
00000040: 4E 52 2E 20 20 20 22 00  5B 10 0F 00 99 22 20 20  |NR.   ".[...."  |
00000050: 20 20 20 20 A4 A4 A4 A4  A4 A4 22 00 92 10 14 00  |    ......".....|
00000060: 99 22 54 4F 45 54 53 20  12 52 45 54 55 52 4E 92  |."TOETS .RETURN.|
00000070: 20 4F 46 20 55 57 20 20  20 20 11 55 57 20 42 41  | OF UW    .UW BA|
00000080: 53 49 53 47 45 47 45 56  45 4E 20 53 56 50 3A 22  |SISGEGEVEN SVP:"|
00000090: 3A 8E 00 B2 10 5A 00 9C  3A 85 22 11 11 44 41 54  |:....Z..:."..DAT|
000000A0: 55 4D 3A 22 3B 44 24 3A  8B 44 24 B2 22 22 A7 33  |UM:";D$:.D$."".3|
000000B0: 30 30 00 D6 10 64 00 44  B2 C5 28 44 24 29 3A 8B  |00...d.D..(D$):.|
000000C0: C3 28 44 24 29 B1 36 B0  C3 28 44 24 29 B3 35 A7  |.(D$).6..(D$).5.|
000000D0: 8D 32 30 30 3A 8A 00 ED  10 69 00 8B C3 28 44 24  |.200:....i...(D$|
000000E0: 29 B2 35 A7 44 24 B2 22  30 22 AA 44 24 00 19 11  |).5.D$."0".D$...|
000000F0: 6E 00 81 4C B2 31 A4 36  3A 4D B2 C6 28 CA 28 44  |n..L.1.6:M..(.(D|
00000100: 24 2C 4C 2C 31 29 29 3A  8B 4D B3 34 38 B0 4D B1  |$,L,1)):.M.48.M.|
00000110: 35 37 A7 8D 32 30 30 3A  8A 00 20 11 78 00 82 4C  |57..200:.. .x..L|
00000120: 00 49 11 7D 00 8B 44 24  B2 22 30 30 30 30 30 30  |.I.}..D$."000000|
00000130: 22 A7 99 22 11 11 43 48  45 43 4B 44 49 47 49 54  |".."..CHECKDIGIT|
00000140: 3D 20 31 22 3A 89 36 30  30 00 78 11 82 00 4D 44  |= 1":.600.x...MD|
00000150: 24 B2 CA 28 44 24 2C 33  2C 32 29 3A 4D 44 B2 C5  |$..(D$,3,2):MD..|
00000160: 28 4D 44 24 29 3A 8B 4D  44 B3 31 B0 4D 44 B1 31  |(MD$):.MD.1.MD.1|
00000170: 32 A7 8D 32 30 30 3A 8A  00 92 11 8C 00 4A 52 24  |2..200:......JR$|
00000180: B2 C9 28 44 24 2C 32 29  3A 4A 52 B2 C5 28 4A 52  |..(D$,2):JR..(JR|
00000190: 24 29 00 B6 11 96 00 4D  B2 33 31 3A 8B 4D 44 B2  |$).....M.31:.MD.|
000001A0: 34 B0 4D 44 B2 36 B0 4D  44 B2 39 B0 4D 44 B2 31  |4.MD.6.MD.9.MD.1|
000001B0: 31 A7 4D B2 33 30 00 DA  11 A0 00 8B 4D 44 B2 32  |1.M.30......MD.2|
000001C0: A7 4D B2 32 38 3A 8B 4A  52 AD 34 B2 28 B5 28 4A  |.M.28:.JR.4.(.(J|
000001D0: 52 AD 34 29 29 A7 4D B2  32 39 00 06 12 AA 00 44  |R.4)).M.29.....D|
000001E0: 47 24 B2 C8 28 44 24 2C  32 29 3A 44 47 B2 C5 28  |G$..(D$,2):DG..(|
000001F0: 44 47 24 29 3A 8B 44 47  B3 31 B0 44 47 B1 4D A7  |DG$):.DG.1.DG.M.|
00000200: 8D 32 30 30 3A 8A 00 2F  12 B4 00 81 43 B2 31 A4  |.200:../....C.1.|
00000210: 36 3A 50 50 B2 50 50 AA  28 37 AB 43 29 AC 28 C5  |6:PP.PP.(7.C).(.|
00000220: 28 CA 28 44 24 2C 43 2C  31 29 29 29 3A 82 43 00  |(.(D$,C,1))):.C.|
00000230: 61 12 BE 00 51 B2 B5 28  50 50 AD 37 29 3A 43 48  |a...Q..(PP.7):CH|
00000240: B2 50 50 AB 51 AC 37 AA  31 3A 99 22 11 11 43 48  |.PP.Q.7.1:."..CH|
00000250: 45 43 4B 44 49 47 49 54  3D 22 43 48 3A 89 36 30  |ECKDIGIT="CH:.60|
00000260: 30 00 AA 12 C8 00 99 22  11 11 4F 50 56 52 41 41  |0......"..OPVRAA|
00000270: 47 20 4E 49 45 54 20 4A  55 49 53 54 20 20 20 20  |G NIET JUIST    |
00000280: 11 11 50 52 4F 47 52 41  4D 4D 41 20 56 45 52 56  |..PROGRAMMA VERV|
00000290: 4F 4C 47 54 20 20 20 20  11 4F 56 45 52 20 35 20  |OLGT    .OVER 5 |
000002A0: 53 45 43 4F 4E 44 45 4E  2E 22 00 BC 12 D2 00 81  |SECONDEN."......|
000002B0: 50 B2 31 A4 34 30 30 30  3A 82 3A 8E 00 C4 12 2C  |P.1.4000:.:....,|
000002C0: 01 8D 31 30 00 E8 12 36  01 9C 3A 85 22 11 11 52  |..10...6..:."..R|
000002D0: 45 46 2E 4E 52 2E 3A 22  3B 52 4E 24 3A 8B 52 4E  |EF.NR.:";RN$:.RN|
000002E0: 24 B2 22 22 A7 37 30 30  00 15 13 40 01 52 4E B2  |$."".700...@.RN.|
000002F0: C5 28 52 4E 24 29 3A 8B  52 4E B1 39 39 39 39 39  |.(RN$):.RN.99999|
00000300: 39 39 39 39 B0 52 4E B3  31 30 31 A7 8D 32 30 30  |9999.RN.101..200|
00000310: 3A 89 33 30 30 00 38 13  4A 01 46 41 B2 C5 28 C9  |:.300.8.J.FA..(.|
00000320: 28 52 4E 24 2C 32 29 29  3A 8B 46 41 B3 31 A7 8D  |(RN$,2)):.FA.1..|
00000330: 32 30 30 3A 89 33 30 30  00 4E 13 54 01 4C B2 C3  |200:.300.N.T.L..|
00000340: 28 52 4E 24 29 3A 8B 4C  B2 39 A7 34 30 30 00 61  |(RN$):.L.9.400.a|
00000350: 13 5E 01 8B 4C B1 39 A7  8D 32 30 30 3A 89 33 30  |.^..L.9..200:.30|
00000360: 30 00 7D 13 7C 01 81 4D  B2 31 A4 28 39 AB 4C 29  |0.}.|..M.1.(9.L)|
00000370: 3A 54 24 B2 22 30 22 AA  54 24 3A 82 4D 00 8C 13  |:T$."0".T$:.M...|
00000380: 86 01 52 4E 24 B2 54 24  AA 52 4E 24 00 AA 13 90  |..RN$.T$.RN$....|
00000390: 01 4C 4B 24 B2 C8 28 52  4E 24 2C 37 29 3A 52 4B  |.LK$..(RN$,7):RK|
000003A0: 24 B2 C9 28 52 4E 24 2C  32 29 00 C6 13 9A 01 99  |$..(RN$,2)......|
000003B0: 22 91 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 22 4C 4B 24  |"..........."LK$|
000003C0: 22 DD 22 52 4B 24 00 E2  13 A4 01 99 22 20 20 20  |"."RK$......"   |
000003D0: 20 20 20 20 20 20 20 B7  B7 B7 B7 B7 B7 B7 B7 B7  |       .........|
000003E0: B7 22 00 12 14 AE 01 81  43 B2 31 A4 39 3A 41 B2  |."......C.1.9:A.|
000003F0: C6 28 CA 28 52 4E 24 2C  43 2C 31 29 29 3A 8B 41  |.(.(RN$,C,1)):.A|
00000400: B3 34 38 B0 41 B1 35 37  A7 8D 32 30 30 3A 89 33  |.48.A.57..200:.3|
00000410: 30 30 00 2D 14 B8 01 50  50 B2 50 50 AA 28 31 30  |00.-...PP.PP.(10|
00000420: AB 43 29 AC 28 41 AB 34  38 29 3A 82 43 00 60 14  |.C).(A.48):.C.`.|
00000430: C2 01 50 50 B2 50 50 AA  31 38 34 3A 51 B2 B5 28  |..PP.PP.184:Q..(|
00000440: 50 50 AD 31 37 29 3A 43  48 B2 50 50 AB 51 AC 31  |PP.17):CH.PP.Q.1|
00000450: 37 3A 8B 43 48 B1 30 A7  43 48 B2 31 37 AB 43 48  |7:.CH.0.CH.17.CH|
00000460: 00 8A 14 CC 01 43 48 24  B2 C4 28 43 48 29 3A 8B  |.....CH$..(CH):.|
00000470: C3 28 43 48 24 29 B2 32  A7 43 48 24 B2 22 20 30  |.(CH$).2.CH$." 0|
00000480: 22 AA C9 28 43 48 24 2C  31 29 00 A2 14 D6 01 99  |"..(CH$,1)......|
00000490: 22 11 11 43 48 45 43 4B  44 49 47 49 54 3D 22 43  |"..CHECKDIGIT="C|
000004A0: 48 24 00 B5 14 58 02 A1  41 24 3A 8B 41 24 B2 22  |H$...X..A$:.A$."|
000004B0: 22 A7 36 30 30 00 BB 14  62 02 8A 00 C3 14 BC 02  |".600...b.......|
000004C0: 8D 31 30 00 EE 14 C1 02  99 22 13 11 11 11 11 11  |.10......"......|
000004D0: 11 11 11 11 11 11 11 11  20 20 20 20 20 20 20 20  |........        |
000004E0: 20 B7 B7 B7 B7 B7 B7 B7  B7 B7 9E B7 9C 22 00 0F  | ............"..|
000004F0: 15 C6 02 9C 3A 85 22 91  91 4C 49 44 4E 52 2E 3A  |....:."..LIDNR.:|
00000500: 22 3B 4C 4E 24 3A 8B 4C  4E 24 B2 22 22 A7 8A 00  |";LN$:.LN$.""...|
00000510: 2D 15 D0 02 4C B2 C3 28  4C 4E 24 29 3A 8B 4C B2  |-...L..(LN$):.L.|
00000520: 39 A7 4C 4E 24 B2 22 30  22 AA 4C 4E 24 00 47 15  |9.LN$."0".LN$.G.|
00000530: DA 02 8B C3 28 4C 4E 24  29 B3 B1 31 30 A7 8D 32  |....(LN$)..10..2|
00000540: 30 30 3A 89 37 30 30 00  79 15 DF 02 99 22 91 1D  |00:.700.y...."..|
00000550: 1D 1D 1D 1D 1D 1D 1D 20  22 C8 28 4C 4E 24 2C 32  |....... ".(LN$,2|
00000560: 29 22 DD 22 CA 28 4C 4E  24 2C 33 2C 35 29 22 DD  |)".".(LN$,3,5)".|
00000570: 22 C9 28 4C 4E 24 2C 33  29 00 96 15 E0 02 99 22  |".(LN$,3)......"|
00000580: 20 20 20 20 20 20 20 20  20 B7 B7 B7 B7 B7 B7 B7  |         .......|
00000590: B7 B7 B7 B7 B7 22 00 BF  15 E4 02 42 56 B2 C5 28  |.....".....BV..(|
000005A0: C8 28 4C 4E 24 2C 32 29  29 3A 8B 42 56 B1 32 36  |.(LN$,2)):.BV.26|
000005B0: B0 42 56 B3 31 A7 8D 32  30 30 3A 89 37 30 30 00  |.BV.1..200:.700.|
000005C0: E0 15 EE 02 81 46 B2 31  A4 31 30 3A 4E 24 B2 28  |.....F.1.10:N$.(|
000005D0: CA 28 4C 4E 24 2C 28 31  31 AB 46 29 2C 31 29 29  |.(LN$,(11.F),1))|
000005E0: 00 01 16 F8 02 8B C6 28  4E 24 29 B3 34 38 B0 C6  |.......(N$).48..|
000005F0: 28 4E 24 29 B1 35 37 A7  8D 32 30 30 3A 89 37 30  |(N$).57..200:.70|
00000600: 30 00 18 16 02 03 4E B2  C5 28 4E 24 29 3A 50 B2  |0.....N..(N$):P.|
00000610: 50 AA 46 AC 4E 3A 82 46  00 34 16 0C 03 52 46 B2  |P.F.N:.F.4...RF.|
00000620: B5 28 50 AD 31 31 29 3A  43 44 B2 50 AB 52 46 AC  |.(P.11):CD.P.RF.|
00000630: 31 31 AA 31 00 63 16 16  03 43 44 24 B2 C4 28 43  |11.1.c...CD$..(C|
00000640: 44 29 3A 8B C3 28 43 44  24 29 B2 32 A7 43 44 24  |D):..(CD$).2.CD$|
00000650: B2 22 20 30 22 AA C9 28  43 44 24 2C 31 29 3A 89  |." 0"..(CD$,1):.|
00000660: 38 30 30 00 92 16 20 03  99 22 11 11 43 48 45 43  |800... .."..CHEC|
00000670: 4B 44 49 47 49 54 3D 22  43 44 24 3A 89 36 30 30  |KDIGIT="CD$:.600|
00000680: 3A 20 20 20 20 20 20 20  20 4C 2E 50 45 52 51 55  |:        L.PERQU|
00000690: 49 4E 00 00 00 45 49                              |IN...EI         |

.......10:.90.G...."...BEREKENING CHECKD
IGITS.DATUM/.REF.NR/ LIDNR.   ".[...."  
    ......"......"TOETS .RETURN. OF UW  
  .UW BASISGEGEVEN SVP:":....Z..:."..DAT
UM:";D$:.D$."".300.V.D.D.E(D$):.C(D$).6.
C(D$).5..200:....I..C(D$).5.D$."0".D$...
N..L.1.6:M.F(J(D$,L,1)):.M.48.M.57..200:
.. .X..L.I.}..D$."000000".."..CHECKDIGIT
= 1":.600.X...MD$.J(D$,3,2):MD.E(MD$):.M
D.1.MD.12..200:......JR$.I(D$,2):JR.E(JR
$).....M.31:.MD.4.MD.6.MD.9.MD.11.M.30.Z
. ..MD.2.M.28:.JR.4.(.(JR.4)).M.29.....D
G$.H(D$,2):DG.E(DG$):.DG.1.DG.M..200:../
....C.1.6:PP.PP.(7.C).(E(J(D$,C,1))):.C.
A...Q..(PP.7):CH.PP.Q.7.1:."..CHECKDIGIT
="CH:.600...H.."..OPVRAAG NIET JUIST    
..PROGRAMMA VERVOLGT    .OVER 5 SECONDEN
."...R..P.1.4000:.:..D.,..10...6..:."..R
EF.NR.:";RN$:.RN$."".700...@.RN.E(RN$):.
RN.999999999.RN.101..200:.300.8.J.FA.E(I
(RN$,2)):.FA.1..200:.300.N.T.L.C(RN$):.L
.9.400.A.^..L.9..200:.300.}.|..M.1.(9.L)
:T$."0".T$:.M.....RN$.T$.RN$.....LK$.H(R
N$,7):RK$.I(RN$,2).F...."..........."LK$
"."RK$......"          .........."......
C.1.9:A.F(J(RN$,C,1)):.A.48.A.57..200:.3
00.-...PP.PP.(10.C).(A.48):.C.`.B.PP.PP.
184:Q..(PP.17):CH.PP.Q.17:.CH.0.CH.17.CH
...L.CH$.D(CH):.C(CH$).2.CH$." 0".I(CH$,
1)...V.."..CHECKDIGIT="CH$...X..A$:.A$."
".600...B...C....10...A.."..............
         ............"...F..:."..LIDNR.:
";LN$:.LN$.""...-.P.L.C(LN$):.L.9.LN$."0
".LN$.G.Z..C(LN$)..10..200:.700.Y...."..
....... "H(LN$,2)"."J(LN$,3,5)"."I(LN$,3
)......"         ............".....BV.E(
H(LN$,2)):.BV.26.BV.1..200:.700......F.1
.10:N$.(J(LN$,(11.F),1))......F(N$).48.F
(N$).57..200:.700.....N.E(N$):P.P.F.N:.F
.4...RF..(P.11):CD.P.RF.11.1.C...CD$.D(C
D):.C(CD$).2.CD$." 0".I(CD$,1):.800... .
."..CHECKDIGIT="CD$:.600:        L.PERQU
IN...EI

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL