_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

1581 PARTITIONER

FILE INFORMATION

FILENAME(S): 1581 PARTITIONER

FILE TYPE(S): PRG

FILE SIZE: 6.6K

FIRST SEEN: 2025-11-30 21:11:18

APPEARS ON: 1 disk(s)

FILE HASH

241410db64eb39ca711072eb5e28e51d0ad5ce3f685f95acd372cfa3c2c3dce7

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
UTIL 3 1581 PARTITIONER PRG DuncanTwain 7 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 1C 48 1C 64 00 8F 20  43 4F 50 59 52 49 47 48  |..H.d.. COPYRIGH|
00000010: 54 20 31 39 39 30 20 43  4F 4D 50 55 54 45 21 20  |T 1990 COMPUTE! |
00000020: 50 55 42 4C 49 43 41 54  49 4F 4E 53 2C 20 49 4E  |PUBLICATIONS, IN|
00000030: 43 2E 20 2D 20 41 4C 4C  20 52 49 47 48 54 53 20  |C. - ALL RIGHTS |
00000040: 52 45 53 45 52 56 45 44  00 AF 1C 6E 00 E7 30 2C  |RESERVED...n..0,|
00000050: 31 3A E7 34 2C 31 3A E7  36 2C 31 3A E7 35 2C 34  |1:.4,1:.6,1:.5,4|
00000060: 3A 8B C2 28 32 31 35 29  B2 30 A7 99 22 93 53 57  |:..(215).0..".SW|
00000070: 49 54 43 48 20 54 4F 20  38 30 2D 43 4F 4C 55 4D  |ITCH TO 80-COLUM|
00000080: 4E 20 4D 4F 44 45 20 41  4E 44 20 50 52 45 53 53  |N MODE AND PRESS|
00000090: 20 41 20 4B 45 59 22 3A  97 32 30 38 2C 30 3A 92  | A KEY":.208,0:.|
000000A0: 32 30 38 2C 31 3A 97 32  30 38 2C 30 3A DE 35 00  |208,1:.208,0:.5.|
000000B0: 15 1D 78 00 86 50 4E 24  28 32 31 29 3A FE 1A 30  |..x..PN$(21):..0|
000000C0: 2C 30 2C 37 39 2C 32 34  2C 31 3A F9 31 2C 22 31  |,0,79,24,1:.1,"1|
000000D0: 22 3A F9 32 2C 22 32 22  3A F9 33 2C 22 33 22 3A  |":.2,"2":.3,"3":|
000000E0: F9 34 2C 22 34 22 3A F9  35 2C 22 35 22 3A F9 36  |.4,"4":.5,"5":.6|
000000F0: 2C 22 36 22 3A F9 37 2C  22 37 22 3A F9 38 2C 22  |,"6":.7,"7":.8,"|
00000100: 41 42 4F 52 54 22 AA C7  28 31 33 29 3A FE 25 3A  |ABORT"..(13):.%:|
00000110: D7 31 31 33 30 00 49 1D  82 00 99 C7 28 31 34 32  |.1130.I.....(142|
00000120: 29 C7 28 31 32 29 22 1D  1D 1D 1D 50 41 52 54 49  |).(12)"....PARTI|
00000130: 54 49 4F 4E 53 20 4F 4E  20 54 48 49 53 20 44 49  |TIONS ON THIS DI|
00000140: 53 4B 1D 1D 1D 1D C2 22  3B 00 80 1D 8C 00 99 22  |SK.....";......"|
00000150: 1D 1D 1D 1D 1D 1D 1D B0  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000160: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000170: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 AE 22  |..............."|
00000180: 00 B7 1D 96 00 99 22 C3  C3 C3 C3 C3 C3 C3 C3 C3  |......".........|
00000190: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
000001A0: C3 C3 C3 C3 C3 C3 B3 1D  1D 1D 1D 1D 1D 1D C2 22  |..............."|
000001B0: A3 37 38 29 22 C2 22 00  DE 1D A0 00 81 49 B2 31  |.78)"."......I.1|
000001C0: A4 31 35 3A 99 A3 33 31  29 22 C2 1D 1D 1D 1D 1D  |.15:..31)"......|
000001D0: 1D 1D C2 22 A3 37 38 29  22 C2 22 3A 82 49 00 1A  |...".78)".":.I..|
000001E0: 1E AA 00 99 A3 33 31 29  22 C2 1D 1D 1D 1D 1D 1D  |.....31)".......|
000001F0: 1D AD C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000200: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000210: C3 C3 C3 C3 C3 C3 C3 C3  BD 22 00 3F 1E B4 00 99  |.........".?....|
00000220: A3 33 31 29 22 C2 22 A3  35 31 29 22 D5 C3 C3 C3  |.31)".".51)"....|
00000230: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C9 22 00  |..............".|
00000240: 7F 1E BE 00 99 22 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |....."..........|
00000250: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000260: C3 C3 C3 C3 C3 B3 22 A3  35 31 29 22 C2 31 35 38  |......".51)".158|
00000270: 31 1D B0 C9 1D 1D 1D 1D  1D 1D 1D 1D 1D C2 22 00  |1.............".|
00000280: BF 1E C8 00 99 22 20 20  20 20 20 20 20 20 20 20  |....."          |
00000290: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002A0: 20 20 20 20 20 C2 22 A3  35 31 29 22 C2 1D 1D 1D  |     .".51)"....|
000002B0: 1D 1D AB CB 1D 1D 1D 1D  1D 1D 1D 1D 1D C2 22 00  |..............".|
000002C0: FF 1E D2 00 99 22 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |....."..........|
000002D0: C3 B2 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 B2 C3 C3 C3  |................|
000002E0: C3 C3 C3 C3 C3 B3 22 A3  35 31 29 22 C2 1D 1D 1D  |......".51)"....|
000002F0: 1D 1D C2 41 52 54 49 54  49 4F 4E 45 52 C2 22 00  |...ARTITIONER.".|
00000300: 3F 1F DC 00 99 22 46 49  52 53 54 20 54 52 41 43  |?...."FIRST TRAC|
00000310: 4B C2 4C 41 53 54 20 54  52 41 43 4B C2 20 42 4C  |K.LAST TRACK. BL|
00000320: 4F 43 4B 53 20 C2 22 A3  35 31 29 22 CA C3 C3 C3  |OCKS .".51)"....|
00000330: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 CB 22 00  |..............".|
00000340: 88 1F E6 00 99 22 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |....."..........|
00000350: C3 DB C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 DB C3 C3 C3  |................|
00000360: C3 C3 C3 C3 C3 B3 22 A3  34 36 29 22 28 43 29 20  |......".46)"(C) |
00000370: 31 39 39 30 20 43 4F 4D  50 55 54 45 21 27 53 20  |1990 COMPUTE!'S |
00000380: 47 41 5A 45 54 54 45 22  00 C2 1F F0 00 99 22 1D  |GAZETTE"......".|
00000390: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D C2 1D 1D 1D 1D 1D  |................|
000003A0: 1D 1D 1D 1D 1D C2 1D 1D  1D 1D 1D 1D 1D 1D C2 13  |................|
000003B0: 22 3A 44 56 B2 38 3A 8D  31 30 37 30 3A 8D 31 31  |":DV.8:.1070:.11|
000003C0: 34 30 00 DB 1F FA 00 8D  31 31 35 30 3A FE 1A 34  |40......1150:..4|
000003D0: 30 2C 31 2C 37 37 2C 31  36 2C 31 00 20 20 04 01  |0,1,77,16,1.  ..|
000003E0: 99 22 1D 1D 1D 1D 12 46  31 92 1D 1D 43 52 45 41  |.".....F1...CREA|
000003F0: 54 45 20 41 20 50 41 52  54 49 54 49 4F 4E 22 3A  |TE A PARTITION":|
00000400: 99 22 11 1D 1D 1D 1D 12  46 32 92 1D 1D 41 43 43  |."......F2...ACC|
00000410: 45 53 53 20 41 20 50 41  52 54 49 54 49 4F 4E 22  |ESS A PARTITION"|
00000420: 00 4F 20 0E 01 99 22 11  1D 1D 1D 1D 12 46 33 92  |.O ..."......F3.|
00000430: 1D 1D 52 45 54 55 52 4E  20 54 4F 20 54 48 45 20  |..RETURN TO THE |
00000440: 52 4F 4F 54 20 44 49 52  45 43 54 4F 52 59 22 00  |ROOT DIRECTORY".|
00000450: 74 20 18 01 99 22 11 1D  1D 1D 1D 12 46 34 92 1D  |t ..."......F4..|
00000460: 1D 44 45 4C 45 54 45 20  41 20 50 41 52 54 49 54  |.DELETE A PARTIT|
00000470: 49 4F 4E 22 00 B3 20 22  01 99 22 11 1D 1D 1D 1D  |ION".. "..".....|
00000480: 12 46 35 92 1D 1D 46 4F  52 4D 41 54 20 41 20 44  |.F5...FORMAT A D|
00000490: 49 53 4B 20 2F 22 3A 99  22 1D 1D 1D 1D 1D 1D 1D  |ISK /":.".......|
000004A0: 1D 43 55 52 52 45 4E 54  20 50 41 52 54 49 54 49  |.CURRENT PARTITI|
000004B0: 4F 4E 22 00 F6 20 2C 01  99 22 11 1D 1D 1D 1D 12  |ON".. ,.."......|
000004C0: 46 36 92 1D 1D 43 48 41  4E 47 45 20 44 52 49 56  |F6...CHANGE DRIV|
000004D0: 45 20 4E 55 4D 42 45 52  22 3A 99 22 11 1D 1D 1D  |E NUMBER":."....|
000004E0: 1D 12 46 37 92 1D 1D 56  49 45 57 20 44 49 52 45  |..F7...VIEW DIRE|
000004F0: 43 54 4F 52 59 22 00 17  21 36 01 99 22 11 1D 1D  |CTORY"..!6.."...|
00000500: 1D 1D 12 45 53 43 92 1D  1D 45 58 49 54 20 50 52  |...ESC...EXIT PR|
00000510: 4F 47 52 41 4D 13 22 00  2F 21 40 01 A1 F9 41 24  |OGRAM."./!@...A$|
00000520: 3A 8B 41 24 B2 C7 28 32  37 29 A7 31 31 33 30 00  |:.A$..(27).1130.|
00000530: 48 21 4A 01 41 B2 C5 28  41 24 29 3A 8B 41 B3 31  |H!J.A..(A$):.A.1|
00000540: B0 41 B1 37 A7 33 32 30  00 75 21 54 01 91 41 8D  |.A.7.320.u!T..A.|
00000550: 33 35 30 2C 39 37 30 2C  31 30 30 30 2C 31 30 31  |350,970,1000,101|
00000560: 30 2C 31 30 33 30 2C 31  30 37 30 2C 31 31 31 30  |0,1030,1070,1110|
00000570: 3A 89 32 35 30 00 C6 21  5E 01 8B 42 4C B3 31 32  |:.250..!^..BL.12|
00000580: 30 A7 99 22 93 11 11 11  11 11 11 11 11 22 A3 39  |0..".........".9|
00000590: 29 22 4E 4F 20 52 4F 4F  4D 20 46 4F 52 20 41 20  |)"NO ROOM FOR A |
000005A0: 50 41 52 54 49 54 49 4F  4E 11 22 3A 99 A3 31 35  |PARTITION.":..15|
000005B0: 29 22 12 50 52 45 53 53  20 41 20 4B 45 59 22 3A  |)".PRESS A KEY":|
000005C0: A1 F9 41 24 3A 8E 00 05  22 68 01 99 22 93 11 44  |..A$:..."h.."..D|
000005D0: 4F 20 59 4F 55 20 57 49  53 48 20 54 4F 20 43 52  |O YOU WISH TO CR|
000005E0: 45 41 54 45 20 41 20 50  41 52 54 49 54 49 4F 4E  |EATE A PARTITION|
000005F0: 20 4F 4E 22 3A 99 22 54  48 45 20 42 41 53 49 53  | ON":."THE BASIS|
00000600: 20 4F 46 3A 22 00 36 22  72 01 99 22 11 1D 12 46  | OF:".6"r.."...F|
00000610: 31 92 1D 1D 54 48 45 20  4E 55 4D 42 45 52 20 4F  |1...THE NUMBER O|
00000620: 46 20 50 41 52 54 49 54  49 4F 4E 53 20 50 45 52  |F PARTITIONS PER|
00000630: 20 44 49 53 4B 22 00 5F  22 7C 01 99 22 11 1D 12  | DISK"._"|.."...|
00000640: 46 33 92 1D 1D 54 48 45  20 53 49 5A 45 20 4F 46  |F3...THE SIZE OF|
00000650: 20 54 48 45 20 50 41 52  54 49 54 49 4F 4E 22 00  | THE PARTITION".|
00000660: 8C 22 86 01 99 22 11 1D  12 46 35 92 1D 1D 54 48  |."..."...F5...TH|
00000670: 45 20 4C 4F 43 41 54 49  4F 4E 20 4F 46 20 54 48  |E LOCATION OF TH|
00000680: 45 20 50 41 52 54 49 54  49 4F 4E 22 00 AF 22 90  |E PARTITION"..".|
00000690: 01 99 22 11 1D 12 46 37  92 1D 1D 52 45 54 55 52  |.."...F7...RETUR|
000006A0: 4E 20 54 4F 20 4D 41 49  4E 20 4D 45 4E 55 22 00  |N TO MAIN MENU".|
000006B0: CD 22 9A 01 A1 F9 41 24  3A 41 B2 C5 28 41 24 29  |."....A$:A..(A$)|
000006C0: 3A 8B 41 B3 31 B0 41 B1  37 A7 34 31 30 00 EE 22  |:.A.1.A.7.410.."|
000006D0: A4 01 91 41 8D 34 33 30  2C 34 31 30 2C 36 35 30  |...A.430,410,650|
000006E0: 2C 34 31 30 2C 38 31 30  2C 34 31 30 3A 8E 00 50  |,410,810,410:..P|
000006F0: 23 AE 01 99 22 93 11 11  54 48 49 53 20 4F 50 54  |#..."...THIS OPT|
00000700: 49 4F 4E 20 57 49 4C 4C  20 43 52 45 41 54 45 20  |ION WILL CREATE |
00000710: 41 20 4E 55 4D 42 45 52  20 4F 46 22 3A 99 22 45  |A NUMBER OF":."E|
00000720: 51 55 41 4C 20 50 41 52  54 49 54 49 4F 4E 53 2C  |QUAL PARTITIONS,|
00000730: 20 55 53 45 44 20 41 53  20 27 4D 41 4E 59 20 44  | USED AS 'MANY D|
00000740: 49 53 4B 53 22 3A 99 22  49 4E 20 4F 4E 45 27 22  |ISKS":."IN ONE'"|
00000750: 00 C5 23 B8 01 99 22 48  4F 57 20 4D 41 4E 59 20  |..#..."HOW MANY |
00000760: 50 41 52 54 49 54 49 4F  4E 53 20 57 4F 55 4C 44  |PARTITIONS WOULD|
00000770: 20 59 4F 55 20 4C 49 4B  45 20 54 4F 22 3A 99 22  | YOU LIKE TO":."|
00000780: 43 52 45 41 54 45 3F 20  28 46 52 4F 4D 20 32 20  |CREATE? (FROM 2 |
00000790: 54 4F 20 32 30 2C 20 55  53 45 20 45 56 45 4E 20  |TO 20, USE EVEN |
000007A0: 22 3A 99 22 11 11 1D 1D  4F 52 20 50 52 45 53 53  |":."....OR PRESS|
000007B0: 20 12 46 38 92 20 54 4F  20 41 42 4F 52 54 2E 2E  | .F8. TO ABORT..|
000007C0: 2E 91 91 91 22 00 01 24  C2 01 4E 50 B2 30 3A 4E  |...."..$..NP.0:N|
000007D0: 50 24 B2 22 22 3A 85 22  4E 55 4D 42 45 52 53 20  |P$."":."NUMBERS |
000007E0: 4F 4E 4C 59 2C 20 50 4C  45 41 53 45 29 22 3B 4E  |ONLY, PLEASE)";N|
000007F0: 50 24 3A 8B 4E 50 24 B2  22 41 42 4F 52 54 22 A7  |P$:.NP$."ABORT".|
00000800: 8E 00 2F 24 CC 01 4E 50  B2 C5 28 4E 50 24 29 3A  |../$..NP..(NP$):|
00000810: 8B 28 4E 50 AD 32 29 B3  B1 B5 28 4E 50 AD 32 29  |.(NP.2)...(NP.2)|
00000820: B0 4E 50 B3 32 B0 4E 50  B1 32 30 A7 34 33 30 00  |.NP.2.NP.20.430.|
00000830: 5C 24 D6 01 99 22 93 11  11 11 11 57 4F 55 4C 44  |\$...".....WOULD|
00000840: 20 59 4F 55 20 4C 49 4B  45 20 54 4F 20 53 41 56  | YOU LIKE TO SAV|
00000850: 45 20 41 20 43 4F 50 59  20 4F 46 22 00 84 24 E0  |E A COPY OF"..$.|
00000860: 01 99 22 54 48 49 53 20  50 52 4F 47 52 41 4D 20  |.."THIS PROGRAM |
00000870: 4F 4E 20 54 48 45 20 44  49 53 4B 20 28 59 2F 4E  |ON THE DISK (Y/N|
00000880: 29 20 3F 22 00 AC 24 EA  01 53 50 24 B2 22 22 3A  |) ?"..$..SP$."":|
00000890: A1 F9 53 50 24 3A 8B 53  50 24 B3 B1 22 4E 22 AF  |..SP$:.SP$.."N".|
000008A0: 53 50 24 B3 B1 22 59 22  A7 34 39 30 00 D4 24 F4  |SP$.."Y".490..$.|
000008B0: 01 E8 3A 81 49 B2 31 A4  4E 50 3A 99 22 57 48 41  |..:.I.1.NP:."WHA|
000008C0: 54 20 57 49 4C 4C 20 50  41 52 54 49 54 49 4F 4E  |T WILL PARTITION|
000008D0: 20 23 22 49 00 23 25 FE  01 50 4E 24 28 49 29 B2  | #"I.#%..PN$(I).|
000008E0: 22 22 3A 99 22 42 45 20  43 41 4C 4C 45 44 20 22  |"":."BE CALLED "|
000008F0: 49 22 9D 9D 9D 9D 22 3B  3A 85 50 4E 24 28 49 29  |I"....";:.PN$(I)|
00000900: 3A 8B 50 4E 24 28 49 29  B2 22 22 B0 C3 28 50 4E  |:.PN$(I).""..(PN|
00000910: 24 28 49 29 29 B1 31 36  A7 99 22 91 91 22 3A 89  |$(I)).16.."..":.|
00000920: 35 31 30 00 7B 25 08 02  82 49 3A 99 22 93 11 11  |510.{%...I:."...|
00000930: 11 11 1D 1D 50 52 45 53  53 20 12 52 45 54 55 52  |....PRESS .RETUR|
00000940: 4E 92 20 54 4F 20 43 4F  4E 54 49 4E 55 45 2C 22  |N. TO CONTINUE,"|
00000950: 3A 99 22 1D 1D 4F 52 20  12 46 38 92 20 54 4F 20  |:."..OR .F8. TO |
00000960: 41 42 4F 52 54 2E 2E 2E  22 3A A1 F9 41 24 3A 8B  |ABORT...":..A$:.|
00000970: 41 24 B3 B1 C7 28 31 33  29 A7 8E 00 D8 25 12 02  |A$...(13)....%..|
00000980: 99 22 93 11 11 11 11 11  11 11 1D 1D 43 52 45 41  |."..........CREA|
00000990: 54 49 4E 47 20 50 41 52  54 49 54 49 4F 4E 53 2E  |TING PARTITIONS.|
000009A0: 2E 2E 22 3A 53 B2 B5 28  31 35 38 30 AD 28 4E 50  |..":S..(1580.(NP|
000009B0: AD 32 29 29 3A 53 B2 34  30 AC B5 28 53 AD 34 30  |.2)):S.40..(S.40|
000009C0: 29 3A 8B 4E 50 B2 34 B0  4E 50 B2 36 A7 53 B2 53  |):.NP.4.NP.6.S.S|
000009D0: AB 34 30 3A 89 35 35 30  00 F1 25 1C 02 8B 4E 50  |.40:.550..%...NP|
000009E0: B2 32 AF 53 50 24 B2 22  59 22 A7 53 B2 53 AB 34  |.2.SP$."Y".S.S.4|
000009F0: 30 00 20 26 26 02 58 B2  B5 28 53 AD 32 35 36 29  |0. &&.X..(S.256)|
00000A00: 3A 59 B2 53 AB 28 58 AC  32 35 36 29 3A 54 54 B2  |:Y.S.(X.256):TT.|
00000A10: 31 3A 54 B2 53 AD 34 30  3A 49 B2 31 3A 42 B2 30  |1:T.S.40:I.1:B.0|
00000A20: 00 87 26 30 02 FE 1A 34  30 2C 31 2C 37 37 2C 31  |..&0...40,1,77,1|
00000A30: 36 2C 31 3A 99 49 3B 3A  50 24 B2 50 4E 24 28 49  |6,1:.I;:P$.PN$(I|
00000A40: 29 3A 98 31 35 2C 22 2F  30 3A 22 50 24 22 2C 22  |):.15,"/0:"P$","|
00000A50: AA C7 28 54 54 29 AA C7  28 30 29 AA C7 28 59 29  |..(TT)..(0)..(Y)|
00000A60: AA C7 28 58 29 AA 22 2C  43 22 3A 8B 44 53 B3 B1  |..(X).",C":.DS..|
00000A70: 30 A7 8D 31 31 34 30 3A  98 31 35 2C 22 2F 22 3A  |0..1140:.15,"/":|
00000A80: 8D 31 31 36 30 3A 8E 00  BA 26 3A 02 54 54 B2 54  |.1160:...&:.TT.T|
00000A90: 54 AA 54 3A 49 B2 49 AA  31 3A 8B 42 B2 30 AF 28  |T.T:I.I.1:.B.0.(|
00000AA0: 54 54 AC 34 30 29 AA 53  B1 B2 31 35 36 30 A7 54  |TT.40).S..1560.T|
00000AB0: 54 B2 34 31 3A 42 B2 42  AA 31 00 CE 26 44 02 8B  |T.41:B.B.1..&D..|
00000AC0: 50 4E 24 28 49 29 B3 B1  22 22 A7 35 36 30 00 06  |PN$(I).."".560..|
00000AD0: 27 4E 02 FE 1A 34 30 2C  31 2C 37 37 2C 31 36 2C  |'N...40,1,77,16,|
00000AE0: 31 3A 99 22 11 11 11 11  11 11 11 1D 1D 46 4F 52  |1:.".........FOR|
00000AF0: 4D 41 54 54 49 4E 47 20  50 41 52 54 49 54 49 4F  |MATTING PARTITIO|
00000B00: 4E 53 2E 2E 2E 22 00 52  27 58 02 81 49 B2 31 A4  |NS...".R'X..I.1.|
00000B10: 4E 50 3A FE 1A 37 30 2C  38 2C 37 35 2C 38 2C 31  |NP:..70,8,75,8,1|
00000B20: 3A 99 49 3B 3A 98 31 35  2C 22 2F 30 3A 22 AA 50  |:.I;:.15,"/0:".P|
00000B30: 4E 24 28 49 29 3A 8B 44  53 B3 B1 32 A7 8D 31 31  |N$(I):.DS..2..11|
00000B40: 34 30 3A 98 31 35 2C 22  2F 22 3A 8D 31 31 36 30  |40:.15,"/":.1160|
00000B50: 3A 8E 00 AC 27 62 02 98  31 35 2C 22 4E 30 3A 22  |:...'b..15,"N0:"|
00000B60: AA 28 50 4E 24 28 49 29  29 AA 22 2C 22 AA C7 28  |.(PN$(I)).","..(|
00000B70: B5 28 BB 28 31 29 AC 32  35 29 AA 36 35 29 AA C7  |.(.(1).25).65)..|
00000B80: 28 B5 28 BB 28 31 29 AC  32 35 29 AA 36 35 29 3A  |(.(.(1).25).65):|
00000B90: 8B 44 53 B3 B1 30 A7 8D  31 31 34 30 3A 98 31 35  |.DS..0..1140:.15|
00000BA0: 2C 22 2F 22 3A 8D 31 31  36 30 3A 8E 00 DE 27 6C  |,"/":.1160:...'l|
00000BB0: 02 98 31 35 2C 22 2F 22  3A 8B 44 53 B3 B1 32 A7  |..15,"/":.DS..2.|
00000BC0: 8D 31 31 34 30 3A 98 31  35 2C 22 49 30 22 C7 28  |.1140:.15,"I0".(|
00000BD0: 31 33 29 22 2F 22 3A 8D  31 31 36 30 3A 8E 00 0E  |13)"/":.1160:...|
00000BE0: 28 76 02 8D 31 31 36 30  3A 82 49 3A 8B 53 50 24  |(v..1160:.I:.SP$|
00000BF0: B2 22 59 22 A7 EF 22 31  35 38 31 20 50 41 52 54  |."Y".."1581 PART|
00000C00: 49 54 49 4F 4E 45 52 22  2C 55 28 44 56 29 00 1A  |ITIONER",U(DV)..|
00000C10: 28 80 02 8D 31 31 34 30  3A 8E 00 8D 28 8A 02 99  |(...1140:...(...|
00000C20: 22 93 11 11 54 48 49 53  20 4F 50 54 49 4F 4E 20  |"...THIS OPTION |
00000C30: 57 49 4C 4C 20 43 52 45  41 54 45 20 4F 4E 45 20  |WILL CREATE ONE |
00000C40: 50 41 52 54 49 54 49 4F  4E 22 3A 99 22 4F 46 20  |PARTITION":."OF |
00000C50: 41 20 53 50 45 43 49 46  49 43 20 53 49 5A 45 2C  |A SPECIFIC SIZE,|
00000C60: 20 55 53 45 46 55 4C 20  46 4F 52 20 41 20 57 4F  | USEFUL FOR A WO|
00000C70: 52 4B 22 3A 99 22 41 52  45 41 20 4F 52 20 41 20  |RK":."AREA OR A |
00000C80: 42 4F 4F 54 20 53 45 43  54 4F 52 11 22 00 E4 28  |BOOT SECTOR."..(|
00000C90: 94 02 99 22 41 50 50 52  4F 58 49 4D 41 54 45 4C  |..."APPROXIMATEL|
00000CA0: 59 20 48 4F 57 20 4D 41  4E 59 20 42 4C 4F 43 4B  |Y HOW MANY BLOCK|
00000CB0: 53 20 57 49 4C 4C 20 54  48 45 22 3A 99 22 50 41  |S WILL THE":."PA|
00000CC0: 52 54 49 54 49 4F 4E 20  42 45 3F 20 28 4D 55 4C  |RTITION BE? (MUL|
00000CD0: 54 49 50 4C 45 20 4F 46  20 34 30 20 42 45 54 57  |TIPLE OF 40 BETW|
00000CE0: 45 45 4E 22 00 23 29 9E  02 99 22 11 11 1D 1D 4F  |EEN".#)..."....O|
00000CF0: 52 20 50 52 45 53 53 20  12 46 38 92 20 54 4F 20  |R PRESS .F8. TO |
00000D00: 41 42 4F 52 54 2E 2E 2E  91 91 91 22 3A 4C 42 B2  |ABORT......":LB.|
00000D10: 42 4C 3A 8B 4C 42 B1 31  35 36 30 A7 4C 42 B2 31  |BL:.LB.1560.LB.1|
00000D20: 35 36 30 00 66 29 A8 02  50 53 B2 30 3A 50 53 24  |560.f)..PS.0:PS$|
00000D30: B2 22 22 3A 99 22 31 32  30 20 41 4E 44 22 4C 42  |."":."120 AND"LB|
00000D40: 22 20 42 4C 4F 43 4B 53  20 50 4C 45 41 53 45 29  |" BLOCKS PLEASE)|
00000D50: 22 3B 3A 85 50 53 24 3A  8B 50 53 24 B2 22 41 42  |";:.PS$:.PS$."AB|
00000D60: 4F 52 54 22 A7 8E 00 9A  29 B2 02 50 53 B2 C5 28  |ORT"....)..PS..(|
00000D70: 50 53 24 29 3A 8B 50 53  B3 31 32 30 B0 50 53 B1  |PS$):.PS.120.PS.|
00000D80: 4C 42 B0 28 28 50 53 AD  34 30 29 B3 B1 B5 28 50  |LB.((PS.40)...(P|
00000D90: 53 AD 34 30 29 29 A7 36  35 30 00 EA 29 BC 02 99  |S.40)).650..)...|
00000DA0: 22 93 11 11 57 4F 55 4C  44 20 59 4F 55 20 4C 49  |"...WOULD YOU LI|
00000DB0: 4B 45 20 54 4F 20 53 41  56 45 20 41 20 43 4F 50  |KE TO SAVE A COP|
00000DC0: 59 20 4F 46 22 3A 99 22  54 48 49 53 20 50 52 4F  |Y OF":."THIS PRO|
00000DD0: 47 52 41 4D 20 4F 4E 20  54 48 45 20 44 49 53 4B  |GRAM ON THE DISK|
00000DE0: 20 28 59 2F 4E 29 20 3F  22 3B 00 12 2A C6 02 53  | (Y/N) ?";..*..S|
00000DF0: 50 24 B2 22 22 3A A1 F9  53 50 24 3A 8B 53 50 24  |P$."":..SP$:.SP$|
00000E00: B3 B1 22 59 22 AF 53 50  24 B3 B1 22 4E 22 A7 37  |.."Y".SP$.."N".7|
00000E10: 31 30 00 5D 2A D0 02 99  22 93 11 11 57 48 41 54  |10.]*..."...WHAT|
00000E20: 20 57 49 4C 4C 20 54 48  45 20 50 41 52 54 49 54  | WILL THE PARTIT|
00000E30: 49 4F 4E 20 42 45 20 43  41 4C 4C 45 44 3F 22 3A  |ION BE CALLED?":|
00000E40: 4E 24 B2 22 22 3A 85 4E  24 3A 8B 4E 24 B2 22 22  |N$."":.N$:.N$.""|
00000E50: B0 C3 28 4E 24 29 B1 31  36 A7 37 32 30 00 B2 2A  |..(N$).16.720..*|
00000E60: DA 02 99 22 93 11 11 11  11 1D 1D 50 52 45 53 53  |...".......PRESS|
00000E70: 20 12 52 45 54 55 52 4E  92 20 54 4F 20 43 4F 4E  | .RETURN. TO CON|
00000E80: 54 49 4E 55 45 2C 22 3A  99 22 1D 1D 4F 52 20 12  |TINUE,":."..OR .|
00000E90: 46 38 92 20 54 4F 20 41  42 4F 52 54 2E 2E 2E 22  |F8. TO ABORT..."|
00000EA0: 3A A1 F9 41 24 3A 8B 41  24 B3 B1 C7 28 31 33 29  |:..A$:.A$...(13)|
00000EB0: A7 8E 00 08 2B E4 02 99  22 93 11 11 11 11 11 11  |....+...".......|
00000EC0: 11 1D 1D 43 52 45 41 54  49 4E 47 20 50 41 52 54  |...CREATING PART|
00000ED0: 49 54 49 4F 4E 2E 2E 2E  22 3A 46 54 B2 31 3A 50  |ITION...":FT.1:P|
00000EE0: 53 B2 34 30 AC 28 B5 28  50 53 AD 34 30 29 29 3A  |S.40.(.(PS.40)):|
00000EF0: 58 B2 B5 28 50 53 AD 32  35 36 29 3A 59 B2 50 53  |X..(PS.256):Y.PS|
00000F00: AB 28 58 AC 32 35 36 29  00 52 2B EE 02 98 31 35  |.(X.256).R+...15|
00000F10: 2C 22 2F 30 3A 22 4E 24  22 2C 22 AA C7 28 46 54  |,"/0:"N$","..(FT|
00000F20: 29 AA C7 28 30 29 AA C7  28 59 29 AA C7 28 58 29  |)..(0)..(Y)..(X)|
00000F30: AA 22 2C 43 22 3A 8B 44  53 B3 B1 30 A7 8D 31 31  |.",C":.DS..0..11|
00000F40: 34 30 3A 98 31 35 2C 22  2F 22 3A 8D 31 31 36 30  |40:.15,"/":.1160|
00000F50: 3A 8E 00 7F 2B F8 02 98  31 35 2C 22 2F 30 3A 22  |:...+...15,"/0:"|
00000F60: 4E 24 3A 8B 44 53 B3 B1  32 A7 8D 31 31 34 30 3A  |N$:.DS..2..1140:|
00000F70: 98 31 35 2C 22 2F 22 3A  8D 31 31 36 30 3A 8E 00  |.15,"/":.1160:..|
00000F80: BC 2B 02 03 8D 31 31 36  30 3A FE 1A 34 30 2C 31  |.+...1160:..40,1|
00000F90: 2C 37 37 2C 31 36 2C 31  3A 99 22 11 11 11 11 11  |,77,16,1:.".....|
00000FA0: 11 11 1D 1D 46 4F 52 4D  41 54 54 49 4E 47 20 50  |....FORMATTING P|
00000FB0: 41 52 54 49 54 49 4F 4E  2E 2E 2E 22 00 0E 2C 0C  |ARTITION..."..,.|
00000FC0: 03 98 31 35 2C 22 4E 30  3A 22 4E 24 22 2C 22 AA  |..15,"N0:"N$",".|
00000FD0: C7 28 B5 28 BB 28 31 29  AC 32 35 29 AA 36 35 29  |.(.(.(1).25).65)|
00000FE0: AA C7 28 B5 28 BB 28 31  29 AC 32 35 29 AA 36 35  |..(.(.(1).25).65|
00000FF0: 29 3A 8B 44 53 B3 B1 30  A7 8D 31 31 34 30 3A 98  |):.DS..0..1140:.|
00001000: 31 35 2C 22 2F 22 3A 8D  31 31 36 30 3A 8E 00 35  |15,"/":.1160:..5|
00001010: 2C 16 03 8B 53 50 24 B2  22 59 22 A7 EF 22 31 35  |,...SP$."Y".."15|
00001020: 38 31 20 50 41 52 54 49  54 49 4F 4E 45 52 22 2C  |81 PARTITIONER",|
00001030: 55 28 44 56 29 00 41 2C  20 03 8D 31 31 34 30 3A  |U(DV).A, ..1140:|
00001040: 8E 00 B7 2C 2A 03 99 22  93 11 11 54 48 49 53 20  |...,*.."...THIS |
00001050: 4F 50 54 49 4F 4E 20 57  49 4C 4C 20 43 52 45 41  |OPTION WILL CREA|
00001060: 54 45 20 41 20 50 41 52  54 49 54 49 4F 4E 22 3A  |TE A PARTITION":|
00001070: 99 22 41 54 20 41 20 43  45 52 54 41 49 4E 20 4C  |."AT A CERTAIN L|
00001080: 4F 43 41 54 49 4F 4E 20  41 4E 44 20 41 20 43 45  |OCATION AND A CE|
00001090: 52 54 41 49 4E 22 3A 99  22 53 49 5A 45 2C 20 55  |RTAIN":."SIZE, U|
000010A0: 53 45 46 55 4C 20 46 4F  52 20 50 52 4F 54 45 43  |SEFUL FOR PROTEC|
000010B0: 54 49 4E 47 20 41 22 00  03 2D 34 03 99 22 50 41  |TING A"..-4.."PA|
000010C0: 52 54 49 43 55 4C 41 52  20 50 4F 52 54 49 4F 4E  |RTICULAR PORTION|
000010D0: 20 4F 46 20 54 48 45 20  44 49 53 4B 22 3A 99 22  | OF THE DISK":."|
000010E0: 11 11 11 1D 1D 4F 52 20  50 52 45 53 53 20 12 46  |.....OR PRESS .F|
000010F0: 38 92 20 54 4F 20 41 42  4F 52 54 2E 2E 2E 91 91  |8. TO ABORT.....|
00001100: 91 91 22 00 4B 2D 3E 03  99 22 57 48 41 54 20 57  |..".K->.."WHAT W|
00001110: 49 4C 4C 20 54 48 45 20  50 41 52 54 49 54 49 4F  |ILL THE PARTITIO|
00001120: 4E 20 42 45 20 43 41 4C  4C 45 44 3F 22 3A 4E 24  |N BE CALLED?":N$|
00001130: B2 22 22 3A 85 4E 24 3A  8B 4E 24 B2 22 22 B0 4E  |."":.N$:.N$."".N|
00001140: 24 B2 22 41 42 4F 52 54  22 A7 8E 00 5D 2D 48 03  |$."ABORT"...]-H.|
00001150: 8B C3 28 4E 24 29 B1 31  36 A7 38 33 30 00 C3 2D  |..(N$).16.830..-|
00001160: 52 03 46 54 B2 30 3A 54  46 24 B2 C9 28 22 30 30  |R.FT.0:TF$..("00|
00001170: 22 AA C4 28 54 46 AA 31  29 2C 33 29 3A 99 22 93  |"..(TF.1),3):.".|
00001180: 11 11 57 48 41 54 20 49  53 20 54 48 45 20 53 54  |..WHAT IS THE ST|
00001190: 41 52 54 49 4E 47 20 54  52 41 43 4B 20 20 22 54  |ARTING TRACK  "T|
000011A0: 46 24 22 9D 9D 9D 9D 22  3B 3A 85 46 54 3A 8B 46  |F$"....";:.FT:.F|
000011B0: 54 B2 34 30 B0 46 54 B3  54 81 46 54 B1 54 4C A7  |T.40.FT.T.FT.TL.|
000011C0: 38 35 30 00 E3 2D 5C 03  53 53 B2 30 3A 4C 42 B2  |850..-\.SS.0:LB.|
000011D0: 42 4C 3A 8B 4C 42 B1 31  35 36 30 A7 4C 42 B2 31  |BL:.LB.1560.LB.1|
000011E0: 35 36 30 00 55 2E 66 03  99 22 11 48 4F 57 20 4D  |560.U.f..".HOW M|
000011F0: 41 4E 59 20 53 45 43 54  4F 52 53 20 49 53 20 49  |ANY SECTORS IS I|
00001200: 54 20 28 4D 55 4C 54 49  50 4C 45 20 4F 46 20 34  |T (MULTIPLE OF 4|
00001210: 30 22 3A 99 22 42 45 54  57 45 45 4E 20 31 32 30  |0":."BETWEEN 120|
00001220: 20 41 4E 44 22 4C 42 22  29 22 3B 3A 85 53 43 3A  | AND"LB")";:.SC:|
00001230: 8B 53 43 B3 31 32 30 B0  53 43 B1 4C 42 B0 28 28  |.SC.120.SC.LB.((|
00001240: 53 43 AD 34 30 29 B3 B1  B5 28 53 43 AD 34 30 29  |SC.40)...(SC.40)|
00001250: 29 A7 38 36 30 00 AA 2E  70 03 99 22 93 11 11 11  |).860...p.."....|
00001260: 11 1D 1D 50 52 45 53 53  20 12 52 45 54 55 52 4E  |...PRESS .RETURN|
00001270: 92 20 54 4F 20 43 4F 4E  54 49 4E 55 45 2C 22 3A  |. TO CONTINUE,":|
00001280: 99 22 1D 1D 4F 52 20 12  46 38 92 20 54 4F 20 41  |."..OR .F8. TO A|
00001290: 42 4F 52 54 2E 2E 2E 22  3A A1 F9 41 24 3A 8B 41  |BORT...":..A$:.A|
000012A0: 24 B3 B1 C7 28 31 33 29  A7 8E 00 EA 2E 7A 03 58  |$...(13).....z.X|
000012B0: B2 B5 28 53 43 AD 32 35  36 29 3A 59 B2 53 43 AB  |..(SC.256):Y.SC.|
000012C0: 28 58 AC 32 35 36 29 3A  99 22 93 11 11 11 11 11  |(X.256):."......|
000012D0: 11 11 1D 1D 43 52 45 41  54 49 4E 47 20 50 41 52  |....CREATING PAR|
000012E0: 54 49 54 49 4F 4E 2E 2E  2E 22 00 35 2F 84 03 98  |TITION...".5/...|
000012F0: 31 35 2C 22 2F 30 3A 22  4E 24 22 2C 22 AA C7 28  |15,"/0:"N$","..(|
00001300: 46 54 29 AA C7 28 53 53  29 AA C7 28 59 29 AA C7  |FT)..(SS)..(Y)..|
00001310: 28 58 29 AA 22 2C 43 22  3A 8B 44 53 B3 B1 30 A7  |(X).",C":.DS..0.|
00001320: 8D 31 31 34 30 3A 98 31  35 2C 22 2F 22 3A 8D 31  |.1140:.15,"/":.1|
00001330: 31 36 30 3A 8E 00 76 2F  8E 03 99 22 93 11 11 57  |160:..v/..."...W|
00001340: 4F 55 4C 44 20 59 4F 55  20 4C 49 4B 45 20 54 4F  |OULD YOU LIKE TO|
00001350: 20 46 4F 52 4D 41 54 20  54 48 45 20 4E 45 57 22  | FORMAT THE NEW"|
00001360: 3A 99 22 50 41 52 54 49  54 49 4F 4E 20 28 59 2F  |:."PARTITION (Y/|
00001370: 4E 29 20 3F 22 3B 00 94  2F 98 03 A1 F9 41 24 3A  |N) ?";../....A$:|
00001380: 8B 41 24 B3 B1 22 59 22  AF 41 24 B3 B1 22 4E 22  |.A$.."Y".A$.."N"|
00001390: A7 39 32 30 00 CC 2F A2  03 99 41 24 3A 8B 41 24  |.920../...A$:.A$|
000013A0: B2 22 59 22 A7 FE 18 3A  99 22 93 11 11 11 11 11  |."Y"...:."......|
000013B0: 11 11 1D 1D 46 4F 52 4D  41 54 54 49 4E 47 20 50  |....FORMATTING P|
000013C0: 41 52 54 49 54 49 4F 4E  2E 2E 2E 22 00 F9 2F AC  |ARTITION..."../.|
000013D0: 03 98 31 35 2C 22 2F 30  3A 22 4E 24 3A 8B 44 53  |..15,"/0:"N$:.DS|
000013E0: B3 B1 32 A7 8D 31 31 34  30 3A 98 31 35 2C 22 2F  |..2..1140:.15,"/|
000013F0: 22 3A 8D 31 31 36 30 3A  8E 00 51 30 B6 03 8D 31  |":.1160:..Q0...1|
00001400: 31 36 30 3A 98 31 35 2C  22 4E 30 3A 22 4E 24 22  |160:.15,"N0:"N$"|
00001410: 2C 22 AA C7 28 B5 28 BB  28 31 29 AC 32 35 29 AA  |,"..(.(.(1).25).|
00001420: 36 35 29 AA C7 28 B5 28  BB 28 31 29 AC 32 35 29  |65)..(.(.(1).25)|
00001430: AA 36 35 29 3A 8B 44 53  B3 B1 30 A7 8D 31 31 34  |.65):.DS..0..114|
00001440: 30 3A 98 31 35 2C 22 2F  22 3A 8D 31 31 36 30 3A  |0:.15,"/":.1160:|
00001450: 8E 00 60 30 C0 03 FE 19  3A 8D 31 31 34 30 3A 8E  |..`0....:.1140:.|
00001460: 00 D8 30 CA 03 99 22 93  11 11 11 11 11 11 45 4E  |..0...".......EN|
00001470: 54 45 52 20 4E 41 4D 45  20 4F 46 20 50 41 52 54  |TER NAME OF PART|
00001480: 49 54 49 4F 4E 20 54 4F  20 41 43 43 45 53 53 2C  |ITION TO ACCESS,|
00001490: 22 3A 99 22 4F 52 20 50  52 45 53 53 20 12 46 38  |":."OR PRESS .F8|
000014A0: 92 20 54 4F 20 41 42 4F  52 54 2E 2E 2E 22 3A 4E  |. TO ABORT...":N|
000014B0: 41 4D 45 24 B2 22 22 3A  85 4E 41 4D 45 24 3A 8B  |AME$."":.NAME$:.|
000014C0: 4E 41 4D 45 24 B2 22 22  B0 4E 41 4D 45 24 B2 22  |NAME$."".NAME$."|
000014D0: 41 42 4F 52 54 22 A7 8E  00 09 31 D4 03 98 31 35  |ABORT"....1...15|
000014E0: 2C 22 2F 30 3A 22 AA 4E  41 4D 45 24 3A 8B 44 53  |,"/0:".NAME$:.DS|
000014F0: B3 B1 32 A7 8D 31 31 34  30 3A 98 31 35 2C 22 2F  |..2..1140:.15,"/|
00001500: 22 3A 8D 31 31 36 30 3A  8E 00 1B 31 DE 03 8D 31  |":.1160:...1...1|
00001510: 31 34 30 3A 8D 31 31 36  30 3A 8E 00 35 31 E8 03  |140:.1160:..51..|
00001520: 98 31 35 2C 22 2F 22 3A  8D 31 31 36 30 3A 8D 31  |.15,"/":.1160:.1|
00001530: 31 34 30 3A 8E 00 A0 31  F2 03 99 22 93 11 11 11  |140:...1..."....|
00001540: 11 11 11 45 4E 54 45 52  20 4E 41 4D 45 20 4F 46  |...ENTER NAME OF|
00001550: 20 50 41 52 54 49 54 49  4F 4E 20 54 4F 20 45 52  | PARTITION TO ER|
00001560: 41 53 45 2C 22 3A 99 22  4F 52 20 50 52 45 53 53  |ASE,":."OR PRESS|
00001570: 20 12 46 38 92 20 54 4F  20 41 42 4F 52 54 2E 2E  | .F8. TO ABORT..|
00001580: 2E 22 3A 5A 24 B2 22 22  3A 85 5A 24 3A 8B 5A 24  |.":Z$."":.Z$:.Z$|
00001590: B2 22 41 42 4F 52 54 22  B0 5A 24 B2 22 22 A7 8E  |."ABORT".Z$.""..|
000015A0: 00 B8 31 FC 03 F2 28 5A  24 29 2C 55 28 44 56 29  |..1...(Z$),U(DV)|
000015B0: 3A 8D 31 31 34 30 3A 8E  00 22 32 06 04 99 22 93  |:.1140:.."2...".|
000015C0: 11 11 11 11 11 45 4E 54  45 52 20 4E 45 57 20 4E  |.....ENTER NEW N|
000015D0: 41 4D 45 20 4F 46 20 44  49 53 4B 20 4F 52 22 3A  |AME OF DISK OR":|
000015E0: 99 22 43 55 52 52 45 4E  54 20 50 41 52 54 49 54  |."CURRENT PARTIT|
000015F0: 49 4F 4E 20 54 4F 20 42  45 20 46 4F 52 4D 41 54  |ION TO BE FORMAT|
00001600: 54 45 44 2C 22 3A 99 22  4F 52 20 50 52 45 53 53  |TED,":."OR PRESS|
00001610: 20 12 46 38 92 20 54 4F  20 41 42 4F 52 54 2E 2E  | .F8. TO ABORT..|
00001620: 2E 22 00 80 32 10 04 99  22 11 11 1D 12 57 41 52  |."..2..."....WAR|
00001630: 4E 49 4E 47 92 3A 20 46  4F 52 4D 41 54 54 49 4E  |NING.: FORMATTIN|
00001640: 47 20 57 49 4C 4C 20 44  45 53 54 52 4F 59 20 41  |G WILL DESTROY A|
00001650: 4E 59 22 3A 99 22 1D 50  41 52 54 49 54 49 4F 4E  |NY":.".PARTITION|
00001660: 53 20 56 49 53 49 42 4C  45 20 49 4E 20 54 48 45  |S VISIBLE IN THE|
00001670: 20 44 49 52 45 43 54 4F  52 59 21 91 91 91 91 22  | DIRECTORY!...."|
00001680: 00 A2 32 1A 04 44 24 B2  22 22 3A 85 44 24 3A 8B  |..2..D$."":.D$:.|
00001690: 44 24 B2 22 41 42 4F 52  54 22 B0 44 24 B2 22 22  |D$."ABORT".D$.""|
000016A0: A7 8E 00 FA 32 24 04 98  31 35 2C 22 4E 30 3A 22  |....2$..15,"N0:"|
000016B0: AA 44 24 AA 22 2C 22 AA  C7 28 B5 28 BB 28 31 29  |.D$.","..(.(.(1)|
000016C0: AC 32 35 29 AA 36 35 29  AA C7 28 B5 28 BB 28 31  |.25).65)..(.(.(1|
000016D0: 29 AC 32 35 29 AA 36 35  29 3A 84 31 35 2C 45 4E  |).25).65):.15,EN|
000016E0: 2C 45 4D 24 2C 45 4E 2C  45 4E 3A 98 31 35 2C 22  |,EM$,EN,EN:.15,"|
000016F0: 2F 22 3A 8D 31 31 36 30  3A 8E 00 7B 33 2E 04 FE  |/":.1160:..{3...|
00001700: 1A 30 2C 30 2C 37 39 2C  32 34 3A 99 22 11 11 11  |.0,0,79,24:."...|
00001710: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
00001720: 11 11 11 11 11 20 20 20  20 20 20 20 20 20 20 20  |.....           |
00001730: 1D 20 20 20 20 20 20 20  20 20 20 1D 20 20 20 20  |.          .    |
00001740: 20 20 20 20 13 22 3A FE  1A 34 30 2C 31 2C 37 37  |    .":..40,1,77|
00001750: 2C 31 36 2C 31 3A 99 22  11 11 11 11 11 11 1D 1D  |,16,1:."........|
00001760: 1D 1D 1D 1D 1D 1D 1D 1D  49 4E 53 45 52 54 20 41  |........INSERT A|
00001770: 20 31 35 38 31 20 44 49  53 4B 22 00 FB 33 38 04  | 1581 DISK"..38.|
00001780: 99 22 1D 1D 1D 1D 1D 1D  1D 1D 1D 49 4E 20 44 45  |.".........IN DE|
00001790: 56 49 43 45 20 4E 55 4D  42 45 52 20 22 44 56 3A  |VICE NUMBER "DV:|
000017A0: 99 22 1D 1D 1D 1D 1D 1D  1D 1D 1D 41 4E 44 20 50  |.".........AND P|
000017B0: 52 45 53 53 20 52 45 54  55 52 4E 2E 2E 2E 22 3A  |RESS RETURN...":|
000017C0: 85 22 91 91 1D 1D 1D 1D  1D 1D 1D 1D 1D 1D 1D 1D  |."..............|
000017D0: 1D 1D 1D 1D 1D 1D 1D 1D  1D 1D 1D 1D 1D 22 3B 41  |.............";A|
000017E0: 24 3A 44 56 B2 C5 28 41  24 29 3A 8B 44 56 B3 38  |$:DV..(A$):.DV.8|
000017F0: B0 44 56 B1 31 31 A7 31  30 37 30 00 6D 34 42 04  |.DV.11.1070.m4B.|
00001800: A0 31 35 3A 9F 31 35 2C  44 56 2C 31 35 2C 22 49  |.15:.15,DV,15,"I|
00001810: 30 22 3A 98 31 35 2C 22  4D 2D 52 22 C7 28 31 39  |0":.15,"M-R".(19|
00001820: 38 29 C7 28 32 32 39 29  C7 28 31 29 3A A1 23 31  |8).(229).(1):.#1|
00001830: 35 2C 41 24 3A 8B 41 24  B3 B1 C7 28 32 35 35 29  |5,A$:.A$...(255)|
00001840: A7 99 22 11 11 22 A3 37  29 22 54 48 41 54 20 44  |.."..".7)"THAT D|
00001850: 52 49 56 45 20 49 53 20  4E 4F 54 20 41 20 31 35  |RIVE IS NOT A 15|
00001860: 38 31 22 3A FE 0B 31 3A  89 31 30 37 30 00 79 34  |81":..1:.1070.y4|
00001870: 4C 04 8D 31 30 30 30 3A  8E 00 F8 34 56 04 FE 1A  |L..1000:...4V...|
00001880: 30 2C 30 2C 37 39 2C 33  3A 99 22 20 20 20 20 20  |0,0,79,3:."     |
00001890: 20 46 49 4C 45 53 20 4F  4E 20 54 48 49 53 20 44  | FILES ON THIS D|
000018A0: 49 53 4B 20 20 20 20 20  20 22 3A FE 1A 31 2C 32  |ISK      ":..1,2|
000018B0: 2C 33 30 2C 31 38 2C 31  3A EE 55 28 44 56 29 3A  |,30,18,1:.U(DV):|
000018C0: FE 1A 34 30 2C 31 2C 37  37 2C 31 36 2C 31 3A 99  |..40,1,77,16,1:.|
000018D0: 22 11 11 11 11 11 11 11  1D 1D 1D 50 52 45 53 53  |"..........PRESS|
000018E0: 20 41 4E 59 20 4B 45 59  20 54 4F 20 43 4F 4E 54  | ANY KEY TO CONT|
000018F0: 49 4E 55 45 2E 2E 2E 22  00 36 35 60 04 A1 F9 41  |INUE...".65`...A|
00001900: 24 3A 8D 31 31 34 30 3A  FE 1A 30 2C 30 2C 37 39  |$:.1140:..0,0,79|
00001910: 2C 33 3A 99 22 20 20 20  20 50 41 52 54 49 54 49  |,3:."    PARTITI|
00001920: 4F 4E 53 20 4F 4E 20 54  48 49 53 20 44 49 53 4B  |ONS ON THIS DISK|
00001930: 20 20 20 22 3A 8E 00 51  35 6A 04 A0 31 35 3A 8A  |   ":..Q5j..15:.|
00001940: 22 31 32 38 20 4B 45 59  53 22 2C 55 28 44 29 3A  |"128 KEYS",U(D):|
00001950: A2 00 6C 35 74 04 FE 1A  31 2C 32 30 2C 33 30 2C  |..l5t...1,20,30,|
00001960: 32 30 2C 31 3A 99 44 53  24 3B 3A 8E 00 8D 35 7E  |20,1:.DS$;:...5~|
00001970: 04 FE 1A 31 2C 32 2C 33  30 2C 31 38 2C 31 3A EE  |...1,2,30,18,1:.|
00001980: 22 2A 3D 43 22 2C 55 28  44 56 29 3A 8E 00 0B 36  |"*=C",U(DV):...6|
00001990: 88 04 FE 1A 30 2C 30 2C  37 39 2C 32 34 3A 99 22  |....0,0,79,24:."|
000019A0: 11 11 11 11 11 11 11 11  11 11 11 11 11 11 11 11  |................|
000019B0: 11 11 11 11 11 11 11 11  20 20 20 20 20 20 20 20  |........        |
000019C0: 20 20 20 1D 20 20 20 20  20 20 20 20 20 20 1D 20  |   .          . |
000019D0: 20 20 20 20 20 20 20 91  22 3A 54 46 B2 C5 28 CA  |       .":TF..(.|
000019E0: 28 44 53 24 2C 32 34 2C  32 29 29 3A 54 4C B2 C5  |(DS$,24,2)):TL..|
000019F0: 28 CA 28 44 53 24 2C 32  37 2C 32 29 29 3A 42 4C  |(.(DS$,27,2)):BL|
00001A00: B2 28 54 4C AB 54 46 29  AC 34 30 00 27 36 92 04  |.(TL.TF).40.'6..|
00001A10: 99 A3 34 29 54 46 A3 31  35 29 54 4C A3 32 34 29  |..4)TF.15)TL.24)|
00001A20: 42 4C 22 13 22 3A 8E 00  47 36 9C 04 8F 3A 20 43  |BL".":..G6...: C|
00001A30: 4F 4D 50 55 54 45 21 27  53 20 47 41 5A 45 54 54  |OMPUTE!'S GAZETT|
00001A40: 45 20 23 20 38 2F 33 00  5A 36 A6 04 8F 3A 20 50  |E # 8/3.Z6...: P|
00001A50: 41 47 45 53 20 34 38 2D  35 30 00 6C 36 B0 04 8F  |AGES 48-50.l6...|
00001A60: 3A 20 4D 41 52 43 48 20  31 39 39 30 00 00 00     |: MARCH 1990... |
..H.D.. COPYRIGHT 1990 COMPUTE! PUBLICAT
IONS, INC. - ALL RIGHTS RESERVED...N..0,
1:.4,1:.6,1:.5,4:.B(215).0..".SWITCH TO 
80-COLUMN MODE AND PRESS A KEY":.208,0:.
208,1:.208,0:.5...X..PN$(21):..0,0,79,24
,1:.1,"1":.2,"2":.3,"3":.4,"4":.5,"5":.6
,"6":.7,"7":.8,"ABORT".G(13):.%:W1130.I.
...G(142)G(12)"....PARTITIONS ON THIS DI
SK....B";......"........CCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCCCCCCCCC."......"CCCCCCCCC
CCCCCCCCCCCCCCCCCCCCCC........B".78)"B".
.. ..I.1.15:..31)"B.......B".78)"B":.I..
.....31)"B........CCCCCCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCCC.".?.....31)"B".51)"UCCC
CCCCCCCCCCCCCI"....."CCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCC.".51)"B1581..I.........B".
..H.."                               B".
51)"B......K.........B"...R.."CCCCCCCCCC
C.CCCCCCCCCC.CCCCCCCC.".51)"B.....BARTIT
IONERB".?...."FIRST TRACKBLAST TRACKB BL
OCKS B".51)"JCCCCCCCCCCCCCCCCK"......"CC
CCCCCCCCC.CCCCCCCCCC.CCCCCCCC.".46)"(C) 
1990 COMPUTE!'S GAZETTE".B....".........
..B..........B........B.":DV.8:.1070:.11
40......1150:..40,1,77,16,1.  ...".....F
1...CREATE A PARTITION":."......F2...ACC
ESS A PARTITION".O ..."......F3...RETURN
 TO THE ROOT DIRECTORY".T ..."......F4..
