PARTITION UN-NEW

00000000: 01 1C 2D 1C 64 00 99 20  22 93 50 41 52 54 49 54  |..-.d.. ".PARTIT|
00000010: 49 4F 4E 20 55 4E 2D 4E  45 57 20 56 31 2E 30 30  |ION UN-NEW V1.00|
00000020: 20 2D 20 44 2E 20 43 4F  54 54 4F 4E 22 00 33 1C  | - D. COTTON".3.|
00000030: 6E 00 99 00 4F 1C 78 00  85 20 22 44 45 56 49 43  |n...O.x.. "DEVIC|
00000040: 45 20 4E 55 4D 42 45 52  20 20 20 22 3B 44 56 00  |E NUMBER   ";DV.|
00000050: 6B 1C 82 00 85 20 22 50  41 52 54 49 54 49 4F 4E  |k.... "PARTITION|
00000060: 20 4E 55 4D 42 45 52 22  3B 50 4E 00 71 1C 8C 00  | NUMBER";PN.q...|
00000070: 99 00 77 1C 96 00 3A 00  8B 1C A0 00 99 20 22 43  |..w...:...... "C|
00000080: 48 45 43 4B 49 4E 47 2E  2E 2E 22 00 99 1C AA 00  |HECKING...".....|
00000090: 9F 31 35 2C 44 56 2C 31  35 00 AD 1C B4 00 98 31  |.15,DV,15......1|
000000A0: 35 2C 22 47 2D 50 22 3B  C7 28 50 4E 29 00 E0 1C  |5,"G-P";.(PN)...|
000000B0: BE 00 A1 23 31 35 2C 50  54 24 3A 50 54 B2 C6 28  |...#15,PT$:PT..(|
000000C0: 50 54 24 AA C7 28 30 29  29 3A 8F 20 43 48 45 43  |PT$..(0)):. CHEC|
000000D0: 4B 20 50 41 52 54 49 54  49 4F 4E 20 54 59 50 45  |K PARTITION TYPE|
000000E0: 00 E6 1C C8 00 99 00 19  1D D2 00 8B 50 54 B2 30  |............PT.0|
000000F0: B0 50 54 B1 35 A7 A0 31  35 3A 99 22 4E 4F 54 20  |.PT.5..15:."NOT |
00000100: 50 4F 53 53 49 42 4C 45  20 2D 20 57 52 4F 4E 47  |POSSIBLE - WRONG|
00000110: 20 54 59 50 45 2E 22 3A  80 00 1F 1D DC 00 3A 00  | TYPE.":......:.|
00000120: 4A 1D E6 00 98 31 35 2C  22 43 D0 22 C7 28 50 4E  |J....15,"C.".(PN|
00000130: 29 3A 8F 20 4D 41 4B 45  20 50 41 52 54 49 54 49  |):. MAKE PARTITI|
00000140: 4F 4E 20 43 55 52 52 45  4E 54 00 50 1D F0 00 3A  |ON CURRENT.P...:|
00000150: 00 7D 1D FA 00 8B 50 54  B2 31 A7 54 52 B2 31 3A  |.}....PT.1.TR.1:|
00000160: 53 45 B2 33 34 3A 4A 42  B2 33 32 3A 4A 54 B2 31  |SE.34:JB.32:JT.1|
00000170: 30 32 34 30 3A 8F 20 4E  41 54 49 56 45 00 B0 1D  |0240:. NATIVE...|
00000180: 04 01 8B 50 54 B2 32 B0  50 54 B2 33 A7 54 52 B2  |...PT.2.PT.3.TR.|
00000190: 31 38 3A 53 45 B2 31 3A  4A 42 B2 30 3A 4A 54 B2  |18:SE.1:JB.0:JT.|
000001A0: 36 3A 8F 20 31 35 34 31  20 4F 52 20 31 35 37 31  |6:. 1541 OR 1571|
000001B0: 00 E7 1D 0E 01 8B 50 54  B2 34 B0 50 54 B2 35 A7  |......PT.4.PT.5.|
000001C0: 54 52 B2 34 30 3A 53 45  B2 33 3A 4A 42 B2 32 3A  |TR.40:SE.3:JB.2:|
000001D0: 4A 54 B2 31 31 3A 8F 20  31 35 38 31 20 4F 52 20  |JT.11:. 1581 OR |
000001E0: 31 35 38 31 43 50 4D 00  29 1E 18 01 56 48 B2 B5  |1581CPM.)...VH..|
000001F0: 28 4A 54 AD 32 35 36 29  3A 56 4C B2 4A 54 AB 4D  |(JT.256):VL.JT.M|
00000200: 48 AC 32 35 36 3A 4A 48  B2 B5 28 4A 42 AD 32 35  |H.256:JH..(JB.25|
00000210: 36 29 3A 4A 4C B2 4A 42  AB 4A 48 AC 32 35 36 3A  |6):JL.JB.JH.256:|
00000220: 42 48 B2 33 3A 42 4C B2  30 00 2F 1E 22 01 3A 00  |BH.3:BL.0./.".:.|
00000230: 63 1E 2C 01 98 31 35 2C  22 4D 2D 57 22 C7 28 56  |c.,..15,"M-W".(V|
00000240: 4C 29 C7 28 56 48 29 C7  28 32 29 C7 28 54 52 29  |L).(VH).(2).(TR)|
00000250: C7 28 53 45 29 3A 8F 20  53 45 54 55 50 20 54 20  |.(SE):. SETUP T |
00000260: 26 20 53 00 96 1E 36 01  98 31 35 2C 22 4D 2D 57  |& S...6..15,"M-W|
00000270: 22 C7 28 4A 4C 29 C7 28  4A 48 29 C7 28 31 29 C7  |".(JL).(JH).(1).|
00000280: 28 31 32 38 29 3A 8F 20  52 45 41 44 20 54 4F 20  |(128):. READ TO |
00000290: 42 55 46 46 45 52 00 BC  1E 40 01 98 31 35 2C 22  |BUFFER...@..15,"|
000002A0: 4D 2D 52 22 C7 28 30 29  C7 28 33 29 C7 28 32 29  |M-R".(0).(3).(2)|
000002B0: 3A 8F 20 52 45 41 44 20  4C 49 4E 4B 00 EB 1E 4A  |:. READ LINK...J|
000002C0: 01 A1 23 31 35 2C 54 50  24 2C 54 53 24 3A 54 50  |..#15,TP$,TS$:TP|
000002D0: B2 C6 28 54 50 24 AA C7  28 30 29 29 3A 54 53 B2  |..(TP$..(0)):TS.|
000002E0: C6 28 54 53 24 AA C7 28  30 29 29 00 29 1F 54 01  |.(TS$..(0)).).T.|
000002F0: 8B 54 50 B3 B1 30 B0 54  53 B3 B1 32 35 35 A7 A0  |.TP..0.TS..255..|
00000300: 31 35 3A 99 22 4E 4F 54  20 50 4F 53 53 49 42 4C  |15:."NOT POSSIBL|
00000310: 45 20 2D 20 50 41 52 54  49 54 49 4F 4E 20 41 4C  |E - PARTITION AL|
00000320: 54 45 52 45 44 2E 22 3A  80 00 2F 1F 5E 01 3A 00  |TERED.":../.^.:.|
00000330: 6C 1F 68 01 54 54 B2 30  3A 81 4F 46 B2 32 A4 32  |l.h.TT.0:.OF.2.2|
00000340: 32 36 A9 33 32 3A 8F 20  56 45 52 49 46 59 20 54  |26.32:. VERIFY T|
00000350: 48 41 54 20 41 4C 4C 20  46 49 4C 45 54 59 50 45  |HAT ALL FILETYPE|
00000360: 53 20 45 51 55 41 4C 20  5A 45 52 4F 00 87 1F 72  |S EQUAL ZERO...r|
00000370: 01 98 31 35 2C 22 4D 2D  52 22 C7 28 4F 46 29 C7  |..15,"M-R".(OF).|
00000380: 28 33 29 C7 28 31 29 00  AC 1F 7C 01 A1 23 31 35  |(3).(1)...|..#15|
00000390: 2C 46 54 24 3A 46 54 B2  C6 28 46 54 24 AA C7 28  |,FT$:FT..(FT$..(|
000003A0: 30 29 29 3A 54 54 B2 54  54 AA 46 54 00 B2 1F 86  |0)):TT.TT.FT....|
000003B0: 01 82 00 E8 1F 90 01 8B  54 54 B3 B1 30 A7 A0 31  |........TT..0..1|
000003C0: 35 3A 99 22 4E 4F 54 20  50 4F 53 53 49 42 4C 45  |5:."NOT POSSIBLE|
000003D0: 20 2D 20 50 41 52 54 49  54 49 4F 4E 20 41 4C 54  | - PARTITION ALT|
000003E0: 45 52 45 44 2E 22 3A 80  00 EE 1F 9A 01 3A 00 02  |ERED.":......:..|
000003F0: 20 A4 01 53 4F B2 31 3A  53 49 B2 30 3A 48 49 B2  | ..SO.1:SI.0:HI.|
00000400: 32 30 00 39 20 AE 01 98  31 35 2C 22 4D 2D 57 22  |20.9 ...15,"M-W"|
00000410: C7 28 56 4C 29 C7 28 56  48 29 C7 28 32 29 C7 28  |.(VL).(VH).(2).(|
00000420: 54 52 29 C7 28 53 45 AA  53 4F 29 3A 8F 20 53 45  |TR).(SE.SO):. SE|
00000430: 54 55 50 20 54 20 26 20  53 00 6C 20 B8 01 98 31  |TUP T & S.l ...1|
00000440: 35 2C 22 4D 2D 57 22 C7  28 4A 4C 29 C7 28 4A 48  |5,"M-W".(JL).(JH|
00000450: 29 C7 28 31 29 C7 28 31  32 38 29 3A 8F 20 52 45  |).(1).(128):. RE|
00000460: 41 44 20 54 4F 20 42 55  46 46 45 52 00 92 20 C2  |AD TO BUFFER.. .|
00000470: 01 98 31 35 2C 22 4D 2D  52 22 C7 28 30 29 C7 28  |..15,"M-R".(0).(|
00000480: 33 29 C7 28 32 29 3A 8F  20 52 45 41 44 20 4C 49  |3).(2):. READ LI|
00000490: 4E 4B 00 C1 20 CC 01 A1  23 31 35 2C 54 50 24 2C  |NK.. ...#15,TP$,|
000004A0: 54 53 24 3A 54 50 B2 C6  28 54 50 24 AA C7 28 30  |TS$:TP..(TP$..(0|
000004B0: 29 29 3A 54 53 B2 C6 28  54 53 24 AA C7 28 30 29  |)):TS..(TS$..(0)|
000004C0: 29 00 EB 20 D6 01 8B 54  50 B3 B1 30 A7 53 49 B2  |).. ...TP..0.SI.|
000004D0: 54 53 AB 28 53 45 AA 53  4F 29 3A 8B 53 49 B1 30  |TS.(SE.SO):.SI.0|
000004E0: AF 53 49 B3 48 49 A7 89  35 31 30 00 2B 21 E0 01  |.SI.HI..510.+!..|
000004F0: 8B 28 53 4F B2 31 37 29  AF 28 50 54 B2 32 B0 50  |.(SO.17).(PT.2.P|
00000500: 54 B2 33 29 B0 28 53 4F  B2 33 36 29 AF 28 50 54  |T.3).(SO.36).(PT|
00000510: B2 34 B0 50 54 B2 35 29  B0 28 53 4F B2 33 30 29  |.4.PT.5).(SO.30)|
00000520: AF 28 50 54 B2 31 29 A7  35 31 30 00 3C 21 EA 01  |.(PT.1).510.<!..|
00000530: 53 4F B2 53 4F AA 31 3A  89 34 33 30 00 42 21 F4  |SO.SO.1:.430.B!.|
00000540: 01 3A 00 76 21 FE 01 98  31 35 2C 22 4D 2D 57 22  |.:.v!...15,"M-W"|
00000550: C7 28 56 4C 29 C7 28 56  48 29 C7 28 32 29 C7 28  |.(VL).(VH).(2).(|
00000560: 54 52 29 C7 28 53 45 29  3A 8F 20 53 45 54 55 50  |TR).(SE):. SETUP|
00000570: 20 54 20 26 20 53 00 A9  21 08 02 98 31 35 2C 22  | T & S..!...15,"|
00000580: 4D 2D 57 22 C7 28 4A 4C  29 C7 28 4A 48 29 C7 28  |M-W".(JL).(JH).(|
00000590: 31 29 C7 28 31 32 38 29  3A 8F 20 52 45 41 44 20  |1).(128):. READ |
000005A0: 54 4F 20 42 55 46 46 45  52 00 CE 21 12 02 4E 54  |TO BUFFER..!..NT|
000005B0: B2 54 52 3A 4E 53 B2 53  45 AA 53 49 3A 8B 53 49  |.TR:NS.SE.SI:.SI|
000005C0: B2 30 A7 4E 54 B2 30 3A  4E 53 B2 32 35 35 00 F2  |.0.NT.0:NS.255..|
000005D0: 21 1C 02 98 31 35 2C 22  4D 2D 57 22 C7 28 30 29  |!...15,"M-W".(0)|
000005E0: C7 28 33 29 C7 28 32 29  C7 28 4E 54 29 C7 28 4E  |.(3).(2).(NT).(N|
000005F0: 53 29 00 F8 21 26 02 3A  00 19 22 30 02 99 22 53  |S)..!&.:.."0.."S|
00000600: 45 4C 45 43 54 20 54 59  50 45 20 46 4F 52 20 45  |ELECT TYPE FOR E|
00000610: 41 43 48 20 46 49 4C 45  22 00 34 22 3A 02 99 22  |ACH FILE".4":.."|
00000620: 20 20 30 20 3D 20 44 45  4C 20 28 44 45 4C 45 54  |  0 = DEL (DELET|
00000630: 45 44 29 22 00 52 22 44  02 99 22 20 20 31 20 3D  |ED)".R"D.."  1 =|
00000640: 20 53 45 51 20 28 53 45  51 55 45 4E 54 49 41 4C  | SEQ (SEQUENTIAL|
00000650: 29 22 00 6D 22 4E 02 99  22 20 20 32 20 3D 20 50  |)".m"N.."  2 = P|
00000660: 52 47 20 28 50 52 4F 47  52 41 4D 29 22 00 85 22  |RG (PROGRAM)".."|
00000670: 58 02 99 22 20 20 33 20  3D 20 55 53 52 20 28 55  |X.."  3 = USR (U|
00000680: 53 45 52 29 22 00 A1 22  62 02 99 22 20 20 34 20  |SER)".."b.."  4 |
00000690: 3D 20 52 45 4C 20 28 52  45 4C 41 54 49 56 45 29  |= REL (RELATIVE)|
000006A0: 22 00 CD 22 6C 02 8B 50  54 B2 34 A7 99 22 20 20  |".."l..PT.4.."  |
000006B0: 35 20 3D 20 43 42 4D 20  28 31 35 38 31 20 53 55  |5 = CBM (1581 SU|
000006C0: 42 2D 50 41 52 54 49 54  49 4F 4E 29 22 00 F3 22  |B-PARTITION)".."|
000006D0: 76 02 8B 50 54 B2 31 A7  99 22 20 20 36 20 3D 20  |v..PT.1.."  6 = |
000006E0: 44 49 52 20 28 53 55 42  44 49 52 45 43 54 4F 52  |DIR (SUBDIRECTOR|
000006F0: 59 29 22 00 F9 22 80 02  3A 00 FF 22 8A 02 99 00  |Y)".."..:.."....|
00000700: 10 23 94 02 81 4F 46 B2  35 A4 32 32 39 A9 33 32  |.#...OF.5.229.32|
00000710: 00 2B 23 9E 02 99 22 46  49 4C 45 4E 41 4D 45 3A  |.+#..."FILENAME:|
00000720: 20 22 3B 3A 99 C7 28 33  34 29 3B 00 47 23 A8 02  | ";:..(34);.G#..|
00000730: 98 31 35 2C 22 4D 2D 52  22 C7 28 4F 46 29 C7 28  |.15,"M-R".(OF).(|
00000740: 33 29 C7 28 31 36 29 00  53 23 B2 02 81 49 B2 30  |3).(16).S#...I.0|
00000750: A4 31 35 00 6F 23 BC 02  A1 23 31 35 2C 43 48 24  |.15.o#...#15,CH$|
00000760: 3A 43 48 B2 C6 28 43 48  24 AA C7 28 30 29 29 00  |:CH..(CH$..(0)).|
00000770: 7B 23 C6 02 99 C7 28 43  48 29 3B 00 81 23 D0 02  |{#....(CH);..#..|
00000780: 82 00 98 23 DA 02 99 C7  28 33 34 29 3B 22 20 20  |...#....(34);"  |
00000790: 54 59 50 45 3A 20 22 3B  00 B4 23 E4 02 A1 4B 24  |TYPE: ";..#...K$|
000007A0: 3A 8B 4B 24 B3 22 30 22  B0 4B 24 B1 22 36 22 A7  |:.K$."0".K$."6".|
000007B0: 89 37 34 30 00 C7 23 EE  02 8B 4B 24 B2 22 30 22  |.740..#...K$."0"|
000007C0: A7 99 22 44 45 4C 22 00  DA 23 F8 02 8B 4B 24 B2  |.."DEL"..#...K$.|
000007D0: 22 31 22 A7 99 22 53 45  51 22 00 ED 23 02 03 8B  |"1".."SEQ"..#...|
000007E0: 4B 24 B2 22 32 22 A7 99  22 50 52 47 22 00 00 24  |K$."2".."PRG"..$|
000007F0: 0C 03 8B 4B 24 B2 22 33  22 A7 99 22 55 53 52 22  |...K$."3".."USR"|
00000800: 00 13 24 16 03 8B 4B 24  B2 22 34 22 A7 99 22 52  |..$...K$."4".."R|
00000810: 45 4C 22 00 26 24 20 03  8B 4B 24 B2 22 35 22 A7  |EL".&$ ..K$."5".|
00000820: 99 22 43 42 4D 22 00 39  24 2A 03 8B 4B 24 B2 22  |."CBM".9$*..K$."|
00000830: 36 22 A7 99 22 44 49 52  22 00 52 24 34 03 4B B2  |6".."DIR".R$4.K.|
00000840: C5 28 4B 24 29 3A 8B 4B  B1 30 A7 4B B2 4B AA 31  |.(K$):.K.0.K.K.1|
00000850: 32 38 00 73 24 3E 03 98  31 35 2C 22 4D 2D 57 22  |28.s$>..15,"M-W"|
00000860: C7 28 4F 46 AB 33 29 C7  28 33 29 C7 28 31 29 C7  |.(OF.3).(3).(1).|
00000870: 28 4B 29 00 79 24 48 03  82 00 7F 24 52 03 3A 00  |(K).y$H....$R.:.|
00000880: 85 24 5C 03 99 00 99 24  66 03 99 22 52 45 57 52  |.$\....$f.."REWR|
00000890: 49 54 49 4E 47 2E 2E 2E  22 00 CA 24 70 03 98 31  |ITING..."..$p..1|
000008A0: 35 2C 22 4D 2D 57 22 C7  28 4A 4C 29 C7 28 4A 48  |5,"M-W".(JL).(JH|
000008B0: 29 C7 28 31 29 C7 28 31  34 34 29 3A 8F 20 57 52  |).(1).(144):. WR|
000008C0: 49 54 45 20 42 55 46 46  45 52 00 DF 24 7A 03 99  |ITE BUFFER..$z..|
000008D0: 22 56 41 4C 49 44 41 54  49 4E 47 2E 2E 2E 22 00  |"VALIDATING...".|
000008E0: ED 24 84 03 98 31 35 2C  22 56 30 3A 22 00 FA 24  |.$...15,"V0:"..$|
000008F0: 8E 03 99 22 44 4F 4E 45  2E 22 00 04 25 98 03 A0  |..."DONE."..%...|
00000900: 31 35 3A 80 00 00 00                              |15:....         |

..-.D.. ".PARTITION UN-NEW V1.00 - D. CO
TTON".3.N...O.X.. "DEVICE NUMBER   ";DV.
K.... "PARTITION NUMBER";PN.Q.....W...:.
.. .. "CHECKING..."......15,DV,15......1
5,"G-P";G(PN)......#15,PT$:PT.F(PT$.G(0)
):. CHECK PARTITION TYPE...H.....R..PT.0
.PT.5. 15:."NOT POSSIBLE - WRONG TYPE.":
......:.J....15,"CP"G(PN):. MAKE PARTITI
ON CURRENT.P...:.}....PT.1.TR.1:SE.34:JB
.32:JT.10240:. NATIVE......PT.2.PT.3.TR.
18:SE.1:JB.0:JT.6:. 1541 OR 1571......PT
.4.PT.5.TR.40:SE.3:JB.2:JT.11:. 1581 OR 
1581CPM.)...VH..(JT.256):VL.JT.MH.256:JH
..(JB.256):JL.JB.JH.256:BH.3:BL.0./.".:.
C.,..15,"M-W"G(VL)G(VH)G(2)G(TR)G(SE):. 
SETUP T & S...6..15,"M-W"G(JL)G(JH)G(1)G
(128):. READ TO BUFFER...@..15,"M-R"G(0)
G(3)G(2):. READ LINK...J..#15,TP$,TS$:TP
.F(TP$.G(0)):TS.F(TS$.G(0)).).T..TP..0.T
S..255. 15:."NOT POSSIBLE - PARTITION AL
TERED.":../.^.:.L.H.TT.0:.OF.2.226.32:. 
VERIFY THAT ALL FILETYPES EQUAL ZERO...R
..15,"M-R"G(OF)G(3)G(1)...|..#15,FT$:FT.
F(FT$.G(0)):TT.TT.FT............TT..0. 1
5:."NOT POSSIBLE - PARTITION ALTERED.":.
.....:.. ..SO.1:SI.0:HI.20.9 ...15,"M-W"
G(VL)G(VH)G(2)G(TR)G(SE.SO):. SETUP T & 
S.L ...15,"M-W"G(JL)G(JH)G(1)G(128):. RE
AD TO BUFFER.. B..15,"M-R"G(0)G(3)G(2):.
 READ LINK.A L..#15,TP$,TS$:TP.F(TP$.G(0
)):TS.F(TS$.G(0)).. V..TP..0.SI.TS.(SE.S
O):.SI.0.SI.HI..510.+!...(SO.17).(PT.2.P
T.3).(SO.36).(PT.4.PT.5).(SO.30).(PT.1).
510.<!..SO.SO.1:.430.B!..:.V!...15,"M-W"
G(VL)G(VH)G(2)G(TR)G(SE):. SETUP T & S..
!...15,"M-W"G(JL)G(JH)G(1)G(128):. READ 
TO BUFFER.N!..NT.TR:NS.SE.SI:.SI.0.NT.0:
NS.255..!...15,"M-W"G(0)G(3)G(2)G(NT)G(N
S)..!&.:.."0.."SELECT TYPE FOR EACH FILE
".4":.."  0 = DEL (DELETED)".R"D.."  1 =
 SEQ (SEQUENTIAL)".M"N.."  2 = PRG (PROG
