|
DataMuseum.dkPresents historical artifacts from the history of: Q1 computer |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Q1 computer Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: 8 A C D E I P Q V q r
Length: 501598 (0x7a75e)
Description: Bits:30008759 50001598
Types: 8" Floppy Disk
| flag | nrec | reclen | rec_trk | t0 | tn | name | artifact |
|---|---|---|---|---|---|---|---|
| 0 | 7 | 255 | 30 | 4 | 4 | ALTER | ⟦08f4fed3d⟧ Q1_HexDump, reclen=255, q1file |
| 0 | 15 | 255 | 30 | 3 | 3 | COPY | ⟦887389586⟧ Q1_HexDump, reclen=255, q1file |
| 0 | 17 | 255 | 30 | 2 | 2 | DINDEX | ⟦db39c49da⟧ Q1_HexDump, reclen=255, q1file |
| 0 | 33 | 255 | 30 | 5 | 6 | DISK | ⟦7b101e185⟧ Q1_HexDump, reclen=255, q1file |
| 0 | 76 | 79 | 82 | 75 | 75 | ETIKETT1 | ⟦2ef3bb315⟧ Q1_Text, reclen=79, q1file |
| 0 | 22 | 40 | 130 | 0 | 0 | INDEX | ⟦57a910f38⟧ Q1_HexDump, reclen=40, q1file |
| 0 | 38 | 255 | 30 | 62 | 64 | PL1LIB | ⟦27762d66d⟧ Q1_HexDump, reclen=255, q1file |
| 0 | 3 | 255 | 30 | 1 | 1 | ⟦e120d8c13⟧ Q1_HexDump, reclen=255, q1file | |
| 0 | 314 | 79 | 82 | 7 | 10 | Q1 | ⟦961b6c54d⟧ Q1_HexDump, reclen=79, q1file |
| 0 | 631 | 79 | 82 | 40 | 47 | V101 | ⟦bd83d7fa4⟧ Q1_Text, reclen=79, q1file |
| 0 | 147 | 79 | 82 | 11 | 12 | V11 | ⟦8e75ecb28⟧ Q1_Text, reclen=79, q1file |
| 0 | 640 | 79 | 82 | 65 | 74 | V111 | ⟦dbfb8d9dd⟧ Q1_Text, reclen=79, q1file |
| 0 | 288 | 79 | 82 | 48 | 51 | V121 | ⟦67ec7006c⟧ Q1_Text, reclen=79, q1file |
| 0 | 159 | 79 | 82 | 52 | 53 | V131 | ⟦10999f2d8⟧ Q1_Text, reclen=79, q1file |
| 0 | 596 | 79 | 82 | 54 | 61 | V21 | ⟦12c34a7aa⟧ Q1_Text, reclen=79, q1file |
| 0 | 276 | 79 | 82 | 13 | 16 | V31 | ⟦242fbfd51⟧ Q1_Text, reclen=79, q1file |
| 0 | 252 | 79 | 82 | 17 | 20 | V41 | ⟦27bb7e8da⟧ Q1_Text, reclen=79, q1file |
| 0 | 359 | 79 | 82 | 21 | 25 | V51 | ⟦76ef6a5f4⟧ Q1_Text, reclen=79, q1file |
| 0 | 312 | 79 | 82 | 26 | 29 | V61 | ⟦9752a9839⟧ Q1_Text, reclen=79, q1file |
| 0 | 357 | 79 | 82 | 30 | 34 | V71 | ⟦0d05bc91c⟧ Q1_Text, reclen=79, q1file |
| 0 | 176 | 79 | 82 | 35 | 37 | V81 | ⟦7e62d5a96⟧ Q1_Text, reclen=79, q1file |
| 0 | 155 | 79 | 82 | 38 | 39 | V91 | ⟦4e9cf9299⟧ Q1_Text, reclen=79, q1file |
0x00000…00028 (0, 0, 0) Catalog {f0=0x0000, name=»INDEX «, nrec=0x0016, reclen=0x0028, rectrack=0x0082, track0=0x0000, trackn=0x0000}
0x00028…00050 (0, 0, 1) Catalog {f0=0x0000, name=»PRINT «, nrec=0x0003, reclen=0x00ff, rectrack=0x001e, track0=0x0001, trackn=0x0001}
0x00050…00078 (0, 0, 2) Catalog {f0=0x0000, name=»DINDEX «, nrec=0x0011, reclen=0x00ff, rectrack=0x001e, track0=0x0002, trackn=0x0002}
0x00078…000a0 (0, 0, 3) Catalog {f0=0x0000, name=»COPY «, nrec=0x000f, reclen=0x00ff, rectrack=0x001e, track0=0x0003, trackn=0x0003}
0x000a0…000c8 (0, 0, 4) Catalog {f0=0x0000, name=»ALTER «, nrec=0x0007, reclen=0x00ff, rectrack=0x001e, track0=0x0004, trackn=0x0004}
0x000c8…000f0 (0, 0, 5) Catalog {f0=0x0000, name=»DISK «, nrec=0x0021, reclen=0x00ff, rectrack=0x001e, track0=0x0005, trackn=0x0006}
0x000f0…00118 (0, 0, 6) Catalog {f0=0x0000, name=»Q1 «, nrec=0x013a, reclen=0x004f, rectrack=0x0052, track0=0x0007, trackn=0x000a}
0x00118…00140 (0, 0, 7) Catalog {f0=0x0000, name=»V11 «, nrec=0x0093, reclen=0x004f, rectrack=0x0052, track0=0x000b, trackn=0x000c}
0x00140…00168 (0, 0, 8) Catalog {f0=0x0000, name=»V31 «, nrec=0x0114, reclen=0x004f, rectrack=0x0052, track0=0x000d, trackn=0x0010}
0x00168…00190 (0, 0, 9) Catalog {f0=0x0000, name=»V41 «, nrec=0x00fc, reclen=0x004f, rectrack=0x0052, track0=0x0011, trackn=0x0014}
0x00190…001b8 (0, 0, 10) Catalog {f0=0x0000, name=»V51 «, nrec=0x0167, reclen=0x004f, rectrack=0x0052, track0=0x0015, trackn=0x0019}
0x001b8…001e0 (0, 0, 11) Catalog {f0=0x0000, name=»V61 «, nrec=0x0138, reclen=0x004f, rectrack=0x0052, track0=0x001a, trackn=0x001d}
0x001e0…00208 (0, 0, 12) Catalog {f0=0x0000, name=»V71 «, nrec=0x0165, reclen=0x004f, rectrack=0x0052, track0=0x001e, trackn=0x0022}
0x00208…00230 (0, 0, 13) Catalog {f0=0x0000, name=»V81 «, nrec=0x00b0, reclen=0x004f, rectrack=0x0052, track0=0x0023, trackn=0x0025}
0x00230…00258 (0, 0, 14) Catalog {f0=0x0000, name=»V91 «, nrec=0x009b, reclen=0x004f, rectrack=0x0052, track0=0x0026, trackn=0x0027}
0x00258…00280 (0, 0, 15) Catalog {f0=0x0000, name=»V101 «, nrec=0x0277, reclen=0x004f, rectrack=0x0052, track0=0x0028, trackn=0x002f}
0x00280…002a8 (0, 0, 16) Catalog {f0=0x0000, name=»V121 «, nrec=0x0120, reclen=0x004f, rectrack=0x0052, track0=0x0030, trackn=0x0033}
0x002a8…002d0 (0, 0, 17) Catalog {f0=0x0000, name=»V131 «, nrec=0x009f, reclen=0x004f, rectrack=0x0052, track0=0x0034, trackn=0x0035}
0x002d0…002f8 (0, 0, 18) Catalog {f0=0x0000, name=»V21 «, nrec=0x0254, reclen=0x004f, rectrack=0x0052, track0=0x0036, trackn=0x003d}
0x002f8…00320 (0, 0, 19) Catalog {f0=0x0000, name=»PL1LIB «, nrec=0x0026, reclen=0x00ff, rectrack=0x001e, track0=0x003e, trackn=0x0040}
0x00320…00348 (0, 0, 20) Catalog {f0=0x0000, name=»V111 «, nrec=0x0280, reclen=0x004f, rectrack=0x0052, track0=0x0041, trackn=0x004a}
0x00348…00370 (0, 0, 21) Catalog {f0=0x0000, name=»ETIKETT1«, nrec=0x004c, reclen=0x004f, rectrack=0x0052, track0=0x004b, trackn=0x004b}
0x00370…00390 (0, 0, 22) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00390…00398 00 00 00 00 00 00 00 00 ┆ ┆
0x00398…003c0 (0, 0, 23) 0x00[0x28]
0x003c0…003e0 (0, 0, 24) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x003e0…003e8 00 00 00 00 00 00 00 00 ┆ ┆
0x003e8…00408 (0, 0, 25) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00408…00410 00 00 00 00 00 00 00 00 ┆ ┆
0x00410…00430 (0, 0, 26) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00430…00438 00 00 00 00 00 00 00 00 ┆ ┆
0x00438…00458 (0, 0, 27) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00458…00460 00 00 00 00 00 00 00 00 ┆ ┆
0x00460…00488 (0, 0, 28) 0x00[0x28]
[…0x1…]
0x004b0…004d0 (0, 0, 30) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x004d0…004d8 00 00 00 00 00 00 00 00 ┆ ┆
0x004d8…004f8 (0, 0, 31) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x004f8…00500 00 00 00 00 00 00 00 00 ┆ ┆
0x00500…00520 (0, 0, 32) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00520…00528 00 00 00 00 00 00 00 00 ┆ ┆
0x00528…00550 (0, 0, 33) 0x00[0x28]
[…0x1…]
0x00578…00598 (0, 0, 35) 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00598…005a0 00 00 00 00 00 00 00 00 ┆ ┆
0x005a0…005c0 (0, 0, 36) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x005c0…005c8 00 00 00 00 00 00 00 00 ┆ ┆
0x005c8…005e8 (0, 0, 37) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x005e8…005f0 00 00 00 00 00 00 00 00 ┆ ┆
0x005f0…00610 (0, 0, 38) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00610…00618 00 00 00 00 00 00 00 00 ┆ ┆
0x00618…00640 (0, 0, 39) 0x00[0x28]
0x00640…00660 (0, 0, 40) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00660…00668 00 00 00 00 00 00 00 00 ┆ ┆
0x00668…00688 (0, 0, 41) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00688…00690 00 00 00 00 00 00 00 00 ┆ ┆
0x00690…006b0 (0, 0, 42) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x006b0…006b8 00 00 00 00 00 00 00 00 ┆ ┆
0x006b8…006d8 (0, 0, 43) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x006d8…006e0 00 00 00 00 00 00 00 00 ┆ ┆
0x006e0…00708 (0, 0, 44) 0x00[0x28]
[…0x1…]
0x00730…00750 (0, 0, 46) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00750…00758 00 00 00 00 00 00 00 00 ┆ ┆
0x00758…00778 (0, 0, 47) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00778…00780 00 00 00 00 00 00 00 00 ┆ ┆
0x00780…007a0 (0, 0, 48) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x007a0…007a8 00 00 00 00 00 00 00 00 ┆ ┆
0x007a8…007d0 (0, 0, 49) 0x00[0x28]
[…0x1…]
0x007f8…00818 (0, 0, 51) 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00818…00820 00 00 00 00 00 00 00 00 ┆ ┆
0x00820…00840 (0, 0, 52) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00840…00848 00 00 00 00 00 00 00 00 ┆ ┆
0x00848…00868 (0, 0, 53) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00868…00870 00 00 00 00 00 00 00 00 ┆ ┆
0x00870…00890 (0, 0, 54) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00890…00898 00 00 00 00 00 00 00 00 ┆ ┆
0x00898…008c0 (0, 0, 55) 0x00[0x28]
0x008c0…008e0 (0, 0, 56) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x008e0…008e8 00 00 00 00 00 00 00 00 ┆ ┆
0x008e8…00908 (0, 0, 57) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00908…00910 00 00 00 00 00 00 00 00 ┆ ┆
0x00910…00930 (0, 0, 58) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00930…00938 00 00 00 00 00 00 00 00 ┆ ┆
0x00938…00958 (0, 0, 59) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00958…00960 00 00 00 00 00 00 00 00 ┆ ┆
0x00960…00988 (0, 0, 60) 0x00[0x28]
[…0x1…]
0x009b0…009d0 (0, 0, 62) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x009d0…009d8 00 00 00 00 00 00 00 00 ┆ ┆
0x009d8…009f8 (0, 0, 63) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x009f8…00a00 00 00 00 00 00 00 00 00 ┆ ┆
0x00a00…00a20 (0, 0, 64) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00a20…00a28 00 00 00 00 00 00 00 00 ┆ ┆
0x00a28…00a50 (0, 0, 65) 0x00[0x28]
[…0x1…]
0x00a78…00a98 (0, 0, 67) 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00a98…00aa0 00 00 00 00 00 00 00 00 ┆ ┆
0x00aa0…00ac0 (0, 0, 68) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00ac0…00ac8 00 00 00 00 00 00 00 00 ┆ ┆
0x00ac8…00ae8 (0, 0, 69) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00ae8…00af0 00 00 00 00 00 00 00 00 ┆ ┆
0x00af0…00b10 (0, 0, 70) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00b10…00b18 00 00 00 00 00 00 00 00 ┆ ┆
0x00b18…00b40 (0, 0, 71) 0x00[0x28]
0x00b40…00b60 (0, 0, 72) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00b60…00b68 00 00 00 00 00 00 00 00 ┆ ┆
0x00b68…00b88 (0, 0, 73) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00b88…00b90 00 00 00 00 00 00 00 00 ┆ ┆
0x00b90…00bb0 (0, 0, 74) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00bb0…00bb8 00 00 00 00 00 00 00 00 ┆ ┆
0x00bb8…00bd8 (0, 0, 75) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00bd8…00be0 00 00 00 00 00 00 00 00 ┆ ┆
0x00be0…00c08 (0, 0, 76) 0x00[0x28]
[…0x1…]
0x00c30…00c50 (0, 0, 78) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00c50…00c58 00 00 00 00 00 00 00 00 ┆ ┆
0x00c58…00c78 (0, 0, 79) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00c78…00c80 00 00 00 00 00 00 00 00 ┆ ┆
0x00c80…00ca0 (0, 0, 80) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00ca0…00ca8 00 00 00 00 00 00 00 00 ┆ ┆
0x00ca8…00cd0 (0, 0, 81) 0x00[0x28]
[…0x1…]
0x00cf8…00d18 (0, 0, 83) 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00d18…00d20 00 00 00 00 00 00 00 00 ┆ ┆
0x00d20…00d40 (0, 0, 84) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00d40…00d48 00 00 00 00 00 00 00 00 ┆ ┆
0x00d48…00d68 (0, 0, 85) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00d68…00d70 00 00 00 00 00 00 00 00 ┆ ┆
0x00d70…00d90 (0, 0, 86) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00d90…00d98 00 00 00 00 00 00 00 00 ┆ ┆
0x00d98…00dc0 (0, 0, 87) 0x00[0x28]
0x00dc0…00de0 (0, 0, 88) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00de0…00de8 00 00 00 00 00 00 00 00 ┆ ┆
0x00de8…00e08 (0, 0, 89) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00e08…00e10 00 00 00 00 00 00 00 00 ┆ ┆
0x00e10…00e30 (0, 0, 90) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00e30…00e38 00 00 00 00 00 00 00 00 ┆ ┆
0x00e38…00e58 (0, 0, 91) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00e58…00e60 00 00 00 00 00 00 00 00 ┆ ┆
0x00e60…00e88 (0, 0, 92) 0x00[0x28]
[…0x1…]
0x00eb0…00ed0 (0, 0, 94) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00ed0…00ed8 00 00 00 00 00 00 00 00 ┆ ┆
0x00ed8…00ef8 (0, 0, 95) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00ef8…00f00 00 00 00 00 00 00 00 00 ┆ ┆
0x00f00…00f20 (0, 0, 96) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00f20…00f28 00 00 00 00 00 00 00 00 ┆ ┆
0x00f28…00f50 (0, 0, 97) 0x00[0x28]
[…0x1…]
0x00f78…00f98 (0, 0, 99) 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00f98…00fa0 00 00 00 00 00 00 00 00 ┆ ┆
0x00fa0…00fc0 (0, 0, 100) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00fc0…00fc8 00 00 00 00 00 00 00 00 ┆ ┆
0x00fc8…00fe8 (0, 0, 101) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x00fe8…00ff0 00 00 00 00 00 00 00 00 ┆ ┆
0x00ff0…01010 (0, 0, 102) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x01010…01018 00 00 00 00 00 00 00 00 ┆ ┆
0x01018…01040 (0, 0, 103) 0x00[0x28]
0x01040…01060 (0, 0, 104) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01060…01068 00 00 00 00 00 00 00 00 ┆ ┆
0x01068…01088 (0, 0, 105) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01088…01090 00 00 00 00 00 00 00 00 ┆ ┆
0x01090…010b0 (0, 0, 106) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x010b0…010b8 00 00 00 00 00 00 00 00 ┆ ┆
0x010b8…010d8 (0, 0, 107) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x010d8…010e0 00 00 00 00 00 00 00 00 ┆ ┆
0x010e0…01108 (0, 0, 108) 0x00[0x28]
[…0x1…]
0x01130…01150 (0, 0, 110) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01150…01158 00 00 00 00 00 00 00 00 ┆ ┆
0x01158…01178 (0, 0, 111) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01178…01180 00 00 00 00 00 00 00 00 ┆ ┆
0x01180…011a0 (0, 0, 112) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x011a0…011a8 00 00 00 00 00 00 00 00 ┆ ┆
0x011a8…011d0 (0, 0, 113) 0x00[0x28]
[…0x1…]
0x011f8…01218 (0, 0, 115) 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01218…01220 00 00 00 00 00 00 00 00 ┆ ┆
0x01220…01240 (0, 0, 116) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01240…01248 00 00 00 00 00 00 00 00 ┆ ┆
0x01248…01268 (0, 0, 117) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01268…01270 00 00 00 00 00 00 00 00 ┆ ┆
0x01270…01290 (0, 0, 118) ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x01290…01298 00 00 00 00 00 00 00 00 ┆ ┆
0x01298…012c0 (0, 0, 119) 0x00[0x28]
0x012c0…012e0 (0, 0, 120) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x012e0…012e8 00 00 00 00 00 00 00 00 ┆ ┆
0x012e8…01308 (0, 0, 121) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01308…01310 00 00 00 00 00 00 00 00 ┆ ┆
0x01310…01330 (0, 0, 122) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x01330…01338 00 00 00 00 00 00 00 00 ┆ ┆
0x01338…01358 (0, 0, 123) ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x01358…01360 00 00 00 00 00 00 00 00 ┆ ┆
0x01360…01388 (0, 0, 124) 0x00[0x28]
[…0x1…]
0x013b0…013d0 (0, 0, 126) 00 00 00 00 00 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x013d0…013d8 00 00 00 00 00 00 00 00 ┆ ┆
0x013d8…013f8 (0, 0, 127) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 ┆ ┆
0x013f8…01400 00 00 00 00 00 00 00 00 ┆ ┆
0x01400…01420 (0, 0, 128) ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
0x01420…01428 00 00 00 00 00 00 00 00 ┆ ┆
0x01428…01450 (0, 0, 129) 0x00[0x28]
0x01450…0154f (1, 0, 0) DataSector[0xff]
[…0x2…]
0x0174d…0184c (1, 0, 3) 0x00[0xff]
[…0x1a…]
0x03232…03331 (2, 0, 0) DataSector[0xff]
[…0x10…]
0x04321…04420 (2, 0, 17) 0x00[0xff]
[…0xc…]
0x05014…05113 (3, 0, 0) DataSector[0xff]
[…0xe…]
0x05f05…06004 (3, 0, 15) 0x00[0xff]
[…0xd…]
0x06cf7…06d17 (3, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x06d17…06d37 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x5…]
0x06dd7…06df6 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x06df6…06ef5 (4, 0, 0) DataSector[0xff]
[…0x6…]
0x074ef…075ee (4, 0, 7) 0x00[0xff]
[…0x16…]
0x08bd8…08cd7 (5, 0, 0) DataSector[0xff]
[…0x20…]
0x0acb7…0acd7 (6, 0, 3) 0b 8e 6e 1a 00 00 43 0d 00 0a 32 18 06 67 e5 32 08 68 e8 32 08 06 4f 25 00 68 3b 00 07 02 0b aa ┆ n C 2 g 2 h 2 O% h; ┆
0x0acd7…0acf7 6e 20 1d 67 9b 32 18 67 e3 32 28 06 67 9b 22 67 e3 32 28 67 9b 32 18 06 4f 25 67 f2 00 68 17 00 ┆n g 2 g 2( g "g 2(g 2 O%g h ┆
0x0acf7…0ad17 12 03 0b a8 6e 02 6e ca 0b ca 6e 34 67 ef 68 f0 00 03 67 ed 4f 29 00 03 67 f1 4f 29 00 03 67 f2 ┆ n n n4g h g O) g O) g ┆
0x0ad17…0ad37 4f 25 00 03 67 f3 68 3b 00 03 67 f5 68 3b 00 03 67 e3 68 17 00 03 43 00 32 01 68 c6 32 01 09 05 ┆O% g h; g h; g h C 2 h 2 ┆
0x0ad37…0ad57 0b 00 6f 0a 1d 32 00 67 e3 4f 2b 7c 8d 1e 0b fe 6e 02 6f 0a 0b 0a 6f 0a 43 00 32 01 68 c6 32 01 ┆ o 2 g O+ö n o o C 2 h 2 ┆
0x0ad57…0ad77 09 02 0b 16 6f 05 1d 69 1c 00 1c 0b 14 6f 02 6f 1b 0b 1b 6f 19 67 e3 68 3b 00 03 67 9b 32 18 67 ┆ o i o o o g h; g 2 g┆
0x0ad77…0ad97 e3 32 28 06 43 00 32 01 68 c5 32 01 09 02 0b 36 6f 05 1d 69 56 00 1c 0b 34 6f 02 6f 3b 0a f2 68 ┆ 2( C 2 h 2 6o iV 4o o; h┆
0x0ad97…0adb6 02 3b 6f 0b 3b 6f 15 67 f5 4f 2b 00 68 0f 00 0a 03 33 00 00 43 0f 00 0a 32 0e 68 f4 00 33 00 ┆ ;o ;o g O+ h 3 C 2 h 3 ┆
0x0adb6…0add6 (6, 0, 4) 0b 50 6f 4b 32 0b 31 4f 25 00 19 31 68 ff 32 02 06 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 ┆ PoK2 1O% 1h 2 3 C 2 h 2 2┆
0x0add6…0adf6 00 33 00 00 43 0f 00 0a 33 00 00 43 09 00 0a 6b 7d 1e 32 00 6c 8f 1e 33 00 00 43 09 00 0a 32 01 ┆ 3 C 3 C kå 2 l 3 C 2 ┆
0x0adf6…0ae16 0c 0a 68 0f 00 0a 68 0f 00 69 01 32 01 09 05 0b 9d 6f 02 1d 1b 0b 9b 6f 02 6f 9f 0b 9f 6f 2d 15 ┆ h h i 2 o o o o- ┆
0x0ae16…0ae36 00 27 32 0d 32 01 2a 69 02 32 15 69 17 00 28 4f 25 00 19 69 19 32 01 29 68 1f 32 01 68 0f 00 28 ┆ '2 2 *i 2 i (O% i 2 )h 2 h (┆
0x0ae36…0ae56 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b ce 6f 05 1d 69 30 00 1c 0b cc 6f 02 6f d3 0b d3 6f 10 68 ┆2 g O ö O o i0 o o o h┆
0x0ae56…0ae76 15 69 1a 00 03 68 15 00 4f 29 00 0c 0a 32 01 0b e7 6f 25 20 68 15 68 15 00 32 01 0a 03 6f d9 1c ┆ i h O) 2 o% h h 2 o ┆
0x0ae76…0ae96 4f 23 68 15 00 32 18 0e 0a 32 18 33 00 00 43 0d 00 0a 32 18 06 6f e8 1c 0b e3 6f 04 70 0c 6f f4 ┆O#h 2 2 3 C 2 o o p o ┆
0x0ae96…0aeb5 0b 0c 70 19 67 f2 68 3b 00 03 67 ed 68 0f 00 03 67 f5 68 3b 00 03 4f 23 68 0f 00 32 18 00 00 ┆ p g h; g h g h; O#h 2 ┆
0x0aeb5…0aed5 (6, 0, 5) 0b 25 70 27 0e 0a 32 18 67 e3 32 28 06 67 f2 4f 25 00 03 67 f3 68 3b 00 03 67 9b 32 18 67 e3 32 ┆ %p' 2 g 2( g O% g h; g 2 g 2┆
0x0aed5…0aef5 28 06 67 9b 32 18 4f 3b 2c 82 1b 0a 1c 69 02 4c 70 0b 4c 70 06 4f 27 4f 25 00 03 0a 1e 69 02 52 ┆( g 2 O;, i Lp Lp O'O% i R┆
0x0aef5…0af15 70 0b 52 70 37 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 69 20 33 00 00 43 09 00 0a 6b 7d ┆p Rp73 C 2 h 2 2 i 3 C kå┆
0x0af15…0af35 1e 6c fe 32 00 6c fe 6c fe 4f 25 00 19 17 04 08 6d 06 1e 01 08 68 0f 00 19 17 08 02 0b 8b 70 05 ┆ l 2 l l O% m h p ┆
0x0af35…0af55 1d 69 1e 00 1c 0b 89 70 02 70 90 0b 90 70 1e 4f 25 33 00 00 43 09 00 0a 32 08 16 03 4f 25 00 68 ┆ i p p p O%3 C 2 O% h┆
0x0af55…0af75 3b 00 07 01 4f 25 00 68 e6 00 07 04 13 0b b0 70 05 1d 69 1e 00 1c 0b ae 70 02 70 b5 0b b5 70 08 ┆; O% h p i p p p ┆
0x0af75…0af95 4f 25 00 68 3b 00 07 02 0b bf 70 0f 1d 4f 25 68 0f 00 03 4f 27 00 68 0f 00 07 02 0b d0 70 07 1d ┆O% h; p O%h O' h p ┆
0x0af95…0afb4 4f 25 69 1a 00 03 0b ce 70 02 70 d7 0b bd 70 02 70 d7 0b d7 70 06 67 f2 4f 25 00 03 00 00 00 ┆O%i p p p p p g O% ┆
0x0afb4…0afd4 (6, 0, 6) 0b dd 70 98 32 00 67 e3 4f 2b 7c 8d 1e 67 e3 68 3b 00 03 67 f2 4f 27 00 03 67 f3 68 3b 00 03 67 ┆ p 2 g O+ö g h; g O' g h; g┆
0x0afd4…0aff4 9b 32 18 67 e3 32 28 06 67 9b 32 18 4f 3b 2b 82 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 06 ┆ 2 g 2( g 2 O;+ g 2(O#h 2 2 ┆
0x0aff4…0b014 68 0d 67 ed 00 03 33 00 00 43 0f 00 0a 32 0e 68 f4 32 0b 31 4f 25 00 19 31 68 ff 32 02 06 33 00 ┆h g 3 C 2 h 2 1O% 1h 2 3 ┆
0x0b014…0b034 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 33 00 00 43 0f 00 0a 33 00 00 43 09 00 0a 6b 7d 1e 32 ┆ C 2 h 2 2 3 C 3 C kå 2┆
0x0b034…0b054 00 6c 8f 1e 33 00 00 43 09 00 0a 32 01 0c 0a 68 0f 00 0a 68 0f 00 69 01 32 01 09 05 0b 77 71 02 ┆ l 3 C 2 h h i 2 wq ┆
0x0b054…0b074 1d 1b 0b 75 71 02 71 79 0b 79 71 31 15 00 27 32 0d 32 01 2a 69 02 32 15 69 17 00 28 4f 25 00 19 ┆ uq qy yq1 '2 2 *i 2 i (O% ┆
0x0b074…0b094 69 19 32 01 29 68 1f 32 01 68 0f 00 28 68 15 68 0f 00 03 68 15 00 68 0d 00 0c 0a 32 01 0b ae 71 ┆i 2 )h 2 h (h h h h 2 q┆
0x0b094…0b0b3 1d 20 68 15 68 15 00 32 01 0a 03 71 a0 1c 67 e3 32 28 4f 23 68 15 00 32 18 0e 0a 32 18 06 00 ┆ h h 2 q g 2(O#h 2 2 ┆
0x0b0b3…0b0d3 (6, 0, 7) 0b cb 71 08 67 f5 00 4f 2b 00 07 04 0b d5 71 13 1d 67 f5 4f 2b 00 03 68 0d 68 15 00 03 68 15 69 ┆ q g O+ q g O+ h h h i┆
0x0b0d3…0b0f3 2e 00 03 0b d3 71 02 71 e8 0b e8 71 08 67 f3 00 4f 2b 00 07 04 0b f2 71 10 1d 68 0d 68 0d 00 68 ┆. q q q g O+ q h h h┆
0x0b0f3…0b113 0f 00 0c 0a 03 69 54 00 1c 0b f0 71 02 72 02 0b 02 72 1e 4f 19 67 f3 00 03 67 f2 4f 25 00 03 67 ┆ iT q r r O g g O% g┆
0x0b113…0b133 f3 4f 19 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 22 72 05 1d 69 30 00 1c 0b 20 72 02 72 2a ┆ O 2 g O ö O "r i0 r r*┆
0x0b133…0b153 0b 2a 72 04 69 52 00 1c 0b 27 72 03 72 2e 1c 0a 30 69 02 2e 72 0b 2e 72 28 15 00 27 32 0d 32 01 ┆ *r iR 'r r. 0i .r .r( '2 2 ┆
0x0b153…0b173 2a 69 32 32 1e 69 50 00 28 4f 25 00 19 69 19 32 01 29 68 1f 32 01 68 0f 00 28 32 00 68 3b 7c 66 ┆*i22 iP (O% i 2 )h 2 h (2 h;öf┆
0x0b173…0b193 1e 0a 52 69 02 56 72 0b 56 72 08 68 15 00 68 0f 00 07 05 0b 60 72 07 1d 67 ed 68 3b 00 03 0b 5e ┆ Ri Vr Vr h h `r g h; ^┆
0x0b193…0b1b2 72 02 72 67 0b 67 72 13 67 f2 68 3b 00 03 67 f3 4f 19 00 03 4f 23 68 15 00 32 18 00 18 06 00 ┆r rg gr g h; g O O#h 2 ┆
0x0b1b2…0b1d2 (6, 0, 8) 0b 7a 72 0c 0e 0a 32 18 67 e3 32 28 06 71 af 1c 0b aa 71 04 72 86 71 bb 0b 86 72 08 67 f5 00 4f ┆ zr 2 g 2( q q r q r g O┆
0x0b1d2…0b1f2 2b 00 07 01 0b 90 72 1f 1d 67 f2 4f 25 00 03 67 f3 67 f5 00 03 67 f5 4f 2b 00 03 32 00 67 e3 4f ┆+ r g O% g g g O+ 2 g O┆
0x0b1f2…0b212 1b 7c 8d 1e 4f 1b 00 0b b1 72 05 1d 69 30 00 1c 0b af 72 02 72 b6 0b 8e 72 02 72 b6 0a 54 69 02 ┆ ö O r i0 r r r r Ti ┆
0x0b212…0b232 b6 72 0b b6 72 30 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 06 67 f2 4f 25 00 03 67 ed 68 0d ┆ r r0g 2(O#h 2 2 g O% g h ┆
0x0b232…0b252 00 03 68 15 68 0d 00 68 0f 00 0a 03 68 15 00 4f 29 00 0c 0a 32 01 0b ea 72 25 20 68 15 68 15 00 ┆ h h h h O) 2 r% h h ┆
0x0b252…0b272 32 01 0a 03 72 dc 1c 4f 23 68 15 00 32 18 0e 0a 32 18 33 00 00 43 0d 00 0a 32 18 06 72 eb 1c 0b ┆2 r O#h 2 2 3 C 2 r ┆
0x0b272…0b292 e6 72 04 73 0f 72 f7 0b 0f 73 1e 67 f3 68 3b 00 03 67 9b 32 18 67 e3 32 28 06 67 9b 68 3b 00 03 ┆ r s r s g h; g 2 g 2( g h; ┆
0x0b292…0b2b1 67 9b 32 18 4f 3b 2c 82 1b 0a 56 69 02 2d 73 0b 2d 73 08 67 9b 32 18 4f 3b 2b 82 00 18 00 00 ┆g 2 O;, Vi -s -s g 2 O;+ ┆
0x0b2b1…0b2d1 (6, 0, 9) 0a 58 69 02 35 73 0b 35 73 37 33 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 69 5a 33 00 00 43 ┆ Xi 5s 5s73 C 2 h 2 2 iZ3 C┆
0x0b2d1…0b2f1 09 00 0a 6b 7d 1e 6c fe 32 00 6c fe 6c fe 43 13 00 19 17 04 08 6d 06 1e 01 08 68 0f 00 19 17 08 ┆ kå l 2 l l C m h ┆
0x0b2f1…0b311 02 0b 6e 73 05 1d 69 58 00 1c 0b 6c 73 02 73 73 0b 73 73 1e 43 13 33 00 00 43 09 00 0a 32 08 16 ┆ ns iX ls ss ss C 3 C 2 ┆
0x0b311…0b331 03 43 13 00 68 3b 00 07 01 43 13 00 4f 2b 00 07 04 13 0b 93 73 05 1d 69 58 00 1c 0b 91 73 02 73 ┆ C h; C O+ s iX s s┆
0x0b331…0b351 98 0a 68 69 02 98 73 0b 98 73 1a 43 01 32 08 68 20 32 00 06 32 00 69 6a 43 01 6b 7d 1e 4f 27 00 ┆ hi s s C 2 h 2 2 ijC kå O' ┆
0x0b351…0b371 68 3b 00 07 02 0b b4 73 43 1d 67 e3 32 28 33 00 00 43 0d 00 0a 32 18 06 67 e5 32 08 43 01 32 08 ┆h; sC g 2(3 C 2 g 2 C 2 ┆
0x0b371…0b391 06 67 b3 32 18 67 e3 32 28 06 40 f7 69 78 00 03 67 b3 22 67 e3 32 28 67 b3 32 18 06 4f 25 67 f2 ┆ g 2 g 2( @ ix g "g 2(g 2 O%g ┆
0x0b391…0b3b0 00 68 17 00 12 03 4f 27 4f 25 00 03 0a 78 69 02 f7 73 0b f7 73 06 67 e5 32 08 68 e8 00 00 00 ┆ h O'O% xi s s g 2 h ┆
0x0b3b0…0b3d0 (6, 0, 10) 0b fd 73 52 32 08 06 67 e3 68 3b 00 03 32 00 4f 27 7c 4c 1e 67 9b 32 18 67 e3 32 28 06 67 9b 22 ┆ sR2 g h; 2 O'öL g 2 g 2( g "┆
0x0b3d0…0b3f0 32 00 68 3b 7c 4c 1e 67 e3 32 28 67 9b 32 18 06 67 ed 4f 29 00 03 67 9b 32 18 67 e3 32 28 06 67 ┆2 h;öL g 2(g 2 g O) g 2 g 2( g┆
0x0b3f0…0b410 e3 68 17 00 03 32 00 67 e3 4f 2b 7c 8d 1e 67 9b 32 18 4f 3b 2b 82 0b b2 73 02 74 4f 0b 4f 74 1e ┆ h 2 g O+ö g 2 O;+ s tO Ot ┆
0x0b410…0b430 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 06 4f 21 67 ed 00 03 67 ed 00 68 0f 00 07 02 0b 6f ┆g 2(O#h 2 2 O!g g h o┆
0x0b430…0b450 74 05 1d 69 7a 00 1c 0b 6d 74 02 74 74 0b 74 74 10 68 0b 69 1a 00 03 68 0b 00 4f 21 00 0c 0a 32 ┆t iz mt tt tt h i h O! 2┆
0x0b450…0b470 01 0b 88 74 27 20 68 0b 68 0b 00 32 01 0a 03 74 7a 1c 67 e3 32 28 4f 23 68 0b 00 32 18 0e 0a 32 ┆ t' h h 2 tz g 2(O#h 2 2┆
0x0b470…0b490 18 06 67 e5 32 08 43 01 32 08 09 02 0b b1 74 11 1d 4f 23 68 0b 00 03 68 0b 4f 21 00 68 0f 00 0a ┆ g 2 C 2 t O#h h O! h ┆
0x0b490…0b4af 03 0b af 74 02 74 c2 0b c2 74 03 74 89 1c 0b 84 74 04 74 c5 74 95 0b c5 74 03 4f 23 00 00 00 ┆ t t t t t t t t O# ┆
0x0b4af…0b4cf (6, 0, 11) 0b c8 74 05 68 3b 00 07 04 0b cf 74 05 1d 69 df 00 1c 0b cd 74 02 74 d4 0a 7a 69 02 d4 74 0b d4 ┆ t h; t i t t zi t ┆
0x0b4cf…0b4ef 74 08 43 13 00 68 3b 00 07 02 0b de 74 3c 1d 15 00 27 32 0d 32 01 2a 15 00 27 69 7c 32 05 69 81 ┆t C h; t< '2 2 * 'iö2 i ┆
0x0b4ef…0b50f 00 28 43 01 32 08 69 83 00 28 69 85 32 19 69 9e 00 28 69 a0 32 03 69 a3 00 28 4f 25 00 19 69 19 ┆ (C 2 i (i 2 i (i 2 i (O% i ┆
0x0b50f…0b52f 32 01 29 32 00 68 3b 7c 66 1e 0b dc 74 02 75 1a 0b 1a 75 22 67 e3 32 28 4f 23 4f 21 00 32 18 0e ┆2 )2 h;öf t u u"g 2(O#O! 2 ┆
0x0b52f…0b54f 0a 32 18 06 4f 1f 67 f5 00 03 4f 1f 00 43 13 00 0a 4f 2b 00 07 04 0b 3e 75 15 1d 15 00 27 32 0d ┆ 2 O g O C O+ >u '2 ┆
0x0b54f…0b56f 32 01 2a 69 a5 32 1e 26 32 00 68 3b 7c 66 1e 0b 3c 75 02 75 53 0a c3 69 02 53 75 0b 53 75 3a 33 ┆2 *i 2 &2 h;öf <u uS i Su Su:3┆
0x0b56f…0b58f 00 00 43 09 00 0a 32 08 68 20 32 00 06 32 00 69 c5 33 00 00 43 09 00 0a 6b 7d 1e 4f 19 33 00 00 ┆ C 2 h 2 2 i 3 C kå O 3 ┆
0x0b58f…0b5ae 43 09 00 0a 32 08 16 03 4f 19 00 69 83 00 07 01 4f 19 00 69 d3 00 07 04 13 0b 8f 75 01 1d 00 ┆C 2 O i O i u ┆
0x0b5ae…0b5ce (6, 0, 12) 0b 90 75 04 69 c3 00 1c 0b 8d 75 02 75 94 0b 94 75 1f 32 00 6c 8f 1e 68 15 4f 19 00 69 d5 00 10 ┆ u i u u u 2 l h O i ┆
0x0b5ce…0b5ee 4f 19 00 69 d7 00 10 0a 03 68 15 00 68 e6 00 07 01 0b b5 75 07 1d 68 15 69 a3 00 03 0b b3 75 02 ┆O i h h u h i u ┆
0x0b5ee…0b60e 75 bc 0b bc 75 1a 4f 1d 69 d9 00 4f 19 00 68 15 00 0a 69 db 00 0a 10 03 4f 1d 00 69 dd 00 07 04 ┆u u O i O h i O i ┆
0x0b60e…0b62e 0b d8 75 07 1d 4f 1d 69 dd 00 03 0b d6 75 02 75 df 0b df 75 60 32 00 6c 34 1e 4f 2d 4f 1d 00 43 ┆ u O i u u u`2 l4 O-O C┆
0x0b62e…0b64e 13 00 0e 03 68 15 4f 1f 00 68 0f 00 0a 03 67 e3 68 3b 00 03 67 e5 32 08 43 01 32 08 06 67 ed 68 ┆ h O h g h; g 2 C 2 g h┆
0x0b64e…0b66e 3b 00 03 67 f1 4f 1d 00 03 67 f2 4f 25 00 03 67 f3 4f 1f 00 68 0f 00 0a 03 67 f5 4f 1f 00 43 13 ┆; g O g O% g O h g O C ┆
0x0b66e…0b68e 00 0a 03 67 ef 4f 19 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 41 76 05 1d 69 30 00 1c 0b 3f ┆ g O 2 g O ö O Av i0 ?┆
0x0b68e…0b6ad 76 02 76 46 0b 46 76 14 68 15 67 f3 00 03 67 f2 68 3b 00 03 67 f3 68 15 00 03 4f 23 00 1d 00 ┆v vF Fv h g g h; g h O# ┆
0x0b6ad…0b6cd (6, 0, 13) 0b 5a 76 60 4f 21 00 68 0f 00 0a 32 18 0e 0a 32 18 67 e3 32 28 06 67 e3 32 28 4f 23 68 0f 00 32 ┆ Zv`O! h 2 2 g 2( g 2(O#h 2┆
0x0b6cd…0b6ed 18 0e 0a 32 18 06 67 ed 67 ed 00 68 0f 00 0a 03 4f 23 68 0f 00 32 18 0e 0a 32 18 67 e3 32 28 06 ┆ 2 g g h O#h 2 2 g 2( ┆
0x0b6ed…0b70d 4f 19 67 f3 00 03 67 f2 4f 25 00 03 67 f3 4f 19 00 03 67 9b 32 18 67 e3 32 28 06 67 9b 32 18 4f ┆O g g O% g O g 2 g 2( g 2 O┆
0x0b70d…0b72d 3b 2c 82 1b 0a df 69 02 ba 76 0b ba 76 27 32 00 6c 8f 1e 4f 15 67 f5 00 67 f3 00 0c 0a 68 0f 00 ┆;, i v v'2 l O g g h ┆
0x0b72d…0b74d 0a 03 4f 17 43 13 00 4f 15 00 0c 0a 03 43 13 00 68 3b 00 07 02 0b e3 76 05 1d 69 f7 00 1c 0b e1 ┆ O C O C h; v i ┆
0x0b74d…0b76d 76 02 76 e8 0b e8 76 08 4f 17 00 68 3b 00 07 04 0b f2 76 05 1d 69 fb 00 1c 0b f0 76 02 76 f7 0b ┆v v v O h; v i v v ┆
0x0b76d…0b78d f7 76 08 4f 17 00 68 3b 00 07 01 0b 01 77 05 1d 69 fd 00 1c 0b ff 76 02 77 06 0b 06 77 1b 15 00 ┆ v O h; w i v w w ┆
0x0b78d…0b7ac 27 32 0d 32 01 2a 69 7c 32 05 26 43 01 32 08 26 69 e1 32 16 26 32 00 68 3b 00 4f 23 00 1d 00 ┆'2 2 *iö2 &C 2 &i 2 &2 h; O# ┆
0x0b7ac…0b7cc (6, 0, 14) 0b 21 77 03 7c 66 1e 0a f7 69 02 24 77 0b 24 77 40 67 e3 32 28 4f 23 68 0f 00 32 18 0e 0a 32 18 ┆ !w öf i $w $w@g 2(O#h 2 2 ┆
0x0b7cc…0b7ec 06 67 ed 67 ed 00 68 0f 00 0c 0a 03 5b 53 68 0f 00 32 18 0e 0a 32 18 67 e3 32 28 06 68 15 69 1a ┆ g g h ÄSh 2 2 g 2( h i ┆
0x0b7ec…0b80c 00 03 68 15 00 4f 23 00 68 0f 00 0c 0a 0c 0a 32 01 0b 68 77 27 20 68 15 68 15 00 32 01 0a 03 77 ┆ h O# h 2 hw' h h 2 w┆
0x0b80c…0b82c 55 1c 5b 53 68 15 00 32 18 0e 0a 32 18 4f 23 68 15 00 32 18 0e 0a 32 18 06 77 69 1c 0b 64 77 04 ┆U ÄSh 2 2 O#h 2 2 wi dw ┆
0x0b82c…0b84c 77 8f 77 75 0b 8f 77 15 68 15 4f 23 00 03 68 15 00 4f 21 00 68 0f 00 0c 0a 0c 0a 32 01 0b a8 77 ┆w wu w h O# h O! h 2 w┆
0x0b84c…0b86c 5b 20 68 15 68 15 00 32 01 0a 03 77 95 1c 67 e3 32 28 4f 23 68 15 00 68 0f 00 0a 32 18 0e 0a 32 ┆Ä h h 2 w g 2(O#h h 2 2┆
0x0b86c…0b88c 18 06 4f 23 68 15 00 32 18 0e 0a 32 18 4f 23 68 15 00 68 0f 00 0a 32 18 0e 0a 32 18 06 67 f3 67 ┆ O#h 2 2 O#h h 2 2 g g┆
0x0b88c…0b8ab f3 00 4f 17 00 0a 03 67 f5 67 f5 00 4f 17 00 0a 03 5b 53 68 15 00 32 18 0e 0a 32 18 00 1d 00 ┆ O g g O ÄSh 2 2 ┆
0x0b8ab…0b8cb (6, 0, 15) 0b 03 78 08 67 e3 32 28 06 77 a9 1c 0b a4 77 04 78 0b 77 b5 0b 0b 78 15 68 15 4f 23 00 03 68 15 ┆ x g 2( w w x w x h O# h ┆
0x0b8cb…0b8eb 00 4f 21 00 68 0f 00 0c 0a 0c 0a 32 01 0b 24 78 2e 20 68 15 68 15 00 32 01 0a 03 78 11 1c 32 00 ┆ O! h 2 $x. h h 2 x 2 ┆
0x0b8eb…0b90b 6b 13 1e 68 0d 67 f3 00 03 69 f9 67 f5 00 03 68 0b 68 0d 00 03 68 0b 00 69 f9 00 0c 0a 32 01 0b ┆k h g i g h h h i 2 ┆
0x0b90b…0b92b 56 78 25 20 68 0b 68 0b 00 32 01 0a 03 78 48 1c 67 f3 68 0b 00 03 67 f5 68 0b 00 03 32 00 67 e3 ┆Vx% h h 2 xH g h g h 2 g ┆
0x0b92b…0b94b 4f 1b 7c 8d 1e 4f 1b 00 0b 7d 78 05 1d 69 30 00 1c 0b 7b 78 02 78 82 0b 82 78 08 32 00 6a 1e 1e ┆O ö O åx i0 äx x x 2 j ┆
0x0b94b…0b96b 78 57 1c 0b 52 78 04 78 8a 78 63 0b 8a 78 03 78 25 1c 0b 20 78 04 78 8d 78 31 0b 8d 78 04 6a 14 ┆xW Rx x xc x x% x x x1 x j ┆
0x0b96b…0b98b 00 1c 0a fb 69 02 91 78 0b 91 78 20 67 e3 32 28 4f 23 4f 21 00 32 18 0e 0a 32 18 06 67 f5 00 4f ┆ i x x g 2(O#O! 2 2 g O┆
0x0b98b…0b9aa 17 00 0a 4f 2b 00 68 0f 00 0a 07 04 0b b3 78 0b 1d 15 00 27 32 0d 32 01 2a 69 a5 00 00 1d 00 ┆ O+ h x '2 2 *i ┆
0x0b9aa…0b9ca (6, 0, 16) 0b be 78 0a 32 1e 26 32 00 68 3b 7c 66 1e 0b b1 78 02 78 c8 0b c8 78 34 67 e3 32 28 4f 23 4f 23 ┆ x 2 &2 h;öf x x x4g 2(O#O#┆
0x0b9ca…0b9ea 00 32 18 0e 0a 32 18 06 4f 1d 67 f1 00 68 17 00 12 03 32 00 6c 34 1e 68 15 68 0f 00 03 68 15 00 ┆ 2 2 O g h 2 l4 h h h ┆
0x0b9ea…0ba0a 4f 23 00 68 0f 00 0c 0a 0c 0a 32 01 0b 00 79 27 20 68 15 68 15 00 32 01 0a 03 78 ed 1c 5b 53 68 ┆O# h 2 y' h h 2 x ÄSh┆
0x0ba0a…0ba2a 15 00 32 18 0e 0a 32 18 4f 23 68 15 00 32 18 0e 0a 32 18 06 79 01 1c 0b fc 78 04 79 27 79 0d 0b ┆ 2 2 O#h 2 2 y x y'y ┆
0x0ba2a…0ba4a 27 79 3e 67 e3 32 28 4f 23 4f 23 00 32 18 0e 0a 32 18 06 67 f5 67 f5 00 4f 17 00 0a 03 5b 53 4f ┆'y>g 2(O#O# 2 2 g g O ÄSO┆
0x0ba4a…0ba6a 23 00 32 18 0e 0a 32 18 67 e3 32 28 06 68 15 4f 23 00 68 0f 00 0a 03 68 15 00 4f 21 00 0c 0a 32 ┆# 2 2 g 2( h O# h h O! 2┆
0x0ba6a…0ba8a 01 0b 69 79 38 20 68 15 68 15 00 32 01 0a 03 79 5b 1c 67 e3 32 28 4f 23 68 15 00 32 18 0e 0a 32 ┆ iy8 h h 2 yÄ g 2(O#h 2 2┆
0x0ba8a…0baa9 18 06 67 f3 67 f3 00 4f 17 00 0a 03 67 f5 67 f5 00 4f 17 00 0a 03 5b 53 68 15 00 32 18 00 00 ┆ g g O g g O ÄSh 2 ┆
0x0baa9…0bac9 (6, 0, 17) 0b a1 79 0c 0e 0a 32 18 67 e3 32 28 06 79 6a 1c 0b 65 79 04 79 ad 79 76 0b ad 79 16 68 15 4f 21 ┆ y 2 g 2( yj ey y yv y h O!┆
0x0bac9…0bae9 00 03 68 15 00 4f 23 00 68 0f 00 0a 0c 0a 68 0f 00 0c 0b c7 79 32 20 68 15 68 15 00 68 0f 00 0c ┆ h O# h h y2 h h h ┆
0x0bae9…0bb09 0a 03 79 b3 1c 32 00 6b 13 1e 69 f9 67 f5 00 03 68 0d 67 f3 00 03 68 0b 69 f9 00 03 68 0b 00 68 ┆ y 2 k i g h g h i h h┆
0x0bb09…0bb29 0d 00 0c 0a 68 0f 00 0c 0b fd 79 27 20 68 0b 68 0b 00 68 0f 00 0c 0a 03 79 ed 1c 67 f5 68 0b 00 ┆ h y' h h h y g h ┆
0x0bb29…0bb49 03 67 f3 68 0b 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 26 7a 05 1d 69 30 00 1c 0b 24 7a 02 ┆ g h 2 g O ö O &z i0 $z ┆
0x0bb49…0bb69 7a 2b 0b 2b 7a 08 32 00 6a 1e 1e 79 fe 1c 0b f9 79 04 7a 33 7a 0c 0b 33 7a 03 79 c8 1c 0b c3 79 ┆z+ +z 2 j y y z3z 3z y y┆
0x0bb69…0bb89 04 7a 36 79 d6 0b 36 7a 32 67 e3 32 28 4f 23 4f 23 00 32 18 0e 0a 32 18 06 67 f2 32 01 4f 25 00 ┆ z6y 6z2g 2(O#O# 2 2 g 2 O% ┆
0x0bb89…0bba8 19 06 67 f3 67 f5 00 68 0f 00 0a 03 67 f5 67 f3 00 4f 17 00 0a 68 0f 00 0c 0a 03 00 18 00 00 ┆ g g h g g O h ┆
0x0bba8…0bbc8 (6, 0, 18) 0b 68 7a 0c 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 76 7a 05 1d 69 30 00 1c 0b 74 7a 02 7a 7b 0b ┆ hz 2 g O ö O vz i0 tz zä ┆
0x0bbc8…0bbe8 7b 7a 04 6a 14 00 1c 0a fd 69 02 7f 7a 0b 7f 7a 23 4f 1d 67 f1 00 68 17 00 12 03 4f 38 4f 1d 00 ┆äz j i z z#O g h O8O ┆
0x0bbe8…0bc08 43 13 00 0e 19 17 05 03 43 67 ed 00 4f 38 02 03 43 18 08 04 0b a4 7a 14 1d 15 00 27 32 0d 32 01 ┆C Cg O8 C z '2 2 ┆
0x0bc08…0bc28 2a 69 ff 32 15 26 23 43 00 32 01 25 0b a2 7a 02 7a b8 0b b8 7a 15 68 15 68 0f 00 03 68 15 00 4f ┆*i 2 &#C 2 % z z z h h h O┆
0x0bc28…0bc48 23 00 68 0f 00 0c 0a 0c 0a 32 01 0b d1 7a 27 20 68 15 68 15 00 32 01 0a 03 7a be 1c 5b 53 68 15 ┆# h 2 z' h h 2 z ÄSh ┆
0x0bc48…0bc68 00 32 18 0e 0a 32 18 4f 23 68 15 00 32 18 0e 0a 32 18 06 7a d2 1c 0b cd 7a 04 7a f8 7a de 0b f8 ┆ 2 2 O#h 2 2 z z z z ┆
0x0bc68…0bc88 7a 25 67 e3 32 28 4f 23 4f 23 00 32 18 0e 0a 32 18 06 67 f5 67 f5 00 4f 17 00 0a 03 67 ed 00 4f ┆z%g 2(O#O# 2 2 g g O g O┆
0x0bc88…0bca7 38 02 03 43 18 08 04 0b 1f 7b 0b 1d 67 ed 4f 38 02 03 43 1a 16 03 0b 1d 7b 02 7b 2a 00 00 00 ┆8 C ä g O8 C ä ä* ┆
0x0bca7…0bcc7 (6, 0, 19) 0b 2a 7b 00 0b 2a 7b 24 5b 53 4f 23 00 32 18 0e 0a 32 18 67 e3 32 28 06 68 15 4f 23 00 68 0f 00 ┆ *ä *ä$ÄSO# 2 2 g 2( h O# h ┆
0x0bcc7…0bce7 0a 03 68 15 00 4f 21 00 0c 0a 32 01 0b 52 7b 44 20 68 15 68 15 00 32 01 0a 03 7b 44 1c 67 e3 32 ┆ h O! 2 RäD h h 2 äD g 2┆
0x0bce7…0bd07 28 4f 23 68 15 00 32 18 0e 0a 32 18 06 67 f3 67 f3 00 4f 17 00 0a 03 67 f5 67 f5 00 4f 17 00 0a ┆(O#h 2 2 g g O g g O ┆
0x0bd07…0bd27 03 5b 53 68 15 00 32 18 0e 0a 32 18 67 e3 32 28 06 7b 53 1c 0b 4e 7b 04 7b 96 7b 5f 0b 96 7b 14 ┆ ÄSh 2 2 g 2( äS Nä ä ä_ ä ┆
0x0bd27…0bd47 68 15 4f 23 00 68 0f 00 0a 03 68 15 00 4f 21 00 0c 0a 32 01 0b ae 7b 2e 20 68 15 68 15 00 32 01 ┆h O# h h O! 2 ä. h h 2 ┆
0x0bd47…0bd67 0a 03 7b a0 1c 32 00 6b 13 1e 68 0d 67 f3 00 03 69 f9 67 f5 00 03 68 0b 68 0d 00 03 68 0b 00 69 ┆ ä 2 k h g i g h h h i┆
0x0bd67…0bd87 f9 00 0c 0a 32 01 0b e0 7b 25 20 68 0b 68 0b 00 32 01 0a 03 7b d2 1c 67 f3 68 0b 00 03 67 f5 68 ┆ 2 ä% h h 2 ä g h g h┆
0x0bd87…0bda6 0b 00 03 32 00 67 e3 4f 1b 7c 8d 1e 4f 1b 00 0b 07 7c 05 1d 69 30 00 1c 0b 05 7c 02 7c 0c 00 ┆ 2 g O ö O ö i0 ö ö ┆
0x0bda6…0bea5 (6, 0, 20) 0x00[0xff]
[…0x8…]
0x0c69d…0c6bd (6, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x0c6bd…0c6dd ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x5…]
0x0c77d…0c79c ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x0c79c…0c7eb (7, 0, 0) DataSector[0x4f]
[…0x139…]
0x12882…128a2 (10, 0, 68) 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(2); ┆
0x128a2…128c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x128c2…128d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x128d1…128f1 (10, 0, 69) 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 ┆ ON ERROR GO TO FEL; ┆
0x128f1…12911 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12911…12920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12920…12940 (10, 0, 70) 20 20 20 20 20 20 4f 50 45 4e 20 4b 39 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K90; ┆
0x12940…12960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12960…1296f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1296f…1298f (10, 0, 71) 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=4; ┆
0x1298f…129af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x129af…129be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x129be…129de (10, 0, 72) 20 20 20 20 20 20 43 41 4c 4c 20 43 48 4f 4f 53 45 28 33 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL CHOOSE(3); ┆
0x129de…129fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x129fe…12a0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a0d…12a2d (10, 0, 73) 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 ┆ ON ERROR GO TO FEL; ┆
0x12a2d…12a4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a4d…12a5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a5c…12a7c (10, 0, 74) 20 20 20 20 20 20 4f 50 45 4e 20 4b 39 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN K91; ┆
0x12a7c…12a9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12a9c…12aab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12aab…12acb (10, 0, 75) 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 37 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L75; ┆
0x12acb…12aeb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12aeb…12afa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12afa…12b1a (10, 0, 76) 46 45 4c 3a 20 20 49 46 20 49 3d 31 20 7c 20 49 3d 33 20 54 48 45 4e 20 50 55 54 20 46 49 4c 45 ┆FEL: IF I=1 ö I=3 THEN PUT FILE┆
0x12b1a…12b3a 28 44 29 20 53 4b 49 50 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(D) SKIP EDIT ┆
0x12b3a…12b49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12b49…12b69 (10, 0, 77) 20 20 20 20 20 20 28 27 44 49 53 4b 45 54 54 20 4d 45 44 20 22 56 45 52 54 45 58 54 22 20 46 49 ┆ ('DISKETT MED "VERTEXT" FI┆
0x12b69…12b89 4e 4e 53 20 49 4e 54 45 20 49 20 44 52 49 56 45 20 32 27 29 28 41 28 34 37 29 29 3b 20 20 20 20 ┆NNS INTE I DRIVE 2')(A(47)); ┆
0x12b89…12b98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12b98…12bb8 (10, 0, 78) 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 ┆ ELSE PUT FILE(D) SKIP EDIT┆
0x12bb8…12bd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12bd8…12be7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x12be7…12c36 (10, 0, 79) 0x00[0x4f]
[…0x2…]
0x12cd4…12d23 (11, 0, 0) DataSector[0x4f]
[…0x92…]
0x15a31…15a51 (12, 0, 65) 20 20 20 20 20 20 55 4e 53 50 45 43 28 4b 46 49 4c 29 3d 49 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ UNSPEC(KFIL)=I; ┆
0x15a51…15a71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15a71…15a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15a80…15aa0 (12, 0, 66) 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 4b 46 49 4c 29 20 49 4e 54 4f 28 4b 53 54 52 29 ┆ READ FILE(KFIL) INTO(KSTR)┆
0x15aa0…15ac0 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x15ac0…15acf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15acf…15aef (12, 0, 67) 20 20 20 20 20 20 43 41 4c 4c 20 54 41 42 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL TABGEN; ┆
0x15aef…15b0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15b0f…15b1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x15b1e…15b6d (12, 0, 68) 0x00[0x4f]
[…0xc…]
0x15f21…15f41 (12, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x15f41…15f61 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x15f61…15f70 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x15f70…15fbf (13, 0, 0) DataSector[0x4f]
[…0x113…]
0x1b49c…1b4bc (16, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 55 4e 53 50 45 43 28 46 49 4c 31 29 3d 30 20 ┆ IF UNSPEC(FIL1)=0 ┆
0x1b4bc…1b4dc 54 48 45 4e 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN OPEN FIL1; ┆
0x1b4dc…1b4eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b4eb…1b50b (16, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 57 52 49 54 45 20 46 49 4c 45 28 46 49 4c 31 29 20 46 ┆ WRITE FILE(FIL1) F┆
0x1b50b…1b52b 52 4f 4d 28 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ROM(UKSTR); ┆
0x1b52b…1b53a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b53a…1b55a (16, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 46 49 4c 31 3b 20 20 20 20 20 20 20 ┆ CLOSE FIL1; ┆
0x1b55a…1b57a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b57a…1b589 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b589…1b5a9 (16, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x1b5a9…1b5c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b5c9…1b5d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b5d8…1b5f8 (16, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 46 4c 41 47 47 3d 31 3b 20 20 20 20 20 20 20 20 20 ┆ SFLAGG=1; ┆
0x1b5f8…1b618 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b618…1b627 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b627…1b647 (16, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b647…1b667 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b667…1b676 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b676…1b696 (16, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x1b696…1b6b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b6b6…1b6c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b6c5…1b6e5 (16, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 46 49 4c 31 29 ┆ REWRITE FILE(FIL1)┆
0x1b6e5…1b705 20 46 52 4f 4d 28 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FROM(UKSTR); ┆
0x1b705…1b714 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b714…1b734 (16, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b734…1b754 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b754…1b763 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b763…1b783 (16, 0, 39) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1b783…1b7a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b7a3…1b7b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b7b2…1b7d2 (16, 0, 40) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x1b7d2…1b7f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b7f2…1b801 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b801…1b850 (16, 0, 41) 0x20[0x4f]
0x1b850…1b870 (16, 0, 42) 2f 2a 20 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 ┆/* H Ä R B Ö R J A R H U V┆
0x1b870…1b890 20 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 20 2a 2f 20 20 20 ┆ U D P R O G R A M M E T */ ┆
0x1b890…1b89f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b89f…1b8ee (16, 0, 43) 0x20[0x4f]
[…0x1…]
0x1b93d…1b95d (16, 0, 45) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x1b95d…1b97d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b97d…1b98c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b98c…1b9ac (16, 0, 46) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x1b9ac…1b9cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b9cc…1b9db 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1b9db…1b9fb (16, 0, 47) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x1b9fb…1ba1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba1b…1ba2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba2a…1ba4a (16, 0, 48) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x1ba4a…1ba6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba6a…1ba79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1ba79…1ba99 (16, 0, 49) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x1ba99…1bab9 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO SLUT; ┆
0x1bab9…1bac8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bac8…1bae8 (16, 0, 50) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x1bae8…1bb08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bb08…1bb17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bb17…1bb66 (16, 0, 51) 0x20[0x4f]
0x1bb66…1bb86 (16, 0, 52) 20 20 20 20 20 20 20 20 46 49 4c 3d 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FIL=Y; ┆
0x1bb86…1bba6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bba6…1bbb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bbb5…1bbd5 (16, 0, 53) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 32 20 54 48 45 4e 20 58 4e 3d 27 20 20 55 4b 4f 4e ┆ IF FIL=2 THEN XN=' UKON┆
0x1bbd5…1bbf5 54 4f 50 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TOP '; ┆
0x1bbf5…1bc04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bc04…1bc24 (16, 0, 54) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 33 20 54 48 45 4e 20 58 4e 3d 27 20 20 4b 53 4b 4f ┆ IF FIL=3 THEN XN=' KSKO┆
0x1bc24…1bc44 4e 54 4f 50 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTOP'; ┆
0x1bc44…1bc53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bc53…1bc73 (16, 0, 55) 20 20 20 20 20 20 20 20 46 53 54 52 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR=STR; ┆
0x1bc73…1bc93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bc93…1bca2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bca2…1bcc2 (16, 0, 56) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x1bcc2…1bce2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bce2…1bcf1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bcf1…1bd40 (16, 0, 57) 0x20[0x4f]
0x1bd40…1bd60 (16, 0, 58) 4c 31 3a 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆L1: CALL KONTOIN; ┆
0x1bd60…1bd80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bd80…1bd8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bd8f…1bdaf (16, 0, 59) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 49 53 50 50 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DISPPUT; ┆
0x1bdaf…1bdcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bdcf…1bdde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bdde…1bdfe (16, 0, 60) 4c 33 3a 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 55 46 46 29 3b 20 20 20 20 ┆L3: GET SKIP LIST(BUFF); ┆
0x1bdfe…1be1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be1e…1be2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be2d…1be4d (16, 0, 61) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 45 59 54 29 3b 20 20 20 20 20 20 ┆ CALL KEYFUN(KEYT); ┆
0x1be4d…1be6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be6d…1be7c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1be7c…1be9c (16, 0, 62) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 32 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 31 ┆ IF KEYT=20 THEN GO TO L1┆
0x1be9c…1bebc 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1bebc…1becb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1becb…1beeb (16, 0, 63) 20 20 20 20 20 20 20 20 49 46 20 4b 45 59 54 3d 31 38 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 ┆ IF KEYT=18 THEN GO TO UT┆
0x1beeb…1bf0b 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x1bf0b…1bf1a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf1a…1bf3a (16, 0, 64) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 56 41 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SVAR; ┆
0x1bf3a…1bf5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf5a…1bf69 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bf69…1bf89 (16, 0, 65) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 52 41 45 47 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FRAEGA; ┆
0x1bf89…1bfa9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bfa9…1bfb8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bfb8…1bfd8 (16, 0, 66) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L3; ┆
0x1bfd8…1bff8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1bff8…1c007 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c007…1c056 (16, 0, 67) 0x20[0x4f]
[…0x1…]
0x1c0a5…1c0c5 (16, 0, 69) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x1c0c5…1c0e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c0e5…1c0f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c0f4…1c114 (16, 0, 70) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x1c114…1c134 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c134…1c143 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c143…1c163 (16, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 53 46 4c 41 47 47 3d 30 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF SFLAGG=0 THEN DO; ┆
0x1c163…1c183 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c183…1c192 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c192…1c1b2 (16, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 ┆ CALL PLOAD('Q '┆
0x1c1b2…1c1d2 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x1c1d2…1c1e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c1e1…1c201 (16, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 31 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT1; ┆
0x1c201…1c221 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c221…1c230 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c230…1c250 (16, 0, 74) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1c250…1c270 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c270…1c27f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c27f…1c29f (16, 0, 75) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 7f 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ IF FIL =1 THEN DO; ┆
0x1c29f…1c2bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c2bf…1c2ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c2ce…1c2ee (16, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 54 38 3d 53 55 42 53 54 52 28 58 4e 2c 33 2c 38 29 3b 20 20 20 ┆ T8=SUBSTR(XN,3,8); ┆
0x1c2ee…1c30e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c30e…1c31d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c31d…1c33d (16, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 32 37 2c 36 2c 38 29 3d 54 38 3b 20 20 ┆ SUBSTR(T27,6,8)=T8; ┆
0x1c33d…1c35d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c35d…1c36c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c36c…1c38c (16, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 32 37 2c 32 33 2c 31 29 3d 27 33 27 3b ┆ SUBSTR(T27,23,1)='3';┆
0x1c38c…1c3ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c3ac…1c3bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c3bb…1c3db (16, 0, 79) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x1c3db…1c3fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c3fb…1c40a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c40a…1c42a (16, 0, 80) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 28 54 32 37 2c 32 37 29 3b 20 20 20 20 20 20 ┆ CALL LOAD(T27,27); ┆
0x1c42a…1c44a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c44a…1c459 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c459…1c479 (16, 0, 81) 53 4c 55 54 31 3a 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT1:END; ┆
0x1c479…1c499 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c499…1c4a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x1c4a8…1c4f7 (17, 0, 0) DataSector[0x4f]
[…0xfb…]
0x2126c…2128c (20, 0, 6) 2f 2a 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4b 54 4f 3d 20 27 2c 4b ┆/* PUT SKIP LIST ('KTO= ',K┆
0x2128c…212ac 4f 4e 54 4f 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ONTO); ┆
0x212ac…212bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x212bb…212db (20, 0, 7) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4e 3d 20 27 2c 4e 29 3b ┆ PUT SKIP LIST ('N= ',N);┆
0x212db…212fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x212fb…2130a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2130a…2132a (20, 0, 8) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 4c 3d 20 27 2c 4c 29 3b ┆ PUT SKIP LIST ('L= ',L);┆
0x2132a…2134a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ */ ┆
0x2134a…21359 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21359…21379 (20, 0, 9) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4b 54 4f 39 39 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO KTO99; ┆
0x21379…21399 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21399…213a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x213a8…213c8 (20, 0, 10) 4b 54 4f 32 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTO22: ┆
0x213c8…213e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x213e8…213f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x213f7…21417 (20, 0, 11) 20 20 20 20 20 20 20 20 4d 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M = 1; ┆
0x21417…21437 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21437…21446 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21446…21466 (20, 0, 12) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x21466…21486 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21486…21495 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21495…214b5 (20, 0, 13) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 28 32 29 20 45 44 49 54 20 28 4b 4f 4e 54 4f ┆ PUT SKIP (2) EDIT (KONTO┆
0x214b5…214d5 29 20 28 41 28 36 29 29 20 28 41 53 54 45 52 29 20 28 41 28 36 29 29 20 28 54 45 58 54 29 20 28 ┆) (A(6)) (ASTER) (A(6)) (TEXT) (┆
0x214d5…214e4 41 28 33 34 29 29 3b 20 20 20 20 20 20 20 20 ┆A(34)); ┆
0x214e4…21504 (20, 0, 14) 20 20 20 20 20 20 20 20 52 20 3d 20 52 20 2d 20 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R = R - 2; ┆
0x21504…21524 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21524…21533 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21533…21553 (20, 0, 15) 4b 54 4f 39 39 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KTO99: ┆
0x21553…21573 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21573…21582 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21582…215a2 (20, 0, 16) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x215a2…215c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x215c2…215d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x215d1…215f1 (20, 0, 17) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x215f1…21611 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21611…21620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21620…2166f (20, 0, 18) 0x20[0x4f]
[…0x1…]
0x216be…216de (20, 0, 20) 2f 2a 20 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 ┆/* H Ä R B Ö R J A R H U V┆
0x216de…216fe 20 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 20 2a 2f 20 20 20 ┆ U D P R O G R A M M E T */ ┆
0x216fe…2170d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2170d…2175c (20, 0, 21) 0x20[0x4f]
[…0x1…]
0x217ab…217cb (20, 0, 23) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x217cb…217eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x217eb…217fa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x217fa…2181a (20, 0, 24) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x2181a…2183a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2183a…21849 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21849…21869 (20, 0, 25) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x21869…21889 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21889…21898 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21898…218b8 (20, 0, 26) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x218b8…218d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x218d8…218e7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x218e7…21907 (20, 0, 27) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 47 ┆ IF DATUM='0 ' THEN G┆
0x21907…21927 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO UT; ┆
0x21927…21936 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21936…21956 (20, 0, 28) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x21956…21976 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21976…21985 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21985…219d4 (20, 0, 29) 0x20[0x4f]
0x219d4…219f4 (20, 0, 30) 20 20 20 20 20 20 20 20 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=5; ┆
0x219f4…21a14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21a14…21a23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21a23…21a43 (20, 0, 31) 20 20 20 20 20 20 20 20 46 49 4c 3d 59 3b 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 20 56 41 ┆ FIL=Y; /* VA┆
0x21a43…21a63 4c 20 49 20 55 4e 44 45 52 4d 45 4e 59 4e 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L I UNDERMENYN */ ┆
0x21a63…21a72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21a72…21a92 (20, 0, 32) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 7f 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 ┆ IF FIL =1 THEN DO; ┆
0x21a92…21ab2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21ab2…21ac1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21ac1…21ae1 (20, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 41 42 28 35 29 2c 38 2c 31 29 3d 27 33 ┆ SUBSTR(TAB(5),8,1)='3┆
0x21ae1…21b01 27 3b 20 20 2f 2a 20 5b 4e 44 52 41 52 20 52 55 42 52 49 4b 54 45 58 54 20 35 2d 20 54 49 4c 4c ┆'; /* ÄNDRAR RUBRIKTEXT 5- TILL┆
0x21b01…21b10 20 33 2d 53 49 46 46 52 20 2a 2f 20 20 20 20 ┆ 3-SIFFR */ ┆
0x21b10…21b30 (20, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 4a 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=3; ┆
0x21b30…21b50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21b50…21b5f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21b5f…21b7f (20, 0, 35) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x21b7f…21b9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21b9f…21bae 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21bae…21bce (20, 0, 36) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 32 20 54 48 45 4e 20 58 4e 3d 27 20 20 55 4b 4f 4e ┆ IF FIL=2 THEN XN=' UKON┆
0x21bce…21bee 54 4f 50 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TOP '; ┆
0x21bee…21bfd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21bfd…21c1d (20, 0, 37) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 33 20 54 48 45 4e 20 58 4e 3d 27 20 20 4b 53 4b 4f ┆ IF FIL=3 THEN XN=' KSKO┆
0x21c1d…21c3d 4e 54 4f 50 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTOP'; ┆
0x21c3d…21c4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21c4c…21c6c (20, 0, 38) 20 20 20 20 20 20 20 20 46 53 54 52 3d 53 54 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FSTR=STR; ┆
0x21c6c…21c8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21c8c…21c9b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21c9b…21cbb (20, 0, 39) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x21cbb…21cdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21cdb…21cea 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21cea…21d0a (20, 0, 40) 20 20 20 20 20 20 20 20 4c 20 3d 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L = 1; ┆
0x21d0a…21d2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21d2a…21d39 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21d39…21d59 (20, 0, 41) 20 20 20 20 20 20 20 20 4d 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M = 0; ┆
0x21d59…21d79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21d79…21d88 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21d88…21da8 (20, 0, 42) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 46 52 41 45 47 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL FRAEGA; ┆
0x21da8…21dc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21dc8…21dd7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21dd7…21df7 (20, 0, 43) 4c 30 3a 20 20 20 20 20 49 46 20 52 20 3c 20 37 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 ┆L0: IF R < 7 THEN CALL RUB; ┆
0x21df7…21e17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21e17…21e26 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21e26…21e46 (20, 0, 44) 4c 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: ┆
0x21e46…21e66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21e66…21e75 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21e75…21e95 (20, 0, 45) 20 20 20 20 20 20 20 20 4e 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ N = 0; ┆
0x21e95…21eb5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21eb5…21ec4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21ec4…21ee4 (20, 0, 46) 20 20 20 20 20 20 20 20 49 46 20 46 49 4c 3d 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF FIL=1 THEN DO; ┆
0x21ee4…21f04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21f04…21f13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21f13…21f33 (20, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 55 54 3b 20 ┆ ON ENDFILE GO TO UT; ┆
0x21f33…21f53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21f53…21f62 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21f62…21f82 (20, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 46 49 4c 31 29 20 49 4e 54 4f 28 ┆ READ FILE(FIL1) INTO(┆
0x21f82…21fa2 4b 4f 4e 54 4f 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆KONTOSTR); ┆
0x21fa2…21fb1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21fb1…21fd1 (20, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 35 3b 20 20 20 20 20 20 20 20 ┆ KONTO=KONTO5; ┆
0x21fd1…21ff1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x21ff1…22000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22000…22020 (20, 0, 50) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x22020…22040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22040…2204f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2204f…2206f (20, 0, 51) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x2206f…2208f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2208f…2209e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2209e…220be (20, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 55 54 3b 20 ┆ ON ENDFILE GO TO UT; ┆
0x220be…220de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x220de…220ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x220ed…2210d (20, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 46 49 4c 31 29 20 49 4e 54 4f 28 ┆ READ FILE(FIL1) INTO(┆
0x2210d…2212d 55 4b 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UKSTR); ┆
0x2212d…2213c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2213c…2215c (20, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 33 3b 20 20 20 20 20 20 20 20 ┆ KONTO=KONTO3; ┆
0x2215c…2217c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2217c…2218b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2218b…221ab (20, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 20 28 4b 4f 4e 54 4f 2c 34 2c 32 29 20 3d 20 ┆ SUBSTR (KONTO,4,2) = ┆
0x221ab…221cb 27 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' '; ┆
0x221cb…221da 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x221da…221fa (20, 0, 56) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x221fa…2221a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2221a…22229 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22229…22249 (20, 0, 57) 20 20 20 20 20 20 20 20 49 46 20 28 53 55 42 53 54 52 28 4b 4f 4e 54 4f 2c 4a 2c 31 29 3d 27 20 ┆ IF (SUBSTR(KONTO,J,1)=' ┆
0x22249…22269 27 29 20 26 20 28 53 3d 27 32 27 29 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 ┆') & (S='2') THEN GO TO L1; ┆
0x22269…22278 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22278…22298 (20, 0, 58) 20 20 20 20 20 20 20 20 4b 20 3d 20 4a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K = J; ┆
0x22298…222b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x222b8…222c7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x222c7…222e7 (20, 0, 59) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 52 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL STRGEN; ┆
0x222e7…22307 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22307…22316 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22316…22336 (20, 0, 60) 20 20 20 20 20 20 20 20 49 46 20 53 20 3d 20 27 31 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 ┆ IF S = '1' THEN DO; ┆
0x22336…22356 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22356…22365 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22365…22385 (20, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 54 4f 52 45 44 3b 20 20 20 20 20 20 20 20 ┆ CALL KTORED; ┆
0x22385…223a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x223a5…223b4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x223b4…223d4 (20, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x223d4…223f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x223f4…22403 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22403…22423 (20, 0, 63) 20 20 20 20 20 20 20 20 49 46 20 53 20 3d 20 27 31 27 20 26 20 4e 20 7f 3d 20 4c 20 2b 20 31 20 ┆ IF S = '1' & N = L + 1 ┆
0x22423…22443 54 48 45 4e 20 47 4f 20 54 4f 20 4c 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN GO TO L0; ┆
0x22443…22452 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22452…22472 (20, 0, 64) 2f 2a 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 4c 49 53 54 20 28 27 53 3d 20 27 2c 53 29 3b ┆/* PUT SKIP LIST ('S= ',S);┆
0x22472…22492 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2f 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ */ ┆
0x22492…224a1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x224a1…224c1 (20, 0, 65) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x224c1…224e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x224e1…224f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x224f0…22510 (20, 0, 66) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L0; ┆
0x22510…22530 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22530…2253f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2253f…2255f (20, 0, 67) 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: ┆
0x2255f…2257f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2257f…2258e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2258e…225ae (20, 0, 68) 20 20 20 20 20 20 20 20 4c 20 3d 20 4c 20 2b 20 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L = L + 1; ┆
0x225ae…225ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x225ce…225dd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x225dd…225fd (20, 0, 69) 20 20 20 20 20 20 20 20 49 46 20 28 46 49 4c 20 3d 20 31 29 20 26 20 28 53 20 3d 20 27 31 27 29 ┆ IF (FIL = 1) & (S = '1')┆
0x225fd…2261d 20 26 20 28 4c 20 3c 20 35 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ & (L < 5) THEN DO; ┆
0x2261d…2262c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2262c…2264c (20, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x2264c…2266c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2266c…2267b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2267b…2269b (20, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x2269b…226bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x226bb…226ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x226ca…226ea (20, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x226ea…2270a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2270a…22719 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22719…22739 (20, 0, 73) 20 20 20 20 20 20 20 20 49 46 20 28 46 49 4c 20 7f 3d 20 31 29 20 26 20 28 53 20 3d 20 27 31 27 ┆ IF (FIL = 1) & (S = '1'┆
0x22739…22759 29 20 26 20 28 4c 20 3c 20 33 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆) & (L < 3) THEN DO; ┆
0x22759…22768 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22768…22788 (20, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 31 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL1; ┆
0x22788…227a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x227a8…227b7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x227b7…227d7 (20, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x227d7…227f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x227f7…22806 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22806…22826 (20, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x22826…22846 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22846…22855 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22855…22875 (20, 0, 77) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x22875…22895 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22895…228a4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x228a4…228c4 (20, 0, 78) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP(R); ┆
0x228c4…228e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x228e4…228f3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x228f3…22913 (20, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x22913…22933 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22933…22942 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x22942…22991 (20, 0, 80) 0x20[0x4f]
0x22991…229b1 (20, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x229b1…229d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x229d1…229e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x229e0…22a2f (21, 0, 0) DataSector[0x4f]
[…0x166…]
0x298a9…298c9 (25, 0, 31) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x298c9…298e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x298e9…298f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x298f8…29918 (25, 0, 32) 20 20 20 20 20 20 20 20 4b 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=1; ┆
0x29918…29938 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29938…29947 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29947…29967 (25, 0, 33) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 46 49 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN FIL; ┆
0x29967…29987 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29987…29996 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29996…299b6 (25, 0, 34) 20 20 20 20 20 20 20 20 4a 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ J=5; ┆
0x299b6…299d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x299d6…299e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x299e5…29a05 (25, 0, 35) 20 20 20 20 20 20 20 20 4c 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ L=5; ┆
0x29a05…29a25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29a25…29a34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29a34…29a54 (25, 0, 36) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 4; ┆
0x29a54…29a74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29a74…29a83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29a83…29aa3 (25, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 32 20 54 48 45 4e 20 4b 3d 36 3b 20 20 20 20 20 ┆ IF I=2 THEN K=6; ┆
0x29aa3…29ac3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29ac3…29ad2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29ad2…29af2 (25, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3d 33 20 54 48 45 4e 20 4b 3d 39 3b 20 20 20 20 20 ┆ IF I=3 THEN K=9; ┆
0x29af2…29b12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29b12…29b21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29b21…29b41 (25, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 7f 3d 31 20 54 48 45 4e 20 4c 3d 33 3b 20 20 20 20 ┆ IF I =1 THEN L=3; ┆
0x29b41…29b61 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29b61…29b70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29b70…29b90 (25, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 52 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=0; ┆
0x29b90…29bb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29bb0…29bbf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29bbf…29bdf (25, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 4d 3d 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=-1; ┆
0x29bdf…29bff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29bff…29c0e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29c0e…29c2e (25, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 53 54 41 43 4b 44 4a 3b 20 20 20 ┆ DO J=1 TO STACKDJ; ┆
0x29c2e…29c4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29c4e…29c5d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29c5d…29c7d (25, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 53 50 29 3d 46 45 4c 53 54 41 43 ┆ UNSPEC(SP)=FELSTAC┆
0x29c7d…29c9d 4b 2b 34 2a 28 4a 2d 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆K+4*(J-1); ┆
0x29c9d…29cac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29cac…29ccc (25, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 45 4c 54 59 50 3d 49 2a 32 2d 31 29 20 ┆ IF (FELTYP=I*2-1) ┆
0x29ccc…29cec 7c 20 28 46 45 4c 54 59 50 3d 49 2a 32 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 ┆ö (FELTYP=I*2) THEN DO; ┆
0x29cec…29cfb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29cfb…29d1b (25, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 36 20 54 48 45 4e 20 43 41 4c ┆ IF R<6 THEN CAL┆
0x29d1b…29d3b 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L RUB; ┆
0x29d3b…29d4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29d4a…29d6a (25, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4d 7f 3d 52 45 43 4e 52 20 54 48 45 ┆ IF M =RECNR THE┆
0x29d6a…29d8a 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆N DO; ┆
0x29d8a…29d99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29d99…29db9 (25, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 46 49 4c 29 3d ┆ UNSPEC(FIL)=┆
0x29db9…29dd9 52 45 43 4e 52 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RECNR; ┆
0x29dd9…29de8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29de8…29e08 (25, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 ┆ ON ERROR GO ┆
0x29e08…29e28 54 4f 20 46 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO FEL; ┆
0x29e28…29e37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29e37…29e57 (25, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 46 49 ┆ READ FILE(FI┆
0x29e57…29e77 4c 29 20 49 4e 54 4f 28 56 45 52 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L) INTO(VERSTR); ┆
0x29e77…29e86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29e86…29ea6 (25, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 3d 4b 4f 4e 54 4f 46 ┆ KONTO=KONTOF┆
0x29ea6…29ec6 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x29ec6…29ed5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29ed5…29ef5 (25, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 ┆ CALL BELRED(┆
0x29ef5…29f15 42 45 4c 4f 50 50 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆BELOPP,T14); ┆
0x29f15…29f24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29f24…29f44 (25, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 52 45 43 4e 52 3b 20 20 20 20 ┆ M=RECNR; ┆
0x29f44…29f64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29f64…29f73 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29f73…29f93 (25, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x29f93…29fb3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29fb3…29fc2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x29fc2…29fe2 (25, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 49 3c 34 20 54 48 45 4e 20 44 4f 3b ┆ IF I<4 THEN DO;┆
0x29fe2…2a002 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a002…2a011 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a011…2a031 (25, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 ┆ PUT SKIP EDI┆
0x2a031…2a051 54 28 56 45 52 4e 52 29 28 50 27 5a 5a 5a 5a 39 27 2c 58 28 35 29 29 28 53 55 42 53 54 52 28 4b ┆T(VERNR)(P'ZZZZ9',X(5))(SUBSTR(K┆
0x2a051…2a060 4f 4e 54 4f 2c 4b 2c 4c 29 29 20 20 20 20 20 ┆ONTO,K,L)) ┆
0x2a060…2a080 (25, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 36 29 29 28 54 31 34 29 28 ┆ (A(6))(T14)(┆
0x2a080…2a0a0 41 28 31 39 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(19)); ┆
0x2a0a0…2a0af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a0af…2a0cf (25, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 45 4c 54 59 50 3d 49 2a ┆ IF FELTYP=I*┆
0x2a0cf…2a0ef 32 20 54 48 45 4e 20 50 55 54 20 45 44 49 54 28 50 44 41 54 55 4d 2b 37 38 30 30 30 30 29 28 41 ┆2 THEN PUT EDIT(PDATUM+780000)(A┆
0x2a0ef…2a0fe 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x2a0fe…2a11e (25, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2a11e…2a13e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a13e…2a14d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a14d…2a16d (25, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x2a16d…2a18d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a18d…2a19c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a19c…2a1bc (25, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 45 4c 54 59 50 3d 49 2a ┆ IF FELTYP=I*┆
0x2a1bc…2a1dc 32 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 56 45 52 4e 52 29 28 50 27 5a 5a ┆2 THEN PUT SKIP EDIT(VERNR)(P'ZZ┆
0x2a1dc…2a1eb 5a 5a 39 27 2c 58 28 35 29 29 20 20 20 20 20 ┆ZZ9',X(5)) ┆
0x2a1eb…2a20b (25, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 4b 4f 4e 54 31 29 28 41 28 35 29 ┆ (KONT1)(A(5)┆
0x2a20b…2a22b 29 28 27 2e 27 29 28 41 29 28 4b 4f 4e 54 32 29 28 41 28 33 29 29 28 27 2e 78 78 78 27 29 28 41 ┆)('.')(A)(KONT2)(A(3))('.xxx')(A┆
0x2a22b…2a23a 28 38 29 29 28 54 31 34 29 28 41 29 3b 20 20 ┆(8))(T14)(A); ┆
0x2a23a…2a25a (25, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 53 4b 49 ┆ ELSE PUT SKI┆
0x2a25a…2a27a 50 20 45 44 49 54 28 56 45 52 4e 52 29 28 50 27 5a 5a 5a 5a 39 27 2c 58 28 35 29 29 28 4b 4f 4e ┆P EDIT(VERNR)(P'ZZZZ9',X(5))(KON┆
0x2a27a…2a289 54 31 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆T1) ┆
0x2a289…2a2a9 (25, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 29 29 28 27 2e 78 78 78 ┆ (A(5))('.xxx┆
0x2a2a9…2a2c9 2e 27 29 28 41 28 35 29 29 28 4b 4f 4e 54 33 29 28 41 28 37 29 29 28 54 31 34 29 28 41 29 3b 20 ┆.')(A(5))(KONT3)(A(7))(T14)(A); ┆
0x2a2c9…2a2d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a2d8…2a2f8 (25, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2a2f8…2a318 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a318…2a327 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a327…2a347 (25, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x2a347…2a367 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a367…2a376 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a376…2a396 (25, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2a396…2a3b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a3b6…2a3c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a3c5…2a3e5 (25, 0, 67) 46 45 4c 3a 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FEL: END; ┆
0x2a3e5…2a405 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a405…2a414 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a414…2a434 (25, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 52 29 3b 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP(R); ┆
0x2a434…2a454 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a454…2a463 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a463…2a483 (25, 0, 69) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x2a483…2a4a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a4a3…2a4b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a4b2…2a501 (25, 0, 70) 0x20[0x4f]
0x2a501…2a521 (25, 0, 71) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x2a521…2a541 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a541…2a550 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a550…2a570 (25, 0, 72) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x2a570…2a590 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a590…2a59f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a59f…2a5bf (25, 0, 73) 20 20 20 20 20 20 20 20 49 46 20 28 53 49 44 41 7f 3d 31 29 20 7c 20 28 59 7f 3d 27 31 20 27 29 ┆ IF (SIDA =1) ö (Y ='1 ')┆
0x2a5bf…2a5df 20 54 48 45 4e 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 ┆ THEN CALL PLOAD('Q '); ┆
0x2a5df…2a5ee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a5ee…2a60e (25, 0, 74) 20 20 20 20 20 20 20 20 49 20 3d 20 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I = 5; ┆
0x2a60e…2a62e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a62e…2a63d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a63d…2a65d (25, 0, 75) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL RUB; ┆
0x2a65d…2a67d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a67d…2a68c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a68c…2a6ac (25, 0, 76) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 20 20 20 20 20 20 ┆ PUT SKIP(2) EDIT(' ┆
0x2a6ac…2a6cc 20 2a 2a 2a 2a 20 20 49 4e 47 41 20 49 46 52 5d 47 41 53 41 54 54 41 20 4b 4f 4e 54 45 52 49 4e ┆ **** INGA IFRÅGASATTA KONTERIN┆
0x2a6cc…2a6db 47 41 52 20 20 2a 2a 2a 2a 27 29 28 41 29 3b ┆GAR ****')(A);┆
0x2a6db…2a6fb (25, 0, 77) 20 20 20 20 20 20 20 20 52 20 3d 20 52 20 2d 20 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R = R - 2; ┆
0x2a6fb…2a71b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a71b…2a72a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a72a…2a74a (25, 0, 78) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 28 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP (R); ┆
0x2a74a…2a76a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a76a…2a779 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a779…2a799 (25, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 56 38 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('V8 '); ┆
0x2a799…2a7b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a7b9…2a7c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a7c8…2a817 (25, 0, 80) 0x20[0x4f]
0x2a817…2a837 (25, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x2a837…2a857 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a857…2a866 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x2a866…2a8b5 (26, 0, 0) DataSector[0x4f]
[…0x137…]
0x308ae…308fd (29, 0, 66) 0x00[0x4f]
[…0xe…]
0x30d4f…30d6f (29, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x30d6f…30d8f ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x30d8f…30d9e ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x30d9e…30ded (30, 0, 0) DataSector[0x4f]
[…0x164…]
0x37bc9…37be9 (34, 0, 29) 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3c 4b 4f 4e 54 4f 4e 52 42 20 54 48 45 4e 20 44 4f 3b ┆ IF T11<KONTONRB THEN DO;┆
0x37be9…37c09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37c09…37c18 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37c18…37c38 (34, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3e 4b 4f 4e 54 4f 4e 52 56 20 54 48 45 4e 20 ┆ IF T11>KONTONRV THEN ┆
0x37c38…37c58 46 41 53 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆FAS=3; ┆
0x37c58…37c67 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37c67…37c87 (34, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 41 53 3d 30 20 54 48 45 4e 20 48 41 45 4c 4e 52 54 ┆ IF FAS=0 THEN HAELNRT┆
0x37c87…37ca7 3d 36 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=6; ┆
0x37ca7…37cb6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37cb6…37cd6 (34, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 41 53 3d 32 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF FAS=2 THEN GO TO F┆
0x37cd6…37cf6 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x37cf6…37d05 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37d05…37d25 (34, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 46 41 53 3d 33 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF FAS=3 THEN DO; ┆
0x37d25…37d45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37d45…37d54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37d54…37d74 (34, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 ┆ CALL SKRIV; ┆
0x37d74…37d94 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37d94…37da3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37da3…37dc3 (34, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 48 41 45 4c 4e 52 54 3d 36 3b 20 20 20 20 20 20 20 20 ┆ HAELNRT=6; ┆
0x37dc3…37de3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37de3…37df2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37df2…37e12 (34, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x37e12…37e32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37e32…37e41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37e41…37e61 (34, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 46 41 53 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FAS=1; ┆
0x37e61…37e81 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37e81…37e90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37e90…37eb0 (34, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 42 59 47 47 3b 20 20 20 20 20 20 ┆ CALL STACKBYGG; ┆
0x37eb0…37ed0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37ed0…37edf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37edf…37eff (34, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 52 41 4e 53 50 4f 53 54 3b 20 20 20 20 20 20 ┆ CALL TRANSPOST; ┆
0x37eff…37f1f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37f1f…37f2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37f2e…37f4e (34, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x37f4e…37f6e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37f6e…37f7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37f7d…37f9d (34, 0, 41) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x37f9d…37fbd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37fbd…37fcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x37fcc…37fec (34, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3d 4b 4f 4e 54 4f 4e 52 42 20 54 48 45 4e 20 44 4f 3b ┆ IF T11=KONTONRB THEN DO;┆
0x37fec…3800c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3800c…3801b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3801b…3803b (34, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 20 ┆ IF T11='99999999999' ┆
0x3803b…3805b 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN GO TO UT; ┆
0x3805b…3806a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3806a…3808a (34, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 46 41 53 3d 31 29 20 7c 20 28 46 41 53 3d 33 29 20 ┆ IF (FAS=1) ö (FAS=3) ┆
0x3808a…380aa 54 48 45 4e 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆THEN CALL SKRIV; ┆
0x380aa…380b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x380b9…380d9 (34, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 46 41 53 3d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FAS=2; ┆
0x380d9…380f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x380f9…38108 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38108…38128 (34, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 43 4b 42 59 47 47 3b 20 20 20 20 20 20 ┆ CALL STACKBYGG; ┆
0x38128…38148 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38148…38157 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38157…38177 (34, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 54 52 41 4e 53 50 4f 53 54 3b 20 20 20 20 20 20 ┆ CALL TRANSPOST; ┆
0x38177…38197 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38197…381a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x381a6…381c6 (34, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x381c6…381e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x381e6…381f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x381f5…38215 (34, 0, 49) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x38215…38235 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38235…38244 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38244…38264 (34, 0, 50) 20 20 20 20 20 20 20 20 49 46 20 54 31 31 3e 4b 4f 4e 54 4f 4e 52 42 20 54 48 45 4e 20 44 4f 3b ┆ IF T11>KONTONRB THEN DO;┆
0x38264…38284 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38284…38293 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38293…382b3 (34, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 46 41 53 3d 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ FAS=3; ┆
0x382b3…382d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x382d3…382e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x382e2…38302 (34, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 56 45 52 50 4f 53 54 3b 20 20 20 20 20 20 20 20 ┆ CALL VERPOST; ┆
0x38302…38322 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38322…38331 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38331…38351 (34, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x38351…38371 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38371…38380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38380…383a0 (34, 0, 54) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x383a0…383c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x383c0…383cf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x383cf…3841e (34, 0, 55) 0x20[0x4f]
0x3841e…3843e (34, 0, 56) 4c 32 3a 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 56 45 ┆L2: PUT FILE(D) SKIP EDIT(VE┆
0x3843e…3845e 52 53 49 4f 4e 29 28 41 28 39 36 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆RSION)(A(96)) ┆
0x3845e…3846d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3846d…3848d (34, 0, 57) 20 20 20 20 20 20 20 20 28 27 49 4e 47 41 20 4b 4f 4e 54 45 52 49 4e 47 41 52 20 48 41 52 20 47 ┆ ('INGA KONTERINGAR HAR G┆
0x3848d…384ad 4a 4f 52 54 53 20 53 45 44 41 4e 20 53 45 4e 41 53 54 45 20 42 41 54 43 48 27 29 28 41 28 34 37 ┆JORTS SEDAN SENASTE BATCH')(A(47┆
0x384ad…384bc 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆)); ┆
0x384bc…384dc (34, 0, 58) 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x384dc…384fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x384fc…3850b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3850b…3852b (34, 0, 59) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x3852b…3854b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3854b…3855a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3855a…3857a (34, 0, 60) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x3857a…3859a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x3859a…385a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x385a9…385f8 (34, 0, 61) 0x20[0x4f]
0x385f8…38618 (34, 0, 62) 55 54 3a 20 20 20 20 20 43 41 4c 4c 20 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: CALL SKRIV; ┆
0x38618…38638 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38638…38647 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38647…38667 (34, 0, 63) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 46 ┆ IF RCODE =0 THEN GO TO F┆
0x38667…38687 45 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EL; ┆
0x38687…38696 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38696…386b6 (34, 0, 64) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 56 45 52 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE VERUT; ┆
0x386b6…386d6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x386d6…386e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x386e5…38705 (34, 0, 65) 20 20 20 20 20 20 20 20 44 41 54 55 4d 32 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DATUM2=DATUM; ┆
0x38705…38725 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38725…38734 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38734…38754 (34, 0, 66) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 20 20 20 20 32 27 ┆ PUT SKIP(2) EDIT(' 2'┆
0x38754…38774 29 28 41 28 31 31 29 29 28 44 41 54 55 4d 31 29 28 41 28 31 30 29 29 28 44 41 54 55 4d 32 29 28 ┆)(A(11))(DATUM1)(A(10))(DATUM2)(┆
0x38774…38783 41 28 37 29 29 20 20 20 20 20 20 20 20 20 20 ┆A(7)) ┆
0x38783…387a3 (34, 0, 67) 20 20 20 20 20 20 20 20 28 54 50 4f 53 54 41 4e 54 29 28 50 50 31 29 28 41 4e 54 41 4c 50 31 29 ┆ (TPOSTANT)(PP1)(ANTALP1)┆
0x387a3…387c3 28 50 50 31 29 28 41 4e 54 41 4c 50 32 29 28 50 50 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(PP1)(ANTALP2)(PP1) ┆
0x387c3…387d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x387d2…387f2 (34, 0, 68) 20 20 20 20 20 20 20 20 28 54 50 4f 53 54 41 4e 54 2b 41 4e 54 41 4c 50 31 2d 41 4e 54 41 4c 50 ┆ (TPOSTANT+ANTALP1-ANTALP┆
0x387f2…38812 32 29 28 50 50 31 29 20 53 4b 49 50 28 52 41 44 41 4e 54 20 2d 20 31 31 29 3b 20 20 20 20 20 20 ┆2)(PP1) SKIP(RADANT - 11); ┆
0x38812…38821 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38821…38841 (34, 0, 69) 20 20 20 20 20 20 20 20 52 45 57 52 49 54 45 20 46 49 4c 45 28 4b 4f 4e 54 52 4f 4c 29 20 46 52 ┆ REWRITE FILE(KONTROL) FR┆
0x38841…38861 4f 4d 28 4b 4f 4e 54 52 4f 4c 32 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OM(KONTROL2); ┆
0x38861…38870 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38870…38890 (34, 0, 70) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT1; ┆
0x38890…388b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x388b0…388bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x388bf…3890e (34, 0, 71) 0x20[0x4f]
[…0x1…]
0x3895d…3897d (34, 0, 73) 46 45 4c 3a 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 46 49 4c ┆FEL: IF RCODE =0 THEN PUT FIL┆
0x3897d…3899d 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 46 45 4c 54 41 42 28 52 43 4f 44 45 29 29 28 41 28 ┆E(D) SKIP EDIT(FELTAB(RCODE))(A(┆
0x3899d…389ac 34 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 ┆47)); ┆
0x389ac…389cc (34, 0, 74) 20 20 20 20 20 20 20 20 45 4c 53 45 20 50 55 54 20 45 44 49 54 28 27 46 41 53 20 3d 20 27 29 28 ┆ ELSE PUT EDIT('FAS = ')(┆
0x389cc…389ec 41 28 36 29 29 28 46 41 53 29 28 41 28 34 31 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(6))(FAS)(A(41)); ┆
0x389ec…389fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x389fb…38a1b (34, 0, 75) 20 20 20 20 20 20 20 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 27 27 29 3b 20 20 20 20 20 20 ┆ GET SKIP LIST(''); ┆
0x38a1b…38a3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a3b…38a4a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a4a…38a6a (34, 0, 76) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 53 4c 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO SLUT; ┆
0x38a6a…38a8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a8a…38a99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38a99…38ae8 (34, 0, 77) 0x20[0x4f]
0x38ae8…38b08 (34, 0, 78) 53 4c 55 54 3a 53 4c 55 54 31 3a 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT:SLUT1:D=DATUM; ┆
0x38b08…38b28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b28…38b37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b37…38b57 (34, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4c 4f 41 44 28 27 53 4f 52 54 54 45 53 54 20 56 45 52 42 ┆ CALL LOAD('SORTTEST VERB┆
0x38b57…38b77 45 4c 4f 50 20 34 20 31 31 20 30 20 51 27 2c 32 36 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ELOP 4 11 0 Q',26); ┆
0x38b77…38b86 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38b86…38bd5 (34, 0, 80) 0x20[0x4f]
0x38bd5…38bf5 (34, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x38bf5…38c15 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38c15…38c24 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x38c24…38c73 (35, 0, 0) DataSector[0x4f]
[…0xaf…]
0x3c274…3c2c3 (37, 0, 12) 0x00[0x4f]
[…0x44…]
0x3d7bf…3d7df (37, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x3d7df…3d7ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x3d7ff…3d80e ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x3d80e…3d85d (38, 0, 0) DataSector[0x4f]
[…0x9a…]
0x407e3…40832 (39, 0, 73) 0x00[0x4f]
[…0x7…]
0x40a5b…40a7b (39, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x40a7b…40a9b ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x40a9b…40aaa ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x40aaa…40af9 (40, 0, 0) DataSector[0x4f]
[…0x276…]
0x4cd63…4cd83 (47, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 52 4b 4f 4e ┆ PUT SKIP EDIT(RKON┆
0x4cd83…4cda3 54 4f 31 29 28 58 28 31 32 29 2c 41 28 34 31 29 29 28 54 31 34 29 28 41 28 33 33 29 29 28 54 34 ┆TO1)(X(12),A(41))(T14)(A(33))(T4┆
0x4cda3…4cdb2 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x4cdb2…4cdd2 (47, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x4cdd2…4cdf2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cdf2…4ce01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce01…4ce21 (47, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4ce21…4ce41 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce41…4ce50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce50…4ce70 (47, 0, 60) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4ce70…4ce90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce90…4ce9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ce9f…4cebf (47, 0, 61) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x4cebf…4cedf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cedf…4ceee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4ceee…4cf0e (47, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3e 3d 4b 4f 4e 54 4f 32 20 54 48 ┆ IF KONTONR>=KONTO2 TH┆
0x4cf0e…4cf2e 45 4e 20 4b 4f 4e 54 4f 4e 52 3d 27 53 4c 55 54 39 39 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 ┆EN KONTONR='SLUT9999999'; ┆
0x4cf2e…4cf3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cf3d…4cf5d (47, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 4b 4f 4e 54 4f 4e 52 47 20 ┆ IF KONTONR =KONTONRG ┆
0x4cf5d…4cf7d 54 48 45 4e 20 43 41 4c 4c 20 53 4b 52 49 56 5f 53 55 4d 4d 41 3b 20 20 20 20 20 20 20 20 20 20 ┆THEN CALL SKRIV_SUMMA; ┆
0x4cf7d…4cf8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cf8c…4cfac (47, 0, 64) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4cfac…4cfcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cfcc…4cfdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4cfdb…4cffb (47, 0, 65) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 53 4c 55 54 39 39 39 39 39 39 39 27 ┆ IF KONTONR='SLUT9999999'┆
0x4cffb…4d01b 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN GO TO UT; ┆
0x4d01b…4d02a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d02a…4d04a (47, 0, 66) 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 43 41 4c 4c 20 50 ┆ IF LISTTYP=1 THEN CALL P┆
0x4d04a…4d06a 4f 53 54 53 4b 52 49 56 3b 20 20 20 20 20 20 2f 2a 20 20 20 20 20 20 20 4b 4f 4e 54 4f 55 54 44 ┆OSTSKRIV; /* KONTOUTD┆
0x4d06a…4d079 52 41 47 20 20 2a 2f 20 20 20 20 20 20 20 20 ┆RAG */ ┆
0x4d079…4d099 (47, 0, 67) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 53 55 4d 4d 41 28 31 29 2b 42 45 4c 4f 50 50 ┆ SUMMA(1)=SUMMA(1)+BELOPP┆
0x4d099…4d0b9 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4d0b9…4d0c8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d0c8…4d0e8 (47, 0, 68) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 2b 31 3b ┆ ANTAL_KONT=ANTAL_KONT+1;┆
0x4d0e8…4d108 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d108…4d117 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d117…4d137 (47, 0, 69) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x4d137…4d157 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d157…4d166 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d166…4d1b5 (47, 0, 70) 0x20[0x4f]
0x4d1b5…4d1d5 (47, 0, 71) 55 54 3a 20 20 20 20 20 49 46 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 20 54 48 45 4e ┆UT: IF TOT_ANTAL_KONT=0 THEN┆
0x4d1d5…4d1f5 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x4d1f5…4d204 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d204…4d224 (47, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x4d224…4d244 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d244…4d253 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d253…4d273 (47, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 2a 2a 2a ┆ PUT SKIP(2) EDIT('***┆
0x4d273…4d293 2a 20 20 49 4e 47 45 4e 20 4b 4f 4e 54 45 52 49 4e 47 20 49 4e 4f 4d 20 42 45 47 5b 52 54 20 4f ┆* INGEN KONTERING INOM BEGÄRT O┆
0x4d293…4d2a2 4d 52 5d 44 45 27 29 28 41 29 3b 20 20 20 20 ┆MRÅDE')(A); ┆
0x4d2a2…4d2c2 (47, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-2; ┆
0x4d2c2…4d2e2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d2e2…4d2f1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d2f1…4d311 (47, 0, 75) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x4d311…4d331 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d331…4d340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d340…4d360 (47, 0, 76) 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 28 52 29 ┆ IF R =0 THEN PUT SKIP(R)┆
0x4d360…4d380 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x4d380…4d38f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d38f…4d3de (47, 0, 77) 0x20[0x4f]
0x4d3de…4d3fe (47, 0, 78) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x4d3fe…4d41e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d41e…4d42d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d42d…4d44d (47, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x4d44d…4d46d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d46d…4d47c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d47c…4d4cb (47, 0, 80) 0x20[0x4f]
0x4d4cb…4d4eb (47, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x4d4eb…4d50b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d50b…4d51a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x4d51a…4d569 (48, 0, 0) DataSector[0x4f]
[…0x11f…]
0x52dfa…52e49 (51, 0, 42) 0x00[0x4f]
[…0x27…]
0x53a52…53aa1 (52, 0, 0) DataSector[0x4f]
[…0x9e…]
0x56b63…56bb2 (53, 0, 77) 0x00[0x4f]
[…0x3…]
0x56c9f…56cbf (53, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x56cbf…56cdf ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x56cdf…56cee ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x56cee…56d3d (54, 0, 0) DataSector[0x4f]
[…0x253…]
0x624da…62529 (61, 0, 22) 0x00[0x4f]
[…0x3a…]
0x6370f…6372f (61, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x6372f…6374f ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x6374f…6375e ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x6375e…6385d (62, 0, 0) DataSector[0xff]
[…0x25…]
0x65d38…65e37 (63, 0, 8) 0x00[0xff]
[…0x32…]
0x69005…69025 (64, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x69025…69045 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x5…]
0x690e5…69104 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
0x69104…69153 (65, 0, 0) DataSector[0x4f]
[…0x27f…]
0x75684…756a4 (72, 0, 66) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 27 39 39 39 39 39 39 39 39 39 39 39 ┆ IF KONTONR ='99999999999┆
0x756a4…756c4 27 20 54 48 45 4e 20 52 43 4f 44 45 3d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆' THEN RCODE=1; ┆
0x756c4…756d3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x756d3…756f3 (72, 0, 67) 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x756f3…75713 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75713…75722 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75722…75742 (72, 0, 68) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x75742…75762 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75762…75771 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75771…75791 (72, 0, 69) 53 4b 52 49 56 5f 53 55 4d 4d 41 3a 20 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKRIV_SUMMA: PROC; ┆
0x75791…757b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x757b1…757c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x757c0…757e0 (72, 0, 70) 53 4b 52 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR0: ┆
0x757e0…75800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75800…7580f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7580f…7582f (72, 0, 71) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4b 52 30 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SKR0'); ┆
0x7582f…7584f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7584f…7585e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7585e…7587e (72, 0, 72) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x7587e…7589e 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x7589e…758ad 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x758ad…758cd (72, 0, 73) 20 20 20 20 20 20 20 20 54 31 33 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3b 20 20 20 20 ┆ T13=' '; ┆
0x758cd…758ed 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x758ed…758fc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x758fc…7591c (72, 0, 74) 20 20 20 20 20 20 20 20 54 31 31 3d 54 31 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T11=T13; ┆
0x7591c…7593c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7593c…7594b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7594b…7596b (72, 0, 75) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 32 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=2 TO 11; ┆
0x7596b…7598b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7598b…7599a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7599a…759ba (72, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 49 29 3d 53 55 4d 4d 41 28 49 29 2b 53 55 4d ┆ SUMMA(I)=SUMMA(I)+SUM┆
0x759ba…759da 4d 41 28 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MA(1); ┆
0x759da…759e9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x759e9…75a09 (72, 0, 77) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x75a09…75a29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75a29…75a38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75a38…75a58 (72, 0, 78) 20 20 20 20 20 20 20 20 54 34 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 ┆ T4=ANTAL_KONT; ┆
0x75a58…75a78 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75a78…75a87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75a87…75aa7 (72, 0, 79) 20 20 20 20 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 54 4f 54 5f 41 4e 54 41 4c ┆ TOT_ANTAL_KONT=TOT_ANTAL┆
0x75aa7…75ac7 5f 4b 4f 4e 54 2b 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆_KONT+ANTAL_KONT; ┆
0x75ac7…75ad6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75ad6…75b25 (72, 0, 80) 0x20[0x4f]
[…0x2…]
0x75bc3…75be3 (73, 0, 1) 20 20 20 20 20 20 20 20 44 4f 20 49 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO I=1 TO 11; ┆
0x75be3…75c03 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75c03…75c12 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75c12…75c32 (73, 0, 2) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 49 2c ┆ IF SUBSTR(KONTONRG,I,┆
0x75c32…75c52 31 29 7f 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 2c 49 2c 31 29 20 54 48 45 4e 20 47 4f 20 ┆1) =SUBSTR(KONTONR,I,1) THEN GO ┆
0x75c52…75c61 54 4f 20 53 4b 52 31 3b 20 20 20 20 20 20 20 ┆TO SKR1; ┆
0x75c61…75c81 (73, 0, 3) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x75c81…75ca1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75ca1…75cb0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75cb0…75cd0 (73, 0, 4) 53 4b 52 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR1: ┆
0x75cd0…75cf0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75cf0…75cff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75cff…75d1f (73, 0, 5) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4b 52 31 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SKR1'); ┆
0x75d1f…75d3f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75d3f…75d4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75d4e…75d6e (73, 0, 6) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x75d6e…75d8e 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x75d8e…75d9d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75d9d…75dbd (73, 0, 7) 20 20 20 20 20 20 20 20 44 4f 20 4e 3d 31 31 20 54 4f 20 31 20 42 59 2d 31 3b 20 20 20 20 20 20 ┆ DO N=11 TO 1 BY-1; ┆
0x75dbd…75ddd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75ddd…75dec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75dec…75e0c (73, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 4e 2c ┆ IF SUBSTR(KONTONRG,N,┆
0x75e0c…75e2c 31 29 7f 3d 27 30 27 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 4b 52 32 3b 20 20 20 20 20 20 20 20 ┆1) ='0' THEN GO TO SKR2; ┆
0x75e2c…75e3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75e3b…75e5b (73, 0, 9) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x75e5b…75e7b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75e7b…75e8a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75e8a…75eaa (73, 0, 10) 53 4b 52 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SKR2: ┆
0x75eaa…75eca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75eca…75ed9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75ed9…75ef9 (73, 0, 11) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4b 52 32 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SKR2'); ┆
0x75ef9…75f19 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75f19…75f28 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75f28…75f48 (73, 0, 12) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x75f48…75f68 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x75f68…75f77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75f77…75f97 (73, 0, 13) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<8 THEN CALL RUB; ┆
0x75f97…75fb7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75fb7…75fc6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x75fc6…75fe6 (73, 0, 14) 20 20 20 20 20 20 20 20 4b 3d 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=11; ┆
0x75fe6…76006 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76006…76015 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76015…76035 (73, 0, 15) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 32 2d 49 3b 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 12-I; ┆
0x76035…76055 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76055…76064 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76064…76084 (73, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 54 41 42 28 31 32 2d 4a 29 3d 31 20 54 48 45 4e 20 ┆ IF STAB(12-J)=1 THEN ┆
0x76084…760a4 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x760a4…760b3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x760b3…760d3 (73, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 32 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF R<2 THEN CALL R┆
0x760d3…760f3 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB; ┆
0x760f3…76102 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76102…76122 (73, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 31 2c 4b 2c 31 29 3d 27 2a ┆ SUBSTR(T11,K,1)='*┆
0x76122…76142 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x76142…76151 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76151…76171 (73, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4b 3d 4b 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ K=K-1; ┆
0x76171…76191 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76191…761a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x761a0…761c0 (73, 0, 20) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 ┆ CALL BELRED(SUMMA(┆
0x761c0…761e0 4a 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆J),T14); ┆
0x761e0…761ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x761ef…7620f (73, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ M=0; ┆
0x7620f…7622f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7622f…7623e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7623e…7625e (73, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 31 33 3d 27 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ T13=' ┆
0x7625e…7627e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x7627e…7628d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7628d…762ad (73, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 4f 20 4c 3d 31 20 54 4f 20 31 32 2d 4a 3b 20 20 20 ┆ DO L=1 TO 12-J; ┆
0x762ad…762cd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x762cd…762dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x762dc…762fc (73, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 4d 2b 31 3b 20 20 20 20 20 20 20 20 20 ┆ M=M+1; ┆
0x762fc…7631c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7631c…7632b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7632b…7634b (73, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4c 3d 36 29 20 7c 20 28 4c 3d 39 ┆ IF (L=6) ö (L=9┆
0x7634b…7636b 29 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) THEN DO; ┆
0x7636b…7637a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7637a…7639a (73, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4d ┆ SUBSTR(T13,M┆
0x7639a…763ba 2c 31 29 3d 27 2e 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆,1)='.'; ┆
0x763ba…763c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x763c9…763e9 (73, 0, 27) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 3d 4d 2b 31 3b 20 20 20 20 20 20 ┆ M=M+1; ┆
0x763e9…76409 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76409…76418 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76418…76438 (73, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x76438…76458 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76458…76467 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76467…76487 (73, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 4d 2c 31 29 ┆ SUBSTR(T13,M,1)┆
0x76487…764a7 3d 53 55 42 53 54 52 28 4b 4f 4e 54 4f 4e 52 47 2c 4c 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 ┆=SUBSTR(KONTONRG,L,1); ┆
0x764a7…764b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x764b6…764d6 (73, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x764d6…764f6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x764f6…76505 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76505…76525 (73, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 ┆ IF LISTTYP=1 THEN ┆
0x76525…76545 4d 3d 32 38 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆M=28; ┆
0x76545…76554 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76554…76574 (73, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 4d 3d 32 3b 20 20 20 20 20 20 20 20 20 ┆ ELSE M=2; ┆
0x76574…76594 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76594…765a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x765a3…765c3 (73, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 54 31 31 29 ┆ PUT SKIP EDIT(T11)┆
0x765c3…765e3 28 41 28 31 32 29 29 28 54 31 33 29 28 41 29 28 27 20 27 29 28 41 28 4d 29 29 28 54 31 34 29 28 ┆(A(12))(T13)(A)(' ')(A(M))(T14)(┆
0x765e3…765f2 41 28 33 33 29 29 28 54 34 29 28 41 29 3b 20 ┆A(33))(T4)(A); ┆
0x765f2…76612 (73, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 27 20 20 20 20 27 3b 20 20 20 20 20 20 20 20 ┆ T4=' '; ┆
0x76612…76632 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76632…76641 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76641…76661 (73, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x76661…76681 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76681…76690 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76690…766b0 (73, 0, 36) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x766b0…766d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x766d0…766df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x766df…766ff (73, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 4a 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA(J)=0; ┆
0x766ff…7671f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7671f…7672e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7672e…7674e (73, 0, 38) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x7674e…7676e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7676e…7677d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7677d…7679d (73, 0, 39) 20 20 20 20 20 20 20 20 4b 4f 4e 54 4f 4e 52 47 3d 4b 4f 4e 54 4f 4e 52 3b 20 20 20 20 20 20 20 ┆ KONTONRG=KONTONR; ┆
0x7679d…767bd 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x767bd…767cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x767cc…767ec (73, 0, 40) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SUMMA(1)=0; ┆
0x767ec…7680c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7680c…7681b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7681b…7683b (73, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 4b 7f 3d 31 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 ┆ IF K =11 THEN DO; ┆
0x7683b…7685b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7685b…7686a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7686a…7688a (73, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PUT SKIP; ┆
0x7688a…768aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x768aa…768b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x768b9…768d9 (73, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x768d9…768f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x768f9…76908 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76908…76928 (73, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 3b 20 20 20 20 20 20 20 20 ┆ ANTAL_KONT=0; ┆
0x76928…76948 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76948…76957 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76957…76977 (73, 0, 45) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x76977…76997 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76997…769a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x769a6…769c6 (73, 0, 46) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x769c6…769e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x769e6…769f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x769f5…76a15 (73, 0, 47) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x76a15…76a35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76a35…76a44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76a44…76a93 (73, 0, 48) 0x20[0x4f]
0x76a93…76ab3 (73, 0, 49) 50 4f 53 54 53 4b 52 49 56 3a 50 52 4f 43 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆POSTSKRIV:PROC; ┆
0x76ab3…76ad3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76ad3…76ae2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76ae2…76b02 (73, 0, 50) 50 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P0: ┆
0x76b02…76b22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76b22…76b31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76b31…76b51 (73, 0, 51) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P0'); ┆
0x76b51…76b71 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76b71…76b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76b80…76ba0 (73, 0, 52) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x76ba0…76bc0 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x76bc0…76bcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76bcf…76bef (73, 0, 53) 20 20 20 20 20 20 20 20 49 46 20 52 3c 38 20 54 48 45 4e 20 43 41 4c 4c 20 52 55 42 3b 20 20 20 ┆ IF R<8 THEN CALL RUB; ┆
0x76bef…76c0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76c0f…76c1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76c1e…76c3e (73, 0, 54) 20 20 20 20 20 20 20 20 49 46 20 56 45 52 4e 52 7f 3d 56 45 52 4e 52 54 20 54 48 45 4e 20 44 4f ┆ IF VERNR =VERNRT THEN DO┆
0x76c3e…76c5e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x76c5e…76c6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76c6d…76c8d (73, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 56 45 52 54 45 58 54 29 3d 56 45 52 4e 52 ┆ UNSPEC(VERTEXT)=VERNR┆
0x76c8d…76cad 2d 4b 4f 4e 53 54 41 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-KONSTANT; ┆
0x76cad…76cbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76cbc…76cdc (73, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 52 52 4f 52 20 47 4f 20 54 4f 20 50 33 3b 20 20 20 ┆ ON ERROR GO TO P3; ┆
0x76cdc…76cfc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76cfc…76d0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76d0b…76d2b (73, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 4f 4e 20 45 4e 44 46 49 4c 45 20 47 4f 20 54 4f 20 44 31 3b 20 ┆ ON ENDFILE GO TO D1; ┆
0x76d2b…76d4b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76d4b…76d5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76d5a…76d7a (73, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 46 49 4c 45 28 56 45 52 54 45 58 54 29 20 49 4e ┆ READ FILE(VERTEXT) IN┆
0x76d7a…76d9a 54 4f 28 54 53 54 52 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO(TSTR); ┆
0x76d9a…76da9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76da9…76dc9 (73, 0, 59) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 50 32 3b 20 20 20 20 20 20 20 20 20 ┆ GO TO P2; ┆
0x76dc9…76de9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76de9…76df8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76df8…76e18 (73, 0, 60) 50 33 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P3: ┆
0x76e18…76e38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76e38…76e47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76e47…76e67 (73, 0, 61) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 33 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P3'); ┆
0x76e67…76e87 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76e87…76e96 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76e96…76eb6 (73, 0, 62) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x76eb6…76ed6 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x76ed6…76ee5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76ee5…76f05 (73, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 54 45 58 54 3d 27 2a 2a 2a 2a 20 46 49 4e 4e 53 20 45 4a 27 3b ┆ TEXT='**** FINNS EJ';┆
0x76f05…76f25 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76f25…76f34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76f34…76f54 (73, 0, 64) 20 20 20 20 20 20 20 20 20 20 20 44 41 54 55 4d 54 3d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 ┆ DATUMT=PDATUM; ┆
0x76f54…76f74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76f74…76f83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76f83…76fa3 (73, 0, 65) 50 32 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆P2: ┆
0x76fa3…76fc3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76fc3…76fd2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x76fd2…76ff2 (73, 0, 66) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 50 32 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('P2'); ┆
0x76ff2…77012 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77012…77021 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77021…77041 (73, 0, 67) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x77041…77061 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x77061…77070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77070…77090 (73, 0, 68) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x77090…770b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x770b0…770bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x770bf…770df (73, 0, 69) 20 20 20 20 20 20 20 20 49 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=0; ┆
0x770df…770ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x770ff…7710e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7710e…7712e (73, 0, 70) 20 20 20 20 20 20 20 20 44 4f 20 4a 3d 31 20 54 4f 20 31 31 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ DO J=1 TO 11; ┆
0x7712e…7714e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7714e…7715d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7715d…7717d (73, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 28 4a 3d 36 29 20 7c 20 28 4a 3d 39 29 20 54 48 45 4e ┆ IF (J=6) ö (J=9) THEN┆
0x7717d…7719d 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x7719d…771ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x771ac…771cc (73, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x771cc…771ec 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x771ec…771fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x771fb…7721b (73, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 49 2c 31 29 3d 27 2e ┆ SUBSTR(T13,I,1)='.┆
0x7721b…7723b 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆'; ┆
0x7723b…7724a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7724a…7726a (73, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x7726a…7728a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7728a…77299 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77299…772b9 (73, 0, 75) 20 20 20 20 20 20 20 20 20 20 20 49 3d 49 2b 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=I+1; ┆
0x772b9…772d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x772d9…772e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x772e8…77308 (73, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 53 55 42 53 54 52 28 54 31 33 2c 49 2c 31 29 3d 53 55 42 53 54 ┆ SUBSTR(T13,I,1)=SUBST┆
0x77308…77328 52 28 4b 4f 4e 54 4f 4e 52 2c 4a 2c 31 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆R(KONTONR,J,1); ┆
0x77328…77337 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77337…77357 (73, 0, 77) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x77357…77377 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77377…77386 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77386…773a6 (73, 0, 78) 20 20 20 20 20 20 20 20 49 46 20 50 44 41 54 55 4d 3c 30 20 54 48 45 4e 20 50 44 41 54 55 4d 3d ┆ IF PDATUM<0 THEN PDATUM=┆
0x773a6…773c6 2d 50 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆-PDATUM; ┆
0x773c6…773d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x773d5…773f5 (73, 0, 79) 20 20 20 20 20 20 20 20 49 49 49 49 3d 44 41 54 55 4d 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IIII=DATUMT; ┆
0x773f5…77415 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77415…77424 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77424…77444 (73, 0, 80) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 49 4e 54 4f 43 48 28 49 49 49 49 2c 54 36 31 29 3b 20 ┆ CALL BINTOCH(IIII,T61); ┆
0x77444…77464 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77464…77473 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77473…77493 (73, 0, 81) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 49 4e 54 4f 43 48 28 50 44 41 54 55 4d 2c 54 36 32 29 ┆ CALL BINTOCH(PDATUM,T62)┆
0x77493…774b3 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x774b3…774c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x774c2…774e2 (74, 0, 0) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 42 45 4c 4f 50 50 2c 54 31 34 29 3b ┆ CALL BELRED(BELOPP,T14);┆
0x774e2…77502 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77502…77511 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77511…77531 (74, 0, 1) 20 20 20 20 20 20 20 20 49 46 20 54 36 31 3d 54 36 32 20 54 48 45 4e 20 54 36 32 3d 27 20 20 20 ┆ IF T61=T62 THEN T62=' ┆
0x77531…77551 20 20 20 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ '; ┆
0x77551…77560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77560…77580 (74, 0, 2) 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 31 32 29 ┆ PUT SKIP EDIT(' ')(A(12)┆
0x77580…775a0 29 28 54 31 33 29 28 41 28 31 38 29 29 28 54 36 31 29 28 41 28 38 29 29 28 54 36 32 29 28 41 28 ┆)(T13)(A(18))(T61)(A(8))(T62)(A(┆
0x775a0…775af 38 29 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆8)) ┆
0x775af…775cf (74, 0, 3) 20 20 20 20 20 20 20 20 28 56 45 52 4e 52 29 28 50 27 2d 2d 2d 2d 2d 39 27 2c 58 28 31 29 29 28 ┆ (VERNR)(P'-----9',X(1))(┆
0x775cf…775ef 54 31 34 29 28 41 28 31 38 29 29 28 54 45 58 54 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆T14)(A(18))(TEXT)(A); ┆
0x775ef…775fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x775fe…7761e (74, 0, 4) 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x7761e…7763e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7763e…7764d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7764d…7766d (74, 0, 5) 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN; ┆
0x7766d…7768d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7768d…7769c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7769c…776bc (74, 0, 6) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x776bc…776dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x776dc…776eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x776eb…7773a (74, 0, 7) 0x20[0x4f]
[…0x1…]
0x77789…777a9 (74, 0, 9) 2f 2a 20 20 48 20 5b 20 52 20 20 20 42 20 5c 20 52 20 4a 20 41 20 52 20 20 20 48 20 55 20 56 20 ┆/* H Ä R B Ö R J A R H U V ┆
0x777a9…777c9 55 20 44 20 50 20 52 20 4f 20 47 20 52 20 41 20 4d 20 4d 20 45 20 54 20 20 2a 2f 20 20 20 20 20 ┆U D P R O G R A M M E T */ ┆
0x777c9…777d8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x777d8…77827 (74, 0, 10) 0x20[0x4f]
[…0x1…]
0x77876…77896 (74, 0, 12) 53 54 41 52 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆START: ┆
0x77896…778b6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x778b6…778c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x778c5…778e5 (74, 0, 13) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 45 44 49 54 20 28 ┆ PUT FILE (D) SKIP EDIT (┆
0x778e5…77905 27 20 48 75 72 20 6d 7d 6e 67 61 20 72 61 64 65 72 20 68 61 72 20 62 6c 61 6e 6b 65 74 74 65 6e ┆' Hur många rader har blanketten┆
0x77905…77914 3f 20 27 29 20 28 41 28 34 35 29 29 3b 20 20 ┆? ') (A(45)); ┆
0x77914…77934 (74, 0, 14) 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 52 41 44 41 4e 54 29 3b 20 20 20 20 20 20 ┆ GET LIST (RADANT); ┆
0x77934…77954 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77954…77963 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77963…77983 (74, 0, 15) 20 20 20 20 20 20 20 20 49 46 20 52 41 44 41 4e 54 20 3c 20 33 30 20 7c 20 52 41 44 41 4e 54 20 ┆ IF RADANT < 30 ö RADANT ┆
0x77983…779a3 3e 20 38 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 53 54 41 52 54 3b 20 20 20 20 20 20 20 20 20 20 ┆> 80 THEN GO TO START; ┆
0x779a3…779b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x779b2…779d2 (74, 0, 16) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 43 48 45 43 4b 28 44 41 54 55 4d 29 3b 20 20 20 ┆ CALL DATCHECK(DATUM); ┆
0x779d2…779f2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x779f2…77a01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77a01…77a21 (74, 0, 17) 20 20 20 20 20 20 20 20 49 46 20 44 41 54 55 4d 3d 27 30 20 20 20 20 20 27 20 54 48 45 4e 20 43 ┆ IF DATUM='0 ' THEN C┆
0x77a21…77a41 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 20 20 20 20 20 20 20 20 20 ┆ALL PLOAD('Q '); ┆
0x77a41…77a50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77a50…77a70 (74, 0, 18) 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 20 28 27 48 5b 52 27 29 20 28 41 29 3b 20 ┆ PUT SKIP EDIT ('HÄR') (A); ┆
0x77a70…77a90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77a90…77a9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77a9f…77abf (74, 0, 19) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 29 3d 31 36 35 37 30 3b 20 20 20 20 20 20 20 20 ┆ UNSPEC(P)=16570; ┆
0x77abf…77adf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77adf…77aee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77aee…77b0e (74, 0, 20) 20 20 20 20 20 20 20 20 44 3d 27 30 27 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D='0'; ┆
0x77b0e…77b2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77b2e…77b3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77b3d…77b5d (74, 0, 21) 20 20 20 20 20 20 20 20 55 4e 53 50 45 43 28 50 50 29 3d 31 36 36 31 36 3b 20 20 20 20 20 20 20 ┆ UNSPEC(PP)=16616; ┆
0x77b5d…77b7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77b7d…77b8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77b8c…77bac (74, 0, 22) 20 20 20 20 20 20 20 4f 50 45 4e 20 52 45 44 54 52 41 43 45 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ OPEN REDTRACE; ┆
0x77bac…77bcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77bcc…77bdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77bdb…77bfb (74, 0, 23) 20 20 20 20 20 20 20 20 4f 50 45 4e 20 50 41 52 41 4d 45 54 52 3b 20 20 20 20 20 20 20 20 20 20 ┆ OPEN PARAMETR; ┆
0x77bfb…77c1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77c1b…77c2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77c2a…77c4a (74, 0, 24) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 59 52 44 41 54 41 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL STYRDATA; ┆
0x77c4a…77c6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77c6a…77c79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77c79…77c99 (74, 0, 25) 4c 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L0: ┆
0x77c99…77cb9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77cb9…77cc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77cc8…77ce8 (74, 0, 26) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4c 30 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('L0'); ┆
0x77ce8…77d08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77d08…77d17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77d17…77d37 (74, 0, 27) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x77d37…77d57 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x77d57…77d66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77d66…77d86 (74, 0, 28) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 41 52 41 4c 41 45 53 3b 20 20 20 20 20 20 20 20 20 20 ┆ CALL PARALAES; ┆
0x77d86…77da6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77da6…77db5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77db5…77e04 (74, 0, 29) 0x20[0x4f]
0x77e04…77e24 (74, 0, 30) 20 20 20 20 20 20 20 20 49 46 20 59 3d 27 36 20 27 20 7c 20 59 3d 27 37 20 27 20 54 48 45 4e 20 ┆ IF Y='6 ' ö Y='7 ' THEN ┆
0x77e24…77e44 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆DO; ┆
0x77e44…77e53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77e53…77e73 (74, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x77e73…77e93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77e93…77ea2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77ea2…77ec2 (74, 0, 32) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 56 31 32 20 20 20 20 20 27 ┆ CALL PLOAD('V12 '┆
0x77ec2…77ee2 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆); ┆
0x77ee2…77ef1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77ef1…77f11 (74, 0, 33) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x77f11…77f31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77f31…77f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77f40…77f60 (74, 0, 34) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 53 54 41 52 54 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 ┆ CALL STARTPOST; ┆
0x77f60…77f80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77f80…77f8f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77f8f…77faf (74, 0, 35) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 3d 31 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c 30 ┆ IF RCODE=1 THEN GO TO L0┆
0x77faf…77fcf 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x77fcf…77fde 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x77fde…77ffe (74, 0, 36) 4c 31 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆L1: ┆
0x77ffe…7801e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7801e…7802d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7802d…7804d (74, 0, 37) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 4c 31 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('L1'); ┆
0x7804d…7806d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7806d…7807c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7807c…7809c (74, 0, 38) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x7809c…780bc 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x780bc…780cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x780cb…780eb (74, 0, 39) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4f 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL POST; ┆
0x780eb…7810b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7810b…7811a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7811a…7813a (74, 0, 40) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 44 41 54 54 45 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DATTEST; ┆
0x7813a…7815a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7815a…78169 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78169…78189 (74, 0, 41) 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 4f 20 4c ┆ IF RCODE =0 THEN GO TO L┆
0x78189…781a9 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1; ┆
0x781a9…781b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x781b8…781d8 (74, 0, 42) 20 20 20 20 20 20 20 20 49 46 20 4f 46 46 53 45 54 3e 31 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 ┆ IF OFFSET>1 THEN DO; ┆
0x781d8…781f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x781f8…78207 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78207…78227 (74, 0, 43) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4b 4f 4e 54 4f 54 45 53 54 3b 20 20 20 20 20 20 ┆ CALL KONTOTEST; ┆
0x78227…78247 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78247…78256 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78256…78276 (74, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 43 4f 44 45 7f 3d 30 20 54 48 45 4e 20 47 4f 20 54 ┆ IF RCODE =0 THEN GO T┆
0x78276…78296 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O L1; ┆
0x78296…782a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x782a5…782c5 (74, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 ┆ IF KONTONR='999999999┆
0x782c5…782e5 39 39 27 20 54 48 45 4e 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆99' THEN DO; ┆
0x782e5…782f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x782f4…78314 (74, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 52 3c 33 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF R<3 THEN CALL R┆
0x78314…78334 55 42 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB; ┆
0x78334…78343 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78343…78363 (74, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 42 45 4c 52 45 44 28 53 55 4d 4d 41 28 ┆ CALL BELRED(SUMMA(┆
0x78363…78383 31 29 2c 54 31 34 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆1),T14); ┆
0x78383…78392 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78392…783b2 (74, 0, 48) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 34 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 ┆ T4=ANTAL_KONT; ┆
0x783b2…783d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x783d2…783e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x783e1…78401 (74, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 ┆ TOT_ANTAL_KONT=ANT┆
0x78401…78421 41 4c 5f 4b 4f 4e 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AL_KONT; ┆
0x78421…78430 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78430…78450 (74, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 20 45 44 49 54 28 52 4b 4f 4e ┆ PUT SKIP EDIT(RKON┆
0x78450…78470 54 4f 31 29 28 58 28 31 32 29 2c 41 28 34 31 29 29 28 54 31 34 29 28 41 28 33 33 29 29 28 54 34 ┆TO1)(X(12),A(41))(T14)(A(33))(T4┆
0x78470…7847f 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 20 ┆)(A); ┆
0x7847f…7849f (74, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-1; ┆
0x7849f…784bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x784bf…784ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x784ce…784ee (74, 0, 52) 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x784ee…7850e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7850e…7851d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7851d…7853d (74, 0, 53) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x7853d…7855d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7855d…7856c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7856c…7858c (74, 0, 54) 20 20 20 20 20 20 20 20 45 4c 53 45 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ELSE DO; ┆
0x7858c…785ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x785ac…785bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x785bb…785db (74, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3e 3d 4b 4f 4e 54 4f 32 20 54 48 ┆ IF KONTONR>=KONTO2 TH┆
0x785db…785fb 45 4e 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 3b 20 20 20 20 20 20 20 ┆EN KONTONR='99999999999'; ┆
0x785fb…7860a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7860a…7862a (74, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 7f 3d 4b 4f 4e 54 4f 4e 52 47 20 ┆ IF KONTONR =KONTONRG ┆
0x7862a…7864a 54 48 45 4e 20 43 41 4c 4c 20 53 4b 52 49 56 5f 53 55 4d 4d 41 3b 20 20 20 20 20 20 20 20 20 20 ┆THEN CALL SKRIV_SUMMA; ┆
0x7864a…78659 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78659…78679 (74, 0, 57) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x78679…78699 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78699…786a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x786a8…786c8 (74, 0, 58) 20 20 20 20 20 20 20 20 49 46 20 4b 4f 4e 54 4f 4e 52 3d 27 39 39 39 39 39 39 39 39 39 39 39 27 ┆ IF KONTONR='99999999999'┆
0x786c8…786e8 20 54 48 45 4e 20 47 4f 20 54 4f 20 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ THEN GO TO UT; ┆
0x786e8…786f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x786f7…78717 (74, 0, 59) 20 20 20 20 20 20 20 20 49 46 20 4c 49 53 54 54 59 50 3d 31 20 54 48 45 4e 20 43 41 4c 4c 20 50 ┆ IF LISTTYP=1 THEN CALL P┆
0x78717…78737 4f 53 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OSTSKRIV; ┆
0x78737…78746 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78746…78766 (74, 0, 60) 20 20 20 20 20 20 20 20 53 55 4d 4d 41 28 31 29 3d 53 55 4d 4d 41 28 31 29 2b 42 45 4c 4f 50 50 ┆ SUMMA(1)=SUMMA(1)+BELOPP┆
0x78766…78786 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x78786…78795 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78795…787b5 (74, 0, 61) 20 20 20 20 20 20 20 20 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 41 4e 54 41 4c 5f 4b 4f 4e 54 2b 31 3b ┆ ANTAL_KONT=ANTAL_KONT+1;┆
0x787b5…787d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x787d5…787e4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x787e4…78804 (74, 0, 62) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L1; ┆
0x78804…78824 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78824…78833 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78833…78853 (74, 0, 63) 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UT: ┆
0x78853…78873 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78873…78882 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78882…788a2 (74, 0, 64) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 55 54 27 29 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ RTP = ('UT'); ┆
0x788a2…788c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x788c2…788d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x788d1…788f1 (74, 0, 65) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x788f1…78911 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x78911…78920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78920…78940 (74, 0, 66) 20 20 20 20 20 20 20 20 49 46 20 54 4f 54 5f 41 4e 54 41 4c 5f 4b 4f 4e 54 3d 30 20 54 48 45 4e ┆ IF TOT_ANTAL_KONT=0 THEN┆
0x78940…78960 20 44 4f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ DO; ┆
0x78960…7896f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7896f…7898f (74, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 4f 55 54 50 55 54 28 31 2c 36 29 3b 20 20 20 20 ┆ CALL OUTPUT(1,6); ┆
0x7898f…789af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x789af…789be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x789be…789de (74, 0, 68) 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 53 4b 49 50 28 32 29 20 45 44 49 54 28 27 2a 2a 2a ┆ PUT SKIP(2) EDIT('***┆
0x789de…789fe 2a 20 20 49 4e 47 45 4e 20 4b 4f 4e 54 45 52 49 4e 47 20 49 4e 4f 4d 20 42 45 47 5b 52 54 20 4f ┆* INGEN KONTERING INOM BEGÄRT O┆
0x789fe…78a0d 4d 52 5d 44 45 27 29 28 41 29 3b 20 20 20 20 ┆MRÅDE')(A); ┆
0x78a0d…78a2d (74, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 52 3d 52 2d 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ R=R-2; ┆
0x78a2d…78a4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78a4d…78a5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78a5c…78a7c (74, 0, 70) 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆
0x78a7c…78a9c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78a9c…78aab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78aab…78acb (74, 0, 71) 20 20 20 20 20 20 20 20 49 46 20 52 7f 3d 30 20 54 48 45 4e 20 50 55 54 20 53 4b 49 50 28 52 29 ┆ IF R =0 THEN PUT SKIP(R)┆
0x78acb…78aeb 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆
0x78aeb…78afa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78afa…78b1a (74, 0, 72) 20 20 20 20 20 20 20 20 43 4c 4f 53 45 20 56 45 52 42 45 4c 4f 50 3b 20 20 20 20 20 20 20 20 20 ┆ CLOSE VERBELOP; ┆
0x78b1a…78b3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78b3a…78b49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78b49…78b69 (74, 0, 73) 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 4c 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GO TO L0; ┆
0x78b69…78b89 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78b89…78b98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78b98…78bb8 (74, 0, 74) 53 4c 55 54 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆SLUT: ┆
0x78bb8…78bd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78bd8…78be7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78be7…78c07 (74, 0, 75) 20 20 20 20 20 20 20 20 52 54 50 20 3d 20 28 27 53 4c 55 54 27 29 3b 20 20 20 20 20 20 20 20 20 ┆ RTP = ('SLUT'); ┆
0x78c07…78c27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78c27…78c36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78c36…78c56 (74, 0, 76) 20 20 20 20 20 20 20 20 20 49 46 20 52 54 20 3d 20 27 31 27 20 54 48 45 4e 20 43 41 4c 4c 20 52 ┆ IF RT = '1' THEN CALL R┆
0x78c56…78c76 54 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TSKRIV; ┆
0x78c76…78c85 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78c85…78ca5 (74, 0, 77) 20 20 20 20 20 20 20 43 4c 4f 53 45 20 52 45 44 54 52 41 43 45 3b 20 20 20 20 20 20 20 20 20 20 ┆ CLOSE REDTRACE; ┆
0x78ca5…78cc5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78cc5…78cd4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78cd4…78cf4 (74, 0, 78) 20 20 20 20 20 20 20 20 44 3d 44 41 54 55 4d 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D=DATUM; ┆
0x78cf4…78d14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78d14…78d23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78d23…78d43 (74, 0, 79) 20 20 20 20 20 20 20 20 43 41 4c 4c 20 50 4c 4f 41 44 28 27 51 20 20 20 20 20 20 20 27 29 3b 20 ┆ CALL PLOAD('Q '); ┆
0x78d43…78d63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78d63…78d72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78d72…78dc1 (74, 0, 80) 0x20[0x4f]
0x78dc1…78de1 (74, 0, 81) 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆
0x78de1…78e01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78e01…78e10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x78e10…78e5f (75, 0, 0) DataSector[0x4f]
[…0x4b…]
0x7a584…7a5d3 (75, 0, 76) 0x20[0x4f]
[…0x2…]
0x7a671…7a691 (75, 0, 79) 20 20 20 20 20 20 20 20 49 3d 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ I=4; ┆
0x7a691…7a6b1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7a6b1…7a6c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7a6c0…7a6e0 (75, 0, 80) 4c 32 3a 20 20 20 20 20 43 41 4c 4c 20 45 53 4b 52 49 56 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆L2: CALL ESKRIV; ┆
0x7a6e0…7a700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7a700…7a70f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆
0x7a70f…7a72f (75, 0, 81) 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 5b ┆ PUT FILE(D) SKIP EDIT('Ä┆
0x7a72f…7a74f 52 20 49 4e 53 54 5b 4c 4c 4e 49 4e 47 45 4e 20 42 52 41 3f 20 53 56 41 52 41 20 22 4a 22 20 45 ┆R INSTÄLLNINGEN BRA? SVARA "J" E┆
0x7a74f…7a75e 4c 4c 45 52 20 22 4e 22 27 29 20 20 20 20 20 ┆LLER "N"') ┆