.DELETE A PARTITION".. ".."......F5...FO
RMAT A DISK /":."........CURRENT PARTITI
ON".. ,.."......F6...CHANGE DRIVE NUMBER
":."......F7...VIEW DIRECTORY"..!6.."...
...ESC...EXIT PROGRAM."./!@...A$:.A$.G(2
7).1130.H!J.A.E(A$):.A.1.A.7.320.U!T..A.
350,970,1000,1010,1030,1070,1110:.250.F!
^..BL.120..".........".9)"NO ROOM FOR A 
PARTITION.":..15)".PRESS A KEY":..A$:...
"H.."..DO YOU WISH TO CREATE A PARTITION
 ON":."THE BASIS OF:".6"R.."...F1...THE 
NUMBER OF PARTITIONS PER DISK"._"|.."...
F3...THE SIZE OF THE PARTITION".."..."..
.F5...THE LOCATION OF THE PARTITION"..".
.."...F7...RETURN TO MAIN MENU".M"....A$
:A.E(A$):.A.1.A.7.410.."...A.430,410,650
,410,810,410:..P#..."...THIS OPTION WILL
 CREATE A NUMBER OF":."EQUAL PARTITIONS,
 USED AS 'MANY DISKS":."IN ONE'".E#..."H
OW MANY PARTITIONS WOULD YOU LIKE TO":."
CREATE? (FROM 2 TO 20, USE EVEN ":."....
OR PRESS .F8. TO ABORT......"..$B.NP.0:N
P$."":."NUMBERS ONLY, PLEASE)";NP$:.NP$.
"ABORT".../$L.NP.E(NP$):.(NP.2)...(NP.2)
.NP.2.NP.20.430.\$V..".....WOULD YOU LIK
E TO SAVE A COPY OF"..$..."THIS PROGRAM 
ON THE DISK (Y/N) ?"..$..SP$."":..SP$:.S
P$.."N".SP$.."Y".490.T$...:.I.1.NP:."WHA
T WILL PARTITION #"I.#%..PN$(I)."":."BE 
CALLED "I"....";:.PN$(I):.PN$(I)."".C(PN
$(I)).16.."..":.510.{%...I:.".......PRES
S .RETURN. TO CONTINUE,":."..OR .F8. TO 
ABORT...":..A$:.A$..G(13)...X%..."......
....CREATING PARTITIONS...":S..(1580.(NP
.2)):S.40..(S.40):.NP.4.NP.6.S.S.40:.550
..%...NP.2.SP$."Y".S.S.40. &&.X..(S.256)
:Y.S.(X.256):TT.1:T.S.40:I.1:B.0..&0...4
0,1,77,16,1:.I;:P$.PN$(I):.15,"/0:"P$","
.G(TT).G(0).G(Y).G(X).",C":.DS..0..1140:
.15,"/":.1160:...&:.TT.TT.T:I.I.1:.B.0.(
TT.40).S..1560.TT.41:B.B.1.N&D..PN$(I)..
"".560..'N...40,1,77,16,1:.".........FOR
MATTING PARTITIONS...".R'X..I.1.NP:..70,
8,75,8,1:.I;:.15,"/0:".PN$(I):.DS..2..11
40:.15,"/":.1160:...'B..15,"N0:".(PN$(I)
).",".G(.(.(1).25).65).G(.(.(1).25).65):
.DS..0..1140:.15,"/":.1160:...'L..15,"/"
:.DS..2..1140:.15,"I0"G(13)"/":.1160:...
(V..1160:.I:.SP$."Y".."1581 PARTITIONER"
,U(DV)..(...1140:...(..."...THIS OPTION 
WILL CREATE ONE PARTITION":."OF A SPECIF
IC SIZE, USEFUL FOR A WORK":."AREA OR A 
BOOT SECTOR."..(..."APPROXIMATELY HOW MA
NY BLOCKS WILL THE":."PARTITION BE? (MUL
TIPLE OF 40 BETWEEN".#)..."....OR PRESS 
.F8. TO ABORT......":LB.BL:.LB.1560.LB.1
560.F)..PS.0:PS$."":."120 AND"LB" BLOCKS
 PLEASE)";:.PS$:.PS$."ABORT"....)..PS.E(
PS$):.PS.120.PS.LB.((PS.40)...(PS.40)).6
50..)..."...WOULD YOU LIKE TO SAVE A COP
Y OF":."THIS PROGRAM ON THE DISK (Y/N) ?
";..*F.SP$."":..SP$:.SP$.."Y".SP$.."N".7
10.]*P.."...WHAT WILL THE PARTITION BE C
ALLED?":N$."":.N$:.N$."".C(N$).16.720..*
Z..".......PRESS .RETURN. TO CONTINUE,":
."..OR .F8. TO ABORT...":..A$:.A$..G(13)
....+..."..........CREATING PARTITION...
":FT.1:PS.40.(.(PS.40)):X..(PS.256):Y.PS
.(X.256).R+...15,"/0:"N$",".G(FT).G(0).G
(Y).G(X).",C":.DS..0..1140:.15,"/":.1160
:..+...15,"/0:"N$:.DS..2..1140:.15,"/":
.1160:...+...1160:..40,1,77,16,1:.".....
....FORMATTING PARTITION..."..,...15,"N0
:"N$",".G(.(.(1).25).65).G(.(.(1).25).65
):.DS..0..1140:.15,"/":.1160:..5,...SP$.
"Y".."1581 PARTITIONER",U(DV).A, ..1140:
...,*.."...THIS OPTION WILL CREATE A PAR
TITION":."AT A CERTAIN LOCATION AND A CE
RTAIN":."SIZE, USEFUL FOR PROTECTING A".
.-4.."PARTICULAR PORTION OF THE DISK":."
.....OR PRESS .F8. TO ABORT.......".K->.
."WHAT WILL THE PARTITION BE CALLED?":N$
."":.N$:.N$."".N$."ABORT"...]-H..C(N$).1
6.830.C-R.FT.0:TF$.I("00".D(TF.1),3):.".
..WHAT IS THE STARTING TRACK  "TF$"...."
;:.FT:.FT.40.FT.T.FT.TL.850..-\.SS.0:LB.
BL:.LB.1560.LB.1560.U.F..".HOW MANY SECT
ORS IS IT (MULTIPLE OF 40":."BETWEEN 120
 AND"LB")";:.SC:.SC.120.SC.LB.((SC.40)..
