@0:FORMAT
FILE INFORMATION
FILENAME(S): @0:FORMAT
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-12-01 19:06:29
APPEARS ON: 1 disk(s)
FILE HASH
b22d6ed526fa3c46cd16d9f0501c0856932584ee13b4cdd9e49158999b9ced18
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MR AMMO TRIAD 1 | @0:FORMAT | PRG | Icebreaker | 25 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |.."....53280,0:.| 00000010: 35 33 32 38 31 2C 30 3A 99 22 1F 22 3A 89 31 30 |53281,0:.".":.10| 00000020: 30 30 00 28 08 64 00 8F 00 2E 08 6E 00 99 00 3A |00.(.d.....n...:| 00000030: 08 73 00 97 20 31 39 2C 36 35 00 60 08 78 00 85 |.s.. 19,65.`.x..| 00000040: 20 22 12 05 B0 99 C4 9F 45 9A 56 9C 49 97 43 1F | "......E.V.I.C.| 00000050: 45 AE 92 3A 20 22 3B 44 56 3A 99 C7 28 31 33 29 |E..: ";DV:..(13)| 00000060: 00 86 08 82 00 85 20 22 91 12 05 AD 99 D0 9F 41 |...... ".......A| 00000070: 9A 52 9C 54 97 C0 1F 23 BD 92 3A 20 22 3B 50 4E |.R.T...#..: ";PN| 00000080: 3A 97 31 39 2C 30 00 91 08 8C 00 99 C7 28 31 33 |:.19,0.......(13| 00000090: 29 00 97 08 96 00 3A 00 B4 08 A0 00 99 20 22 12 |).....:...... ".| 000000A0: 9B D3 96 45 81 41 1C 52 95 43 97 48 49 4E 47 2E |...E.A.R.C.HING.| 000000B0: 2E 2E 92 22 00 C2 08 AA 00 9F 31 35 2C 44 56 2C |..."......15,DV,| 000000C0: 31 35 00 D6 08 B4 00 98 31 35 2C 22 47 2D 50 22 |15......15,"G-P"| 000000D0: 3B C7 28 50 4E 29 00 09 09 BE 00 A1 23 31 35 2C |;.(PN)......#15,| 000000E0: 50 54 24 3A 50 54 B2 C6 28 50 54 24 AA C7 28 30 |PT$:PT..(PT$..(0| 000000F0: 29 29 3A 8F 20 43 48 45 43 4B 20 50 41 52 54 49 |)):. CHECK PARTI| 00000100: 54 49 4F 4E 20 54 59 50 45 00 0F 09 C8 00 99 00 |TION TYPE.......| 00000110: 4E 09 D2 00 8B 50 54 B2 30 B0 50 54 B1 35 A7 A0 |N....PT.0.PT.5..| 00000120: 31 35 3A 99 22 12 05 D7 52 99 4F 9F 4E 9A 47 9C |15:."...R.O.N.G.| 00000130: 20 97 D0 1F 41 52 54 49 54 49 4F 4E 2F C4 52 49 | ...ARTITION/.RI| 00000140: 56 45 20 D4 59 50 45 2E 22 3A 89 39 35 30 00 54 |VE .YPE.":.950.T| 00000150: 09 DC 00 3A 00 7F 09 E6 00 98 31 35 2C 22 43 D0 |...:......15,"C.| 00000160: 22 C7 28 50 4E 29 3A 8F 20 4D 41 4B 45 20 50 41 |".(PN):. MAKE PA| 00000170: 52 54 49 54 49 4F 4E 20 43 55 52 52 45 4E 54 00 |RTITION CURRENT.| 00000180: 85 09 F0 00 3A 00 B2 09 FA 00 8B 50 54 B2 31 A7 |....:......PT.1.| 00000190: 54 52 B2 31 3A 53 45 B2 33 34 3A 4A 42 B2 33 32 |TR.1:SE.34:JB.32| 000001A0: 3A 4A 54 B2 31 30 32 34 30 3A 8F 20 4E 41 54 49 |:JT.10240:. NATI| 000001B0: 56 45 00 E5 09 04 01 8B 50 54 B2 32 B0 50 54 B2 |VE......PT.2.PT.| 000001C0: 33 A7 54 52 B2 31 38 3A 53 45 B2 31 3A 4A 42 B2 |3.TR.18:SE.1:JB.| 000001D0: 30 3A 4A 54 B2 36 3A 8F 20 31 35 34 31 20 4F 52 |0:JT.6:. 1541 OR| 000001E0: 20 31 35 37 31 00 1C 0A 0E 01 8B 50 54 B2 34 B0 | 1571......PT.4.| 000001F0: 50 54 B2 35 A7 54 52 B2 34 30 3A 53 45 B2 33 3A |PT.5.TR.40:SE.3:| 00000200: 4A 42 B2 32 3A 4A 54 B2 31 31 3A 8F 20 31 35 38 |JB.2:JT.11:. 158| 00000210: 31 20 4F 52 20 31 35 38 31 43 50 4D 00 5E 0A 18 |1 OR 1581CPM.^..| 00000220: 01 56 48 B2 B5 28 4A 54 AD 32 35 36 29 3A 56 4C |.VH..(JT.256):VL| 00000230: B2 4A 54 AB 56 48 AC 32 35 36 3A 4A 48 B2 B5 28 |.JT.VH.256:JH..(| 00000240: 4A 42 AD 32 35 36 29 3A 4A 4C B2 4A 42 AB 4A 48 |JB.256):JL.JB.JH| 00000250: AC 32 35 36 3A 42 48 B2 33 3A 42 4C B2 30 00 64 |.256:BH.3:BL.0.d| 00000260: 0A 22 01 3A 00 98 0A 2C 01 98 31 35 2C 22 4D 2D |.".:...,..15,"M-| 00000270: 57 22 C7 28 56 4C 29 C7 28 56 48 29 C7 28 32 29 |W".(VL).(VH).(2)| 00000280: C7 28 54 52 29 C7 28 53 45 29 3A 8F 20 53 45 54 |.(TR).(SE):. SET| 00000290: 55 50 20 54 20 26 20 53 00 CB 0A 36 01 98 31 35 |UP T & S...6..15| 000002A0: 2C 22 4D 2D 57 22 C7 28 4A 4C 29 C7 28 4A 48 29 |,"M-W".(JL).(JH)| 000002B0: C7 28 31 29 C7 28 31 32 38 29 3A 8F 20 52 45 41 |.(1).(128):. REA| 000002C0: 44 20 54 4F 20 42 55 46 46 45 52 00 F1 0A 40 01 |D TO BUFFER...@.| 000002D0: 98 31 35 2C 22 4D 2D 52 22 C7 28 30 29 C7 28 33 |.15,"M-R".(0).(3| 000002E0: 29 C7 28 32 29 3A 8F 20 52 45 41 44 20 4C 49 4E |).(2):. READ LIN| 000002F0: 4B 00 20 0B 4A 01 A1 23 31 35 2C 54 50 24 2C 54 |K. .J..#15,TP$,T| 00000300: 53 24 3A 54 50 B2 C6 28 54 50 24 AA C7 28 30 29 |S$:TP..(TP$..(0)| 00000310: 29 3A 54 53 B2 C6 28 54 53 24 AA C7 28 30 29 29 |):TS..(TS$..(0))| 00000320: 00 5A 0B 54 01 8B 54 50 B3 B1 30 B0 54 53 B3 B1 |.Z.T..TP..0.TS..| 00000330: 32 35 35 A7 A0 31 35 3A 99 22 12 05 D0 41 9F 52 |255..15:."...A.R| 00000340: 99 54 9A 49 9C 54 97 49 1F 4F 4E 20 C1 4C 54 45 |.T.I.T.I.ON .LTE| 00000350: 52 45 44 2E 22 3A 89 39 35 30 00 60 0B 5E 01 3A |RED.":.950.`.^.:| 00000360: 00 9D 0B 68 01 54 54 B2 30 3A 81 4F 46 B2 32 A4 |...h.TT.0:.OF.2.| 00000370: 32 32 36 A9 33 32 3A 8F 20 56 45 52 49 46 59 20 |226.32:. VERIFY | 00000380: 54 48 41 54 20 41 4C 4C 20 46 49 4C 45 54 59 50 |THAT ALL FILETYP| 00000390: 45 53 20 45 51 55 41 4C 20 5A 45 52 4F 00 B8 0B |ES EQUAL ZERO...| 000003A0: 72 01 98 31 35 2C 22 4D 2D 52 22 C7 28 4F 46 29 |r..15,"M-R".(OF)| 000003B0: C7 28 33 29 C7 28 31 29 00 DD 0B 7C 01 A1 23 31 |.(3).(1)...|..#1| 000003C0: 35 2C 46 54 24 3A 46 54 B2 C6 28 46 54 24 AA C7 |5,FT$:FT..(FT$..| 000003D0: 28 30 29 29 3A 54 54 B2 54 54 AA 46 54 00 E3 0B |(0)):TT.TT.FT...| 000003E0: 86 01 82 00 17 0C 90 01 8B 54 54 B3 B1 30 A7 A0 |.........TT..0..| 000003F0: 31 35 3A 99 22 12 05 D0 41 9F 52 99 54 9A 49 9C |15:."...A.R.T.I.| 00000400: 54 97 49 1F 54 49 4F 4E 20 C1 4C 54 45 52 45 44 |T.I.TION .LTERED| 00000410: 92 22 3A 89 39 35 30 00 1D 0C 9A 01 3A 00 31 0C |.":.950.....:.1.| 00000420: A4 01 53 4F B2 31 3A 53 49 B2 30 3A 48 49 B2 32 |..SO.1:SI.0:HI.2| 00000430: 30 00 68 0C AE 01 98 31 35 2C 22 4D 2D 57 22 C7 |0.h....15,"M-W".| 00000440: 28 56 4C 29 C7 28 56 48 29 C7 28 32 29 C7 28 54 |(VL).(VH).(2).(T| 00000450: 52 29 C7 28 53 45 AA 53 4F 29 3A 8F 20 53 45 54 |R).(SE.SO):. SET| 00000460: 55 50 20 54 20 26 20 53 00 9B 0C B8 01 98 31 35 |UP T & S......15| 00000470: 2C 22 4D 2D 57 22 C7 28 4A 4C 29 C7 28 4A 48 29 |,"M-W".(JL).(JH)| 00000480: C7 28 31 29 C7 28 31 32 38 29 3A 8F 20 52 45 41 |.(1).(128):. REA| 00000490: 44 20 54 4F 20 42 55 46 46 45 52 00 C1 0C C2 01 |D TO BUFFER.....| 000004A0: 98 31 35 2C 22 4D 2D 52 22 C7 28 30 29 C7 28 33 |.15,"M-R".(0).(3| 000004B0: 29 C7 28 32 29 3A 8F 20 52 45 41 44 20 4C 49 4E |).(2):. READ LIN| 000004C0: 4B 00 F0 0C CC 01 A1 23 31 35 2C 54 50 24 2C 54 |K......#15,TP$,T| 000004D0: 53 24 3A 54 50 B2 C6 28 54 50 24 AA C7 28 30 29 |S$:TP..(TP$..(0)| 000004E0: 29 3A 54 53 B2 C6 28 54 53 24 AA C7 28 30 29 29 |):TS..(TS$..(0))| 000004F0: 00 1A 0D D6 01 8B 54 50 B3 B1 30 A7 53 49 B2 54 |......TP..0.SI.T| 00000500: 53 AB 28 53 45 AA 53 4F 29 3A 8B 53 49 B1 30 AF |S.(SE.SO):.SI.0.| 00000510: 53 49 B3 48 49 A7 89 35 31 30 00 5A 0D E0 01 8B |SI.HI..510.Z....| 00000520: 28 53 4F B2 31 37 29 AF 28 50 54 B2 32 B0 50 54 |(SO.17).(PT.2.PT| 00000530: B2 33 29 B0 28 53 4F B2 33 36 29 AF 28 50 54 B2 |.3).(SO.36).(PT.| 00000540: 34 B0 50 54 B2 35 29 B0 28 53 4F B2 33 30 29 AF |4.PT.5).(SO.30).| 00000550: 28 50 54 B2 31 29 A7 35 31 30 00 6B 0D EA 01 53 |(PT.1).510.k...S| 00000560: 4F B2 53 4F AA 31 3A 89 34 33 30 00 71 0D F4 01 |O.SO.1:.430.q...| 00000570: 3A 00 A5 0D FE 01 98 31 35 2C 22 4D 2D 57 22 C7 |:......15,"M-W".| 00000580: 28 56 4C 29 C7 28 56 48 29 C7 28 32 29 C7 28 54 |(VL).(VH).(2).(T| 00000590: 52 29 C7 28 53 45 29 3A 8F 20 53 45 54 55 50 20 |R).(SE):. SETUP | 000005A0: 54 20 26 20 53 00 D8 0D 08 02 98 31 35 2C 22 4D |T & S......15,"M| 000005B0: 2D 57 22 C7 28 4A 4C 29 C7 28 4A 48 29 C7 28 31 |-W".(JL).(JH).(1| 000005C0: 29 C7 28 31 32 38 29 3A 8F 20 52 45 41 44 20 54 |).(128):. READ T| 000005D0: 4F 20 42 55 46 46 45 52 00 FD 0D 12 02 4E 54 B2 |O BUFFER.....NT.| 000005E0: 54 52 3A 4E 53 B2 53 45 AA 53 49 3A 8B 53 49 B2 |TR:NS.SE.SI:.SI.| 000005F0: 30 A7 4E 54 B2 30 3A 4E 53 B2 32 35 35 00 21 0E |0.NT.0:NS.255.!.| 00000600: 1C 02 98 31 35 2C 22 4D 2D 57 22 C7 28 30 29 C7 |...15,"M-W".(0).| 00000610: 28 33 29 C7 28 32 29 C7 28 4E 54 29 C7 28 4E 53 |(3).(2).(NT).(NS| 00000620: 29 00 27 0E 26 02 3A 00 4C 0E 30 02 99 22 12 05 |).'.&.:.L.0.."..| 00000630: 20 20 D3 99 45 9F 4C 9A 45 9C 43 97 54 1F 20 C6 | ..E.L.E.C.T. .| 00000640: 49 4C 45 20 D4 59 50 45 20 20 92 22 00 71 0E 3A |ILE .YPE .".q.:| 00000650: 02 99 22 12 05 20 20 99 30 9F 20 9A 3D 9C 20 97 |..".. .0. .=. .| 00000660: C4 1F 45 4C 45 54 45 44 20 20 20 20 20 20 20 92 |..ELETED .| 00000670: 22 00 96 0E 44 02 99 22 12 05 20 99 20 9F 31 9A |"...D..".. . .1.| 00000680: 20 9C 3D 97 20 1F D3 45 51 55 45 4E 54 49 41 4C | .=. ..EQUENTIAL| 00000690: 20 20 20 20 92 22 00 BB 0E 4E 02 99 22 12 05 99 | ."...N.."...| 000006A0: 20 9F 20 9A 32 9C 20 97 3D 1F 20 D0 52 4F 47 52 | . .2. .=. .ROGR| 000006B0: 41 4D 20 20 20 20 20 20 20 92 22 00 E0 0E 58 02 |AM ."...X.| 000006C0: 99 22 12 05 99 9F 20 9A 20 9C 33 97 20 1F 3D 20 |.".... . .3. .= | 000006D0: D5 53 45 52 20 20 20 20 20 20 20 20 20 20 92 22 |.SER ."| 000006E0: 00 05 0F 62 02 99 22 12 05 99 9F 9A 20 9C 20 97 |...b.."..... . .| 000006F0: 34 1F 20 3D 20 D2 45 4C 41 54 49 56 45 20 20 20 |4. = .ELATIVE | 00000700: 20 20 20 92 22 00 2A 0F 6C 02 8B 50 54 B2 34 A7 | .".*.l..PT.4.| 00000710: 99 22 12 1F 20 20 35 20 3D 20 27 38 31 20 D3 55 |.".. 5 = '81 .U| 00000720: 42 20 C4 49 52 45 43 54 92 22 00 4F 0F 76 02 8B |B .IRECT.".O.v..| 00000730: 50 54 B2 31 A7 99 22 12 1F 20 20 36 20 3D 20 D3 |PT.1..".. 6 = .| 00000740: 55 42 44 49 52 45 43 54 4F 52 59 20 20 92 22 00 |UBDIRECTORY .".| 00000750: 55 0F 80 02 80 00 5B 0F 8A 02 99 00 6C 0F 94 02 |U.....[.....l...| 00000760: 81 4F 46 B2 35 A4 32 32 39 A9 33 32 00 87 0F 9E |.OF.5.229.32....| 00000770: 02 99 22 46 49 4C 45 4E 41 4D 45 3A 20 22 3B 3A |.."FILENAME: ";:| 00000780: 99 C7 28 33 34 29 3B 00 A3 0F A8 02 98 31 35 2C |..(34);......15,| 00000790: 22 4D 2D 52 22 C7 28 4F 46 29 C7 28 33 29 C7 28 |"M-R".(OF).(3).(| 000007A0: 31 36 29 00 AF 0F B2 02 81 49 B2 30 A4 31 35 00 |16)......I.0.15.| 000007B0: CB 0F BC 02 A1 23 31 35 2C 43 48 24 3A 43 48 B2 |.....#15,CH$:CH.| 000007C0: C6 28 43 48 24 AA C7 28 30 29 29 00 D7 0F C6 02 |.(CH$..(0)).....| 000007D0: 99 C7 28 43 48 29 3B 00 DD 0F D0 02 82 00 F4 0F |..(CH);.........| 000007E0: DA 02 99 C7 28 33 34 29 3B 22 20 20 54 59 50 45 |....(34);" TYPE| 000007F0: 3A 20 22 3B 00 10 10 E4 02 A1 4B 24 3A 8B 4B 24 |: ";......K$:.K$| 00000800: B3 22 30 22 B0 4B 24 B1 22 36 22 A7 89 37 34 30 |."0".K$."6"..740| 00000810: 00 23 10 EE 02 8B 4B 24 B2 22 30 22 A7 99 22 44 |.#....K$."0".."D| 00000820: 45 4C 22 00 36 10 F8 02 8B 4B 24 B2 22 31 22 A7 |EL".6....K$."1".| 00000830: 99 22 53 45 51 22 00 49 10 02 03 8B 4B 24 B2 22 |."SEQ".I....K$."| 00000840: 32 22 A7 99 22 50 52 47 22 00 5C 10 0C 03 8B 4B |2".."PRG".\....K| 00000850: 24 B2 22 33 22 A7 99 22 55 53 52 22 00 6F 10 16 |$."3".."USR".o..| 00000860: 03 8B 4B 24 B2 22 34 22 A7 99 22 52 45 4C 22 00 |..K$."4".."REL".| 00000870: 82 10 20 03 8B 4B 24 B2 22 35 22 A7 99 22 43 42 |.. ..K$."5".."CB| 00000880: 4D 22 00 95 10 2A 03 8B 4B 24 B2 22 36 22 A7 99 |M"...*..K$."6"..| 00000890: 22 44 49 52 22 00 AE 10 34 03 4B B2 C5 28 4B 24 |"DIR"...4.K..(K$| 000008A0: 29 3A 8B 4B B1 30 A7 4B B2 4B AA 31 32 38 00 CF |):.K.0.K.K.128..| 000008B0: 10 3E 03 98 31 35 2C 22 4D 2D 57 22 C7 28 4F 46 |.>..15,"M-W".(OF| 000008C0: AB 33 29 C7 28 33 29 C7 28 31 29 C7 28 4B 29 00 |.3).(3).(1).(K).| 000008D0: D5 10 48 03 82 00 DB 10 52 03 3A 00 E1 10 5C 03 |..H.....R.:...\.| 000008E0: 99 00 F5 10 66 03 99 22 52 45 57 52 49 54 49 4E |....f.."REWRITIN| 000008F0: 47 2E 2E 2E 22 00 26 11 70 03 98 31 35 2C 22 4D |G...".&.p..15,"M| 00000900: 2D 57 22 C7 28 4A 4C 29 C7 28 4A 48 29 C7 28 31 |-W".(JL).(JH).(1| 00000910: 29 C7 28 31 34 34 29 3A 8F 20 57 52 49 54 45 20 |).(144):. WRITE | 00000920: 42 55 46 46 45 52 00 3B 11 7A 03 99 22 56 41 4C |BUFFER.;.z.."VAL| 00000930: 49 44 41 54 49 4E 47 2E 2E 2E 22 00 49 11 84 03 |IDATING...".I...| 00000940: 98 31 35 2C 22 56 30 3A 22 00 56 11 8E 03 99 22 |.15,"V0:".V...."| 00000950: 44 4F 4E 45 2E 22 00 60 11 98 03 A0 31 35 3A 80 |DONE.".`....15:.| 00000960: 00 84 11 B6 03 99 20 C7 28 31 33 29 3A 99 22 12 |...... .(13):.".| 00000970: 97 B0 98 C8 9B 49 9F 54 99 20 05 CF 9B 4E 98 45 |.....I.T. ...N.E| 00000980: 97 AE 92 22 00 9B 11 B7 03 A1 47 24 3A 8B 47 24 |..."......G$:.G$| 00000990: B3 B1 C7 28 31 33 29 A7 39 35 31 00 C6 11 B8 03 |...(13).951.....| 000009A0: 99 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000009B0: 22 12 97 AD 98 D3 9B 4C 9F 41 99 4D 05 4D 9B 45 |"......L.A.M.M.E| 000009C0: 98 44 97 BD 92 22 00 D5 11 BB 03 81 58 B2 31 A4 |.D..."......X.1.| 000009D0: 31 35 30 3A 82 00 E0 11 DE 03 89 20 31 30 30 30 |150:....... 1000| 000009E0: 00 E6 11 E7 03 80 00 02 12 E8 03 99 22 93 22 3A |............".":| 000009F0: 99 22 0E 1F D5 4E 46 4F 52 4D 41 54 20 56 32 2E |."...NFORMAT V2.| 00000A00: 4F 22 00 1D 12 ED 03 99 22 9C D2 45 4C 45 41 53 |O"......"..ELEAS| 00000A10: 45 44 20 36 2E 32 4F 2E 31 39 39 33 22 00 41 12 |ED 6.2O.1993".A.| 00000A20: FC 03 99 20 22 11 11 9A 41 5D 55 4E 46 4F 52 4D |... "...A]UNFORM| 00000A30: 41 54 20 43 4D 44 20 50 41 52 54 49 54 49 4F 4E |AT CMD PARTITION| 00000A40: 22 00 5D 12 01 04 99 22 42 5D 55 4E 46 4F 52 4D |".]...."B]UNFORM| 00000A50: 41 54 20 31 35 34 31 20 44 49 53 4B 22 00 7C 12 |AT 1541 DISK".|.| 00000A60: 06 04 99 20 22 43 5D 55 4E 53 43 52 41 54 43 48 |... "C]UNSCRATCH| 00000A70: 20 31 35 34 31 20 46 49 4C 45 53 22 00 92 12 0B | 1541 FILES"....| 00000A80: 04 99 20 22 44 5D 49 4E 53 54 52 55 43 54 49 4F |.. "D]INSTRUCTIO| 00000A90: 4E 53 00 A6 12 10 04 99 20 22 45 5D 51 55 49 54 |NS...... "E]QUIT| 00000AA0: 20 54 48 49 53 22 00 AF 12 1A 04 A1 47 24 3A 00 | THIS"......G$:.| 00000AB0: C0 12 1B 04 8B 20 47 24 B2 22 41 22 A7 31 30 30 |..... G$."A".100| 00000AC0: 00 CB 12 42 04 89 20 31 30 35 30 00 00 00 |...B.. 1050... |
.."....53280,0:.53281,0:.".":.1000.(.D..
...N...:.S.. 19,65.`.X.. "....D.E.V.I.C.
E..: ";DV:.G(13)...... ".....P.A.R.T...#
..: ";PN:.19,0......G(13).....:... .. ".
.S.E.A.R.C.HING....".B....15,DV,15.V....
15,"G-P";G(PN)......#15,PT$:PT.F(PT$.G(0
)):. CHECK PARTITION TYPE...H...N.R..PT.
0.PT.5. 15:."..WR.O.N.G. .P.ARTITION/DRI
VE TYPE.":.950.T...:.....15,"CP"G(PN):.
MAKE PARTITION CURRENT.....:......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.VH.256:JH..(JB.256):JL.JB.JH.256:BH.
3:BL.0.D.".:...,..15,"M-W"G(VL)G(VH)G(2)
G(TR)G(SE):. SETUP T & S.K.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))
.Z.T..TP..0.TS..255. 15:."..PA.R.T.I.T.I
.ON ALTERED.":.950.`.^.:...H.TT.0:.OF.2.
226.32:. VERIFY THAT ALL FILETYPES EQUAL
ZERO...R..15,"M-R"G(OF)G(3)G(1)...|..#1
5,FT$:FT.F(FT$.G(0)):TT.TT.FT...........
.TT..0. 15:."..PA.R.T.I.T.I.TION ALTERED
.":.950.....:.1...SO.1:SI.0:HI.20.H....1
5,"M-W"G(VL)G(VH)G(2)G(TR)G(SE.SO):. SET
UP T & S......15,"M-W"G(JL)G(JH)G(1)G(12
8):. READ TO BUFFER.A.B..15,"M-R"G(0)G(3
)G(2):. READ LINK...L..#15,TP$,TS$:TP.F(
TP$.G(0)):TS.F(TS$.G(0))...V..TP..0.SI.T
S.(SE.SO):.SI.0.SI.HI..510.Z....(SO.17).
(PT.2.PT.3).(SO.36).(PT.4.PT.5).(SO.30).
(PT.1).510.K...SO.SO.1:.430.Q...:......1
5,"M-W"G(VL)G(VH)G(2)G(TR)G(SE):. SETUP
T & S.X....15,"M-W"G(JL)G(JH)G(1)G(128):
. READ TO BUFFER.....NT.TR:NS.SE.SI:.SI.
0.NT.0:NS.255.!....15,"M-W"G(0)G(3)G(2)G
(NT)G(NS).'.&.:.L.0..".. S.E.L.E.C.T. F
ILE TYPE .".Q.:..".. .0. .=. .D.ELETED
."...D..".. . .1. .=. .SEQUENTIAL
."...N.."... . .2. .=. PROGRAM
."...X..".... . .3. .= USER ."
...B.."..... . .4. = RELATIVE .".*.
L..PT.4..".. 5 = '81 SUB DIRECT.".O.V..
PT.1..".. 6 = SUBDIRECTORY .".U.....[.
....L....OF.5.229.32......"FILENAME: ";:
.G(34);......15,"M-R"G(OF)G(3)G(16).....
.I.0.15.K....#15,CH$:CH.F(CH$.G(0)).W.F.
.G(CH);...P.....Z..G(34);" TYPE: ";....
..K$:.K$."0".K$."6"..740.#....K$."0".."D
EL".6....K$."1".."SEQ".I....K$."2".."PRG
".\....K$."3".."USR".O....K$."4".."REL".
.. ..K$."5".."CBM"...*..K$."6".."DIR"...
4.K.E(K$):.K.0.K.K.128.O.>..15,"M-W"G(OF
.3)G(3)G(1)G(K).U.H.....R.:...\.....F.."
REWRITING...".&.P..15,"M-W"G(JL)G(JH)G(1
)G(144):. WRITE BUFFER.;.Z.."VALIDATING.
..".I....15,"V0:".V...."DONE.".`... 15:.
...... G(13):."....H.I.T. .O.N.E..."....
..G$:.G$..G(13).951.F....
"....S.L.A.M.M.E.D...".U....X.1.150:....
... 1000............".":."..UNFORMAT V2.
O"......".RELEASED 6.2O.1993".A.... "...
A]UNFORMAT CMD PARTITION".]...."B]UNFORM
AT 1541 DISK".|.... "C]UNSCRATCH 1541 FI
LES"...... "D]INSTRUCTIONS...... "E]QUIT
THIS"......G$:...... G$."A".100.K.B.. 1
050...
> CLICK IMAGE PREVIEW FOR FULL MODAL