|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 12672 (0x3180)
Names: »FDRIVES.Z80«
└─⟦8181fe295⟧ Bits:30005924 PolyPascal-80 V3.10 arbejdsdiskette 2
└─ ⟦this⟧ »FDRIVES.Z80«
0x0000…0020 09 54 49 54 4c 45 20 27 46 44 52 49 56 45 53 2e 5a 38 30 20 20 54 41 42 4c 45 53 20 46 4f 52 20 ┆ TITLE 'FDRIVES.Z80 TABLES FOR ┆ 0x0020…0040 44 49 53 4b 45 54 54 45 53 27 0d 0a 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆DISKETTES' ;*******************┆ 0x0040…0060 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x0060…0080 2a 2a 2a 2a 2a 2a 0d 0a 3b 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆****** ;* ┆ 0x0080…00a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x00a0…00c0 20 2a 0d 0a 3b 2a 20 20 20 20 44 45 46 49 4e 49 54 49 4f 4e 20 4d 4f 44 55 4c 45 20 46 4f 52 20 ┆ * ;* DEFINITION MODULE FOR ┆ 0x00c0…00e0 54 48 45 20 46 4c 4f 50 50 49 45 53 20 49 4e 20 54 48 45 20 53 59 53 54 45 4d 20 20 20 2a 0d 0a ┆THE FLOPPIES IN THE SYSTEM * ┆ 0x00e0…0100 3b 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆;* ┆ 0x0100…0120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 0d 0a 3b 2a 2a 2a ┆ * ;***┆ 0x0120…0140 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x0140…0160 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 3b 20 4c 41 54 45 53 54 ┆********************** ; LATEST┆ 0x0160…0180 20 43 48 41 4e 47 45 3a 20 31 39 38 34 2d 31 32 2d 31 36 2e 20 20 50 53 57 0d 0a 3b 20 42 49 4f ┆ CHANGE: 1984-12-16. PSW ; BIO┆ 0x0180…01a0 53 52 45 56 49 53 49 4f 4e 20 43 2e 0d 0a 0d 0a 09 2e 5a 38 30 0d 0a 54 52 55 45 09 45 51 55 09 ┆SREVISION C. .Z80 TRUE EQU ┆ 0x01a0…01c0 30 46 46 48 0d 0a 46 41 4c 53 45 09 45 51 55 09 30 0d 0a 0d 0a 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆0FFH FALSE EQU 0 ;**********┆ 0x01c0…01e0 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x01e0…0200 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 3b 20 20 20 20 20 ┆************************ ; ┆ 0x0200…0220 20 20 57 68 61 74 20 6b 69 6e 64 20 6f 66 20 66 6c 6f 70 70 79 20 73 79 73 74 65 6d 20 64 6f 20 ┆ What kind of floppy system do ┆ 0x0220…0240 59 6f 75 20 77 61 6e 74 20 3f 0d 0a 0d 0a 56 45 52 49 46 59 09 45 51 55 09 54 52 55 45 09 09 3b ┆You want ? VERIFY EQU TRUE ;┆ 0x0240…0260 20 56 65 72 69 66 79 20 61 66 74 65 72 20 77 72 69 74 65 2e 0d 0a 0d 0a 4d 38 09 45 51 55 09 46 ┆ Verify after write. M8 EQU F┆ 0x0260…0280 41 4c 53 45 09 09 3b 20 41 3a 20 38 22 20 32 78 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 20 65 ┆ALSE ; A: 8" 2x77x8x1024, 256 e┆ 0x0280…02a0 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 09 3b 20 42 3a 20 38 22 20 32 78 37 37 78 38 78 31 30 ┆nt. UNIT0 ; B: 8" 2x77x8x10┆ 0x02a0…02c0 32 34 2c 20 32 35 36 20 65 6e 74 2e 20 55 4e 49 54 31 0d 0a 09 09 09 09 3b 20 43 3a 20 35 22 20 ┆24, 256 ent. UNIT1 ; C: 5" ┆ 0x02c0…02e0 32 78 38 30 78 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 ┆2x80x5x1024, 128 ent. UNIT0 ┆ 0x02e0…0300 09 3b 20 44 3a 20 38 22 20 31 78 37 37 78 32 36 78 31 32 38 2c 20 20 36 34 20 65 6e 74 2e 20 55 ┆ ; D: 8" 1x77x26x128, 64 ent. U┆ 0x0300…0320 4e 49 54 31 0d 0a 0d 0a 4d 35 09 45 51 55 09 46 41 4c 53 45 09 09 3b 20 41 3a 20 35 22 20 32 78 ┆NIT1 M5 EQU FALSE ; A: 5" 2x┆ 0x0320…0340 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 09 3b ┆77x8x1024, 256 ent. UNIT0 ;┆ 0x0340…0360 20 42 3a 20 35 22 20 32 78 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 20 65 6e 74 2e 20 55 4e 49 ┆ B: 5" 2x77x8x1024, 256 ent. UNI┆ 0x0360…0380 54 31 0d 0a 09 09 09 09 3b 20 43 3a 20 38 22 20 32 78 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 ┆T1 ; C: 8" 2x77x8x1024, 256┆ 0x0380…03a0 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 09 3b 20 44 3a 20 38 22 20 31 78 37 37 78 32 36 ┆ ent. UNIT0 ; D: 8" 1x77x26┆ 0x03a0…03c0 78 31 32 38 2c 20 20 36 34 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 0d 0a 4d 35 39 36 44 09 45 51 ┆x128, 64 ent. UNIT0 M596D EQ┆ 0x03c0…03e0 55 09 54 52 55 45 09 09 3b 20 41 3a 20 35 22 20 32 78 38 30 78 35 78 31 30 32 34 2c 20 31 32 38 ┆U TRUE ; A: 5" 2x80x5x1024, 128┆ 0x03e0…0400 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 09 3b 20 42 3a 20 35 22 20 32 78 38 30 78 35 78 ┆ ent. UNIT0 ; B: 5" 2x80x5x┆ 0x0400…0420 31 30 32 34 2c 20 31 32 38 20 65 6e 74 2e 20 55 4e 49 54 31 0d 0a 09 09 09 09 3b 20 43 3a 20 35 ┆1024, 128 ent. UNIT1 ; C: 5┆ 0x0420…0440 22 20 32 78 38 30 78 31 30 78 35 31 32 2c 20 31 32 38 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 ┆" 2x80x10x512, 128 ent. UNIT0 ┆ 0x0440…0460 09 09 09 3b 20 44 3a 20 35 22 20 32 78 38 30 78 31 30 78 35 31 32 2c 20 31 32 38 20 65 6e 74 2e ┆ ; D: 5" 2x80x10x512, 128 ent.┆ 0x0460…0480 20 55 4e 49 54 31 0d 0a 0d 0a 4d 35 34 38 44 09 45 51 55 09 46 41 4c 53 45 09 09 3b 20 41 3a 20 ┆ UNIT1 M548D EQU FALSE ; A: ┆ 0x0480…04a0 35 22 20 32 78 34 30 78 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a ┆5" 2x40x5x1024, 128 ent. UNIT0 ┆ 0x04a0…04c0 09 09 09 09 3b 20 42 3a 20 35 22 20 32 78 34 30 78 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e 74 ┆ ; B: 5" 2x40x5x1024, 128 ent┆ 0x04c0…04e0 2e 20 55 4e 49 54 31 0d 0a 09 09 09 09 3b 20 43 3a 20 38 22 20 32 78 37 37 78 38 78 31 30 32 34 ┆. UNIT1 ; C: 8" 2x77x8x1024┆ 0x04e0…0500 2c 20 32 35 36 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 09 3b 20 44 3a 20 38 22 20 31 78 ┆, 256 ent. UNIT0 ; D: 8" 1x┆ 0x0500…0520 37 37 78 32 36 78 31 32 38 2c 20 20 36 34 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 0d 0a 4d 35 34 ┆77x26x128, 64 ent. UNIT0 M54┆ 0x0520…0540 38 53 09 45 51 55 09 46 41 4c 53 45 09 09 3b 20 41 3a 20 35 22 20 31 78 34 30 78 35 78 31 30 32 ┆8S EQU FALSE ; A: 5" 1x40x5x102┆ 0x0540…0560 34 2c 20 20 36 34 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 09 09 09 09 3b 20 42 3a 20 35 22 20 31 ┆4, 64 ent. UNIT0 ; B: 5" 1┆ 0x0560…0580 78 34 30 78 35 78 31 30 32 34 2c 20 20 36 34 20 65 6e 74 2e 20 55 4e 49 54 31 0d 0a 09 09 09 09 ┆x40x5x1024, 64 ent. UNIT1 ┆ 0x0580…05a0 3b 20 43 3a 20 38 22 20 32 78 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 20 65 6e 74 2e 20 55 4e ┆; C: 8" 2x77x8x1024, 256 ent. UN┆ 0x05a0…05c0 49 54 30 0d 0a 09 09 09 09 3b 20 44 3a 20 38 22 20 31 78 37 37 78 32 36 78 31 32 38 2c 20 20 36 ┆IT0 ; D: 8" 1x77x26x128, 6┆ 0x05c0…05e0 34 20 65 6e 74 2e 20 55 4e 49 54 30 0d 0a 0d 0a 3b 20 4d 41 52 4b 20 43 4f 52 52 45 43 54 20 46 ┆4 ent. UNIT0 ; MARK CORRECT F┆ 0x05e0…0600 4c 4f 50 50 59 20 53 59 53 54 45 4d 20 57 49 54 48 20 54 52 55 45 2e 20 4e 4f 54 45 20 4f 4e 4c ┆LOPPY SYSTEM WITH TRUE. NOTE ONL┆ 0x0600…0620 59 20 4f 4e 45 20 54 52 55 45 2e 0d 0a 3b 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆Y ONE TRUE. ;******************┆ 0x0620…0640 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x0640…0660 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 09 0d 0a 09 50 41 47 45 0d 0a 52 41 54 45 ┆**************** PAGE RATE┆ 0x0660…0680 30 09 45 51 55 09 30 30 30 30 30 30 30 30 42 09 3b 20 33 6d 73 2f 36 6d 73 0d 0a 52 41 54 45 31 ┆0 EQU 00000000B ; 3ms/6ms RATE1┆ 0x0680…06a0 09 45 51 55 09 30 30 30 30 30 30 30 31 42 09 3b 20 36 6d 73 2f 31 32 6d 73 0d 0a 52 41 54 45 32 ┆ EQU 00000001B ; 6ms/12ms RATE2┆ 0x06a0…06c0 09 45 51 55 09 30 30 30 30 30 30 31 30 42 09 3b 20 31 30 6d 73 2f 32 30 6d 73 0d 0a 52 41 54 45 ┆ EQU 00000010B ; 10ms/20ms RATE┆ 0x06c0…06e0 33 09 45 51 55 09 30 30 30 30 30 30 31 31 42 09 3b 20 31 35 6d 73 2f 33 30 6d 73 0d 0a 0d 0a 44 ┆3 EQU 00000011B ; 15ms/30ms D┆ 0x06e0…0700 4f 55 42 4c 53 09 45 51 55 09 30 46 46 48 09 09 3b 20 44 4f 55 42 4c 45 20 53 49 44 45 44 0d 0a ┆OUBLS EQU 0FFH ; DOUBLE SIDED ┆ 0x0700…0720 53 49 4e 47 4c 53 09 45 51 55 09 30 09 09 3b 20 53 49 4e 47 4c 45 20 53 49 44 45 44 0d 0a 0d 0a ┆SINGLS EQU 0 ; SINGLE SIDED ┆ 0x0720…0740 55 4e 49 54 30 09 45 51 55 09 30 30 30 30 30 30 30 30 42 09 3b 20 46 59 53 49 53 4b 20 45 4e 48 ┆UNIT0 EQU 00000000B ; FYSISK ENH┆ 0x0740…0760 45 54 20 30 0d 0a 55 4e 49 54 31 09 45 51 55 09 30 30 30 30 30 30 30 31 42 09 3b 20 46 59 53 49 ┆ET 0 UNIT1 EQU 00000001B ; FYSI┆ 0x0760…0780 53 4b 20 45 4e 48 45 54 20 31 0d 0a 55 4e 49 54 32 09 45 51 55 09 30 30 30 30 30 30 31 30 42 09 ┆SK ENHET 1 UNIT2 EQU 00000010B ┆ 0x0780…07a0 3b 20 46 59 53 49 53 4b 20 45 4e 48 45 54 20 32 0d 0a 55 4e 49 54 33 09 45 51 55 09 30 30 30 30 ┆; FYSISK ENHET 2 UNIT3 EQU 0000┆ 0x07a0…07c0 30 30 31 31 42 09 3b 20 46 59 53 49 53 4b 20 45 4e 48 45 54 20 33 0d 0a 0d 0a 49 4e 43 48 35 09 ┆0011B ; FYSISK ENHET 3 INCH5 ┆ 0x07c0…07e0 45 51 55 09 30 30 30 30 31 30 30 30 42 09 3b 20 35 22 2d 46 4c 4f 50 50 59 0d 0a 49 4e 43 48 38 ┆EQU 00001000B ; 5"-FLOPPY INCH8┆ 0x07e0…0800 09 45 51 55 09 31 31 30 31 30 31 30 30 42 09 3b 20 38 22 2d 46 4c 4f 50 50 59 0d 0a 0d 0a 44 4f ┆ EQU 11010100B ; 8"-FLOPPY DO┆ 0x0800…0820 55 42 4c 44 09 45 51 55 09 30 30 30 30 30 30 30 30 42 09 3b 20 44 4f 55 42 4c 45 20 44 45 4e 53 ┆UBLD EQU 00000000B ; DOUBLE DENS┆ 0x0820…0840 49 54 59 0d 0a 53 49 4e 47 4c 44 09 45 51 55 09 30 30 31 30 30 30 30 30 42 09 3b 20 53 49 4e 47 ┆ITY SINGLD EQU 00100000B ; SING┆ 0x0840…0860 4c 45 20 44 45 4e 53 49 54 59 0d 0a 0d 0a 43 4f 4d 4d 4f 4e 09 45 51 55 09 30 43 30 48 09 09 3b ┆LE DENSITY COMMON EQU 0C0H ;┆ 0x0860…0880 20 43 4f 4d 4d 4f 4e 20 41 52 45 41 0d 8a 0d 0a 09 49 46 09 4d 38 0d 0a 53 49 47 4e 09 45 51 55 ┆ COMMON AREA IF M8 SIGN EQU┆ 0x0880…08a0 09 27 38 27 0d 0a 09 45 4c 53 45 0d 0a 53 49 47 4e 09 45 51 55 09 27 35 27 0d 0a 09 45 4e 44 49 ┆ '8' ELSE SIGN EQU '5' ENDI┆ 0x08a0…08c0 46 0d 0a 0d 0a 09 45 58 54 52 4e 09 46 44 52 45 41 44 2c 46 44 57 52 49 54 2c 46 44 4c 47 49 4e ┆F EXTRN FDREAD,FDWRIT,FDLGIN┆ 0x08c0…08e0 2c 46 44 49 4e 49 54 0d 0a 09 45 4e 54 52 59 09 40 44 54 42 4c 2c 3f 54 49 54 45 4c 0d 0a 09 45 ┆,FDINIT ENTRY @DTBL,?TITEL E┆ 0x08e0…0900 4e 54 52 59 09 40 43 4f 4d 4d 4f 0d 0a 0d 0a 09 43 53 45 47 0d 0a 40 44 54 42 4c 3a 09 44 45 46 ┆NTRY @COMMO CSEG @DTBL: DEF┆ 0x0900…0920 57 09 46 4c 41 2c 46 4c 42 2c 46 4c 43 2c 46 4c 44 0d 0a 09 44 45 46 57 09 30 2c 30 2c 30 2c 30 ┆W FLA,FLB,FLC,FLD DEFW 0,0,0,0┆ 0x0920…0940 0d 0a 09 44 45 46 57 09 30 2c 30 2c 30 2c 30 0d 0a 09 44 45 46 57 09 30 2c 30 2c 30 2c 30 0d 0a ┆ DEFW 0,0,0,0 DEFW 0,0,0,0 ┆ 0x0940…0960 40 43 4f 4d 4d 4f 3a 09 44 45 46 42 09 43 4f 4d 4d 4f 4e 0d 0a 0d 0a 09 50 41 47 45 0d 0a 09 44 ┆@COMMO: DEFB COMMON PAGE D┆ 0x0960…0980 53 45 47 0d 0a 09 49 46 09 4d 38 0d 0a 3b 20 44 65 66 69 6e 65 20 38 22 20 32 78 37 37 78 38 78 ┆SEG IF M8 ; Define 8" 2x77x8x┆ 0x0980…09a0 31 30 32 34 2c 20 32 35 36 20 65 6e 74 72 69 65 73 2e 20 55 4e 49 54 20 41 3a 0d 0a 0d 0a 09 44 ┆1024, 256 entries. UNIT A: D┆ 0x09a0…09c0 45 46 57 09 46 44 57 52 49 54 0d 0a 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 57 09 ┆EFW FDWRIT DEFW FDREAD DEFW ┆ 0x09c0…09e0 46 44 4c 47 49 4e 0d 0a 09 44 45 46 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e 43 48 ┆FDLGIN DEFW FDINIT DEFB INCH┆ 0x09e0…0a00 38 2b 55 4e 49 54 30 2b 44 4f 55 42 4c 44 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 0d 0a 09 44 ┆8+UNIT0+DOUBLD ; $FDXSL D┆ 0x0a00…0a20 45 46 42 09 30 09 09 3b 20 0d 0a 46 4c 41 3a 09 44 45 46 57 09 30 09 09 3b 20 4e 4f 20 54 52 41 ┆EFB 0 ; FLA: DEFW 0 ; NO TRA┆ 0x0a20…0a40 4e 53 20 54 41 42 4c 45 0d 0a 09 44 45 46 42 09 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c ┆NS TABLE DEFB 0,0,0,0,0,0,0,0,┆ 0x0a40…0a60 30 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 4d 45 44 49 41 46 4c 41 47 0d 0a 09 44 45 46 57 09 46 ┆0 DEFB 0 ; MEDIAFLAG DEFW F┆ 0x0a60…0a80 38 44 09 09 3b 20 41 44 44 52 45 53 53 20 54 2e 20 44 50 42 0d 0a 09 44 45 46 57 09 30 46 46 46 ┆8D ; ADDRESS T. DPB DEFW 0FFF┆ 0x0a80…0aa0 45 48 09 09 3b 20 43 48 45 43 4b 53 55 4d 20 56 45 43 54 4f 52 20 53 45 54 20 42 59 20 47 45 4e ┆EH ; CHECKSUM VECTOR SET BY GEN┆ 0x0aa0…0ac0 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 41 4c 4c 4f 43 20 56 45 43 54 4f ┆CPM DEFW 0FFFEH ; ALLOC VECTO┆ 0x0ac0…0ae0 52 20 53 45 54 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 2c 30 46 ┆R SET BY GENCPM DEFW 0FFFEH,0F┆ 0x0ae0…0b00 46 46 45 48 09 3b 20 4c 45 54 20 47 45 4e 43 50 4d 20 53 45 54 55 50 0d 0a 09 44 45 46 57 09 30 ┆FFEH ; LET GENCPM SETUP DEFW 0┆ 0x0b00…0b20 46 46 46 45 48 09 09 3b 20 44 49 52 42 43 42 2c 20 44 54 41 42 43 42 2c 20 48 41 53 48 0d 0a 09 ┆FFFEH ; DIRBCB, DTABCB, HASH ┆ 0x0b20…0b40 44 45 46 42 09 30 09 09 3b 20 48 41 53 48 20 42 41 4e 4b 20 0d 0a 0d 0a 0d 0a 3b 20 44 65 66 69 ┆DEFB 0 ; HASH BANK ; Defi┆ 0x0b40…0b60 6e 65 20 38 22 20 32 78 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 20 65 6e 74 72 69 65 73 2e 20 ┆ne 8" 2x77x8x1024, 256 entries. ┆ 0x0b60…0b80 55 4e 49 54 20 42 3a 0d 0a 0d 0a 09 44 45 46 57 09 46 44 57 52 49 54 0d 0a 09 44 45 46 57 09 46 ┆UNIT B: DEFW FDWRIT DEFW F┆ 0x0b80…0ba0 44 52 45 41 44 0d 0a 09 44 45 46 57 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 57 09 46 44 49 4e 49 ┆DREAD DEFW FDLGIN DEFW FDINI┆ 0x0ba0…0bc0 54 0d 0a 09 44 45 46 42 09 49 4e 43 48 38 2b 55 4e 49 54 31 2b 44 4f 55 42 4c 44 0d 0a 09 09 09 ┆T DEFB INCH8+UNIT1+DOUBLD ┆ 0x0bc0…0be0 09 3b 20 24 46 44 58 53 4c 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 0d 0a 46 4c 42 3a 09 44 45 46 ┆ ; $FDXSL DEFB 0 ; FLB: DEF┆ 0x0be0…0c00 57 09 30 09 09 3b 20 4e 4f 20 54 52 41 4e 53 20 54 41 42 4c 45 20 0d 0a 09 44 45 46 42 09 30 2c ┆W 0 ; NO TRANS TABLE DEFB 0,┆ 0x0c00…0c20 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 4d 45 44 49 ┆0,0,0,0,0,0,0,0 DEFB 0 ; MEDI┆ 0x0c20…0c40 41 46 4c 41 47 0d 0a 09 44 45 46 57 09 46 38 44 09 09 3b 20 41 44 44 52 45 53 53 20 54 2e 20 44 ┆AFLAG DEFW F8D ; ADDRESS T. D┆ 0x0c40…0c60 50 42 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 43 48 45 43 4b 53 55 4d 20 56 45 43 ┆PB DEFW 0FFFEH ; CHECKSUM VEC┆ 0x0c60…0c80 54 4f 52 20 53 45 54 20 42 59 20 47 45 4e 43 50 4d 0d 8a 09 44 45 46 57 09 30 46 46 46 45 48 09 ┆TOR SET BY GENCPM DEFW 0FFFEH ┆ 0x0c80…0ca0 09 3b 20 41 4c 4c 4f 43 20 56 45 43 54 4f 52 20 53 45 54 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 ┆ ; ALLOC VECTOR SET BY GENCPM ┆ 0x0ca0…0cc0 44 45 46 57 09 30 46 46 46 45 48 2c 30 46 46 46 45 48 09 3b 20 4c 45 54 20 47 45 4e 43 50 4d 20 ┆DEFW 0FFFEH,0FFFEH ; LET GENCPM ┆ 0x0cc0…0ce0 53 45 54 55 50 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 44 49 52 42 43 42 2c 20 44 ┆SETUP DEFW 0FFFEH ; DIRBCB, D┆ 0x0ce0…0d00 54 41 42 43 42 2c 20 48 41 53 48 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 48 41 53 48 20 42 41 4e ┆TABCB, HASH DEFB 0 ; HASH BAN┆ 0x0d00…0d20 4b 0d 0a 0d 0a 09 45 4e 44 49 46 0d 0a 09 50 41 47 45 0d 0a 09 49 46 09 4d 35 0d 0a 3b 20 44 65 ┆K ENDIF PAGE IF M5 ; De┆ 0x0d20…0d40 66 69 6e 65 20 35 2e 32 35 22 20 32 78 37 37 78 38 78 31 30 32 34 2c 20 32 35 36 20 65 6e 74 72 ┆fine 5.25" 2x77x8x1024, 256 entr┆ 0x0d40…0d60 69 65 73 2e 20 55 4e 49 54 20 41 3a 0d 0a 0d 0a 09 44 45 46 57 09 46 44 57 52 49 54 0d 0a 09 44 ┆ies. UNIT A: DEFW FDWRIT D┆ 0x0d60…0d80 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 57 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 57 09 ┆EFW FDREAD DEFW FDLGIN DEFW ┆ 0x0d80…0da0 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e 43 48 35 2b 55 4e 49 54 30 2b 44 4f 55 42 4c 44 ┆FDINIT DEFB INCH5+UNIT0+DOUBLD┆ 0x0da0…0dc0 2b 31 31 30 30 30 30 30 30 42 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 20 32 20 4d 48 7a 20 38 ┆+11000000B ; $FDXSL 2 MHz 8┆ 0x0dc0…0de0 22 20 4d 6f 64 65 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 0d 0a 46 4c 41 3a 09 44 45 46 57 09 30 ┆" Mode DEFB 0 ; FLA: DEFW 0┆ 0x0de0…0e00 09 09 3b 20 4e 4f 20 54 52 41 4e 53 20 54 41 42 4c 45 0d 0a 09 44 45 46 42 09 30 2c 30 2c 30 2c ┆ ; NO TRANS TABLE DEFB 0,0,0,┆ 0x0e00…0e20 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 4d 45 44 49 41 46 4c 41 ┆0,0,0,0,0,0 DEFB 0 ; MEDIAFLA┆ 0x0e20…0e40 47 47 0d 0a 09 44 45 46 57 09 46 35 4d 41 58 09 09 3b 20 41 44 44 52 45 53 53 20 54 4f 20 44 50 ┆GG DEFW F5MAX ; ADDRESS TO DP┆ 0x0e40…0e60 42 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 43 48 45 43 4b 53 55 4d 20 56 45 43 54 ┆B DEFW 0FFFEH ; CHECKSUM VECT┆ 0x0e60…0e80 4f 52 20 47 45 4e 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 ┆OR GEN BY GENCPM DEFW 0FFFEH ┆ 0x0e80…0ea0 3b 20 41 4c 4c 4f 43 20 56 45 43 54 4f 52 20 47 45 4e 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 ┆; ALLOC VECTOR GEN BY GENCPM D┆ 0x0ea0…0ec0 45 46 57 09 30 46 46 46 45 48 2c 30 46 46 46 45 48 09 3b 20 4c 45 54 20 47 45 4e 43 50 4d 20 43 ┆EFW 0FFFEH,0FFFEH ; LET GENCPM C┆ 0x0ec0…0ee0 41 4c 43 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 44 49 52 42 43 42 2c 20 44 54 41 ┆ALC DEFW 0FFFEH ; DIRBCB, DTA┆ 0x0ee0…0f00 42 43 42 2c 20 48 41 53 48 0d 0a 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 48 41 53 48 20 42 41 4e ┆BCB, HASH DEFB 0 ; HASH BAN┆ 0x0f00…0f20 4b 2e 0d 0a 0d 0a 0d 0a 3b 20 44 65 66 69 6e 65 20 35 2e 32 35 22 20 32 78 37 37 78 38 78 31 30 ┆K. ; Define 5.25" 2x77x8x10┆ 0x0f20…0f40 32 34 2c 20 32 35 36 20 65 6e 74 72 69 65 73 2e 20 55 4e 49 54 20 42 3a 0d 0a 0d 0a 09 44 45 46 ┆24, 256 entries. UNIT B: DEF┆ 0x0f40…0f60 57 09 46 44 57 52 49 54 0d 0a 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 57 09 46 44 ┆W FDWRIT DEFW FDREAD DEFW FD┆ 0x0f60…0f80 4c 47 49 4e 0d 0a 09 44 45 46 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e 43 48 35 2b ┆LGIN DEFW FDINIT DEFB INCH5+┆ 0x0f80…0fa0 55 4e 49 54 31 2b 44 4f 55 42 4c 44 2b 31 31 30 30 30 30 30 30 42 0d 0a 09 09 09 09 3b 20 24 46 ┆UNIT1+DOUBLD+11000000B ; $F┆ 0x0fa0…0fc0 44 58 53 4c 20 32 20 4d 48 7a 20 38 22 20 4d 6f 64 65 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 0d ┆DXSL 2 MHz 8" Mode DEFB 0 ; ┆ 0x0fc0…0fe0 0a 46 4c 42 3a 09 44 45 46 57 09 30 09 09 3b 20 4e 4f 20 54 52 41 4e 53 20 54 41 42 4c 45 0d 0a ┆ FLB: DEFW 0 ; NO TRANS TABLE ┆ 0x0fe0…1000 09 44 45 46 42 09 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 09 44 45 46 42 09 30 ┆ DEFB 0,0,0,0,0,0,0,0,0 DEFB 0┆ 0x1000…1020 09 09 3b 20 4d 45 44 49 41 46 4c 41 47 47 0d 0a 09 44 45 46 57 09 46 35 4d 41 58 09 09 3b 20 41 ┆ ; MEDIAFLAGG DEFW F5MAX ; A┆ 0x1020…1040 44 44 52 45 53 53 20 54 4f 20 44 50 42 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 43 ┆DDRESS TO DPB DEFW 0FFFEH ; C┆ 0x1040…1060 48 45 43 4b 53 55 4d 20 56 45 43 54 4f 52 20 47 45 4e 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 ┆HECKSUM VECTOR GEN BY GENCPM D┆ 0x1060…1080 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 41 4c 4c 4f 43 20 56 45 43 54 4f 52 20 47 45 4e 20 42 ┆EFW 0FFFEH ; ALLOC VECTOR GEN B┆ 0x1080…10a0 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 2c 30 46 46 46 45 48 09 3b 20 ┆Y GENCPM DEFW 0FFFEH,0FFFEH ; ┆ 0x10a0…10c0 4c 45 54 20 47 45 4e 43 50 4d 20 43 41 4c 43 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b ┆LET GENCPM CALC DEFW 0FFFEH ;┆ 0x10c0…10e0 20 44 49 52 42 43 42 2c 20 44 54 41 42 43 42 2c 20 48 41 53 48 0d 0a 09 44 45 46 42 09 30 09 09 ┆ DIRBCB, DTABCB, HASH DEFB 0 ┆ 0x10e0…1100 3b 20 48 41 53 48 20 42 41 4e 4b 2e 0d 0a 0d 0a 09 45 4e 44 49 46 0d 0a 0d 0a 09 50 41 47 45 0d ┆; HASH BANK. ENDIF PAGE ┆ 0x1100…1120 0a 09 49 46 09 4d 35 39 36 44 0d 0a 3b 20 44 65 66 69 6e 65 20 35 2e 32 35 22 20 32 78 38 30 78 ┆ IF M596D ; Define 5.25" 2x80x┆ 0x1120…1140 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e 74 72 69 65 73 2e 20 55 4e 49 54 20 41 3a 0d 0a 0d 0a ┆5x1024, 128 entries. UNIT A: ┆ 0x1140…1160 09 44 45 46 57 09 46 44 57 52 49 54 0d 0a 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 ┆ DEFW FDWRIT DEFW FDREAD DEF┆ 0x1160…1180 57 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e ┆W FDLGIN DEFW FDINIT DEFB IN┆ 0x1180…11a0 43 48 35 2b 55 4e 49 54 30 2b 44 4f 55 42 4c 44 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 0d 0a ┆CH5+UNIT0+DOUBLD ; $FDXSL ┆ 0x11a0…11c0 09 44 45 46 42 09 30 09 09 3b 20 0d 0a 46 4c 41 3a 09 44 45 46 57 09 30 09 09 3b 20 4e 4f 20 54 ┆ DEFB 0 ; FLA: DEFW 0 ; NO T┆ 0x11c0…11e0 52 41 4e 53 20 54 41 42 4c 45 0d 0a 09 44 45 46 42 09 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c ┆RANS TABLE DEFB 0,0,0,0,0,0,0,┆ 0x11e0…1200 30 2c 30 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 4d 45 44 49 41 46 4c 41 47 47 0d 0a 09 44 45 46 ┆0,0 DEFB 0 ; MEDIAFLAGG DEF┆ 0x1200…1220 57 09 46 35 39 36 44 09 09 3b 20 41 44 44 52 45 53 53 20 54 4f 20 44 50 42 0d 0a 09 44 45 46 57 ┆W F596D ; ADDRESS TO DPB DEFW┆ 0x1220…1240 09 30 46 46 46 45 48 09 09 3b 20 43 48 45 43 4b 53 55 4d 20 56 45 43 54 4f 52 20 47 45 4e 20 42 ┆ 0FFFEH ; CHECKSUM VECTOR GEN B┆ 0x1240…1260 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 41 4c 4c 4f 43 20 ┆Y GENCPM DEFW 0FFFEH ; ALLOC ┆ 0x1260…1280 56 45 43 54 4f 52 20 47 45 4e 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 ┆VECTOR GEN BY GENCPM DEFW 0FFF┆ 0x1280…12a0 45 48 2c 30 46 46 46 45 48 09 3b 20 4c 45 54 20 47 45 4e 43 50 4d 20 43 41 4c 43 0d 0a 09 44 45 ┆EH,0FFFEH ; LET GENCPM CALC DE┆ 0x12a0…12c0 46 57 09 30 46 46 46 45 48 09 09 3b 20 44 49 52 42 43 42 2c 20 44 54 41 42 43 42 2c 20 48 41 53 ┆FW 0FFFEH ; DIRBCB, DTABCB, HAS┆ 0x12c0…12e0 48 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 48 41 53 48 20 42 41 4e 4b 2e 0d 0a 0d 0a 0d 0a 3b 20 ┆H DEFB 0 ; HASH BANK. ; ┆ 0x12e0…1300 44 65 66 69 6e 65 20 35 2e 32 35 22 20 32 78 38 30 78 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e ┆Define 5.25" 2x80x5x1024, 128 en┆ 0x1300…1320 74 72 69 65 73 2e 20 55 4e 49 54 20 42 3a 0d 0a 0d 0a 09 44 45 46 57 09 46 44 57 52 49 54 0d 0a ┆tries. UNIT B: DEFW FDWRIT ┆ 0x1320…1340 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 57 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 ┆ DEFW FDREAD DEFW FDLGIN DEF┆ 0x1340…1360 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e 43 48 35 2b 55 4e 49 54 31 2b 44 4f 55 42 ┆W FDINIT DEFB INCH5+UNIT1+DOUB┆ 0x1360…1380 4c 44 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 0d 0a 46 ┆LD ; $FDXSL DEFB 0 ; F┆ 0x1380…13a0 4c 42 3a 09 44 45 46 57 09 30 09 09 3b 20 4e 4f 20 54 52 41 4e 53 20 54 41 42 4c 45 0d 0a 09 44 ┆LB: DEFW 0 ; NO TRANS TABLE D┆ 0x13a0…13c0 45 46 42 09 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 09 44 45 46 42 09 30 09 09 ┆EFB 0,0,0,0,0,0,0,0,0 DEFB 0 ┆ 0x13c0…13e0 3b 20 4d 45 44 49 41 46 4c 41 47 47 0d 0a 09 44 45 46 57 09 46 35 39 36 44 09 09 3b 20 41 44 44 ┆; MEDIAFLAGG DEFW F596D ; ADD┆ 0x13e0…1400 52 45 53 53 20 54 4f 20 44 50 42 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 43 48 45 ┆RESS TO DPB DEFW 0FFFEH ; CHE┆ 0x1400…1420 43 4b 53 55 4d 20 56 45 43 54 4f 52 20 47 45 4e 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 ┆CKSUM VECTOR GEN BY GENCPM DEF┆ 0x1420…1440 57 09 30 46 46 46 45 48 09 09 3b 20 41 4c 4c 4f 43 20 56 45 43 54 4f 52 20 47 45 4e 20 42 59 20 ┆W 0FFFEH ; ALLOC VECTOR GEN BY ┆ 0x1440…1460 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 2c 30 46 46 46 45 48 09 3b 20 4c 45 ┆GENCPM DEFW 0FFFEH,0FFFEH ; LE┆ 0x1460…1480 54 20 47 45 4e 43 50 4d 20 43 41 4c 43 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 44 ┆T GENCPM CALC DEFW 0FFFEH ; D┆ 0x1480…14a0 49 52 42 43 42 2c 20 44 54 41 42 43 42 2c 20 48 41 53 48 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 ┆IRBCB, DTABCB, HASH DEFB 0 ; ┆ 0x14a0…14c0 48 41 53 48 20 42 41 4e 4b 2e 0d 0a 0d 0a 09 45 4e 44 49 46 0d 0a 0d 0a 09 50 41 47 45 0d 0a 09 ┆HASH BANK. ENDIF PAGE ┆ 0x14c0…14e0 49 46 09 4d 35 34 38 44 0d 0a 0d 0a 3b 20 44 65 66 69 6e 65 20 35 2e 32 35 22 20 32 78 34 30 78 ┆IF M548D ; Define 5.25" 2x40x┆ 0x14e0…1500 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e 74 72 69 65 73 2e 20 55 4e 49 54 20 41 3a 0d 0a 0d 0a ┆5x1024, 128 entries. UNIT A: ┆ 0x1500…1520 09 44 45 46 57 09 46 44 57 52 49 54 0d 0a 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 ┆ DEFW FDWRIT DEFW FDREAD DEF┆ 0x1520…1540 57 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e ┆W FDLGIN DEFW FDINIT DEFB IN┆ 0x1540…1560 43 48 35 2b 55 4e 49 54 30 2b 44 4f 55 42 4c 44 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 0d 0a ┆CH5+UNIT0+DOUBLD ; $FDXSL ┆ 0x1560…1580 09 44 45 46 42 09 30 09 09 3b 20 0d 0a 46 4c 41 3a 09 44 45 46 57 09 30 09 09 3b 20 4e 4f 20 54 ┆ DEFB 0 ; FLA: DEFW 0 ; NO T┆ 0x1580…15a0 52 41 4e 53 20 54 41 42 4c 45 20 0d 0a 09 44 45 46 42 09 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 ┆RANS TABLE DEFB 0,0,0,0,0,0,0┆ 0x15a0…15c0 2c 30 2c 30 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 4d 45 44 49 41 46 4c 41 47 0d 0a 09 44 45 46 ┆,0,0 DEFB 0 ; MEDIAFLAG DEF┆ 0x15c0…15e0 57 09 46 35 34 38 44 09 09 3b 20 41 44 44 52 45 53 53 20 54 2e 20 44 50 42 0d 0a 09 44 45 46 57 ┆W F548D ; ADDRESS T. DPB DEFW┆ 0x15e0…1600 09 30 46 46 46 45 48 09 09 3b 20 43 48 45 43 4b 53 55 4d 20 56 45 43 54 4f 52 20 53 45 54 20 42 ┆ 0FFFEH ; CHECKSUM VECTOR SET B┆ 0x1600…1620 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 41 4c 4c 4f 43 20 ┆Y GENCPM DEFW 0FFFEH ; ALLOC ┆ 0x1620…1640 56 45 43 54 4f 52 20 53 45 54 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 ┆VECTOR SET BY GENCPM DEFW 0FFF┆ 0x1640…1660 45 48 2c 30 46 46 46 45 48 09 3b 20 4c 45 54 20 47 45 4e 43 50 4d 20 53 45 54 55 50 0d 0a 09 44 ┆EH,0FFFEH ; LET GENCPM SETUP D┆ 0x1660…1680 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 44 49 52 42 43 42 2c 20 44 54 41 42 43 42 2c 20 48 41 ┆EFW 0FFFEH ; DIRBCB, DTABCB, HA┆ 0x1680…16a0 53 48 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 48 41 53 48 20 42 41 4e 4b 0d 0a 0d 0a 0d 0a 3b 20 ┆SH DEFB 0 ; HASH BANK ; ┆ 0x16a0…16c0 44 65 66 69 6e 65 20 35 2e 32 35 22 20 32 78 34 30 78 35 78 31 30 32 34 2c 20 31 32 38 20 65 6e ┆Define 5.25" 2x40x5x1024, 128 en┆ 0x16c0…16e0 74 72 69 65 73 2e 20 55 4e 49 54 20 42 3a 0d 0a 0d 0a 09 44 45 46 57 09 46 44 57 52 49 54 0d 0a ┆tries. UNIT B: DEFW FDWRIT ┆ 0x16e0…1700 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 57 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 ┆ DEFW FDREAD DEFW FDLGIN DEF┆ 0x1700…1720 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e 43 48 35 2b 55 4e 49 54 31 2b 44 4f 55 42 ┆W FDINIT DEFB INCH5+UNIT1+DOUB┆ 0x1720…1740 4c 44 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 0d 0a 09 44 45 46 42 09 30 09 09 3b 20 0d 0a 46 ┆LD ; $FDXSL DEFB 0 ; F┆ 0x1740…1760 4c 42 3a 09 44 45 46 57 09 30 09 09 3b 20 4e 4f 20 54 52 41 4e 53 20 54 41 42 4c 45 20 0d 0a 09 ┆LB: DEFW 0 ; NO TRANS TABLE ┆ 0x1760…1780 44 45 46 42 09 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 09 44 45 46 42 09 30 09 ┆DEFB 0,0,0,0,0,0,0,0,0 DEFB 0 ┆ 0x1780…17a0 09 3b 20 4d 45 44 49 41 46 4c 41 47 0d 0a 09 44 45 46 57 09 46 35 34 38 44 09 09 3b 20 41 44 44 ┆ ; MEDIAFLAG DEFW F548D ; ADD┆ 0x17a0…17c0 52 45 53 53 20 54 2e 20 44 50 42 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 43 48 45 ┆RESS T. DPB DEFW 0FFFEH ; CHE┆ 0x17c0…17e0 43 4b 53 55 4d 20 56 45 43 54 4f 52 20 53 45 54 20 42 59 20 47 45 4e 43 50 4d 0d 0a 09 44 45 46 ┆CKSUM VECTOR SET BY GENCPM DEF┆ 0x17e0…1800 57 09 30 46 46 46 45 48 09 09 3b 20 41 4c 4c 4f 43 20 56 45 43 54 4f 52 20 53 45 54 20 42 59 20 ┆W 0FFFEH ; ALLOC VECTOR SET BY ┆ 0x1800…1820 47 45 4e 43 50 4d 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 2c 30 46 46 46 45 48 09 3b 20 4c 45 ┆GENCPM DEFW 0FFFEH,0FFFEH ; LE┆ 0x1820…1840 54 20 47 45 4e 43 50 4d 20 53 45 54 55 50 0d 0a 09 44 45 46 57 09 30 46 46 46 45 48 09 09 3b 20 ┆T GENCPM SETUP DEFW 0FFFEH ; ┆ 0x1840…1860 44 49 52 42 43 42 2c 20 44 54 41 42 43 42 2c 20 48 41 53 48 0d 0a 09 44 45 46 42 09 30 09 09 3b ┆DIRBCB, DTABCB, HASH DEFB 0 ;┆ 0x1860…1880 20 48 41 53 48 20 42 41 4e 4b 0d 0a 0d 0a 09 45 4e 44 49 46 0d 0a 0d 0a 09 50 41 47 45 0d 0a 09 ┆ HASH BANK ENDIF PAGE ┆ 0x1880…18a0 49 46 09 4d 35 34 38 53 0d 0a 0d 0a 3b 20 44 65 66 69 6e 65 20 35 2e 32 35 22 20 31 78 34 30 78 ┆IF M548S ; Define 5.25" 1x40x┆ 0x18a0…18c0 35 78 31 30 32 34 2c 20 36 34 20 65 6e 74 72 69 65 73 2e 20 55 4e 49 54 20 41 3a 0d 0a 0d 0a 09 ┆5x1024, 64 entries. UNIT A: ┆ 0x18c0…18e0 44 45 46 57 09 46 44 57 52 49 54 0d 8a 09 44 45 46 57 09 46 44 52 45 41 44 0d 0a 09 44 45 46 57 ┆DEFW FDWRIT DEFW FDREAD DEFW┆ 0x18e0…1900 09 46 44 4c 47 49 4e 0d 0a 09 44 45 46 57 09 46 44 49 4e 49 54 0d 0a 09 44 45 46 42 09 49 4e 43 ┆ FDLGIN DEFW FDINIT DEFB INC┆ 0x1900…1920 48 35 2b 55 4e 49 54 30 2b 44 4f 55 42 4c 44 0d 0a 09 09 09 09 3b 20 24 46 44 58 53 4c 0d 0a 09 ┆H5+UNIT0+DOUBLD ; $FDXSL ┆ […truncated at 200 lines…]