.(SC.40)).860...P..".......PRESS .RETURN
. TO CONTINUE,":."..OR .F8. TO ABORT..."
:..A$:.A$..G(13).....Z.X..(SC.256):Y.SC.
(X.256):."..........CREATING PARTITION..
.".5/...15,"/0:"N$",".G(FT).G(SS).G(Y).G
(X).",C":.DS..0..1140:.15,"/":.1160:..V/
..."...WOULD YOU LIKE TO FORMAT THE NEW"
:."PARTITION (Y/N) ?";../....A$:.A$.."Y"
.A$.."N".920.L/...A$:.A$."Y"...:."......
....FORMATTING PARTITION..."../...15,"/0
:"N$:.DS..2..1140:.15,"/":.1160:..Q0...1
160:.15,"N0:"N$",".G(.(.(1).25).65).G(.(
.(1).25).65):.DS..0..1140:.15,"/":.1160:
..`0....:.1140:..X0J..".......ENTER NAME
 OF PARTITION TO ACCESS,":."OR PRESS .F8
. TO ABORT...":NAME$."":.NAME$:.NAME$.""
.NAME$."ABORT"....1T..15,"/0:".NAME$:.DS
..2..1140:.15,"/":.1160:...1...1140:.116
0:..51...15,"/":.1160:.1140:.. 1..."....
...ENTER NAME OF PARTITION TO ERASE,":."
OR PRESS .F8. TO ABORT...":Z$."":.Z$:.Z$
."ABORT".Z$.""....1...(Z$),U(DV):.1140:.
."2..."......ENTER NEW NAME OF DISK OR":
."CURRENT PARTITION TO BE FORMATTED,":."
OR PRESS .F8. TO ABORT..."..2..."....WAR
NING.: FORMATTING WILL DESTROY ANY":.".P
ARTITIONS VISIBLE IN THE DIRECTORY!...."
..2..D$."":.D$:.D$."ABORT".D$.""....2$..
15,"N0:".D$.",".G(.(.(1).25).65).G(.(.(1
).25).65):.15,EN,EM$,EN,EN:.15,"/":.1160
:..{3....0,0,79,24:."...................
.....           .          .        .":.
.40,1,77,16,1:."................INSERT A
 1581 DISK"..38..".........IN DEVICE NUM
BER "DV:.".........AND PRESS RETURN...":
."...........................";A$:DV.E(A
$):.DV.8.DV.11.1070.M4B. 15:.15,DV,15,"I
0":.15,"M-R"G(198)G(229)G(1):.#15,A$:.A$
..G(255).."..".7)"THAT DRIVE IS NOT A 15
81":..1:.1070.Y4L..1000:...4V...0,0,79,3
:."      FILES ON THIS DISK      ":..1,2
,30,18,1:.U(DV):..40,1,77,16,1:.".......
...PRESS ANY KEY TO CONTINUE...".65`...A
$:.1140:..0,0,79,3:."    PARTITIONS ON T
HIS DISK   ":..Q5J. 15:."128 KEYS",U(D):
..L5T...1,20,30,20,1:.DS$;:...5~...1,2,3
0,18,1:."*=C",U(DV):...6....0,0,79,24:."
........................           .    
      .        .":TF.E(J(DS$,24,2)):TL.E
(J(DS$,27,2)):BL.(TL.TF).40.'6....4)TF.1
5)TL.24)BL".":..G6...: COMPUTE!'S GAZETT
E # 8/3.Z6...: PAGES 48-50.L6...: MARCH 
1990...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL