|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: 5 A C D I T Z
Length: 819200 (0xc8000)
Description: Bits:30005858 dBase II komplet med Zip formularer
Types: 5¼" Floppy Disk, CpmFSAuto, ImdContainer
Notes: CP/M-fs(1024_2048_0x0_32_*1+1_1:0_79:1)
Media: [0, 0, 1] … [79, 1, 5] {1024: 800}
Signature: 1024_2048_0x0_32_*1+1_1:0_79:1
Confidence score: +18/-0
Sector size: 1024
Block size: 2048
Directory entries: 32
Block number size: 16
Extent-mask: 0x00
Sector-interleave: 1, 2, 3, 4, 5
Tracks: (1, 0), (1, 1), (2, 0), (2, 1), (3, 0), (3, 1) […] (77, 0), (77, 1), (78, 0), (78, 1), (79, 0), (79, 1)
| user | bc | length | name | artifact |
|---|---|---|---|---|
| 0 | 0 | 1024 | ADRESSE.DBF | ⟦22c0fbed4⟧ |
| 0 | 0 | 19712 | DBASE.COM | ⟦4206b9f3b⟧ |
| 0 | 0 | 52736 | DBASEMSG.TXT | ⟦22b3a61f6⟧ TextFile |
| 0 | 0 | 40192 | DBASEOVR.COM | ⟦4308502a3⟧ |
| 0 | 0 | 13568 | DBINS.COM | ⟦50dacba2d⟧ |
| 0 | 0 | 6656 | DGEN.OVL | ⟦2beba358b⟧ |
| 0 | 0 | 13312 | ZIP.COM | ⟦f95f948a4⟧ |
| 0 | 0 | 29952 | ZIPIN.COM | ⟦690cb83c3⟧ |
| 0 | 0 | 20352 | ZSCRN.OVL | ⟦a9b3ae608⟧ |
0x00000…00400 (0, 0, 1) 0xe5[0x400]
[…0x9…]
0x02800…02820 (1, 0, 1) [0, 'DBASE.COM', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [2, 0, 3, 0, 4, 0, 5, 0, 6, 0, 7, 0, 8, 0, 9, 0]]
0x02820…02840 [0, 'DBASE.COM', 1, 26, 'xl=01', 'bc=00', 'xh=00', 'rc=1a', '0-0-0-0-0-0-0-0-1-0-0', [10, 0, 11, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02840…02860 [0, 'DBASEMSG.TXT', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [12, 0, 13, 0, 14, 0, 15, 0, 16, 0, 17, 0, 18, 0, 19, 0]]
0x02860…02880 [0, 'DBASEMSG.TXT', 1, 128, 'xl=01', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [20, 0, 21, 0, 22, 0, 23, 0, 24, 0, 25, 0, 26, 0, 27, 0]]
0x02880…028a0 [0, 'DBASEMSG.TXT', 2, 128, 'xl=02', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [28, 0, 29, 0, 30, 0, 31, 0, 32, 0, 33, 0, 34, 0, 35, 0]]
0x028a0…028c0 [0, 'DBASEMSG.TXT', 3, 28, 'xl=03', 'bc=00', 'xh=00', 'rc=1c', '0-0-0-0-0-0-0-0-1-0-0', [36, 0, 37, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x028c0…028e0 [0, 'DBASEOVR.COM', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [38, 0, 39, 0, 40, 0, 41, 0, 42, 0, 43, 0, 44, 0, 45, 0]]
0x028e0…02900 [0, 'DBASEOVR.COM', 1, 128, 'xl=01', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [46, 0, 47, 0, 48, 0, 49, 0, 50, 0, 51, 0, 52, 0, 53, 0]]
0x02900…02920 [0, 'DBASEOVR.COM', 2, 58, 'xl=02', 'bc=00', 'xh=00', 'rc=3a', '0-0-0-0-0-0-0-0-1-0-0', [54, 0, 55, 0, 56, 0, 57, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02920…02940 [0, 'ZIP.COM', 0, 104, 'xl=00', 'bc=00', 'xh=00', 'rc=68', '0-0-0-0-0-0-0-0-1-0-0', [58, 0, 59, 0, 60, 0, 61, 0, 62, 0, 63, 0, 64, 0, 0, 0]]
0x02940…02960 [0, 'ZIPIN.COM', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-1-0-0', [65, 0, 66, 0, 67, 0, 68, 0, 69, 0, 70, 0, 71, 0, 72, 0]]
0x02960…02980 [0, 'ZIPIN.COM', 1, 106, 'xl=01', 'bc=00', 'xh=00', 'rc=6a', '0-0-0-0-0-0-0-0-1-0-0', [73, 0, 74, 0, 75, 0, 76, 0, 77, 0, 78, 0, 79, 0, 0, 0]]
0x02980…029a0 [0, 'DGEN.OVL', 0, 52, 'xl=00', 'bc=00', 'xh=00', 'rc=34', '0-0-0-0-0-0-0-0-1-0-0', [80, 0, 81, 0, 82, 0, 83, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x029a0…029c0 [0, 'DBINS.COM', 0, 106, 'xl=00', 'bc=00', 'xh=00', 'rc=6a', '0-0-0-0-0-0-0-0-0-0-0', [84, 0, 85, 0, 86, 0, 87, 0, 88, 0, 89, 0, 90, 0, 0, 0]]
0x029c0…029e0 [0, 'ADRESSE.DBF', 0, 8, 'xl=00', 'bc=00', 'xh=00', 'rc=08', '0-0-0-0-0-0-0-0-0-0-0', [91, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x029e0…02a00 [0, 'ZSCRN.OVL', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [92, 0, 93, 0, 94, 0, 95, 0, 96, 0, 97, 0, 98, 0, 99, 0]]
0x02a00…02a20 [0, 'ZSCRN.OVL', 1, 31, 'xl=01', 'bc=00', 'xh=00', 'rc=1f', '0-0-0-0-0-0-0-0-0-0-0', [100, 0, 101, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02a20…02a40 Dirent {Status=0xe5}
[…0xe…]
0x02c00…02c20 (1, 0, 2) e5 4f 4c 45 38 32 20 20 20 50 41 53 00 00 00 2a 56 00 57 00 58 00 00 00 00 00 00 00 00 00 00 00 ┆ OLE82 PAS *V W X ┆
0x02c20…02c40 e5 53 43 32 49 4e 53 54 20 43 4f 4d 00 00 00 7c 59 00 5a 00 5b 00 5c 00 5d 00 5e 00 5f 00 60 00 ┆ SC2INST COM øY Z Æ Ø Å ^ _ ` ┆
0x02c40…02c60 e5 4b 45 59 42 44 41 20 20 41 53 4d 00 00 00 68 61 00 62 00 63 00 64 00 65 00 66 00 67 00 00 00 ┆ KEYBDA ASM ha b c d e f g ┆
0x02c60…02c80 e5 47 53 56 2d 46 4f 4e 54 43 48 52 00 00 00 10 68 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-FONTCHR h ┆
0x02c80…02ca0 e5 47 53 56 2d 46 4f 4e 54 42 41 4b 00 00 00 10 69 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-FONTBAK i ┆
0x02ca0…02cc0 e5 47 53 56 2d 43 50 49 20 50 41 53 00 00 00 80 6a 00 6b 00 6c 00 6d 00 6e 00 6f 00 70 00 71 00 ┆ GSV-CPI PAS j k l m n o p q ┆
0x02cc0…02ce0 e5 47 53 56 2d 43 50 49 20 50 41 53 01 00 00 80 72 00 73 00 74 00 75 00 76 00 77 00 78 00 79 00 ┆ GSV-CPI PAS r s t u v w x y ┆
0x02ce0…02d00 e5 47 53 56 2d 43 50 49 20 50 41 53 02 00 00 1f 7a 00 7b 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-CPI PAS z æ ┆
0x02d00…02d20 e5 47 53 56 2d 43 50 49 20 42 41 4b 00 00 00 80 7c 00 7d 00 7e 00 7f 00 80 00 81 00 82 00 83 00 ┆ GSV-CPI BAK ø å ü ┆
0x02d20…02d40 e5 47 53 56 2d 43 50 49 20 42 41 4b 01 00 00 80 84 00 85 00 86 00 87 00 88 00 89 00 8a 00 8b 00 ┆ GSV-CPI BAK ┆
0x02d40…02d60 e5 47 53 56 2d 43 50 49 20 42 41 4b 02 00 00 1f 8c 00 8d 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-CPI BAK ┆
0x02d60…02d80 e5 47 53 56 2d 4a 45 4f 20 50 41 53 00 00 00 80 8e 00 8f 00 90 00 91 00 92 00 93 00 94 00 95 00 ┆ GSV-JEO PAS ┆
0x02d80…02da0 e5 47 53 56 2d 4a 45 4f 20 50 41 53 01 00 00 1b 96 00 97 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-JEO PAS ┆
0x02da0…02dc0 e5 47 53 56 2d 4a 45 4f 20 42 41 4b 00 00 00 80 98 00 99 00 9a 00 9b 00 9c 00 9d 00 9e 00 9f 00 ┆ GSV-JEO BAK ┆
0x02dc0…02de0 e5 47 53 56 2d 4a 45 4f 20 42 41 4b 01 00 00 1b a0 00 a1 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-JEO BAK ┆
0x02de0…02e00 e5 47 53 56 2d 4d 41 52 4b 50 41 53 00 00 00 25 a2 00 a3 00 a4 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-MARKPAS % ┆
0x02e00…02e20 e5 47 53 56 2d 4d 41 52 4b 42 41 4b 00 00 00 26 a5 00 a6 00 a7 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-MARKBAK & ┆
0x02e20…02e40 e5 47 53 56 2d 42 41 53 45 42 41 4b 00 00 00 80 a8 00 a9 00 aa 00 ab 00 ac 00 ad 00 ae 00 af 00 ┆ GSV-BASEBAK ┆
0x02e40…02e60 e5 47 53 56 2d 42 41 53 45 42 41 4b 01 00 00 43 b0 00 b1 00 b2 00 b3 00 b4 00 00 00 00 00 00 00 ┆ GSV-BASEBAK C ┆
0x02e60…02e80 e5 47 53 56 2d 42 41 53 45 50 41 53 00 00 00 80 b5 00 b6 00 b7 00 b8 00 b9 00 ba 00 bb 00 bc 00 ┆ GSV-BASEPAS ┆
0x02e80…02ea0 e5 47 53 56 2d 42 41 53 45 50 41 53 01 00 00 43 bd 00 be 00 bf 00 c0 00 c1 00 00 00 00 00 00 00 ┆ GSV-BASEPAS C ┆
0x02ea0…02ec0 e5 47 53 56 2d 50 4c 30 31 42 41 4b 00 00 00 0a c2 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PL01BAK ┆
0x02ec0…02ee0 e5 47 53 56 2d 50 4c 30 32 50 41 53 00 00 00 09 c3 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PL02PAS ┆
0x02ee0…02f00 e5 47 53 56 2d 50 4c 30 33 42 41 4b 00 00 00 09 c4 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PL03BAK ┆
0x02f00…02f20 e5 47 53 56 2d 50 4c 30 33 50 41 53 00 00 00 04 c5 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PL03PAS ┆
0x02f20…02f40 e5 47 53 56 2d 50 4d 52 4b 50 41 53 00 00 00 12 c6 00 c7 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PMRKPAS ┆
0x02f40…02f60 e5 47 53 56 2d 50 4d 52 4b 42 41 4b 00 00 00 12 c8 00 c9 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PMRKBAK ┆
0x02f60…02f80 e5 47 53 56 2d 54 45 53 54 42 41 4b 00 00 00 07 ca 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-TESTBAK ┆
0x02f80…02fa0 e5 47 53 56 2d 54 45 53 54 50 41 53 00 00 00 07 cb 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-TESTPAS ┆
0x02fa0…02fc0 e5 47 53 56 2d 41 58 45 52 42 41 4b 00 00 00 28 cc 00 cd 00 ce 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-AXERBAK ( ┆
0x02fc0…02fe0 e5 47 53 56 2d 41 58 45 52 50 41 53 00 00 00 28 cf 00 d0 00 d1 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-AXERPAS ( ┆
0x02fe0…03000 e5 47 53 56 2d 53 43 52 4e 42 41 4b 00 00 00 3c d2 00 d3 00 d4 00 d5 00 00 00 00 00 00 00 00 00 ┆ GSV-SCRNBAK < ┆
0x03000…03020 (1, 0, 3) e5 47 53 56 2d 53 43 52 4e 50 41 53 00 00 00 3a d6 00 d7 00 d8 00 d9 00 00 00 00 00 00 00 00 00 ┆ GSV-SCRNPAS : ┆
0x03020…03040 e5 47 53 56 2d 50 4c 30 31 50 41 53 00 00 00 0a da 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ GSV-PL01PAS ┆
0x03040…03060 e5 53 43 52 44 55 4d 50 20 50 41 53 00 00 00 09 db 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ SCRDUMP PAS ┆
0x03060…03080 e5 47 53 56 2d 54 45 58 54 50 41 53 00 00 00 56 dc 00 dd 00 de 00 df 00 e0 00 e1 00 00 00 00 00 ┆ GSV-TEXTPAS V ┆
0x03080…030a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0x1b…]
0x03400…03800 (1, 0, 4) 0xe5[0x400]
0x03800…03c00 (1, 0, 5) DataBlock {»DBASE.COM«}
[…0x13…]
0x08500…08520 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0x17…]
0x08800…08c00 (3, 0, 5) DataBlock {»DBASEMSG.TXT«}
[…0x33…]
0x15600…15620 20 20 20 20 54 68 69 73 20 6d 6f 64 75 6c 65 20 63 6f 6e 74 61 69 6e 73 20 72 65 63 75 72 73 69 ┆ This module contains recursi┆
0x15620…15640 76 65 20 70 72 6f 63 65 64 75 72 65 73 20 20 2a 7d 0d 7b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ve procedures *å æ*************┆
0x15640…15660 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆
0x15660…15680 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 7d 0d 20 0d 76 61 72 0d 20 20 ┆**********************å var ┆
0x15680…156a0 46 6f 72 6d 3a 20 42 6f 6f 6c 65 61 6e 3b 0d 20 0d 7b 24 41 2d 7d 0d 70 72 6f 63 65 64 75 72 65 ┆Form: Boolean; æ$A-å procedure┆
0x156a0…156c0 20 45 76 61 6c 75 61 74 65 28 76 61 72 20 49 73 46 6f 72 6d 75 6c 61 3a 20 42 6f 6f 6c 65 61 6e ┆ Evaluate(var IsFormula: Boolean┆
0x156c0…156e0 3b 20 7b 20 54 72 75 65 20 69 66 20 66 6f 72 6d 75 6c 61 7d 0d 20 20 20 20 20 20 20 20 20 20 20 ┆; æ True if formulaå ┆
0x156e0…15700 20 20 20 20 20 20 20 20 76 61 72 20 46 6f 72 6d 75 6c 61 3a 20 41 6e 79 53 74 72 69 6e 67 3b 20 ┆ var Formula: AnyString; ┆
0x15700…15720 7b 20 46 6f 6d 75 6c 61 20 74 6f 20 65 76 61 6c 75 61 74 65 7d 0d 20 20 20 20 20 20 20 20 20 20 ┆æ Fomula to evaluateå ┆
0x15720…15740 20 20 20 20 20 20 20 20 20 76 61 72 20 56 61 6c 75 65 3a 20 52 65 61 6c 3b 20 20 7b 20 52 65 73 ┆ var Value: Real; æ Res┆
0x15740…15760 75 6c 74 20 6f 66 20 66 6f 72 6d 75 6c 61 20 7d 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ult of formula å ┆
0x15760…15780 20 20 20 20 76 61 72 20 45 72 72 50 6f 73 3a 20 49 6e 74 65 67 65 72 29 3b 7b 20 50 6f 73 69 74 ┆ var ErrPos: Integer);æ Posit┆
0x15780…157a0 69 6f 6e 20 6f 66 20 65 72 72 6f 72 20 7d 0d 63 6f 6e 73 74 0d 20 20 4e 75 6d 62 65 72 73 3a 20 ┆ion of error å const Numbers: ┆
0x157a0…157c0 73 65 74 20 6f 66 20 43 68 61 72 20 3d 20 5b 27 30 27 2e 2e 27 39 27 5d 3b 0d 20 20 45 6f 66 4c ┆set of Char = Æ'0'..'9'Å; EofL┆
0x157c0…157e0 69 6e 65 20 20 3d 20 5e 4d 3b 0d 20 0d 76 61 72 0d 20 20 50 6f 73 3a 20 49 6e 74 65 67 65 72 3b ┆ine = ^M; var Pos: Integer;┆
0x157e0…15800 20 20 20 20 7b 20 43 75 72 72 65 6e 74 20 70 6f 73 69 74 69 6f 6e 20 69 6e 20 66 6f 72 6d 75 6c ┆ æ Current position in formul┆
0x15800…15c00 (8, 1, 2) DataBlock {»DBASEOVR.COM«}
[…0x27…]
0x1f500…1f520 eb ed 4b e9 00 c5 d5 0e 1a cd 05 00 ed 5b e3 00 0e 21 cd 05 00 b7 20 20 2a e3 00 01 21 00 09 34 ┆ K Æ ! * ! 4┆
0x1f520…1f540 20 02 23 34 d1 21 80 00 19 eb c1 0b 78 b1 20 d5 2a e3 00 01 24 00 09 e9 dd 2a e3 00 3e 0b c3 c2 ┆ #4 ! x * $ * > ┆
0x1f540…1f560 1f e5 2a cd 00 e5 19 22 cd 00 ed 5b cf 00 b7 ed 52 d1 e1 30 04 73 23 72 c9 3e 0a c3 c0 1f ed 5b ┆ * " Æ R 0 s#r > Æ┆
0x1f560…1f580 cd 00 18 f1 5e 23 56 ed 53 cd 00 c9 21 00 00 39 ed 5b cf 00 b7 ed 52 19 38 01 eb ed 5b cd 00 b7 ┆ ^#V S ! 9 Æ R 8 Æ ┆
0x1f580…1f5a0 ed 52 c9 3e af 4f 22 e9 00 af 77 32 d9 00 78 32 eb 00 2a e3 00 22 ee 00 21 0c 1f 22 e3 00 e1 22 ┆ R > O" w2 x2 * " ! " "┆
0x1f5a0…1f5c0 e5 00 e1 0c 0d 20 05 cd 7f 1a 18 03 cd c9 1a 2a ee 00 22 e3 00 2a e5 00 e9 3e af 32 ed 00 22 e9 ┆ * " * > 2 " ┆
0x1f5c0…1f5e0 00 2a e3 00 22 ee 00 21 0c 1f 22 e3 00 e1 22 e5 00 e1 22 eb 00 21 5c 00 06 1e cd 31 07 af 12 2a ┆ * " ! " " " !Ø 1 *┆
0x1f5e0…1f600 eb 00 3a ed 00 b7 20 05 cd 74 19 18 03 cd 98 19 21 d9 00 7e 36 00 b7 67 6f 28 08 dd e5 e1 11 5c ┆ : t ! ü6 go( Ø┆
0x1f600…1f620 00 ed 52 eb 2a e9 00 73 23 72 18 a3 03 ff 00 ed 5f 32 d4 00 c9 eb dd e1 c1 e1 78 b1 28 0b 73 0b ┆ R * s#r _2 x ( s ┆
0x1f620…1f640 78 b1 28 05 54 5d 13 ed b0 dd e9 44 4d dd e1 d1 e1 b7 ed 52 19 30 f0 0b 09 eb 09 eb 03 ed b8 dd ┆x ( TÅ DM R 0 ┆
0x1f640…1f660 e9 c1 d1 c5 cd 35 06 d8 21 41 01 be d0 47 eb cd 35 06 d8 21 40 01 be d0 5f 50 c3 cb 05 2a 01 00 ┆ 5 !A G 5 !@ _P * ┆
0x1f660…1f680 19 19 19 e9 21 d9 00 7e 36 00 6f 26 00 c9 cd a5 03 7c b5 c8 3a e2 00 f5 af 32 e2 00 cd c5 03 f1 ┆ ! ü6 o& ø : 2 ┆
0x1f680…1f6a0 32 e2 00 7d fe 03 c0 dd e1 18 04 dd 2a e5 00 cd 21 20 cd dd 04 5e 43 0d 0a 55 53 45 52 20 49 4e ┆2 å * ! ^C USER IN┆
0x1f6a0…1f6c0 54 45 52 52 55 50 54 00 18 3a 3a d9 00 b7 c8 dd e1 f5 cd 21 20 cd dd 04 0d 0a 49 2f 4f 00 18 15 ┆TERRUPT :: ! I/O ┆
0x1f6c0…1f6e0 dd e1 f5 cd 21 20 cd dd 04 0d 0a 45 58 45 43 55 54 49 4f 4e 00 cd dd 04 20 45 52 52 4f 52 20 00 ┆ ! EXECUTION ERROR ┆
0x1f6e0…1f700 f1 cd b7 05 cd dd 04 20 41 54 20 50 43 3d 00 dd e5 e1 ed 5b d5 00 b7 ed 52 11 15 00 19 22 d7 00 ┆ AT PC= Æ R " ┆
0x1f700…1f720 cd b2 05 cd dd 04 0d 0a 50 72 6f 67 72 61 6d 20 74 65 72 6d 69 6e 61 74 65 64 0d 0a 00 2a df 00 ┆ Program terminated * ┆
0x1f720…1f740 e9 01 00 00 11 b8 00 c3 59 04 31 00 01 21 86 f0 11 b8 00 01 00 ff cd 56 04 21 eb 32 11 f3 ea 01 ┆ Y 1 ! V ! 2 ┆
0x1f740…1f760 00 00 cd 41 06 c3 f7 2f 01 0c 00 21 26 ec cd 57 06 21 00 00 e5 21 32 00 d1 cd b5 07 7a b3 ca 8b ┆ A / !& W ! !2 z ┆
0x1f760…1f780 20 d5 22 28 ec 21 00 00 e5 21 ee 02 d1 cd b5 07 7a b3 ca 82 20 d5 22 26 ec 2a 26 ec 23 d1 1b c3 ┆ "( ! ! z "& *& # ┆
0x1f780…1f7a0 70 20 2a 28 ec 23 d1 1b c3 5c 20 21 01 00 e5 21 15 00 c1 ed 69 21 01 00 e5 21 68 00 c1 ed 69 01 ┆p *( # Ø ! ! i! !h i ┆
0x1f7a0…1f7c0 0c 00 11 26 ec c3 71 06 01 08 00 21 1e ec cd 57 06 21 01 00 e5 21 15 00 c1 ed 69 21 01 00 e5 21 ┆ & q ! W ! ! i! !┆
0x1f7c0…1f7e0 6a 00 c1 ed 69 01 08 00 11 1e ec c3 71 06 01 09 00 21 15 ec cd 57 06 21 00 00 11 00 00 01 00 01 ┆j i q ! W ! ┆
0x1f7e0…1f800 cd a5 07 7d 32 1d ec 21 00 00 e5 21 00 00 cd 41 1f 21 61 01 cd 89 06 cd d8 17 21 00 00 cd fa 1a ┆ å2 ! ! A !a ! ┆
0x1f800…1fc00 (12, 1, 2) DataBlock {»ZIP.COM«}
[…0xc…]
0x22c00…22c20 (13, 1, 5) 72 74 28 66 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 73 71 72 3a ┆rt(f); fsqr:┆
0x22c20…22c40 20 20 20 20 20 66 3a 3d 73 71 72 28 66 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ f:=sqr(f); ┆
0x22c40…22c60 20 20 20 20 66 73 69 6e 3a 20 20 20 20 20 66 3a 3d 73 69 6e 28 66 29 3b 0d 20 20 20 20 20 20 20 ┆ fsin: f:=sin(f); ┆
0x22c60…22c80 20 20 20 20 20 20 20 20 20 20 20 20 20 66 63 6f 73 3a 20 20 20 20 20 66 3a 3d 63 6f 73 28 66 29 ┆ fcos: f:=cos(f)┆
0x22c80…22ca0 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 61 72 63 74 61 6e 3a 20 20 ┆; farctan: ┆
0x22ca0…22cc0 66 3a 3d 61 72 63 74 61 6e 28 66 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆f:=arctan(f); ┆
0x22cc0…22ce0 20 20 66 6c 6e 20 3a 20 20 20 20 20 66 3a 3d 6c 6e 28 66 29 3b 0d 20 20 20 20 20 20 20 20 20 20 ┆ fln : f:=ln(f); ┆
0x22ce0…22d00 20 20 20 20 20 20 20 20 20 20 66 6c 6f 67 3a 20 20 20 20 20 66 3a 3d 6c 6e 28 66 29 2f 6c 6e 28 ┆ flog: f:=ln(f)/ln(┆
0x22d00…22d20 31 30 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 65 78 70 3a 20 20 ┆10); fexp: ┆
0x22d20…22d40 20 20 20 66 3a 3d 65 78 70 28 66 29 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ f:=exp(f); ┆
0x22d40…22d60 20 20 66 66 61 63 74 3a 20 20 20 20 66 3a 3d 66 61 63 74 28 74 72 75 6e 63 28 66 29 29 3b 0d 20 ┆ ffact: f:=fact(trunc(f)); ┆
0x22d60…22d80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0d 20 20 20 20 20 20 20 20 20 20 ┆ end; ┆
0x22d80…22da0 20 20 20 20 20 20 20 20 46 6f 75 6e 64 3a 3d 74 72 75 65 3b 0d 20 20 20 20 20 20 20 20 20 20 20 ┆ Found:=true; ┆
0x22da0…22dc0 20 20 20 20 20 65 6e 64 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0d 20 20 20 ┆ end; end; ┆
0x22dc0…22de0 20 20 20 20 20 20 20 20 20 20 20 69 66 20 6e 6f 74 20 46 6f 75 6e 64 20 74 68 65 6e 20 45 72 72 ┆ if not Found then Err┆
0x22de0…22e00 50 6f 73 3a 3d 50 6f 73 3b 0d 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 3b 0d 20 20 20 20 20 ┆Pos:=Pos; end; ┆
0x22e00…22e20 20 20 20 20 20 20 20 46 61 63 74 6f 72 3a 3d 46 3b 0d 20 20 20 20 20 20 20 20 20 20 65 6e 64 20 ┆ Factor:=F; end ┆
0x22e20…22e40 7b 20 66 75 6e 63 74 69 6f 6e 20 46 61 63 74 6f 72 7d 3b 0d 7b 2e 50 41 7d 0d 20 0d 20 20 20 20 ┆æ function Factorå; æ.PAå ┆
0x22e40…22e60 20 20 20 20 62 65 67 69 6e 20 7b 20 53 69 67 6e 65 64 46 61 63 74 6f 72 20 7d 0d 20 20 20 20 20 ┆ begin æ SignedFactor å ┆
0x22e60…22e80 20 20 20 20 20 69 66 20 43 68 3d 27 2d 27 20 74 68 65 6e 0d 20 20 20 20 20 20 20 20 20 20 62 65 ┆ if Ch='-' then be┆
0x22e80…22ea0 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 20 20 4e 65 78 74 43 68 3b 20 53 69 67 6e 65 64 46 61 ┆gin NextCh; SignedFa┆
0x22ea0…22ec0 63 74 6f 72 3a 3d 2d 46 61 63 74 6f 72 3b 0d 20 20 20 20 20 20 20 20 20 20 65 6e 64 20 65 6c 73 ┆ctor:=-Factor; end els┆
0x22ec0…22ee0 65 20 53 69 67 6e 65 64 46 61 63 74 6f 72 3a 3d 46 61 63 74 6f 72 3b 0d 20 20 20 20 20 20 20 20 ┆e SignedFactor:=Factor; ┆
0x22ee0…22f00 65 6e 64 20 7b 20 53 69 67 6e 65 64 46 61 63 74 6f 72 20 7d 3b 0d 20 0d 20 20 20 20 20 20 62 65 ┆end æ SignedFactor å; be┆
0x22f00…22f20 67 69 6e 20 7b 20 54 65 72 6d 20 7d 0d 20 20 20 20 20 20 20 20 54 3a 3d 53 69 67 6e 65 64 46 61 ┆gin æ Term å T:=SignedFa┆
0x22f20…22f40 63 74 6f 72 3b 0d 20 20 20 20 20 20 20 20 77 68 69 6c 65 20 43 68 3d 27 5e 27 20 64 6f 0d 20 20 ┆ctor; while Ch='^' do ┆
0x22f40…22f60 20 20 20 20 20 20 62 65 67 69 6e 0d 20 20 20 20 20 20 20 20 20 20 4e 65 78 74 43 68 3b 20 74 3a ┆ begin NextCh; t:┆
0x22f60…22f80 3d 65 78 70 28 6c 6e 28 74 29 2a 53 69 67 6e 65 64 46 61 63 74 6f 72 29 3b 0d 20 20 20 20 20 20 ┆=exp(ln(t)*SignedFactor); ┆
0x22f80…22fa0 20 20 65 6e 64 3b 0d 20 20 20 20 20 20 20 20 54 65 72 6d 3a 3d 74 3b 0d 20 20 20 20 20 20 65 6e ┆ end; Term:=t; en┆
0x22fa0…22fc0 64 20 7b 20 54 65 72 6d 20 7d 3b 0d 20 0d 20 0d 20 20 20 20 62 65 67 69 6e 20 7b 20 53 69 6d 70 ┆d æ Term å; begin æ Simp┆
0x22fc0…22fe0 6c 65 45 78 70 72 65 73 73 69 6f 6e 20 7d 0d 20 20 20 20 20 20 73 3a 3d 74 65 72 6d 3b 0d 20 20 ┆leExpression å s:=term; ┆
0x22fe0…23000 20 20 20 20 77 68 69 6c 65 20 43 68 20 69 6e 20 5b 27 2a 27 2c 27 2f 27 5d 20 64 6f 0d 20 20 20 ┆ while Ch in Æ'*','/'Å do ┆
0x23000…23400 (14, 0, 1) DataBlock {»ZIPIN.COM«}
[…0x1d…]
0x2a500…2a520 20 20 20 20 20 20 20 20 20 77 72 69 74 65 28 70 68 33 29 3b 20 62 6f 66 73 3a 3d 72 65 61 64 73 ┆ write(ph3); bofs:=reads┆
0x2a520…2a540 65 71 28 38 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a ┆eq(8); END; ┆
0x2a540…2a560 20 20 20 20 20 20 20 20 20 20 20 20 20 27 49 27 3a 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 ┆ 'I': BEGIN ┆
0x2a560…2a580 20 20 20 20 20 20 20 20 20 20 20 20 20 77 72 69 74 65 28 70 69 33 29 3b 20 61 6f 66 73 3a 3d 72 ┆ write(pi3); aofs:=r┆
0x2a580…2a5a0 65 61 64 73 65 71 28 38 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e ┆eadseq(8); EN┆
0x2a5a0…2a5c0 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 27 59 27 3a 20 68 65 6c 70 33 3b 0d 0a 20 20 ┆D; 'Y': help3; ┆
0x2a5c0…2a5e0 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 ┆ END; END; ┆
0x2a5e0…2a600 20 49 46 20 63 68 20 49 4e 20 5b 27 41 27 2e 2e 6d 63 5d 20 54 48 45 4e 20 77 72 69 74 65 6c 6e ┆ IF ch IN Æ'A'..mcÅ THEN writeln┆
0x2a600…2a620 3b 0d 0a 20 20 20 20 45 4e 44 3b 0d 0a 20 20 55 4e 54 49 4c 20 63 68 3d 27 58 27 3b 0d 0a 45 4e ┆; END; UNTIL ch='X'; EN┆
0x2a620…2a640 44 3b 0d 0a 0d 0a 50 52 4f 43 45 44 55 52 45 20 6b 65 79 62 6f 61 72 64 3b 0d 0a 54 59 50 45 0d ┆D; PROCEDURE keyboard; TYPE ┆
0x2a640…2a660 0a 20 20 6b 65 79 72 65 63 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ keyrec = RECORD ┆
0x2a660…2a680 20 76 61 6c 3a 20 62 79 74 65 3b 20 73 74 72 3a 20 73 74 72 31 32 3b 0d 0a 20 20 20 20 20 20 20 ┆ val: byte; str: str12; ┆
0x2a680…2a6a0 20 20 20 20 45 4e 44 3b 0d 0a 43 4f 4e 53 54 0d 0a 20 20 73 74 64 6b 65 79 3a 20 41 52 52 41 59 ┆ END; CONST stdkey: ARRAY┆
0x2a6a0…2a6c0 5b 31 2e 2e 34 32 5d 20 4f 46 20 73 74 72 32 20 3d 20 28 0d 0a 20 20 20 20 5e 4a 2c 5e 53 2c 5e ┆Æ1..42Å OF str2 = ( ^J,^S,^┆
0x2a6c0…2a6e0 44 2c 5e 41 2c 5e 46 2c 5e 51 5e 53 2c 5e 51 5e 44 2c 5e 45 2c 5e 58 2c 5e 51 5e 45 2c 5e 51 5e ┆D,^A,^F,^Q^S,^Q^D,^E,^X,^Q^E,^Q^┆
0x2a6e0…2a700 58 2c 5e 52 2c 5e 43 2c 5e 51 5e 52 2c 5e 51 5e 43 2c 0d 0a 20 20 20 20 5e 48 2c 5e 47 2c 5e 51 ┆X,^R,^C,^Q^R,^Q^C, ^H,^G,^Q┆
0x2a700…2a720 5e 48 2c 5e 51 5e 59 2c 5e 54 2c 5e 59 2c 5e 4d 2c 5e 49 2c 5e 4e 2c 5e 56 2c 5e 5a 2c 5e 42 2c ┆^H,^Q^Y,^T,^Y,^M,^I,^N,^V,^Z,^B,┆
0x2a720…2a740 5e 57 2c 5e 51 5e 46 2c 5e 51 5e 41 2c 0d 0a 20 20 20 20 5e 4c 2c 5e 4b 5e 42 2c 5e 4b 5e 4b 2c ┆^W,^Q^F,^Q^A, ^L,^K^B,^K^K,┆
0x2a740…2a760 5e 4b 5e 59 2c 5e 4b 5e 43 2c 5e 4b 5e 56 2c 5e 4b 5e 50 2c 5e 4b 5e 52 2c 5e 4b 5e 57 2c 5e 4b ┆^K^Y,^K^C,^K^V,^K^P,^K^R,^K^W,^K┆
0x2a760…2a780 5e 48 2c 5e 4b 5e 44 2c 5e 4b 5e 58 29 3b 0d 0a 56 41 52 0d 0a 20 20 63 2c 69 2c 6e 2c 6d 3a 20 ┆^H,^K^D,^K^X); VAR c,i,n,m: ┆
0x2a780…2a7a0 69 6e 74 65 67 65 72 3b 0d 0a 20 20 63 68 2c 6d 63 3a 20 63 68 61 72 3b 0d 0a 20 20 73 3a 20 73 ┆integer; ch,mc: char; s: s┆
0x2a7a0…2a7c0 74 72 31 32 3b 0d 0a 20 20 61 6b 65 79 3a 20 41 52 52 41 59 5b 31 2e 2e 35 30 5d 20 4f 46 20 6b ┆tr12; akey: ARRAYÆ1..50Å OF k┆
0x2a7c0…2a7e0 65 79 72 65 63 3b 0d 0a 0d 0a 46 55 4e 43 54 49 4f 4e 20 6b 65 79 73 74 72 28 63 68 3a 20 63 68 ┆eyrec; FUNCTION keystr(ch: ch┆
0x2a7e0…2a800 61 72 29 3a 20 73 74 72 33 3b 0d 0a 42 45 47 49 4e 0d 0a 20 20 43 41 53 45 20 63 68 20 4f 46 0d ┆ar): str3; BEGIN CASE ch OF ┆
0x2a800…2ac00 (17, 0, 1) DataBlock {»DGEN.OVL«}
[…0x6…]
0x2c200…2c220 0d 0a 0d 0a 0d 0a 70 72 6f 63 65 64 75 72 65 20 73 74 61 74 20 28 76 61 72 20 76 61 6c 3a 62 65 ┆ procedure stat (var val:be┆
0x2c220…2c240 72 65 67 6e 3b 20 6e 76 3a 69 6e 74 65 67 65 72 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆regn; nv:integer; ┆
0x2c240…2c260 20 20 20 76 61 72 20 73 75 6d 2c 67 65 6e 2c 73 70 72 2c 74 65 6d 70 3a 72 65 61 6c 29 3b 0d 0a ┆ var sum,gen,spr,temp:real); ┆
0x2c260…2c280 76 61 72 0d 0a 20 20 20 76 2c 73 75 6d 32 2c 61 66 76 69 67 65 6c 73 65 3a 20 72 65 61 6c 3b 0d ┆var v,sum2,afvigelse: real; ┆
0x2c280…2c2a0 0a 20 20 20 6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 20 69 6e 74 65 67 65 72 3b 0d 0a ┆ n : integer; ┆
0x2c2a0…2c2c0 62 65 67 69 6e 0d 0a 20 20 20 73 75 6d 20 20 3a 3d 20 30 3b 0d 0a 20 20 20 73 75 6d 32 20 3a 3d ┆begin sum := 0; sum2 :=┆
0x2c2c0…2c2e0 20 30 3b 0d 0a 20 20 20 74 65 6d 70 20 3a 3d 20 30 3b 0d 0a 20 20 20 66 6f 72 20 6e 20 3a 3d 20 ┆ 0; temp := 0; for n := ┆
0x2c2e0…2c300 31 20 74 6f 20 6e 76 20 64 6f 0d 0a 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 76 20 20 20 ┆1 to nv do begin v ┆
0x2c300…2c320 20 3a 3d 20 76 61 6c 28 2e 6e 2e 29 3b 0d 0a 20 20 20 20 20 20 73 75 6d 20 20 3a 3d 20 73 75 6d ┆ := val(.n.); sum := sum┆
0x2c320…2c340 20 2b 20 76 3b 0d 0a 20 20 20 20 20 20 73 75 6d 32 20 3a 3d 20 73 75 6d 32 20 2b 20 53 51 52 28 ┆ + v; sum2 := sum2 + SQR(┆
0x2c340…2c360 76 29 3b 0d 0a 20 20 20 65 6e 64 3b 0d 0a 20 20 20 67 65 6e 20 3a 3d 28 20 73 75 6d 20 2f 20 6e ┆v); end; gen :=( sum / n┆
0x2c360…2c380 76 29 3b 0d 0a 20 20 20 61 66 76 69 67 65 6c 73 65 20 20 3a 3d 20 73 75 6d 32 20 2d 20 53 51 52 ┆v); afvigelse := sum2 - SQR┆
0x2c380…2c3a0 28 73 75 6d 29 2f 6e 76 3b 0d 0a 20 20 20 73 70 72 20 20 3a 3d 20 73 71 72 74 28 61 66 76 69 67 ┆(sum)/nv; spr := sqrt(afvig┆
0x2c3a0…2c3c0 65 6c 73 65 20 2f 20 28 6e 76 2d 31 29 29 3b 0d 0a 20 20 20 74 65 6d 70 20 3a 3d 28 67 65 6e 2d ┆else / (nv-1)); temp :=(gen-┆
0x2c3c0…2c3e0 35 30 29 2a 74 3b 0d 0a 65 6e 64 3b 0d 0a 0d 0a 0d 0a 70 72 6f 63 65 64 75 72 65 20 67 65 74 6c ┆50)*t; end; procedure getl┆
0x2c3e0…2c400 69 6e 3b 0d 0a 62 65 67 69 6e 0d 0a 20 20 20 6d 6f 72 65 20 3a 3d 20 6e 6f 74 20 65 6f 66 28 66 ┆in; begin more := not eof(f┆
0x2c400…2c420 (17, 1, 3) 29 3b 0d 0a 20 20 20 69 66 20 6d 6f 72 65 20 74 68 65 6e 0d 0a 20 20 20 62 65 67 69 6e 0d 0a 20 ┆); if more then begin ┆
0x2c420…2c440 20 20 20 20 72 65 61 64 6c 6e 28 66 2c 62 75 66 29 3b 0d 0a 20 20 20 20 20 69 66 20 6c 65 6e 28 ┆ readln(f,buf); if len(┆
0x2c440…2c460 62 75 66 29 20 3d 20 30 20 74 68 65 6e 20 67 65 74 6c 69 6e 0d 0a 20 20 20 65 6e 64 0d 0a 65 6e ┆buf) = 0 then getlin end en┆
0x2c460…2c480 64 3b 20 20 20 20 20 0d 0a 0d 0a 0d 0a 66 75 6e 63 74 69 6f 6e 20 66 6f 72 6d 61 74 5f 6f 6b 20 ┆d; function format_ok ┆
0x2c480…2c4a0 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 76 61 72 0d 0a 20 20 20 6c 62 2c 70 62 3a 20 62 79 74 65 20 ┆: boolean; var lb,pb: byte ┆
0x2c4a0…2c4c0 20 20 3b 0d 0a 20 20 20 66 65 6a 6c 20 3a 20 62 6f 6f 6c 65 61 6e 3b 0d 0a 20 20 20 63 20 20 20 ┆ ; fejl : boolean; c ┆
0x2c4c0…2c4e0 20 3a 20 63 68 61 72 20 20 20 3b 0d 0a 20 20 20 73 20 20 20 20 3a 20 73 74 72 69 6e 67 28 2e 38 ┆ : char ; s : string(.8┆
0x2c4e0…2c500 30 2e 29 3b 0d 0a 62 65 67 69 6e 0d 0a 20 20 20 28 2a 20 41 30 31 38 2b 30 2e 31 32 33 34 35 45 ┆0.); begin (* A018+0.12345E┆
0x2c500…2c520 2b 30 32 20 2a 29 0d 0a 20 20 20 28 2a 20 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 36 20 2a ┆+02 *) (* 1234567890123456 *┆
0x2c520…2c540 29 0d 0a 0d 0a 20 20 20 66 65 6a 6c 20 3a 3d 20 66 61 6c 73 65 3b 20 20 20 70 62 20 3a 3d 20 31 ┆) fejl := false; pb := 1┆
0x2c540…2c560 3b 20 20 20 6c 62 20 3a 3d 20 6c 65 6e 28 62 75 66 29 3b 0d 0a 20 20 20 72 65 70 65 61 74 0d 0a ┆; lb := len(buf); repeat ┆
0x2c560…2c580 20 20 20 20 20 20 70 62 20 3a 3d 20 73 75 63 63 28 70 62 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 77 ┆ pb := succ(pb); w┆
0x2c580…2c5a0 68 69 6c 65 20 70 62 20 69 6e 20 28 2e 35 2c 37 2c 31 33 2c 31 34 2e 29 20 64 6f 20 70 62 20 3a ┆hile pb in (.5,7,13,14.) do pb :┆
0x2c5a0…2c5c0 3d 20 73 75 63 63 28 70 62 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 69 66 20 70 62 20 3c 3d 20 6c 62 ┆= succ(pb); if pb <= lb┆
0x2c5c0…2c5e0 20 74 68 65 6e 20 66 65 6a 6c 20 3a 3d 20 66 65 6a 6c 20 6f 72 20 6e 6f 74 20 28 62 75 66 28 2e ┆ then fejl := fejl or not (buf(.┆
0x2c5e0…2c600 70 62 2e 29 20 69 6e 20 28 2e 27 30 27 2e 2e 27 39 27 2e 29 29 0d 0a 20 20 20 75 6e 74 69 6c 20 ┆pb.) in (.'0'..'9'.)) until ┆
0x2c600…2c620 66 65 6a 6c 20 6f 72 20 28 70 62 3d 6c 62 29 3b 0d 0a 0d 0a 20 20 20 69 66 20 66 65 6a 6c 20 6f ┆fejl or (pb=lb); if fejl o┆
0x2c620…2c640 72 20 28 6c 62 20 3c 3e 20 31 36 29 20 74 68 65 6e 0d 0a 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 ┆r (lb <> 16) then begin ┆
0x2c640…2c660 20 20 20 66 65 6a 6c 20 3a 3d 20 74 72 75 65 3b 0d 0a 20 0d 0a 20 20 20 20 20 20 77 72 69 74 65 ┆ fejl := true; write┆
0x2c660…2c680 6c 6e 28 27 46 65 6a 6c 3a 20 27 2c 62 75 66 29 3b 0d 0a 20 20 20 20 20 20 77 72 69 74 65 6c 6e ┆ln('Fejl: ',buf); writeln┆
0x2c680…2c6a0 28 27 20 27 3a 35 2b 70 62 2c 27 5e 27 29 3b 0d 0a 28 2a 20 20 20 20 20 20 77 72 69 74 65 6c 6e ┆(' ':5+pb,'^'); (* writeln┆
0x2c6a0…2c6c0 28 27 52 65 74 20 65 6c 6c 65 72 20 73 6b 69 70 20 6c 69 6e 69 65 20 6d 65 64 20 3c 43 52 3e 27 ┆('Ret eller skip linie med <CR>'┆
0x2c6c0…2c6e0 29 3b 0d 0a 20 20 20 20 20 20 77 72 69 74 65 6c 6e 28 27 20 27 2c 62 75 66 29 3b 0d 0a 20 20 20 ┆); writeln(' ',buf); ┆
0x2c6e0…2c700 20 20 20 77 72 69 74 65 20 20 28 27 3e 27 29 3b 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 70 62 20 3a ┆ write ('>');*) pb :┆
0x2c700…2c720 3d 20 30 3b 20 20 20 73 20 3a 3d 20 27 20 27 3b 0d 0a 20 20 20 20 20 20 72 65 70 65 61 74 0d 0a ┆= 0; s := ' '; repeat ┆
0x2c720…2c740 20 20 20 20 20 20 20 20 20 72 65 61 64 28 6b 62 64 2c 63 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 ┆ read(kbd,c); ┆
0x2c740…2c760 69 66 20 63 20 3d 20 40 31 32 37 20 74 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 62 65 67 69 6e ┆if c = @127 then begin┆
0x2c760…2c780 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 69 66 20 70 62 20 3c 20 6c 65 6e 28 62 75 66 29 20 74 ┆ if pb < len(buf) t┆
0x2c780…2c7a0 68 65 6e 20 64 65 6c 65 74 65 28 62 75 66 2c 70 62 2b 31 2c 31 29 0d 0a 20 20 20 20 20 20 20 20 ┆hen delete(buf,pb+1,1) ┆
0x2c7a0…2c7c0 20 65 6e 64 20 65 6c 73 65 0d 0a 20 20 20 20 20 20 20 20 20 69 66 20 63 20 3e 3d 20 27 20 27 20 ┆ end else if c >= ' ' ┆
0x2c7c0…2c7e0 74 68 65 6e 0d 0a 20 20 20 20 20 20 20 20 20 62 65 67 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆then begin ┆
0x2c7e0…2c800 20 20 69 66 20 63 20 3e 3d 20 27 61 27 20 74 68 65 6e 20 63 20 3a 3d 20 63 68 72 28 6f 72 64 28 ┆ if c >= 'a' then c := chr(ord(┆
0x2c800…2cc00 (17, 1, 4) DataBlock {»DBINS.COM«}
[…0xd…]
0x2fd00…2fd20 b7 fa 1a 0e e3 b4 e3 e5 fa 11 0e 2a 04 06 c3 58 0d cd 3d 0d cd 19 0d c3 48 0e af 93 5f 3e 00 9a ┆ * X = H _> ┆
0x2fd20…2fd40 57 3e 00 99 4f 3e 00 98 e6 7f 47 e3 7c b7 fa 43 0e b5 e3 b4 b5 ca 44 0e e5 cd 57 0d 2a 04 06 e5 ┆W> O> G ø C D W * ┆
0x2fd40…2fd60 c3 19 0d e3 e5 cd 3d 0d 2a 04 06 e5 c3 2b 0d e1 c3 f8 04 cd f3 0e b8 d2 5b 0e 47 78 b7 ca 9e 0e ┆ = * + Æ Gx ┆
0x2fd60…2fd80 d1 7b 2f a6 77 23 7a 2f a6 77 23 05 c2 60 0e c3 9e 0e cd f3 0e 90 d2 7c 0e 80 47 af 4f 78 b7 ca ┆ æ/ w#z/ w# ` ø G Ox ┆
0x2fd80…2fda0 8f 0e d1 7b a6 77 23 7a a6 77 23 05 c2 82 0e 79 b7 ca 9e 0e 47 af 77 23 77 23 05 c2 96 0e 2a ec ┆ æ w#z w# y G w#w# * ┆
0x2fda0…2fdc0 05 f9 c3 44 04 cd f3 0e b8 da c1 0e 78 b7 ca 9e 0e d1 7b b6 77 23 7a b6 77 23 05 c2 b1 0e c3 9e ┆ D x æ w#z w# ┆
0x2fdc0…2fde0 0e 4f c5 eb 21 02 00 39 41 78 b7 ca dc 0e 1a b6 77 13 23 1a b6 77 13 23 05 c2 ce 0e 2a ec 05 c1 ┆ O ! 9Ax w # w # * ┆
0x2fde0…2fe00 48 2b 1b 7e 12 2b 1b 7e 12 05 c2 e1 0e eb f9 c5 c3 44 04 69 60 22 d0 03 e1 e3 45 23 29 39 7e 22 ┆H+ ü + ü D i`" E#)9ü"┆
0x2fe00…2fe20 ec 05 23 23 c9 0a 03 d1 bb ca 32 04 69 60 22 d0 03 eb d2 27 0f 87 4f 06 00 29 39 eb 6f 60 39 cd ┆ ## 2 i`" ' O )9 o`9 ┆
0x2fe20…2fe40 03 1a eb f9 c3 44 04 87 29 45 95 4f 2f 3c 6f 26 ff 39 eb 21 00 00 39 eb f9 78 b7 ca 46 0f c5 48 ┆ D )E O/<o& 9 ! 9 x F H┆
0x2fe40…2fe60 eb cd 12 1a eb c1 59 16 00 cd 4d 1a c3 44 04 e1 0b 0b 0a d6 98 87 5f 16 00 21 86 0f 19 5e 23 56 ┆ Y M D _ ! ^#V┆
0x2fe60…2fe80 e1 d5 45 23 29 39 4e 23 23 e5 59 16 00 19 19 22 ec 05 1e 00 78 91 da 7b 0f 1c 41 4f 7b 32 f8 05 ┆ E#)9N## Y " x æ AOæ2 ┆
0x2fe80…2fea0 e1 78 b7 3e 00 c9 94 0f 92 0f f6 0f 16 05 cc 0f 16 05 3e 01 32 f9 05 ca ad 0f 0e 00 d1 7b be c2 ┆ x > > 2 æ ┆
0x2fea0…2fec0 bd 0f 23 7a be c2 bd 0f 23 05 c2 9c 0f 3a f8 05 b7 c2 ba 0f cd 1b 10 c3 bd 0f cd 24 10 3a f9 05 ┆ #z # : $ : ┆
0x2fec0…2fee0 a9 4f 2a ec 05 f9 06 00 c5 c3 44 04 ca e4 0f 0e 00 d1 7b 2f a6 c2 c2 0f 23 7a 2f a6 c2 c2 0f 23 ┆ O* D æ/ #z/ #┆
0x2fee0…2ff00 05 c2 d1 0f 3a f8 05 b7 c2 f1 0f cd 1b 10 c3 c2 0f 0e 01 c3 c2 0f ca 0e 10 0e 00 7e 2f d1 a3 c2 ┆ : ü/ ┆
0x2ff00…2ff20 c2 0f 23 7e 2f a2 c2 c2 0f 23 05 c2 fb 0f 3a f8 05 b7 ca f1 0f cd 24 10 c3 c2 0f d1 f9 af 91 4f ┆ #ü/ # : $ O┆
0x2ff20…2ff40 eb c3 25 10 e1 79 b7 ca 37 10 41 0e 00 d1 7a b3 c2 39 10 05 c2 2d 10 0e 01 e9 d1 d5 d5 69 60 22 ┆ % y 7 A z 9 - i`"┆
0x2ff40…2ff60 d0 03 d1 c1 78 b7 fa c7 10 21 09 f8 19 da c9 10 7b 91 7a 98 da c3 10 79 e6 0f 17 6f 78 17 17 17 ┆ x ! æ z y ox ┆
0x2ff60…2ff80 17 67 79 e6 f0 1f 1f 1f 1f b4 47 4d 7b e6 0f 17 6f 7a 17 17 17 17 67 7b e6 f0 1f 1f 1f 1f b4 32 ┆ gy GMæ oz gæ 2┆
0x2ff80…2ffa0 f8 05 26 00 11 e2 03 19 5e 23 56 90 ca 9b 10 d5 11 ff ff c3 97 10 d5 3d c2 96 10 78 06 00 21 00 ┆ & ^#V = x ! ┆
0x2ffa0…2ffc0 04 09 47 7b a6 5f 23 7a a6 57 d5 78 b7 ca b8 10 11 00 00 d5 05 c2 b3 10 3a f8 05 3c 6f 26 00 e5 ┆ Gæ _#z W x : <o& ┆
0x2ffc0…2ffe0 c3 44 04 af c3 bc 10 50 59 21 00 00 e5 c3 25 05 69 60 22 d0 03 e1 29 5d 39 4e 23 46 23 e5 78 07 ┆ D PY! % i`" )Å9N#F# x ┆
0x2ffe0…30000 3e 00 da 15 11 21 09 f8 09 da 15 11 79 e6 07 6f 78 0f 0f 0f e6 e0 67 79 ad 0f 0f 0f b4 bb 5f 16 ┆> ! y ox gy _ ┆
0x30000…30400 (19, 0, 3) DataBlock {»ADRESSE.DBF«}
0x30400…30420 (19, 0, 4) cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf ┆ ┆
[…0xb…]
0x30580…305a0 cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf cf e1 22 f0 05 ┆ " ┆
0x305a0…305c0 d1 e1 01 06 00 09 7e eb 11 8b 01 fe 11 da b8 16 fe 13 d2 b8 16 11 89 01 1a 77 23 36 00 13 2a f0 ┆ ü w#6 * ┆
0x305c0…305e0 05 1a 77 23 36 00 c3 44 04 cd 80 01 e1 7a d6 20 77 23 36 00 e1 7b d6 20 77 23 36 00 c3 44 04 d1 ┆ w#6 D z w#6 æ w#6 D ┆
0x305e0…30600 e1 7b c6 20 57 7d c6 20 5f 21 44 04 e5 c3 83 01 e1 7c b7 c2 5d 05 7d b7 fa 5d 05 cd 04 17 d2 44 ┆ æ Wå _!D ø Å å Å D┆
0x30600…30620 04 c3 5d 05 21 9e 01 be 3f d8 23 87 cd 18 19 7e 23 66 6f 46 04 05 c8 23 7e a7 fa 23 17 cd 7d 01 ┆ Å ! ? # ü#foF #ü # å ┆
0x30620…30640 c3 15 17 e6 7f cd 58 1a c3 15 17 0a 03 69 60 22 d0 03 5f 16 00 21 40 17 19 19 5e 23 56 7a eb e9 ┆ X i`" _ !@ ^#Vz ┆
0x30640…30660 4c 1f 57 1f 2f 18 f6 17 48 18 01 18 15 18 20 18 eb 17 5a 18 16 05 e4 18 16 05 16 05 d6 1f db 1f ┆L W / H Z ┆
0x30660…30680 b0 1f 00 22 9e 1d df 21 b0 21 d1 21 eb 21 f9 21 5d 1f 6c 1f 9c 16 f0 16 c9 16 df 16 16 05 79 26 ┆ " ! ! ! ! !Å l y&┆
0x30680…306a0 90 26 16 05 16 05 16 05 16 05 16 05 16 05 16 05 c2 26 16 05 f1 2a bc 18 15 19 16 05 16 05 16 05 ┆ & & * ┆
0x306a0…306c0 16 05 d5 17 30 14 62 05 9f 05 cd bb 06 eb 22 e4 05 7c b5 c2 c3 17 60 69 22 d3 17 0a 3c 81 4f d2 ┆ 0 b " ø `i" < O ┆
0x306c0…306e0 c3 17 04 c5 cd bc 1b c1 5f 3a e8 05 bb ca 7b 05 c3 32 04 00 00 e1 5e 23 56 d5 e5 cd ad 09 e1 da ┆ _: æ 2 ^#V ┆
0x306e0…30700 a4 05 d1 36 00 2b 36 01 c3 32 04 c1 d1 e1 7a b7 f4 4f 1a c3 44 04 d1 2a d4 03 eb 73 23 72 c3 32 ┆ 6 +6 2 z O D * s#r 2┆
0x30700…30720 04 2a d4 03 eb 21 00 00 e5 39 b7 7d 93 6f 7c 9a 67 e5 c3 44 04 c1 d1 e1 78 b7 f4 14 1a c3 44 04 ┆ * ! 9 å oø g D x D ┆
0x30720…30740 c1 d1 e1 78 b7 fa 44 04 b1 c4 03 1a c3 44 04 c1 d1 2a d4 03 eb 73 23 72 eb 09 09 22 d4 03 21 00 ┆ x D D * s#r " ! ┆
0x30740…30760 00 39 cd 9a 12 c3 44 04 e1 5e 23 56 d5 cd ad 09 da a4 05 e1 22 d4 03 c3 32 04 e1 d1 f1 c1 e5 d2 ┆ 9 D ^#V " 2 ┆
0x30760…30780 68 18 cd 99 18 c3 6b 18 cd 76 18 d1 7d 93 6f 7c 9a 67 e5 c3 44 04 78 07 da 8c 18 cd 61 0b f0 7b ┆h k v å oø g D x a æ┆
0x30780…307a0 be c8 23 0c c2 80 18 04 c2 80 18 c9 7b be c8 2b 0c c2 8d 18 04 c2 8d 18 c9 78 07 da af 18 cd 61 ┆ # æ + x a┆
0x307a0…307c0 0b f0 7b be c0 23 0c c2 a3 18 04 c2 a3 18 c9 7b be c0 2b 0c c2 b0 18 04 c2 b0 18 c9 e1 3e 08 77 ┆ æ # æ + > w┆
0x307c0…307e0 23 22 f0 05 cd 86 01 d5 eb 2a f0 05 eb 06 03 0e 2f cd 93 19 e1 d1 3e 08 12 13 06 03 0e 3a cd 93 ┆#" * / > : ┆
0x307e0…30800 19 c3 44 04 c1 78 17 da 53 05 d1 e1 7d e1 06 04 fe 01 ca fb 18 22 f4 05 e1 06 08 79 b8 da 20 05 ┆ D x S å " y ┆
0x30800…30c00 (19, 0, 5) DataBlock {»ZSCRN.OVL«}
[…0x13…]
0x35780…357a0 42 09 4c 30 34 43 38 0d 0a 09 4d 4f 56 09 41 4c 2c 30 30 48 0d 0a 09 4a 4d 50 09 53 48 4f 52 54 ┆B L04C8 MOV AL,00H JMP SHORT┆
0x357a0…357c0 20 4c 30 34 44 43 0d 0a 4c 30 34 43 38 3a 0d 0a 09 43 4d 50 09 42 59 54 45 20 50 54 52 20 43 53 ┆ L04DC L04C8: CMP BYTE PTR CS┆
0x357c0…357e0 3a 5b 30 31 30 33 48 5d 2c 30 46 46 48 0d 0a 09 4a 4e 45 09 4c 30 34 44 35 0d 0a 09 4d 4f 56 09 ┆:Æ0103HÅ,0FFH JNE L04D5 MOV ┆
0x357e0…35800 42 58 2c 4f 46 46 53 45 54 20 4c 43 5f 54 41 42 5f 31 0d 0a 09 4a 4d 50 09 53 48 4f 52 54 20 4c ┆BX,OFFSET LC_TAB_1 JMP SHORT L┆
0x35800…35820 (21, 0, 5) 30 34 44 38 0d 0a 4c 30 34 44 35 3a 09 4d 4f 56 09 42 58 2c 4f 46 46 53 45 54 20 55 53 5f 4c 43 ┆04D8 L04D5: MOV BX,OFFSET US_LC┆
0x35820…35840 5f 54 41 42 0d 0a 4c 30 34 44 38 3a 09 44 45 43 09 41 4c 0d 0a 09 44 42 09 32 45 48 09 3b 43 53 ┆_TAB L04D8: DEC AL DB 2EH ;CS┆
0x35840…35860 3a 0d 0a 09 58 4c 41 54 0d 0a 4c 30 34 44 43 3a 09 43 4d 50 09 41 4c 2c 30 46 46 48 0d 0a 09 4a ┆: XLAT L04DC: CMP AL,0FFH J┆
0x35860…35880 45 09 4c 30 35 32 37 0d 0a 09 43 4d 50 09 41 48 2c 30 46 46 48 0d 0a 09 4a 45 09 4c 30 35 32 37 ┆E L0527 CMP AH,0FFH JE L0527┆
0x35880…358a0 0d 0a 4c 30 34 45 35 3a 09 54 45 53 54 09 42 59 54 45 20 50 54 52 20 44 53 3a 5b 4b 42 5f 46 4c ┆ L04E5: TEST BYTE PTR DS:ÆKB_FL┆
0x358a0…358c0 41 47 5d 2c 43 41 50 53 5f 53 54 41 54 45 0d 0a 09 4a 45 09 4c 30 35 35 43 0d 0a 09 54 45 53 54 ┆AGÅ,CAPS_STATE JE L055C TEST┆
0x358c0…358e0 09 42 59 54 45 20 50 54 52 20 44 53 3a 5b 4b 42 5f 46 4c 41 47 5d 2c 4c 45 46 54 5f 53 48 49 46 ┆ BYTE PTR DS:ÆKB_FLAGÅ,LEFT_SHIF┆
0x358e0…35900 54 2b 52 49 47 48 54 5f 53 48 49 46 54 0d 0a 09 4a 45 09 4c 30 35 32 41 0d 0a 09 43 4d 50 09 41 ┆T+RIGHT_SHIFT JE L052A CMP A┆
0x35900…35920 4c 2c 38 45 48 0d 0a 09 4a 4e 45 09 4c 30 34 46 42 0d 0a 09 4d 4f 56 09 41 4c 2c 38 34 48 0d 0a ┆L,8EH JNE L04FB MOV AL,84H ┆
0x35920…35940 09 4a 4d 50 09 53 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 34 46 42 3a 09 43 4d 50 09 41 4c 2c ┆ JMP SHORT L055C L04FB: CMP AL,┆
0x35940…35960 39 32 48 0d 0a 09 4a 4e 45 09 4c 30 35 30 33 0d 0a 09 4d 4f 56 09 41 4c 2c 39 31 48 0d 0a 09 4a ┆92H JNE L0503 MOV AL,91H J┆
0x35960…35980 4d 50 09 53 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 30 33 3a 09 43 4d 50 09 41 4c 2c 39 39 ┆MP SHORT L055C L0503: CMP AL,99┆
0x35980…359a0 48 0d 0a 09 4a 4e 45 09 4c 30 35 30 42 0d 0a 09 4d 4f 56 09 41 4c 2c 39 34 48 0d 0a 09 4a 4d 50 ┆H JNE L050B MOV AL,94H JMP┆
0x359a0…359c0 09 53 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 30 42 3a 09 43 4d 50 09 41 4c 2c 39 44 48 0d ┆ SHORT L055C L050B: CMP AL,9DH ┆
0x359c0…359e0 0a 09 4a 4e 45 09 4c 30 35 31 33 0d 0a 09 4d 4f 56 09 41 4c 2c 39 42 48 0d 0a 09 4a 4d 50 09 53 ┆ JNE L0513 MOV AL,9BH JMP S┆
0x359e0…35a00 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 31 33 3a 09 43 4d 50 09 41 4c 2c 38 46 48 0d 0a 09 ┆HORT L055C L0513: CMP AL,8FH ┆
0x35a00…35a20 4a 4e 45 09 4c 30 35 31 42 0d 0a 09 4d 4f 56 09 41 4c 2c 38 36 48 0d 0a 09 4a 4d 50 09 53 48 4f ┆JNE L051B MOV AL,86H JMP SHO┆
0x35a20…35a40 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 31 42 3a 09 43 4d 50 09 41 4c 2c 34 31 48 0d 0a 09 4a 42 ┆RT L055C L051B: CMP AL,41H JB┆
0x35a40…35a60 09 4c 30 35 35 43 0d 0a 09 43 4d 50 09 41 4c 2c 35 41 48 0d 0a 09 4a 4e 42 45 09 4c 30 35 35 43 ┆ L055C CMP AL,5AH JNBE L055C┆
0x35a60…35a80 0d 0a 09 41 44 44 09 41 4c 2c 32 30 48 0d 0a 09 4a 4d 50 09 53 48 4f 52 54 20 4c 30 35 35 43 0d ┆ ADD AL,20H JMP SHORT L055C ┆
0x35a80…35aa0 0a 4c 30 35 32 37 3a 09 4a 4d 50 09 4c 30 31 43 32 0d 0a 4c 30 35 32 41 3a 09 43 4d 50 09 41 4c ┆ L0527: JMP L01C2 L052A: CMP AL┆
0x35aa0…35ac0 2c 38 34 48 0d 0a 09 4a 4e 45 09 4c 30 35 33 32 0d 0a 09 4d 4f 56 09 41 4c 2c 38 45 48 0d 0a 09 ┆,84H JNE L0532 MOV AL,8EH ┆
0x35ac0…35ae0 4a 4d 50 09 53 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 33 32 3a 09 43 4d 50 09 41 4c 2c 39 ┆JMP SHORT L055C L0532: CMP AL,9┆
0x35ae0…35b00 31 48 0d 0a 09 4a 4e 45 09 4c 30 35 33 41 0d 0a 09 4d 4f 56 09 41 4c 2c 39 32 48 0d 0a 09 4a 4d ┆1H JNE L053A MOV AL,92H JM┆
0x35b00…35b20 50 09 53 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 33 41 3a 09 43 4d 50 09 41 4c 2c 39 34 48 ┆P SHORT L055C L053A: CMP AL,94H┆
0x35b20…35b40 0d 0a 09 4a 4e 45 09 4c 30 35 34 32 0d 0a 09 4d 4f 56 09 41 4c 2c 39 39 48 0d 0a 09 4a 4d 50 09 ┆ JNE L0542 MOV AL,99H JMP ┆
0x35b40…35b60 53 48 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 34 32 3a 09 43 4d 50 09 41 4c 2c 39 42 48 0d 0a ┆SHORT L055C L0542: CMP AL,9BH ┆
0x35b60…35b80 09 4a 4e 45 09 4c 30 35 34 41 0d 0a 09 4d 4f 56 09 41 4c 2c 39 44 48 0d 0a 09 4a 4d 50 09 53 48 ┆ JNE L054A MOV AL,9DH JMP SH┆
0x35b80…35ba0 4f 52 54 20 4c 30 35 35 43 0d 0a 4c 30 35 34 41 3a 09 43 4d 50 09 41 4c 2c 38 36 48 0d 0a 09 4a ┆ORT L055C L054A: CMP AL,86H J┆
0x35ba0…35bc0 4e 45 09 4c 30 35 35 32 0d 0a 09 4d 4f 56 09 41 4c 2c 38 46 48 0d 0a 09 4a 4d 50 09 53 48 4f 52 ┆NE L0552 MOV AL,8FH JMP SHOR┆
0x35bc0…35be0 54 20 4c 30 35 35 43 0d 0a 4c 30 35 35 32 3a 09 43 4d 50 09 41 4c 2c 36 31 48 0d 0a 09 4a 42 09 ┆T L055C L0552: CMP AL,61H JB ┆
0x35be0…35c00 4c 30 35 35 43 0d 0a 09 43 4d 50 09 41 4c 2c 37 41 48 0d 0a 09 4a 4e 42 45 09 4c 30 35 35 43 0d ┆L055C CMP AL,7AH JNBE L055C ┆
0x35c00…35c20 (21, 1, 1) 0a 09 53 55 42 09 41 4c 2c 32 30 48 0d 0a 4c 30 35 35 43 3a 09 4d 4f 56 09 44 49 2c 4f 46 46 53 ┆ SUB AL,20H L055C: MOV DI,OFFS┆
0x35c20…35c40 45 54 20 54 41 42 31 39 38 0d 0a 09 50 55 53 48 09 43 53 0d 0a 09 50 4f 50 09 45 53 0d 0a 09 4d ┆ET TAB198 PUSH CS POP ES M┆
0x35c40…35c60 4f 56 09 43 58 2c 30 30 30 34 48 0d 0a 09 52 45 50 4e 5a 09 53 43 41 53 57 0d 0a 09 4a 4e 45 09 ┆OV CX,0004H REPNZ SCASW JNE ┆
0x35c60…35c80 4c 30 35 37 42 0d 0a 09 53 55 42 09 44 49 2c 4f 46 46 53 45 54 20 54 41 42 31 39 38 0d 0a 09 4d ┆L057B SUB DI,OFFSET TAB198 M┆
0x35c80…35ca0 4f 56 09 57 4f 52 44 20 50 54 52 20 43 53 3a 5b 54 41 42 31 45 38 5d 2c 41 58 0d 0a 09 4d 4f 56 ┆OV WORD PTR CS:ÆTAB1E8Å,AX MOV┆
0x35ca0…35cc0 09 41 58 2c 44 49 0d 0a 09 53 48 52 09 41 58 2c 31 0d 0a 09 4d 4f 56 09 42 59 54 45 20 50 54 52 ┆ AX,DI SHR AX,1 MOV BYTE PTR┆
0x35cc0…35ce0 20 43 53 3a 5b 54 41 42 31 45 38 2b 32 5d 2c 41 4c 0d 0a 09 4a 4d 50 09 4c 30 31 43 32 0d 0a 4c ┆ CS:ÆTAB1E8+2Å,AL JMP L01C2 L┆
0x35ce0…35d00 30 35 37 42 3a 0d 0a 09 43 4d 50 09 42 59 54 45 20 50 54 52 20 43 53 3a 5b 54 41 42 31 45 38 5d ┆057B: CMP BYTE PTR CS:ÆTAB1E8Å┆
0x35d00…35d20 2c 30 30 48 0d 0a 09 4a 45 09 4c 30 35 46 30 0d 0a 09 50 55 53 48 09 41 58 0d 0a 09 4d 4f 56 09 ┆,00H JE L05F0 PUSH AX MOV ┆
0x35d20…35d40 41 4c 2c 42 59 54 45 20 50 54 52 20 43 53 3a 5b 54 41 42 31 45 38 2b 32 5d 0d 0a 09 4d 4f 56 09 ┆AL,BYTE PTR CS:ÆTAB1E8+2Å MOV ┆
0x35d40…35d60 41 48 2c 30 39 48 0d 0a 09 44 45 43 09 41 4c 0d 0a 09 4d 55 4c 09 41 48 0d 0a 09 4d 4f 56 09 44 ┆AH,09H DEC AL MUL AH MOV D┆
0x35d60…35d80 49 2c 4f 46 46 53 45 54 20 54 41 42 31 41 30 0d 0a 09 41 44 44 09 44 49 2c 41 58 0d 0a 09 4d 4f ┆I,OFFSET TAB1A0 ADD DI,AX MO┆
0x35d80…35da0 56 09 43 58 2c 30 30 30 39 48 0d 0a 09 50 4f 50 09 41 58 0d 0a 09 52 45 50 4e 5a 09 53 43 41 53 ┆V CX,0009H POP AX REPNZ SCAS┆
0x35da0…35dc0 42 0d 0a 09 4a 4e 45 09 4c 30 35 42 30 0d 0a 09 53 55 42 09 44 49 2c 4f 46 46 53 45 54 20 54 41 ┆B JNE L05B0 SUB DI,OFFSET TA┆
0x35dc0…35de0 42 31 41 30 2b 31 0d 0a 09 4d 4f 56 09 41 4c 2c 45 53 3a 5b 44 49 2b 4f 46 46 53 45 54 20 54 41 ┆B1A0+1 MOV AL,ES:ÆDI+OFFSET TA┆
0x35de0…35e00 42 31 43 34 5d 0d 0a 09 53 55 42 09 41 48 2c 41 48 0d 0a 09 4d 4f 56 09 57 4f 52 44 20 50 54 52 ┆B1C4Å SUB AH,AH MOV WORD PTR┆
0x35e00…35e20 20 43 53 3a 5b 54 41 42 31 45 38 5d 2c 30 30 30 30 48 0d 0a 09 4a 4d 50 09 53 48 4f 52 54 20 4c ┆ CS:ÆTAB1E8Å,0000H JMP SHORT L┆
0x35e20…35e40 30 35 46 30 0d 0a 09 4e 4f 50 0d 0a 4c 30 35 42 30 3a 09 43 4d 50 09 41 4c 2c 32 30 48 0d 0a 09 ┆05F0 NOP L05B0: CMP AL,20H ┆
0x35e40…35e60 4a 4e 45 09 4c 30 35 43 39 0d 0a 09 4d 4f 56 09 41 58 2c 57 4f 52 44 20 50 54 52 20 43 53 3a 5b ┆JNE L05C9 MOV AX,WORD PTR CS:Æ┆
0x35e60…35e80 54 41 42 31 45 38 5d 0d 0a 09 4d 4f 56 09 57 4f 52 44 20 50 54 52 20 43 53 3a 5b 54 41 42 31 45 ┆TAB1E8Å MOV WORD PTR CS:ÆTAB1E┆
0x35e80…35ea0 38 5d 2c 30 30 30 30 48 0d 0a 09 43 4d 50 09 41 4c 2c 30 46 45 48 0d 0a 09 4a 4e 45 09 4c 30 35 ┆8Å,0000H CMP AL,0FEH JNE L05┆
0x35ea0…35ec0 46 30 0d 0a 09 43 41 4c 4c 09 4c 30 36 32 35 0d 0a 09 4a 4d 50 09 53 48 4f 52 54 20 4c 30 35 46 ┆F0 CALL L0625 JMP SHORT L05F┆
0x35ec0…35ee0 30 0d 0a 09 4e 4f 50 0d 0a 4c 30 35 43 39 3a 09 50 55 53 48 09 41 58 0d 0a 09 43 41 4c 4c 09 4c ┆0 NOP L05C9: PUSH AX CALL L┆
0x35ee0…35f00 30 36 32 35 0d 0a 09 4d 4f 56 09 41 58 2c 57 4f 52 44 20 50 54 52 20 43 53 3a 5b 54 41 42 31 45 ┆0625 MOV AX,WORD PTR CS:ÆTAB1E┆
0x35f00…35f20 38 5d 0d 0a 09 4d 4f 56 09 57 4f 52 44 20 50 54 52 20 43 53 3a 5b 54 41 42 31 45 38 5d 2c 30 30 ┆8Å MOV WORD PTR CS:ÆTAB1E8Å,00┆
0x35f20…35f40 30 30 48 0d 0a 09 4d 4f 56 09 42 58 2c 44 53 3a 5b 42 55 46 46 45 52 5f 54 41 49 4c 5d 0d 0a 09 ┆00H MOV BX,DS:ÆBUFFER_TAILÅ ┆
0x35f40…35f60 4d 4f 56 09 53 49 2c 42 58 0d 0a 09 43 41 4c 4c 09 4c 30 36 31 39 0d 0a 09 43 4d 50 09 42 58 2c ┆MOV SI,BX CALL L0619 CMP BX,┆
0x35f60…35f80 44 53 3a 5b 42 55 46 46 45 52 5f 48 45 41 44 5d 0d 0a 09 50 4f 50 09 44 49 0d 0a 09 4a 45 09 4c ┆DS:ÆBUFFER_HEADÅ POP DI JE L┆
0x35f80…35fa0 30 36 30 38 0d 0a 09 4d 4f 56 09 5b 53 49 5d 2c 41 58 0d 0a 09 4d 4f 56 09 44 53 3a 5b 42 55 46 ┆0608 MOV ÆSIÅ,AX MOV DS:ÆBUF┆
0x35fa0…35fc0 46 45 52 5f 54 41 49 4c 5d 2c 42 58 0d 0a 09 4d 4f 56 09 41 58 2c 44 49 0d 0a 4c 30 35 46 30 3a ┆FER_TAILÅ,BX MOV AX,DI L05F0:┆
0x35fc0…35fe0 09 4d 4f 56 09 42 58 2c 44 53 3a 5b 42 55 46 46 45 52 5f 54 41 49 4c 5d 0d 0a 09 4d 4f 56 09 53 ┆ MOV BX,DS:ÆBUFFER_TAILÅ MOV S┆
0x35fe0…36000 49 2c 42 58 0d 0a 09 43 41 4c 4c 09 4c 30 36 31 39 0d 0a 09 43 4d 50 09 42 58 2c 44 53 3a 5b 42 ┆I,BX CALL L0619 CMP BX,DS:ÆB┆
0x36000…36020 (21, 1, 2) 55 46 46 45 52 5f 48 45 41 44 5d 0d 0a 09 4a 45 09 4c 30 36 30 38 0d 0a 09 4d 4f 56 09 5b 53 49 ┆UFFER_HEADÅ JE L0608 MOV ÆSI┆
0x36020…36040 5d 2c 41 58 0d 0a 09 4d 4f 56 09 44 53 3a 5b 42 55 46 46 45 52 5f 54 41 49 4c 5d 2c 42 58 0d 0a ┆Å,AX MOV DS:ÆBUFFER_TAILÅ,BX ┆
0x36040…36060 09 4a 4d 50 09 4c 30 31 43 32 0d 0a 4c 30 36 30 38 3a 09 43 41 4c 4c 09 4c 30 36 32 35 0d 0a 09 ┆ JMP L01C2 L0608: CALL L0625 ┆
0x36060…36080 4a 4d 50 09 4c 30 31 43 32 0d 0a 4c 30 36 30 45 3a 09 53 55 42 09 41 4c 2c 33 42 48 0d 0a 4c 30 ┆JMP L01C2 L060E: SUB AL,3BH L0┆
0x36080…360a0 36 31 30 3a 09 44 42 09 32 45 48 09 3b 43 53 3a 0d 0a 09 58 4c 41 54 0d 0a 09 4d 4f 56 09 41 48 ┆610: DB 2EH ;CS: XLAT MOV AH┆
0x360a0…360c0 2c 41 4c 0d 0a 09 4d 4f 56 09 41 4c 2c 30 30 48 0d 0a 09 4a 4d 50 09 4c 30 34 44 43 0d 0a 4c 30 ┆,AL MOV AL,00H JMP L04DC L0┆
0x360c0…360e0 36 31 39 3a 09 41 44 44 09 42 58 2c 2b 30 32 48 0d 0a 09 43 4d 50 09 42 58 2c 2b 33 45 48 0d 0a ┆619: ADD BX,+02H CMP BX,+3EH ┆
0x360e0…36100 09 4a 4e 45 09 4c 30 36 32 34 0d 0a 09 4d 4f 56 09 42 58 2c 30 30 31 45 48 0d 0a 4c 30 36 32 34 ┆ JNE L0624 MOV BX,001EH L0624┆
0x36100…36120 3a 09 44 42 09 30 43 33 48 3b 20 52 45 54 20 20 0d 0a 4c 30 36 32 35 3a 09 50 55 53 48 09 41 58 ┆: DB 0C3H; RET L0625: PUSH AX┆
0x36120…36140 0d 0a 09 50 55 53 48 09 42 58 0d 0a 09 50 55 53 48 09 43 58 0d 0a 09 4d 4f 56 09 42 58 2c 30 30 ┆ PUSH BX PUSH CX MOV BX,00┆
0x36140…36160 43 30 48 0d 0a 09 49 4e 09 41 4c 2c 36 31 48 0d 0a 09 50 55 53 48 09 41 58 0d 0a 4c 30 36 32 45 ┆C0H IN AL,61H PUSH AX L062E┆
0x36160…36180 3a 09 41 4e 44 09 41 4c 2c 30 46 43 48 0d 0a 09 4f 55 54 09 36 31 48 2c 41 4c 0d 0a 09 4d 4f 56 ┆: AND AL,0FCH OUT 61H,AL MOV┆
0x36180…361a0 09 43 58 2c 30 30 34 38 48 0d 0a 4c 30 36 33 35 3a 09 4c 4f 4f 50 09 4c 30 36 33 35 0d 0a 09 4f ┆ CX,0048H L0635: LOOP L0635 O┆
0x361a0…361c0 52 09 41 4c 2c 30 32 48 0d 0a 09 4f 55 54 09 36 31 48 2c 41 4c 0d 0a 09 4d 4f 56 09 43 58 2c 30 ┆R AL,02H OUT 61H,AL MOV CX,0┆
0x361c0…361e0 30 34 38 48 0d 0a 4c 30 36 33 45 3a 09 4c 4f 4f 50 09 4c 30 36 33 45 0d 0a 09 44 45 43 09 42 58 ┆048H L063E: LOOP L063E DEC BX┆
0x361e0…36200 0d 0a 09 4a 4e 45 09 4c 30 36 32 45 0d 0a 09 50 4f 50 09 41 58 0d 0a 09 4f 55 54 09 36 31 48 2c ┆ JNE L062E POP AX OUT 61H,┆
0x36200…36220 41 4c 0d 0a 09 50 4f 50 09 43 58 0d 0a 09 50 4f 50 09 42 58 0d 0a 09 50 4f 50 09 41 58 0d 0a 09 ┆AL POP CX POP BX POP AX ┆
0x36220…36240 44 42 09 30 43 33 48 3b 20 52 45 54 20 20 0d 0a 3b 0d 0a 46 49 4e 49 54 09 45 51 55 09 24 0d 0a ┆DB 0C3H; RET ; FINIT EQU $ ┆
0x36240…36260 3b 0d 0a 53 50 41 52 45 09 44 42 09 36 20 44 55 50 28 30 29 0d 0a 3b 0d 0a 3b 09 4c 4f 41 44 45 ┆; SPARE DB 6 DUP(0) ; ; LOADE┆
0x36260…36280 52 20 52 4f 55 54 49 4e 45 2e 0d 0a 3b 0d 0a 4c 30 36 35 30 3a 09 53 55 42 09 41 58 2c 41 58 0d ┆R ROUTINE. ; L0650: SUB AX,AX ┆
0x36280…362a0 0a 09 4d 4f 56 09 44 53 2c 41 58 0d 0a 09 4d 4f 56 09 41 58 2c 30 30 30 31 48 0d 0a 09 4d 4f 56 ┆ MOV DS,AX MOV AX,0001H MOV┆
0x362a0…362c0 09 57 4f 52 44 20 50 54 52 20 43 53 3a 5b 30 31 30 31 48 5d 2c 41 58 0d 0a 09 4d 4f 56 09 42 59 ┆ WORD PTR CS:Æ0101HÅ,AX MOV BY┆
0x362c0…362e0 54 45 20 50 54 52 20 43 53 3a 5b 30 31 30 33 48 5d 2c 30 46 46 48 09 3b 53 45 54 20 44 41 4e 49 ┆TE PTR CS:Æ0103HÅ,0FFH ;SET DANI┆
0x362e0…36300 53 48 0d 0a 09 43 4c 49 0d 0a 09 4d 4f 56 09 41 58 2c 30 31 30 30 48 0d 0a 09 4d 4f 56 09 57 4f ┆SH CLI MOV AX,0100H MOV WO┆
0x36300…36320 52 44 20 50 54 52 20 44 53 3a 5b 30 30 32 34 48 5d 2c 41 58 09 3b 4f 46 46 53 45 54 20 53 45 47 ┆RD PTR DS:Æ0024HÅ,AX ;OFFSET SEG┆
0x36320…36340 4d 45 4e 54 28 56 45 43 54 4f 52 29 0d 0a 09 4d 4f 56 09 41 58 2c 43 53 0d 0a 09 4d 4f 56 09 57 ┆MENT(VECTOR) MOV AX,CS MOV W┆
0x36340…36360 4f 52 44 20 50 54 52 20 44 53 3a 5b 30 30 32 36 48 5d 2c 41 58 09 3b 4e 45 57 20 56 45 43 54 4f ┆ORD PTR DS:Æ0026HÅ,AX ;NEW VECTO┆
0x36360…36380 52 20 41 44 52 45 53 53 0d 0a 09 53 54 49 0d 0a 09 4d 4f 56 09 44 58 2c 46 49 4e 49 54 2d 53 54 ┆R ADRESS STI MOV DX,FINIT-ST┆
0x36380…363a0 41 52 54 09 3b 53 49 5a 45 20 52 45 53 49 44 45 4e 54 20 50 4f 52 54 49 4f 4e 0d 0a 09 49 4e 43 ┆ART ;SIZE RESIDENT PORTION INC┆
0x363a0…363c0 09 44 58 0d 0a 09 49 4e 43 09 44 58 0d 0a 09 49 4e 54 09 32 37 48 0d 0a 3b 0d 0a 58 50 52 4f 43 ┆ DX INC DX INT 27H ; XPROC┆
0x363c0…363e0 09 45 4e 44 50 0d 0a 58 53 45 47 09 45 4e 44 53 0d 0a 09 45 4e 44 0d 0a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ENDP XSEG ENDS END ┆
0x363e0…36400 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆
0x36400…36420 (21, 1, 3) e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0x1b…]
0x36780…c7000 […elided…]
0xc7000…c7400 (79, 1, 2) 0xe5[0x400]
[…0x3…]