RAM)".."X.."  3 = USR (USER)".."B.."  4 
= REL (RELATIVE)".M"L..PT.4.."  5 = CBM 
(1581 SUB-PARTITION)".."V..PT.1.."  6 = 
DIR (SUBDIRECTORY)".."..:..".....#...OF.
5.229.32.+#..."FILENAME: ";:.G(34);.G#..
.15,"M-R"G(OF)G(3)G(16).S#...I.0.15.O#..
.#15,CH$:CH.F(CH$.G(0)).{#F..G(CH);..#P.
...#Z..G(34);"  TYPE: ";..#...K$:.K$."0"
.K$."6"..740.G#...K$."0".."DEL".Z#...K$.
"1".."SEQ"..#...K$."2".."PRG"..$...K$."3
".."USR"..$...K$."4".."REL".&$ ..K$."5".
."CBM".9$*..K$."6".."DIR".R$4.K.E(K$):.K
.0.K.K.128.S$>..15,"M-W"G(OF.3)G(3)G(1)G
(K).Y$H...$R.:..$\....$F.."REWRITING...
".J$P..15,"M-W"G(JL)G(JH)G(1)G(144):. WR
ITE BUFFER..$Z.."VALIDATING..."..$...15,
"V0:"..$..."DONE."..%.. 15:....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL