CODEC
FILE INFORMATION
FILENAME(S): CODEC
FILE TYPE(S): DEL
FILE SIZE: 3.4K
FIRST SEEN: 2025-11-30 21:28:24
APPEARS ON: 1 disk(s)
FILE HASH
8bab57329b1dadb047e55f6c44922485e3423dac1cf69f1be554b7129b8f150f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0017B | CODEC | DEL | DuncanTwain | 27 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 11 08 64 00 8F 20 43 20 4F 20 44 20 45 20 |....d.. C O D E |
00000010: 43 00 38 08 6E 00 8F 20 2A 20 44 4F 4F 52 20 54 |C.8.n.. * DOOR T|
00000020: 4F 4E 20 44 41 52 4F 2C 44 45 4C 46 54 20 4A 41 |ON DARO,DELFT JA|
00000030: 4E 2E 31 39 38 34 20 2A 00 4D 08 78 00 86 20 4D |N.1984 *.M.x.. M|
00000040: 41 54 52 49 58 24 28 32 36 2C 32 36 29 00 94 08 |ATRIX$(26,26)...|
00000050: 82 00 4D 41 58 B2 38 30 30 3A 86 20 42 45 52 49 |..MAX.800:. BERI|
00000060: 43 48 54 24 28 4D 41 58 AA 31 29 2C 43 4F 44 45 |CHT$(MAX.1),CODE|
00000070: 24 28 4D 41 58 AA 31 29 2C 44 45 43 4F 44 45 24 |$(MAX.1),DECODE$|
00000080: 28 4D 41 58 AA 31 29 2C 53 4C 45 55 54 45 4C 24 |(MAX.1),SLEUTEL$|
00000090: 28 32 31 29 00 CF 08 8C 00 53 43 48 45 52 4D 24 |(21).....SCHERM$|
000000A0: B2 22 93 12 20 20 20 20 20 20 20 20 20 20 20 20 |.".. |
000000B0: 20 43 20 20 4F 20 20 44 20 20 45 20 20 43 20 20 | C O D E C |
000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 92 11 22 00 | ..".|
000000D0: FE 08 96 00 45 24 B2 22 20 20 20 20 20 20 20 20 |....E$." |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 12 20 45 49 | . EI|
000000F0: 4E 44 45 20 42 45 52 49 43 48 54 20 92 22 00 09 |NDE BERICHT ."..|
00000100: 09 A0 00 8D 20 31 30 30 30 00 0F 09 AA 00 3A 00 |.... 1000.....:.|
00000110: 31 09 B4 00 8F 20 2A 2A 2A 2A 2A 2A 20 5A 45 54 |1.... ****** ZET|
00000120: 20 4D 41 54 52 49 58 20 4F 50 20 2A 2A 2A 2A 2A | MATRIX OP *****|
00000130: 2A 00 70 09 BE 00 41 24 B2 22 2A 41 42 43 44 45 |*.p...A$."*ABCDE|
00000140: 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 55 |FGHIJKLMNOPQRSTU|
00000150: 56 57 58 59 5A 41 42 43 44 45 46 47 48 49 4A 4B |VWXYZABCDEFGHIJK|
00000160: 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A 22 |LMNOPQRSTUVWXYZ"|
00000170: 00 7F 09 C8 00 81 20 59 B2 31 20 A4 20 32 36 00 |...... Y.1 . 26.|
00000180: 94 09 D2 00 41 24 B2 C9 28 41 24 2C C3 28 41 24 |....A$..(A$,.(A$|
00000190: 29 AB 31 29 00 A3 09 DC 00 81 20 58 B2 31 20 A4 |).1)...... X.1 .|
000001A0: 20 32 36 00 C0 09 E6 00 4D 41 54 52 49 58 24 28 | 26.....MATRIX$(|
000001B0: 59 2C 58 29 B2 CA 28 41 24 2C 28 58 29 2C 31 29 |Y,X)..(A$,(X),1)|
000001C0: 00 D0 09 F0 00 82 20 58 2C 59 3A 8D 20 34 30 30 |...... X,Y:. 400|
000001D0: 00 D6 09 FA 00 3A 00 F2 09 04 01 8F 20 2A 2A 2A |.....:...... ***|
000001E0: 2A 2A 2A 20 4D 20 45 20 4E 20 55 20 2A 2A 2A 2A |*** M E N U ****|
000001F0: 2A 2A 00 17 0A 0E 01 99 20 53 43 48 45 52 4D 24 |**...... SCHERM$|
00000200: 3B 22 11 11 1D 1D 4D 45 4E 55 3A 11 9D 9D 9D 9D |;"....MENU:.....|
00000210: 9D B7 B7 B7 B7 11 22 00 42 0A 18 01 99 22 11 20 |......".B....". |
00000220: 20 20 20 20 31 2E 20 43 4F 44 45 52 45 4E 20 4D | 1. CODEREN M|
00000230: 45 54 20 50 52 49 4E 54 45 52 2D 55 49 54 56 4F |ET PRINTER-UITVO|
00000240: 45 52 00 6F 0A 22 01 99 22 11 20 20 20 20 20 32 |ER.o."..". 2|
00000250: 2E 20 44 45 43 4F 44 45 52 45 4E 20 4D 45 54 20 |. DECODEREN MET |
00000260: 50 52 49 4E 54 45 52 2D 55 49 54 56 4F 45 52 00 |PRINTER-UITVOER.|
00000270: 9D 0A 2C 01 99 22 11 20 20 20 20 20 33 2E 20 43 |..,..". 3. C|
00000280: 4F 44 45 52 45 4E 20 5A 4F 4E 44 45 52 20 50 52 |ODEREN ZONDER PR|
00000290: 49 4E 54 45 52 2D 55 49 54 56 4F 45 52 00 CD 0A |INTER-UITVOER...|
000002A0: 36 01 99 22 11 20 20 20 20 20 34 2E 20 44 45 43 |6..". 4. DEC|
000002B0: 4F 44 45 52 45 4E 20 5A 4F 4E 44 45 52 20 50 52 |ODEREN ZONDER PR|
000002C0: 49 4E 54 45 52 2D 55 49 54 56 4F 45 52 00 E8 0A |INTER-UITVOER...|
000002D0: 40 01 99 22 11 20 20 12 55 57 20 4B 45 55 5A 45 |@..". .UW KEUZE|
000002E0: 92 20 20 12 3F 92 9D 22 00 1D 0B 4A 01 A1 20 4D |. .?.."...J.. M|
000002F0: 45 4E 55 24 3A 4D 45 4E 55 B2 B5 28 C5 28 4D 45 |ENU$:MENU..(.(ME|
00000300: 4E 55 24 29 29 3A 8B 20 4D 45 4E 55 B3 31 20 B0 |NU$)):. MENU.1 .|
00000310: 20 4D 45 4E 55 20 B1 34 20 A7 33 33 30 00 4A 0B | MENU .4 .330.J.|
00000320: 54 01 8D 20 35 35 30 3A 8D 36 37 30 3A 91 20 4D |T.. 550:.670:. M|
00000330: 45 4E 55 20 8D 20 33 35 30 2C 33 36 30 2C 33 37 |ENU . 350,360,37|
00000340: 30 2C 33 38 30 3A 89 32 36 30 00 62 0B 5E 01 9F |0,380:.260.b.^..|
00000350: 31 2C 34 3A 8D 20 37 39 30 3A 8D 20 34 30 30 3A |1,4:. 790:. 400:|
00000360: 20 8E 00 7A 0B 68 01 9F 31 2C 34 3A 8D 20 38 38 | ..z.h..1,4:. 88|
00000370: 30 3A 8D 20 34 30 30 3A 20 8E 00 8D 0B 72 01 8D |0:. 400: ....r..|
00000380: 20 37 39 30 3A 8D 20 34 30 30 3A 20 8E 00 A0 0B | 790:. 400: ....|
00000390: 7C 01 8D 20 38 38 30 3A 8D 20 34 30 30 3A 20 8E ||.. 880:. 400: .|
000003A0: 00 A6 0B 86 01 3A 00 C9 0B 90 01 8F 20 2A 2A 2A |.....:...... ***|
000003B0: 2A 2A 2A 20 57 41 43 48 54 20 4F 50 20 54 4F 45 |*** WACHT OP TOE|
000003C0: 54 53 20 2A 2A 2A 2A 2A 2A 00 E9 0B 9A 01 A1 20 |TS ******...... |
000003D0: 52 4F 4D 4D 45 4C 24 3A 8B 20 52 4F 4D 4D 45 4C |ROMMEL$:. ROMMEL|
000003E0: 24 B3 B1 22 22 A7 34 30 30 00 04 0C A4 01 99 22 |$.."".400......"|
000003F0: 11 20 20 54 4F 45 54 53 20 56 4F 4F 52 20 4D 45 |. TOETS VOOR ME|
00000400: 4E 55 22 3B 00 1C 0C AE 01 A1 20 49 4E 24 3A 8B |NU";...... IN$:.|
00000410: 20 49 4E 24 B2 22 22 A7 20 34 33 30 00 25 0C B8 | IN$."". 430.%..|
00000420: 01 A0 31 3A 8E 00 2B 0C C2 01 3A 00 50 0C CC 01 |..1:..+...:.P...|
00000430: 8F 20 2A 2A 2A 2A 2A 2A 20 50 49 45 50 21 20 42 |. ****** PIEP! B|
00000440: 55 46 46 45 52 20 56 4F 4C 20 2A 2A 2A 2A 2A 2A |UFFER VOL ******|
00000450: 00 60 0C D6 01 53 4F 55 4E 44 B2 35 34 32 37 32 |.`...SOUND.54272|
00000460: 00 8B 0C E0 01 97 20 53 4F AA 35 2C 31 35 3A 97 |...... SO.5,15:.|
00000470: 20 53 4F AA 32 34 2C 31 35 3A 97 20 53 4F AA 31 | SO.24,15:. SO.1|
00000480: 2C 31 32 3A 97 20 53 4F 2C 33 32 00 B1 0C EA 01 |,12:. SO,32.....|
00000490: 97 20 53 4F AA 34 2C 33 33 3A 81 20 54 B2 31 20 |. SO.4,33:. T.1 |
000004A0: A4 20 32 30 30 3A 82 3A 97 20 53 4F AA 34 2C 33 |. 200:.:. SO.4,3|
000004B0: 32 00 CF 0C F4 01 97 20 53 4F 2C 30 3A 97 20 53 |2...... SO,0:. S|
000004C0: 4F AA 31 2C 30 3A 97 20 53 4F AA 32 34 2C 30 00 |O.1,0:. SO.24,0.|
000004D0: 02 0D FE 01 99 3A 99 22 11 20 12 20 44 45 20 42 |.....:.". . DE B|
000004E0: 55 46 46 45 52 20 49 53 20 56 4F 4C 20 21 20 20 |UFFER IS VOL ! |
000004F0: 20 20 44 52 55 4B 20 46 31 2D 54 4F 45 54 53 20 | DRUK F1-TOETS |
00000500: 92 22 00 1C 0D 08 02 A1 20 49 4E 24 3A 8B 20 49 |."...... IN$:. I|
00000510: 4E 24 B3 B1 22 85 22 A7 20 35 32 30 00 22 0D 12 |N$..".". 520."..|
00000520: 02 8E 00 28 0D 1C 02 3A 00 4B 0D 26 02 8F 20 2A |...(...:.K.&.. *|
00000530: 2A 2A 2A 2A 2A 20 4E 4F 54 45 45 52 20 42 45 52 |***** NOTEER BER|
00000540: 49 43 48 54 20 2A 2A 2A 2A 2A 2A 00 7B 0D 30 02 |ICHT ******.{.0.|
00000550: 99 53 43 48 45 52 4D 24 3B 22 47 45 45 46 20 42 |.SCHERM$;"GEEF B|
00000560: 45 52 49 43 48 54 20 28 4D 41 58 2E 22 3B 4D 41 |ERICHT (MAX.";MA|
00000570: 58 3B 22 54 45 4B 45 4E 53 29 22 00 9B 0D 3A 02 |X;"TEKENS)"...:.|
00000580: 99 A3 32 30 29 22 53 54 4F 50 20 4D 45 54 20 27 |..20)"STOP MET '|
00000590: 46 31 27 2D 54 4F 45 54 53 2E 22 00 B2 0D 44 02 |F1'-TOETS."...D.|
000005A0: 81 20 42 B2 31 20 A4 20 4D 41 58 3A 99 22 AF 9D |. B.1 . MAX:."..|
000005B0: 22 3B 00 CA 0D 4E 02 A1 20 49 4E 24 3A 8B 20 49 |";...N.. IN$:. I|
000005C0: 4E 24 B2 22 22 A7 20 35 39 30 00 E6 0D 58 02 43 |N$."". 590...X.C|
000005D0: 4F B2 C6 28 49 4E 24 29 3A 8F 20 43 4F 3D 43 4F |O..(IN$):. CO=CO|
000005E0: 4E 54 52 4F 4C 45 00 07 0E 62 02 8B 20 43 4F B2 |NTROLE...b.. CO.|
000005F0: 31 33 33 20 A7 20 42 45 52 49 43 48 54 24 28 42 |133 . BERICHT$(B|
00000600: 29 B2 22 2A 22 3A 8E 00 24 0E 6C 02 8B 20 43 4F |)."*":..$.l.. CO|
00000610: B2 32 30 20 A7 20 99 20 49 4E 24 3B 3A 42 B2 42 |.20 . . IN$;:B.B|
00000620: AB 32 3A 82 00 42 0E 76 02 8B 20 43 4F B3 36 35 |.2:..B.v.. CO.65|
00000630: 20 B0 20 43 4F B1 39 30 20 A7 20 42 B2 42 AB 31 | . CO.90 . B.B.1|
00000640: 3A 82 00 5F 0E 80 02 99 20 49 4E 24 3B 3A 42 45 |:.._.... IN$;:BE|
00000650: 52 49 43 48 54 24 28 42 29 B2 49 4E 24 3A 82 00 |RICHT$(B).IN$:..|
00000660: 79 0E 8A 02 42 45 52 49 43 48 54 24 28 42 29 B2 |y...BERICHT$(B).|
00000670: 22 2A 22 3A 89 20 34 36 30 00 7F 0E 94 02 3A 00 |"*":. 460.....:.|
00000680: A2 0E 9E 02 8F 20 2A 2A 2A 2A 2A 2A 20 4E 4F 54 |..... ****** NOT|
00000690: 45 45 52 20 53 4C 45 55 54 45 4C 20 2A 2A 2A 2A |EER SLEUTEL ****|
000006A0: 2A 2A 00 D0 0E A8 02 99 20 53 43 48 45 52 4D 24 |**...... SCHERM$|
000006B0: 3B 22 47 45 45 46 20 53 4C 45 55 54 45 4C 20 28 |;"GEEF SLEUTEL (|
000006C0: 4D 41 58 2E 20 32 30 20 54 45 4B 45 4E 53 29 22 |MAX. 20 TEKENS)"|
000006D0: 00 F2 0E B2 02 99 20 A3 32 30 29 3B 22 53 54 4F |...... .20);"STO|
000006E0: 50 20 4D 45 54 20 27 46 31 27 2D 54 4F 45 54 53 |P MET 'F1'-TOETS|
000006F0: 2E 22 00 08 0F BC 02 81 20 53 B2 31 20 A4 20 32 |."...... S.1 . 2|
00000700: 30 3A 99 22 AF 9D 22 3B 00 20 0F C6 02 A1 20 49 |0:."..";. .... I|
00000710: 4E 24 3A 8B 20 49 4E 24 B2 22 22 A7 20 37 31 30 |N$:. IN$."". 710|
00000720: 00 3C 0F D0 02 43 4F B2 C6 28 49 4E 24 29 3A 8F |.<...CO..(IN$):.|
00000730: 20 43 4F 3D 43 4F 4E 54 52 4F 4C 45 00 5D 0F DA | CO=CONTROLE.]..|
00000740: 02 8B 20 43 4F B2 31 33 33 20 A7 20 53 4C 45 55 |.. CO.133 . SLEU|
00000750: 54 45 4C 24 28 53 29 B2 49 4E 24 3A 8E 00 7A 0F |TEL$(S).IN$:..z.|
00000760: E4 02 8B 20 43 4F B2 32 30 20 A7 20 99 20 49 4E |... CO.20 . . IN|
00000770: 24 3B 3A 53 B2 53 AB 32 3A 82 00 98 0F EE 02 8B |$;:S.S.2:.......|
00000780: 20 43 4F B3 36 35 20 B0 20 43 4F B1 39 30 20 A7 | CO.65 . CO.90 .|
00000790: 20 53 B2 53 AB 31 3A 82 00 B5 0F F8 02 99 20 49 | S.S.1:....... I|
000007A0: 4E 24 3B 3A 53 4C 45 55 54 45 4C 24 28 53 29 B2 |N$;:SLEUTEL$(S).|
000007B0: 49 4E 24 3A 82 00 D5 0F 02 03 89 34 36 30 3A 20 |IN$:.......460: |
000007C0: 20 53 4C 45 55 54 45 4C 24 28 53 29 B2 22 22 3A | SLEUTEL$(S)."":|
000007D0: 89 20 34 36 30 00 DB 0F 0C 03 3A 00 FE 0F 16 03 |. 460.....:.....|
000007E0: 8F 20 2A 2A 2A 2A 2A 2A 20 43 4F 44 45 45 52 20 |. ****** CODEER |
000007F0: 42 45 52 49 43 48 54 20 2A 2A 2A 2A 2A 2A 00 31 |BERICHT ******.1|
00000800: 10 20 03 99 20 53 43 48 45 52 4D 24 3B 22 48 45 |. .. SCHERM$;"HE|
00000810: 54 20 47 45 43 4F 44 45 45 52 44 45 20 42 45 52 |T GECODEERDE BER|
00000820: 49 43 48 54 20 4C 55 49 44 54 3A 11 22 3A 45 B2 |ICHT LUIDT:.":E.|
00000830: 30 00 43 10 2A 03 81 20 43 B2 31 20 A4 20 4D 41 |0.C.*.. C.1 . MA|
00000840: 58 AA 31 00 63 10 34 03 8B 20 42 45 52 49 43 48 |X.1.c.4.. BERICH|
00000850: 54 24 28 43 29 B2 22 2A 22 A7 20 99 3A 99 20 45 |T$(C)."*". .:. E|
00000860: 24 3A 8E 00 79 10 3E 03 45 B2 45 AA 31 3A 8B 20 |$:..y.>.E.E.1:. |
00000870: 45 B2 53 20 A7 20 45 B2 31 00 B3 10 48 03 43 4F |E.S . E.1...H.CO|
00000880: 44 45 24 28 43 29 B2 4D 41 54 52 49 58 24 28 C6 |DE$(C).MATRIX$(.|
00000890: 28 53 4C 45 55 54 45 4C 24 28 45 29 29 AB 36 34 |(SLEUTEL$(E)).64|
000008A0: 2C C6 28 42 45 52 49 43 48 54 24 28 43 29 29 AB |,.(BERICHT$(C)).|
000008B0: 36 34 29 00 DB 10 52 03 99 20 43 4F 44 45 24 28 |64)...R.. CODE$(|
000008C0: 43 29 3B 3A 8B 20 4D 45 4E 55 B2 31 20 A7 20 98 |C);:. MENU.1 . .|
000008D0: 31 2C 43 4F 44 45 24 28 43 29 3B 00 E4 10 5C 03 |1,CODE$(C);...\.|
000008E0: 3A 82 3A 8E 00 EA 10 66 03 3A 00 0F 11 70 03 8F |:.:....f.:...p..|
000008F0: 20 2A 2A 2A 2A 2A 2A 20 44 45 43 4F 44 45 45 52 | ****** DECODEER|
00000900: 20 42 45 52 49 43 48 54 20 2A 2A 2A 2A 2A 2A 00 | BERICHT ******.|
00000910: 44 11 7A 03 99 20 53 43 48 45 52 4D 24 3B 22 48 |D.z.. SCHERM$;"H|
00000920: 45 54 20 47 45 44 45 43 4F 44 45 45 52 44 45 20 |ET GEDECODEERDE |
00000930: 42 45 52 49 43 48 54 20 4C 55 49 44 54 3A 11 22 |BERICHT LUIDT:."|
00000940: 3A 45 B2 30 00 56 11 84 03 81 20 44 B2 31 20 A4 |:E.0.V.... D.1 .|
00000950: 20 4D 41 58 AA 31 00 75 11 8E 03 8B 20 42 45 52 | MAX.1.u.... BER|
00000960: 49 43 48 54 24 28 44 29 B2 22 2A 22 A7 99 3A 99 |ICHT$(D)."*"..:.|
00000970: 20 45 24 3A 8E 00 8B 11 98 03 45 B2 45 AA 31 3A | E$:......E.E.1:|
00000980: 8B 20 45 B2 53 20 A7 20 45 B2 31 00 9A 11 A2 03 |. E.S . E.1.....|
00000990: 81 20 4B B2 31 20 A4 20 32 35 00 CD 11 AC 03 8B |. K.1 . 25......|
000009A0: 20 42 45 52 49 43 48 54 24 28 44 29 B3 B1 4D 41 | BERICHT$(D)..MA|
000009B0: 54 52 49 58 24 28 C6 28 53 4C 45 55 54 45 4C 24 |TRIX$(.(SLEUTEL$|
000009C0: 28 45 29 29 AB 36 34 2C 4B 29 A7 20 82 00 E9 11 |(E)).64,K). ....|
000009D0: B6 03 44 45 43 4F 44 45 24 28 44 29 B2 4D 41 54 |..DECODE$(D).MAT|
000009E0: 52 49 58 24 28 31 2C 4B 29 00 15 12 C0 03 99 20 |RIX$(1,K)...... |
000009F0: 44 45 43 4F 44 45 24 28 44 29 3B 3A 8B 20 4D 45 |DECODE$(D);:. ME|
00000A00: 4E 55 B2 32 20 A7 20 98 31 2C 44 45 43 4F 44 45 |NU.2 . .1,DECODE|
00000A10: 24 28 44 29 3B 00 1D 12 CA 03 82 20 44 00 23 12 |$(D);...... D.#.|
00000A20: D4 03 3A 00 4B 12 DE 03 AC AC AC AC AC AC AC AC |..:.K...........|
00000A30: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000A40: AC AC AC AC AC AC AC AC AC AC AC 00 6B 12 E8 03 |............k...|
00000A50: 8F 20 2A 2A 2A 2A 2A 2A 20 54 4F 45 4C 49 43 48 |. ****** TOELICH|
00000A60: 54 49 4E 47 20 2A 2A 2A 2A 2A 2A 00 9E 12 F2 03 |TING ******.....|
00000A70: 99 20 53 43 48 45 52 4D 24 3B 22 44 49 54 20 50 |. SCHERM$;"DIT P|
00000A80: 52 4F 47 52 41 4D 4D 41 20 43 4F 44 45 45 52 54 |ROGRAMMA CODEERT|
00000A90: 20 45 4E 20 44 45 43 4F 44 45 45 52 54 22 00 CD | EN DECODEERT"..|
00000AA0: 12 FC 03 99 22 20 20 20 20 20 20 20 20 42 45 52 |...." BER|
00000AB0: 49 43 48 54 45 4E 20 4F 50 20 44 45 20 56 4F 4C |ICHTEN OP DE VOL|
00000AC0: 47 45 4E 44 45 20 57 49 4A 5A 45 3A 22 00 F5 12 |GENDE WIJZE:"...|
00000AD0: 06 04 99 22 4D 41 41 4B 20 45 45 4E 20 4C 45 54 |..."MAAK EEN LET|
00000AE0: 54 45 52 2D 4D 41 54 52 49 58 3A 11 20 20 20 53 |TER-MATRIX:. S|
00000AF0: 54 45 4C 3A 22 00 15 13 10 04 99 22 20 41 42 43 |TEL:"......" ABC|
00000B00: 44 45 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 2E |DEFGHIJKLMNOPQR.|
00000B10: 2E 2E 5A 41 22 00 44 13 1A 04 99 22 20 42 43 44 |..ZA".D...." BCD|
00000B20: 45 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 2E |EFGHIJKLMNOPQRS.|
00000B30: 2E 5A 41 42 20 20 42 45 52 49 43 48 54 3A 27 42 |.ZAB BERICHT:'B|
00000B40: 41 44 27 22 00 64 13 24 04 99 22 20 43 44 45 46 |AD'".d.$.." CDEF|
00000B50: 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 2E 5A |GHIJKLMNOPQRST.Z|
00000B60: 41 42 43 22 00 93 13 2E 04 99 22 20 44 45 46 47 |ABC"......" DEFG|
00000B70: 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 2E 5A 41 |HIJKLMNOPQRST.ZA|
00000B80: 42 43 44 20 20 53 4C 45 55 54 45 4C 3A 27 52 41 |BCD SLEUTEL:'RA|
00000B90: 4D 27 22 00 B3 13 38 04 99 22 20 2E 2E 2E 2E 2E |M'"...8.." .....|
00000BA0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000BB0: 2E 2E 22 00 D3 13 42 04 99 22 20 2E 2E 2E 2E 2E |.."...B.." .....|
00000BC0: 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E |................|
00000BD0: 2E 2E 22 00 F3 13 4C 04 99 22 20 59 5A 41 42 43 |.."...L.." YZABC|
00000BE0: 44 45 46 47 48 49 4A 4B 4C 2E 2E 2E 54 55 56 57 |DEFGHIJKL...TUVW|
00000BF0: 58 59 22 00 14 14 56 04 99 22 20 5A 41 42 43 44 |XY"...V.." ZABCD|
00000C00: 45 46 47 48 49 4A 4B 4C 4D 2E 2E 2E 55 56 57 58 |EFGHIJKLM...UVWX|
00000C10: 59 5A 11 22 00 53 14 60 04 99 22 5A 4F 45 4B 20 |YZ.".S.`.."ZOEK |
00000C20: 49 4E 20 44 45 20 42 4F 56 45 4E 53 54 45 20 52 |IN DE BOVENSTE R|
00000C30: 49 4A 20 44 45 20 45 45 52 53 54 45 20 4C 45 54 |IJ DE EERSTE LET|
00000C40: 54 45 52 56 41 4E 20 44 45 20 53 4C 45 55 54 45 |TERVAN DE SLEUTE|
00000C50: 4C 22 3B 00 8E 14 6A 04 99 22 20 45 4E 20 49 4E |L";...j.." EN IN|
00000C60: 20 44 45 20 45 45 52 53 54 45 20 56 45 52 54 49 | DE EERSTE VERTI|
00000C70: 43 41 4C 45 52 49 4A 20 44 45 20 45 45 52 53 54 |CALERIJ DE EERST|
00000C80: 20 20 4C 45 54 54 45 52 20 56 41 4E 22 3B 00 CE | LETTER VAN";..|
00000C90: 14 74 04 99 22 20 48 45 54 20 42 45 52 49 43 48 |.t.." HET BERICH|
00000CA0: 54 2E 22 3A 99 22 57 41 41 52 20 44 45 20 48 4F |T.":."WAAR DE HO|
00000CB0: 52 2E 20 45 4E 20 44 45 20 56 45 52 54 2E 20 52 |R. EN DE VERT. R|
00000CC0: 49 4A 20 42 49 4A 20 45 4C 4B 41 41 52 22 00 FA |IJ BIJ ELKAAR"..|
00000CD0: 14 7E 04 99 22 4B 4F 4D 45 4E 2C 53 54 41 41 54 |.~.."KOMEN,STAAT|
00000CE0: 20 44 45 20 45 45 52 53 54 45 20 43 4F 44 45 4C | DE EERSTE CODEL|
00000CF0: 45 54 54 45 52 20 27 53 27 22 00 2B 15 88 04 99 |ETTER 'S'".+....|
00000D00: 22 55 49 54 20 44 45 20 54 57 45 45 44 45 20 4C |"UIT DE TWEEDE L|
00000D10: 45 54 54 45 52 43 4F 4D 42 49 4E 41 54 49 45 20 |ETTERCOMBINATIE |
00000D20: 56 4F 4C 47 54 20 27 41 27 22 3B 00 45 15 92 04 |VOLGT 'A'";.E...|
00000D30: 99 22 44 45 20 44 45 52 44 45 20 47 45 45 46 54 |."DE DERDE GEEFT|
00000D40: 20 27 50 27 22 00 6C 15 9C 04 99 22 48 45 54 20 | 'P'".l...."HET |
00000D50: 43 4F 44 45 42 45 52 49 43 48 54 20 4C 55 49 44 |CODEBERICHT LUID|
00000D60: 54 20 44 55 53 3A 20 53 41 50 2E 22 00 9B 15 A6 |T DUS: SAP."....|
00000D70: 04 99 22 44 45 43 4F 44 45 52 45 4E 20 47 41 41 |.."DECODEREN GAA|
00000D80: 54 20 49 4E 20 4F 4D 47 45 4B 45 45 52 44 45 20 |T IN OMGEKEERDE |
00000D90: 56 4F 4C 47 4F 52 44 45 2E 91 22 00 A1 15 B0 04 |VOLGORDE..".....|
00000DA0: 8E 00 00 00 3A 09 D8 |....:.. |
....D.. C O D E C.8.N.. * DOOR TON DARO,
DELFT JAN.1984 *.M.X.. MATRIX$(26,26)...
..MAX.800:. BERICHT$(MAX.1),CODE$(MAX.1)
,DECODE$(MAX.1),SLEUTEL$(21).O...SCHERM$
.".. C O D E C
..".....E$." . EI
NDE BERICHT ."... .. 1000.....:.1.... **
**** ZET MATRIX OP ******.P...A$."*ABCDE
FGHIJKLMNOPQRSTUVWXYZABCDEFGHIJKLMNOPQRS
TUVWXYZ"..H.. Y.1 . 26...R.A$.I(A$,C(A$
).1)...... X.1 . 26.....MATRIX$(Y,X).J(A
$,(X),1).P.... X,Y:. 400.V...:...... ***
*** M E N U ******...... SCHERM$;"....ME
NU:...........".B....". 1. CODEREN M
ET PRINTER-UITVOER.O."..". 2. DECODE
REN MET PRINTER-UITVOER...,..". 3. C
ODEREN ZONDER PRINTER-UITVOER.M.6..".
4. DECODEREN ZONDER PRINTER-UITVOER...
@..". .UW KEUZE. .?.."...J.. MENU$:MEN
U..(E(MENU$)):. MENU.1 . MENU .4 .330.J.
T.. 550:.670:. MENU . 350,360,370,380:.2
60.B.^..1,4:. 790:. 400: ..Z.H..1,4:. 88
0:. 400: ....R.. 790:. 400: .. .|.. 880:
. 400: ......:.I.... ****** WACHT OP TOE
TS ******...... ROMMEL$:. ROMMEL$.."".40
0......". TOETS VOOR MENU";...... IN$:.
IN$."". 430.%... 1:..+.B.:.P.L.. ******
PIEP! BUFFER VOL ******.`.V.SOUND.54272
...... SO.5,15:. SO.24,15:. SO.1,12:. SO
,32...... SO.4,33:. T.1 . 200:.:. SO.4,3
2.O.... SO,0:. SO.1,0:. SO.24,0......:."
. . DE BUFFER IS VOL ! DRUK F1-TOETS
."...... IN$:. IN$..".". 520.".....(...:
.K.&.. ****** NOTEER BERICHT ******.{.0.
.SCHERM$;"GEEF BERICHT (MAX.";MAX;"TEKEN
S)"...:...20)"STOP MET 'F1'-TOETS."...D.
. B.1 . MAX:."..";.J.N.. IN$:. IN$."". 5
90...X.CO.F(IN$):. CO=CONTROLE...B.. CO.
133 . BERICHT$(B)."*":..$.L.. CO.20 . .
IN$;:B.B.2:..B.V.. CO.65 . CO.90 . B.B.1
:.._.... IN$;:BERICHT$(B).IN$:..Y...BERI
CHT$(B)."*":. 460....:...... ****** NOT
EER SLEUTEL ******.P.... SCHERM$;"GEEF S
LEUTEL (MAX. 20 TEKENS)"...... .20);"STO
P MET 'F1'-TOETS."...... S.1 . 20:."..";
. .F.. IN$:. IN$."". 710.<.P.CO.F(IN$):.
CO=CONTROLE.].Z.. CO.133 . SLEUTEL$(S).
IN$:..Z.... CO.20 . . IN$;:S.S.2:.......
CO.65 . CO.90 . S.S.1:....... IN$;:SLEU
TEL$(S).IN$:..U....460: SLEUTEL$(S)."":
. 460.....:...... ****** CODEER BERICHT
******.1. .. SCHERM$;"HET GECODEERDE BER
ICHT LUIDT:.":E.0.C.*.. C.1 . MAX.1.C.4.
. BERICHT$(C)."*". .:. E$:..Y.>.E.E.1:.
E.S . E.1...H.CODE$(C).MATRIX$(F(SLEUTEL
$(E)).64,F(BERICHT$(C)).64)...R.. CODE$(
C);:. MENU.1 . .1,CODE$(C);...\.:.:....F
.:...P.. ****** DECODEER BERICHT ******.
D.Z.. SCHERM$;"HET GEDECODEERDE BERICHT
LUIDT:.":E.0.V.... D.1 . MAX.1.U.... BER
ICHT$(D)."*"..:. E$:......E.E.1:. E.S .
E.1...... K.1 . 25.M.... BERICHT$(D)..MA
TRIX$(F(SLEUTEL$(E)).64,K). ......DECODE
$(D).MATRIX$(1,K)...... DECODE$(D);:. ME
NU.2 . .1,DECODE$(D);...J.. D.#.T.:.K...
....................................K...
. ****** TOELICHTING ******...... SCHERM
$;"DIT PROGRAMMA CODEERT EN DECODEERT".M
...." BERICHTEN OP DE VOLGENDE WI
JZE:"......"MAAK EEN LETTER-MATRIX:. S
TEL:"......" ABCDEFGHIJKLMNOPQR...ZA".D.
..." BCDEFGHIJKLMNOPQRS..ZAB BERICHT:'B
AD'".D.$.." CDEFGHIJKLMNOPQRST.ZABC"....
.." DEFGHIJKLMNOPQRST.ZABCD SLEUTEL:'RA
M'"...8.." .......................".S.B.
." ......................."...L.." YZABC
DEFGHIJKL...TUVWXY"...V.." ZABCDEFGHIJKL
M...UVWXYZ.".S.`.."ZOEK IN DE BOVENSTE R
IJ DE EERSTE LETTERVAN DE SLEUTEL";...J.
." EN IN DE EERSTE VERTICALERIJ DE EERST
LETTER VAN";.N.T.." HET BERICHT.":."WA
AR DE HOR. EN DE VERT. RIJ BIJ ELKAAR"..
.~.."KOMEN,STAAT DE EERSTE CODELETTER 'S
'".+...."UIT DE TWEEDE LETTERCOMBINATIE
VOLGT 'A'";.E...."DE DERDE GEEFT 'P'".L.
..."HET CODEBERICHT LUIDT DUS: SAP."....
.."DECODEREN GAAT IN OMGEKEERDE VOLGORDE
..".........:.X
> CLICK IMAGE PREVIEW FOR FULL MODAL