DISKPICKER
FILE INFORMATION
FILENAME(S): DISKPICKER
FILE TYPE(S): PRG
FILE SIZE: 4.7K
FIRST SEEN: 2025-10-19 22:48:26
APPEARS ON: 1 disk(s)
FILE HASH
5fd5628d68b871475473b6c331588c896d20f115e727cec211e08216ce526859
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PSIPACK | DISKPICKER | PRG | Radd Maxx | 15 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 22 08 0A 00 8B 41 B2 30 A7 41 B2 31 3A 93 |.."....A.0.A.1:.|
00000010: 22 4D 4F 4E 49 54 4F 52 24 38 30 30 30 22 2C 38 |"MONITOR$8000",8|
00000020: 2C 31 00 3C 08 14 00 8B 41 B2 31 A7 41 B2 32 3A |,1.<....A.1.A.2:|
00000030: 93 22 5A 4D 41 43 48 22 2C 38 2C 31 00 4E 08 1E |."ZMACH",8,1.N..|
00000040: 00 97 35 32 2C 33 31 3A 97 35 36 2C 33 31 00 5D |..52,31:.56,31.]|
00000050: 08 23 00 9E 34 39 31 35 32 3A 8A 34 30 00 86 08 |.#..49152:.40...|
00000060: 28 00 97 35 33 32 38 30 2C 31 31 3A 97 35 33 32 |(..53280,11:.532|
00000070: 38 31 2C 31 31 3A 9C 3A 86 45 52 24 28 31 31 29 |81,11:.:.ER$(11)|
00000080: 3A 8D 33 30 30 30 00 B2 08 2D 00 99 22 93 9E 20 |:.3000...-..".. |
00000090: 20 20 20 20 20 44 49 53 4B 50 49 43 4B 45 52 99 | DISKPICKER.|
000000A0: 20 50 53 49 44 41 43 28 43 29 38 34 20 56 42 4E | PSIDAC(C)84 VBN|
000000B0: 05 22 00 D2 08 32 00 99 22 11 20 20 20 20 20 20 |."...2..". |
000000C0: 20 20 20 20 20 2A 2A 2A 20 4D 45 4E 55 20 2A 2A | *** MENU **|
000000D0: 2A 22 00 FD 08 3C 00 99 22 11 28 31 29 20 54 52 |*"...<..".(1) TR|
000000E0: 41 4E 53 46 45 52 20 44 49 53 4B 20 4D 45 4D 4F |ANSFER DISK MEMO|
000000F0: 52 59 20 54 4F 20 42 55 46 46 45 52 22 00 1D 09 |RY TO BUFFER"...|
00000100: 41 00 99 22 11 28 32 29 20 45 4E 41 42 4C 45 20 |A..".(2) ENABLE |
00000110: 4D 4F 4E 49 54 4F 52 20 4D 4F 44 45 22 00 48 09 |MONITOR MODE".H.|
00000120: 46 00 99 22 11 28 33 29 20 54 52 41 4E 53 46 45 |F..".(3) TRANSFE|
00000130: 52 20 42 55 46 46 45 52 20 54 4F 20 44 49 53 4B |R BUFFER TO DISK|
00000140: 20 4D 45 4D 4F 52 59 22 00 70 09 4B 00 99 22 11 | MEMORY".p.K..".|
00000150: 28 34 29 20 44 49 52 45 43 54 20 45 58 45 43 55 |(4) DIRECT EXECU|
00000160: 54 45 20 55 53 45 52 20 50 52 4F 47 52 41 4D 22 |TE USER PROGRAM"|
00000170: 00 99 09 4E 00 99 22 11 28 35 29 20 4A 4F 42 20 |...N..".(5) JOB |
00000180: 51 55 45 20 45 58 45 43 55 54 45 20 55 53 45 52 |QUE EXECUTE USER|
00000190: 20 50 52 4F 47 52 41 4D 22 00 C0 09 50 00 99 22 | PROGRAM"...P.."|
000001A0: 11 28 36 29 20 4C 4F 41 44 20 53 45 43 54 4F 52 |.(6) LOAD SECTOR|
000001B0: 20 54 4F 20 44 49 53 4B 20 42 55 46 46 45 52 22 | TO DISK BUFFER"|
000001C0: 00 DF 09 52 00 99 22 11 28 37 29 20 49 4E 49 54 |...R..".(7) INIT|
000001D0: 49 41 4C 49 5A 45 20 44 49 53 4B 20 49 4F 22 00 |IALIZE DISK IO".|
000001E0: FB 09 53 00 99 22 11 28 38 29 20 46 4F 52 4D 41 |..S..".(8) FORMA|
000001F0: 54 20 44 49 53 4B 45 54 54 45 22 00 20 0A 54 00 |T DISKETTE". .T.|
00000200: 99 22 11 28 39 29 20 50 4F 53 49 54 49 4F 4E 20 |.".(9) POSITION |
00000210: 52 45 41 44 2F 57 52 49 54 45 20 48 45 41 44 22 |READ/WRITE HEAD"|
00000220: 00 44 0A 55 00 85 22 11 53 45 4C 45 43 54 20 43 |.D.U..".SELECT C|
00000230: 48 4F 49 43 45 22 3B 43 48 24 3A 43 48 B2 C5 28 |HOICE";CH$:CH..(|
00000240: 43 48 24 29 00 51 0A 58 00 8B 43 48 B1 39 A7 34 |CH$).Q.X..CH.9.4|
00000250: 30 00 7F 0A 5A 00 91 43 48 20 89 20 31 30 30 2C |0...Z..CH . 100,|
00000260: 33 30 30 2C 34 30 30 2C 35 30 30 2C 36 30 30 2C |300,400,500,600,|
00000270: 37 30 30 2C 38 30 30 2C 39 30 30 2C 38 30 35 00 |700,800,900,805.|
00000280: 87 0A 5F 00 89 34 30 00 B9 0A 64 00 99 22 93 11 |.._..40...d.."..|
00000290: 28 31 29 20 54 52 41 4E 53 46 45 52 20 44 49 53 |(1) TRANSFER DIS|
000002A0: 4B 20 4D 45 4D 4F 52 59 20 54 4F 20 42 55 46 46 |K MEMORY TO BUFF|
000002B0: 45 52 22 3A 8D 32 30 30 30 00 E8 0A 69 00 85 22 |ER":.2000...i.."|
000002C0: 11 49 4E 50 55 54 20 44 49 53 4B 20 53 54 41 52 |.INPUT DISK STAR|
000002D0: 54 20 41 44 44 52 45 53 53 22 3B 58 24 3A 8D 31 |T ADDRESS";X$:.1|
000002E0: 30 30 30 3A 53 41 B2 58 00 15 0B 6E 00 85 22 11 |000:SA.X...n..".|
000002F0: 49 4E 50 55 54 20 44 49 53 4B 20 45 4E 44 20 41 |INPUT DISK END A|
00000300: 44 44 52 45 53 53 22 3B 58 24 3A 8D 31 30 30 30 |DDRESS";X$:.1000|
00000310: 3A 45 41 B2 58 00 4E 0B 78 00 85 22 11 49 4E 50 |:EA.X.N.x..".INP|
00000320: 55 54 20 42 55 46 46 45 52 20 41 44 44 52 45 53 |UT BUFFER ADDRES|
00000330: 53 22 3B 58 24 3A 8D 31 30 30 30 3A 42 41 B2 58 |S";X$:.1000:BA.X|
00000340: 3A 8B 58 B3 38 31 39 32 A7 8D 32 30 33 30 00 61 |:.X.8192..2030.a|
00000350: 0B 7D 00 8B 58 B1 33 32 37 36 37 A7 8D 32 30 34 |.}..X.32767..204|
00000360: 30 00 A2 0B 82 00 99 22 11 44 49 53 4B 20 4D 45 |0......".DISK ME|
00000370: 4D 2E 20 54 4F 20 42 55 46 46 2E 20 54 52 41 4E |M. TO BUFF. TRAN|
00000380: 53 46 45 52 20 49 4E 20 50 52 4F 43 45 53 53 22 |SFER IN PROCESS"|
00000390: 3A 99 22 11 42 59 54 45 20 43 4F 55 4E 54 20 3D |:.".BYTE COUNT =|
000003A0: 22 3B 00 CB 0B 8C 00 4E 42 B2 45 41 AB 53 41 3A |";.....NB.EA.SA:|
000003B0: 53 48 B2 B5 28 53 41 AD 32 35 36 29 3A 53 4C B2 |SH..(SA.256):SL.|
000003C0: 53 41 AB 28 53 48 AC 32 35 36 29 00 E1 0B 96 00 |SA.(SH.256).....|
000003D0: 9F 31 35 2C 38 2C 31 35 3A 81 4C 50 B2 30 A4 4E |.15,8,15:.LP.0.N|
000003E0: 42 00 0F 0C A0 00 98 31 35 2C 22 4D 2D 52 22 C7 |B......15,"M-R".|
000003F0: 28 53 4C 29 C7 28 53 48 29 3A A1 23 31 35 2C 41 |(SL).(SH):.#15,A|
00000400: 24 3A 50 4E B2 C6 28 41 24 AA C7 28 30 29 29 00 |$:PN..(A$..(0)).|
00000410: 3F 0C AA 00 97 42 41 2C 50 4E 3A 42 41 B2 42 41 |?....BA,PN:BA.BA|
00000420: AA 31 3A 53 4C B2 53 4C AA 31 3A 8B 53 4C B2 32 |.1:SL.SL.1:.SL.2|
00000430: 35 36 A7 53 4C B2 30 3A 53 48 B2 53 48 AA 31 00 |56.SL.0:SH.SH.1.|
00000440: 50 0C AF 00 99 A3 31 32 29 4C 50 22 91 22 3A 82 |P.....12)LP".":.|
00000450: 00 7B 0C B4 00 A0 31 35 3A 99 22 11 11 45 4E 44 |.{....15:."..END|
00000460: 20 54 52 41 4E 53 46 45 52 22 3A 81 54 44 B2 31 | TRANSFER":.TD.1|
00000470: A4 33 30 30 30 3A 82 3A 8A 34 30 00 A0 0C 2C 01 |.3000:.:.40...,.|
00000480: 85 22 11 50 52 49 4E 54 45 52 20 59 2F 4E 22 3B |.".PRINTER Y/N";|
00000490: 59 4E 24 3A 8B 59 4E 24 B2 22 59 22 A7 50 B2 31 |YN$:.YN$."Y".P.1|
000004A0: 00 C3 0C 2E 01 8B 59 4E 24 B3 B1 22 59 22 AF 59 |......YN$.."Y".Y|
000004B0: 4E 24 B3 B1 22 4E 22 A7 99 22 91 91 91 22 3A 89 |N$.."N".."...":.|
000004C0: 33 30 30 00 D6 0C 31 01 99 3A 8B 50 B2 31 A7 9F |300...1..:.P.1..|
000004D0: 34 2C 34 3A 9D 34 00 E1 0C 36 01 9E 33 32 37 36 |4,4:.4...6..3276|
000004E0: 38 00 E7 0C 40 01 80 00 19 0D 90 01 99 22 93 11 |8...@........"..|
000004F0: 28 33 29 20 54 52 41 4E 53 46 45 52 20 42 55 46 |(3) TRANSFER BUF|
00000500: 46 45 52 20 54 4F 20 44 49 53 4B 20 4D 45 4D 4F |FER TO DISK MEMO|
00000510: 52 59 22 3A 8D 32 30 30 30 00 48 0D 95 01 85 22 |RY":.2000.H...."|
00000520: 11 49 4E 50 55 54 20 44 49 53 4B 20 53 54 41 52 |.INPUT DISK STAR|
00000530: 54 20 41 44 44 52 45 53 53 22 3B 58 24 3A 8D 31 |T ADDRESS";X$:.1|
00000540: 30 30 30 3A 53 41 B2 58 00 75 0D 9A 01 85 22 11 |000:SA.X.u....".|
00000550: 49 4E 50 55 54 20 44 49 53 4B 20 45 4E 44 20 41 |INPUT DISK END A|
00000560: 44 44 52 45 53 53 22 3B 58 24 3A 8D 31 30 30 30 |DDRESS";X$:.1000|
00000570: 3A 45 41 B2 58 00 AE 0D A4 01 85 22 11 49 4E 50 |:EA.X......".INP|
00000580: 55 54 20 42 55 46 46 45 52 20 41 44 44 52 45 53 |UT BUFFER ADDRES|
00000590: 53 22 3B 58 24 3A 8D 31 30 30 30 3A 42 41 B2 58 |S";X$:.1000:BA.X|
000005A0: 3A 8B 58 B3 38 31 39 32 A7 8D 32 30 33 30 00 C1 |:.X.8192..2030..|
000005B0: 0D A9 01 8B 58 B1 33 32 37 36 37 A7 8D 32 30 34 |....X.32767..204|
000005C0: 30 00 02 0E AE 01 99 22 11 42 55 46 46 2E 20 54 |0......".BUFF. T|
000005D0: 4F 20 44 49 53 4B 20 4D 45 4D 2E 20 54 52 41 4E |O DISK MEM. TRAN|
000005E0: 53 46 45 52 20 49 4E 20 50 52 4F 43 45 53 53 22 |SFER IN PROCESS"|
000005F0: 3A 99 22 11 42 59 54 45 20 43 4F 55 4E 54 20 3D |:.".BYTE COUNT =|
00000600: 22 3B 00 2B 0E B8 01 4E 42 B2 45 41 AB 53 41 3A |";.+...NB.EA.SA:|
00000610: 53 48 B2 B5 28 53 41 AD 32 35 36 29 3A 53 4C B2 |SH..(SA.256):SL.|
00000620: 53 41 AB 28 53 48 AC 32 35 36 29 00 41 0E C2 01 |SA.(SH.256).A...|
00000630: 9F 31 35 2C 38 2C 31 35 3A 81 4C 50 B2 30 A4 4E |.15,8,15:.LP.0.N|
00000640: 42 00 6B 0E CC 01 50 4E B2 C2 28 42 41 29 3A 98 |B.k...PN..(BA):.|
00000650: 31 35 2C 22 4D 2D 57 22 C7 28 53 4C 29 C7 28 53 |15,"M-W".(SL).(S|
00000660: 48 29 C7 28 31 29 C7 28 50 4E 29 00 94 0E D6 01 |H).(1).(PN).....|
00000670: 42 41 B2 42 41 AA 31 3A 53 4C B2 53 4C AA 31 3A |BA.BA.1:SL.SL.1:|
00000680: 8B 53 4C B2 32 35 36 A7 53 4C B2 30 3A 53 48 B2 |.SL.256.SL.0:SH.|
00000690: 53 48 AA 31 00 A5 0E DB 01 99 A3 31 32 29 4C 50 |SH.1.......12)LP|
000006A0: 22 91 22 3A 82 00 D0 0E E0 01 A0 31 35 3A 99 22 |".":.......15:."|
000006B0: 11 11 45 4E 44 20 54 52 41 4E 53 46 45 52 22 3A |..END TRANSFER":|
000006C0: 81 54 44 B2 31 A4 33 30 30 30 3A 82 3A 8A 34 30 |.TD.1.3000:.:.40|
000006D0: 00 FF 0E F4 01 99 22 93 11 28 34 29 20 44 49 52 |......"..(4) DIR|
000006E0: 45 43 54 20 45 58 45 43 55 54 45 20 55 53 45 52 |ECT EXECUTE USER|
000006F0: 20 50 52 4F 47 52 41 4D 22 3A 8D 32 30 30 30 00 | PROGRAM":.2000.|
00000700: 34 0F F9 01 85 22 11 49 4E 50 55 54 20 44 49 53 |4....".INPUT DIS|
00000710: 4B 20 50 52 4F 47 2E 20 45 4E 54 52 59 20 41 44 |K PROG. ENTRY AD|
00000720: 44 52 45 53 53 22 3B 58 24 3A 8D 31 30 30 30 3A |DRESS";X$:.1000:|
00000730: 53 41 B2 58 00 54 0F FE 01 53 48 B2 B5 28 53 41 |SA.X.T...SH..(SA|
00000740: AD 32 35 36 29 3A 53 4C B2 53 41 AB 28 53 48 AC |.256):SL.SA.(SH.|
00000750: 32 35 36 29 00 79 0F 08 02 9F 31 35 2C 38 2C 31 |256).y....15,8,1|
00000760: 35 3A 98 31 35 2C 22 4D 2D 45 22 C7 28 53 4C 29 |5:.15,"M-E".(SL)|
00000770: C7 28 53 48 29 3A A0 31 35 00 B0 0F 12 02 99 22 |.(SH):.15......"|
00000780: 11 50 52 4F 47 52 41 4D 20 45 58 45 43 55 54 49 |.PROGRAM EXECUTI|
00000790: 4F 4E 20 45 4E 41 42 4C 45 44 22 3A A0 31 35 3A |ON ENABLED":.15:|
000007A0: 81 54 44 B2 31 A4 33 30 30 30 3A 82 3A 8A 34 30 |.TD.1.3000:.:.40|
000007B0: 00 E0 0F 58 02 99 22 93 11 28 35 29 20 4A 4F 42 |...X.."..(5) JOB|
000007C0: 20 51 55 45 20 45 58 45 43 55 54 45 20 55 53 45 | QUE EXECUTE USE|
000007D0: 52 20 50 52 4F 47 52 41 4D 22 3A 8D 32 30 30 30 |R PROGRAM":.2000|
000007E0: 00 21 10 5D 02 99 22 11 49 4E 50 55 54 20 4A 4F |.!.]..".INPUT JO|
000007F0: 42 20 43 48 4F 49 43 45 11 22 3A 99 22 31 32 38 |B CHOICE.":."128|
00000800: 3D 52 45 41 44 22 3A 99 22 31 34 34 3D 57 52 49 |=READ":."144=WRI|
00000810: 54 45 22 3A 99 22 31 36 30 3D 56 45 52 49 46 59 |TE":."160=VERIFY|
00000820: 22 00 59 10 62 02 99 22 31 37 36 3D 53 45 45 4B |".Y.b.."176=SEEK|
00000830: 22 3A 99 22 31 38 34 3D 53 45 43 20 53 45 45 4B |":."184=SEC SEEK|
00000840: 22 3A 99 22 31 39 32 3D 42 55 4D 50 22 3A 99 22 |":."192=BUMP":."|
00000850: 32 30 38 3D 4A 55 4D 50 22 00 92 10 67 02 99 22 |208=JUMP"...g.."|
00000860: 32 32 34 3D 45 58 45 43 55 54 45 22 3A 85 22 11 |224=EXECUTE":.".|
00000870: 43 48 4F 49 43 45 22 3B 43 48 24 3A 43 48 B2 C5 |CHOICE";CH$:CH..|
00000880: 28 43 48 24 29 3A 58 24 B2 43 48 24 3A 8D 31 31 |(CH$):X$.CH$:.11|
00000890: 30 30 00 A1 10 69 02 8B 43 48 B2 30 A7 36 30 30 |00...i..CH.0.600|
000008A0: 3A 00 B2 10 6A 02 8B 43 48 B3 B1 32 32 34 A7 36 |:...j..CH..224.6|
000008B0: 34 30 00 F7 10 6C 02 99 22 93 53 45 4C 45 43 54 |40...l..".SELECT|
000008C0: 20 45 58 45 43 55 54 45 20 53 54 41 52 54 49 4E | EXECUTE STARTIN|
000008D0: 47 20 41 44 44 52 45 53 53 22 3A 99 22 11 41 44 |G ADDRESS":.".AD|
000008E0: 44 52 45 53 53 45 53 20 41 56 41 49 4C 41 42 4C |DRESSES AVAILABL|
000008F0: 45 20 41 52 45 3A 22 00 2C 11 71 02 99 22 11 28 |E ARE:".,.q..".(|
00000900: 31 29 3D 30 33 30 30 22 3A 99 22 28 32 29 3D 30 |1)=0300":."(2)=0|
00000910: 34 30 30 22 3A 99 22 28 33 29 3D 30 35 30 30 22 |400":."(3)=0500"|
00000920: 3A 99 22 28 34 29 3D 30 36 30 30 22 00 3C 11 74 |:."(4)=0600".<.t|
00000930: 02 99 22 28 35 29 3D 30 37 30 30 22 00 5C 11 76 |.."(5)=0700".\.v|
00000940: 02 85 22 11 43 48 4F 49 43 45 22 3B 43 48 24 3A |..".CHOICE";CH$:|
00000950: 58 24 B2 43 48 24 3A 8D 31 31 30 30 00 82 11 78 |X$.CH$:.1100...x|
00000960: 02 43 31 B2 C5 28 43 48 24 29 3A 91 43 31 89 36 |.C1..(CH$):.C1.6|
00000970: 34 30 2C 36 34 30 2C 36 34 30 2C 36 34 30 2C 36 |40,640,640,640,6|
00000980: 34 30 00 8B 11 7B 02 89 36 32 30 00 95 11 80 02 |40...{..620.....|
00000990: 8D 32 30 30 30 00 BA 11 82 02 4F 4B 24 B2 22 4E |.2000.....OK$."N|
000009A0: 22 3A 85 22 11 4D 55 4C 54 49 20 53 45 43 54 4F |":.".MULTI SECTO|
000009B0: 52 20 59 2F 4E 22 3B 4F 4B 24 00 EE 11 85 02 85 |R Y/N";OK$......|
000009C0: 22 93 11 49 4E 50 55 54 20 48 45 41 44 45 52 20 |"..INPUT HEADER |
000009D0: 23 31 20 22 3B 58 24 3A 54 4E B2 C5 28 58 24 29 |#1 ";X$:TN..(X$)|
000009E0: 3A 8B 58 24 B2 22 58 22 A7 8D 31 31 30 30 00 0C |:.X$."X"..1100..|
000009F0: 12 88 02 8B 4F 4B 24 B2 22 59 22 A7 81 53 4E B2 |....OK$."Y"..SN.|
00000A00: 32 30 A4 30 A9 AB 31 3A 89 36 35 31 00 3F 12 8A |20.0..1:.651.?..|
00000A10: 02 85 22 11 49 4E 50 55 54 20 48 45 41 44 45 52 |..".INPUT HEADER|
00000A20: 20 23 32 20 22 3B 58 24 3A 53 4E B2 C5 28 58 24 | #2 ";X$:SN..(X$|
00000A30: 29 3A 8B 58 24 B2 22 58 22 A7 8D 31 31 30 30 00 |):.X$."X"..1100.|
00000A40: 4C 12 8B 02 9F 31 35 2C 38 2C 31 35 00 5D 12 8C |L....15,8,15.]..|
00000A50: 02 8B 43 48 B3 B1 32 32 34 A7 36 35 35 00 85 12 |..CH..224.655...|
00000A60: 8D 02 8B 43 31 B2 31 A7 98 31 35 2C 22 4D 2D 57 |...C1.1..15,"M-W|
00000A70: 22 C7 28 36 33 29 C7 28 30 29 C7 28 31 29 C7 28 |".(63).(0).(1).(|
00000A80: 43 31 AB 31 29 00 B6 12 8E 02 8B 43 31 B3 B1 31 |C1.1)......C1..1|
00000A90: A7 98 31 35 2C 22 4D 2D 57 22 C7 28 30 29 C7 28 |..15,"M-W".(0).(|
00000AA0: 33 29 C7 28 33 29 C7 28 37 36 29 C7 28 30 29 C7 |3).(3).(76).(0).|
00000AB0: 28 43 31 AA 32 29 00 D5 12 8F 02 98 31 35 2C 22 |(C1.2)......15,"|
00000AC0: 4D 2D 57 22 C7 28 36 29 C7 28 30 29 C7 28 31 29 |M-W".(6).(0).(1)|
00000AD0: C7 28 54 4E 29 00 F4 12 94 02 98 31 35 2C 22 4D |.(TN)......15,"M|
00000AE0: 2D 57 22 C7 28 37 29 C7 28 30 29 C7 28 31 29 C7 |-W".(7).(0).(1).|
00000AF0: 28 53 4E 29 00 13 13 99 02 98 31 35 2C 22 4D 2D |(SN)......15,"M-|
00000B00: 57 22 C7 28 30 29 C7 28 30 29 C7 28 31 29 C7 28 |W".(0).(0).(1).(|
00000B10: 43 48 29 00 35 13 9E 02 99 22 11 50 52 4F 47 52 |CH).5....".PROGR|
00000B20: 41 4D 20 45 58 45 43 55 54 49 4F 4E 20 45 4E 41 |AM EXECUTION ENA|
00000B30: 42 4C 45 44 22 00 6D 13 A3 02 98 31 35 2C 22 4D |BLED".m....15,"M|
00000B40: 2D 52 22 C7 28 30 29 C7 28 30 29 3A A1 23 31 35 |-R".(0).(0):.#15|
00000B50: 2C 41 24 3A 4F 50 B2 C6 28 41 24 AA C7 28 30 29 |,A$:OP..(A$..(0)|
00000B60: 29 3A 8B 4F 50 B1 31 32 37 A7 36 37 35 00 9D 13 |):.OP.127.675...|
00000B70: A8 02 99 22 11 54 52 4B 2E 22 54 4E 22 20 53 45 |...".TRK."TN" SE|
00000B80: 43 2E 22 53 4E 22 20 20 20 4F 50 20 53 54 41 54 |C."SN" OP STAT|
00000B90: 55 53 20 43 4F 44 45 20 3D 20 22 4F 50 00 B1 13 |US CODE = "OP...|
00000BA0: AD 02 99 22 9E 11 22 45 52 24 28 4F 50 29 22 05 |...".."ER$(OP)".|
00000BB0: 22 00 CE 13 B2 02 8B 4F 4B 24 B2 22 59 22 A7 A0 |"......OK$."Y"..|
00000BC0: 31 35 3A 82 3A 8D 32 30 30 30 3A 8A 34 30 00 E0 |15:.:.2000:.40..|
00000BD0: 13 B7 02 A0 31 35 3A 8D 32 30 30 30 3A 8A 34 30 |....15:.2000:.40|
00000BE0: 00 0E 14 BC 02 99 22 93 11 28 36 29 20 4C 4F 41 |......"..(6) LOA|
00000BF0: 44 20 53 45 43 54 4F 52 20 54 4F 20 44 49 53 4B |D SECTOR TO DISK|
00000C00: 20 42 55 46 46 45 52 22 3A 8D 32 30 30 30 00 37 | BUFFER":.2000.7|
00000C10: 14 C1 02 85 22 11 49 4E 50 55 54 20 54 52 41 43 |....".INPUT TRAC|
00000C20: 4B 20 23 20 22 3B 58 24 3A 54 4E B2 C5 28 58 24 |K # ";X$:TN..(X$|
00000C30: 29 3A 8D 31 31 30 30 00 61 14 C6 02 85 22 11 49 |):.1100.a....".I|
00000C40: 4E 50 55 54 20 53 45 43 54 4F 52 20 23 20 22 3B |NPUT SECTOR # ";|
00000C50: 58 24 3A 53 4E B2 C5 28 58 24 29 3A 8D 31 31 30 |X$:SN..(X$):.110|
00000C60: 30 00 79 14 CB 02 9F 31 35 2C 38 2C 31 35 3A 9F |0.y....15,8,15:.|
00000C70: 32 2C 38 2C 32 2C 22 23 22 00 B0 14 D0 02 98 31 |2,8,2,"#"......1|
00000C80: 35 2C 22 55 31 3A 22 32 3B 30 3B 54 4E 3B 53 4E |5,"U1:"2;0;TN;SN|
00000C90: 3A 84 31 35 2C 41 24 2C 42 24 2C 43 24 2C 44 24 |:.15,A$,B$,C$,D$|
00000CA0: 3A 99 22 11 22 41 24 2C 42 24 2C 43 24 2C 44 24 |:."."A$,B$,C$,D$|
00000CB0: 00 C1 14 D5 02 81 54 44 B2 31 A4 33 30 30 30 3A |......TD.1.3000:|
00000CC0: 82 00 D0 14 DA 02 A0 32 3A A0 31 35 3A 8A 34 30 |.......2:.15:.40|
00000CD0: 00 EA 14 20 03 9F 31 35 2C 38 2C 31 35 2C 22 49 |... ..15,8,15,"I|
00000CE0: 30 22 3A A0 31 35 3A 8A 34 30 00 19 15 25 03 99 |0":.15:.40...%..|
00000CF0: 22 93 11 28 39 29 20 50 4F 53 49 54 49 4F 4E 20 |"..(9) POSITION |
00000D00: 52 45 41 44 2F 57 52 49 54 45 20 48 45 41 44 22 |READ/WRITE HEAD"|
00000D10: 3A 54 52 24 B2 22 31 38 22 00 59 15 2A 03 85 22 |:TR$."18".Y.*.."|
00000D20: 11 20 20 20 20 54 52 41 43 4B 20 57 41 4E 54 45 |. TRACK WANTE|
00000D30: 44 22 3B 54 52 24 3A 54 52 B2 C5 28 54 52 24 29 |D";TR$:TR..(TR$)|
00000D40: 3A 48 54 B2 54 52 AB B5 28 54 52 29 3A 8B 54 52 |:HT.TR..(TR):.TR|
00000D50: 24 B2 22 58 22 A7 8A 34 30 00 68 15 2B 03 8B 54 |$."X"..40.h.+..T|
00000D60: 52 B1 34 31 A7 38 30 35 00 9A 15 2F 03 9F 31 35 |R.41.805.../..15|
00000D70: 2C 38 2C 31 35 2C 22 49 30 22 3A 98 31 35 2C 22 |,8,15,"I0":.15,"|
00000D80: 4D 2D 57 22 C7 28 30 29 C7 28 30 29 C7 28 31 29 |M-W".(0).(0).(1)|
00000D90: C7 28 31 39 32 29 3A A0 31 35 00 AB 15 31 03 81 |.(192):.15...1..|
00000DA0: 54 44 B2 31 A4 35 30 30 30 3A 82 00 D3 15 34 03 |TD.1.5000:....4.|
00000DB0: 9F 31 35 2C 38 2C 31 35 3A 98 31 35 2C 22 4D 2D |.15,8,15:.15,"M-|
00000DC0: 57 22 C7 28 36 29 C7 28 30 29 C7 28 31 29 C7 28 |W".(6).(0).(1).(|
00000DD0: 54 52 29 00 F3 15 3E 03 98 31 35 2C 22 4D 2D 57 |TR)...>..15,"M-W|
00000DE0: 22 C7 28 30 29 C7 28 30 29 C7 28 31 29 C7 28 31 |".(0).(0).(1).(1|
00000DF0: 37 36 29 00 09 16 43 03 98 31 35 2C 22 4D 2D 52 |76)...C..15,"M-R|
00000E00: 22 C7 28 30 29 C7 28 30 29 00 2D 16 48 03 A1 23 |".(0).(0).-.H..#|
00000E10: 31 35 2C 41 24 3A 58 B2 C6 28 41 24 AA C7 28 30 |15,A$:X..(A$..(0|
00000E20: 29 29 3A 8B 58 B1 31 32 37 A7 38 34 30 00 41 16 |)):.X.127.840.A.|
00000E30: 4D 03 8B 48 54 B3 B1 2E 35 A7 A0 31 35 3A 8A 34 |M..HT...5..15:.4|
00000E40: 30 00 6D 16 52 03 98 31 35 2C 22 4D 2D 52 22 C7 |0.m.R..15,"M-R".|
00000E50: 28 30 29 C7 28 32 38 29 3A A1 23 31 35 2C 58 24 |(0).(28):.#15,X$|
00000E60: 3A 58 B2 C6 28 58 24 AA C7 28 30 29 29 00 96 16 |:X..(X$..(0))...|
00000E70: 57 03 42 49 B2 58 AF 33 3A 42 49 B2 42 49 AB 31 |W.BI.X.3:BI.BI.1|
00000E80: 3A 42 49 B2 42 49 AF 33 3A 48 50 B2 28 58 AF 32 |:BI.BI.3:HP.(X.2|
00000E90: 35 32 29 B0 42 49 00 BE 16 59 03 99 22 11 20 20 |52).BI...Y..". |
00000EA0: 20 54 52 41 43 4B 20 3D 20 22 54 52 22 20 48 45 | TRACK = "TR" HE|
00000EB0: 41 44 20 50 48 41 53 45 20 3D 20 22 42 49 00 EF |AD PHASE = "BI..|
00000EC0: 16 5C 03 98 31 35 2C 22 4D 2D 57 22 C7 28 30 29 |.\..15,"M-W".(0)|
00000ED0: C7 28 32 38 29 C7 28 31 29 C7 28 48 50 29 3A A0 |.(28).(1).(HP):.|
00000EE0: 31 35 3A 81 54 44 B2 31 A4 33 30 30 30 3A 82 00 |15:.TD.1.3000:..|
00000EF0: F7 16 61 03 8A 34 30 00 25 17 84 03 99 22 93 49 |..a..40.%....".I|
00000F00: 4E 53 45 52 54 20 44 49 53 4B 45 54 54 45 20 54 |NSERT DISKETTE T|
00000F10: 4F 20 42 45 20 46 4F 52 4D 41 54 54 45 44 22 3A |O BE FORMATTED":|
00000F20: 8D 32 30 30 30 00 4B 17 89 03 85 22 11 44 49 53 |.2000.K....".DIS|
00000F30: 4B 45 54 54 45 20 4E 41 4D 45 22 3B 58 24 3A 4E |KETTE NAME";X$:N|
00000F40: 4D 24 B2 58 24 3A 8D 31 31 30 30 00 75 17 8E 03 |M$.X$:.1100.u...|
00000F50: 85 22 11 44 49 53 4B 45 54 54 45 20 49 44 22 3B |.".DISKETTE ID";|
00000F60: 58 24 3A 49 44 24 B2 58 24 3A 8D 31 31 30 30 3A |X$:ID$.X$:.1100:|
00000F70: 8D 32 30 30 30 00 98 17 93 03 99 22 93 46 4F 52 |.2000......".FOR|
00000F80: 4D 41 54 20 45 4E 41 42 4C 45 44 20 50 4C 45 41 |MAT ENABLED PLEA|
00000F90: 53 45 20 57 41 49 54 22 00 CC 17 98 03 9F 31 35 |SE WAIT"......15|
00000FA0: 2C 38 2C 31 35 3A 98 31 35 2C 22 4E 30 3A 22 4E |,8,15:.15,"N0:"N|
00000FB0: 4D 24 3B C7 28 34 34 29 3B 49 44 24 3A 84 31 35 |M$;.(44);ID$:.15|
00000FC0: 2C 41 24 2C 42 24 2C 43 24 2C 44 24 00 F5 17 A2 |,A$,B$,C$,D$....|
00000FD0: 03 99 22 11 22 41 24 2C 42 24 2C 43 24 2C 44 24 |.."."A$,B$,C$,D$|
00000FE0: 3A A0 31 35 3A 81 54 44 B2 31 A4 33 30 30 30 3A |:.15:.TD.1.3000:|
00000FF0: 82 3A 8A 34 30 00 05 18 E8 03 8B 58 24 B2 22 58 |.:.40......X$."X|
00001000: 22 A7 8A 34 30 00 22 18 ED 03 81 49 B2 31 A4 34 |"..40."....I.1.4|
00001010: 3A 44 24 28 49 29 B2 CA 28 58 24 2C 49 2C 31 29 |:D$(I)..(X$,I,1)|
00001020: 3A 82 00 3B 18 F2 03 81 49 B2 31 A4 34 3A 44 28 |:..;....I.1.4:D(|
00001030: 49 29 B2 C5 28 44 24 28 49 29 29 00 52 18 FC 03 |I)..(D$(I)).R...|
00001040: 8B 44 24 28 49 29 B2 22 41 22 A7 44 28 49 29 B2 |.D$(I)."A".D(I).|
00001050: 31 30 00 69 18 01 04 8B 44 24 28 49 29 B2 22 42 |10.i....D$(I)."B|
00001060: 22 A7 44 28 49 29 B2 31 31 00 80 18 06 04 8B 44 |".D(I).11......D|
00001070: 24 28 49 29 B2 22 43 22 A7 44 28 49 29 B2 31 32 |$(I)."C".D(I).12|
00001080: 00 97 18 0B 04 8B 44 24 28 49 29 B2 22 44 22 A7 |......D$(I)."D".|
00001090: 44 28 49 29 B2 31 33 00 AE 18 10 04 8B 44 24 28 |D(I).13......D$(|
000010A0: 49 29 B2 22 45 22 A7 44 28 49 29 B2 31 34 00 C5 |I)."E".D(I).14..|
000010B0: 18 15 04 8B 44 24 28 49 29 B2 22 46 22 A7 44 28 |....D$(I)."F".D(|
000010C0: 49 29 B2 31 35 00 CB 18 1A 04 82 00 0F 19 24 04 |I).15.........$.|
000010D0: 44 28 31 29 B2 44 28 31 29 AC 34 30 39 36 3A 44 |D(1).D(1).4096:D|
000010E0: 28 32 29 B2 44 28 32 29 AC 32 35 36 3A 44 28 33 |(2).D(2).256:D(3|
000010F0: 29 B2 44 28 33 29 AC 31 36 3A 58 B2 44 28 31 29 |).D(3).16:X.D(1)|
00001100: AA 44 28 32 29 AA 44 28 33 29 AA 44 28 34 29 00 |.D(2).D(3).D(4).|
00001110: 15 19 29 04 8E 00 24 19 4C 04 8B 58 24 B3 B1 22 |..)...$.L..X$.."|
00001120: 58 22 A7 8E 00 2C 19 51 04 8A 34 30 00 4D 19 D0 |X"...,.Q..40.M..|
00001130: 07 99 22 11 43 48 45 43 4B 20 44 49 53 4B 20 54 |..".CHECK DISK T|
00001140: 48 45 4E 20 50 52 45 53 53 20 46 37 22 00 65 19 |HEN PRESS F7".e.|
00001150: DA 07 A1 46 37 24 3A 8B 46 37 24 B3 B1 22 88 22 |...F7$:.F7$.."."|
00001160: A7 32 30 31 30 00 6B 19 E4 07 8E 00 A3 19 EE 07 |.2010.k.........|
00001170: 99 22 9E 11 42 55 46 46 20 41 44 44 52 45 53 53 |."..BUFF ADDRESS|
00001180: 20 54 4F 4F 20 4C 4F 57 05 22 3A 81 54 44 B2 31 | TOO LOW.":.TD.1|
00001190: A4 32 30 30 30 3A 82 3A 99 22 93 22 3A 89 31 32 |.2000:.:.".":.12|
000011A0: 30 3A 8E 00 DC 19 F8 07 99 22 9E 11 42 55 46 46 |0:......."..BUFF|
000011B0: 20 41 44 44 52 45 53 53 20 54 4F 4F 20 48 49 47 | ADDRESS TOO HIG|
000011C0: 48 05 22 3A 81 54 44 B2 31 A4 32 30 30 30 3A 82 |H.":.TD.1.2000:.|
000011D0: 3A 99 22 93 22 3A 89 31 32 30 3A 8E 00 F4 19 B8 |:.".":.120:.....|
000011E0: 0B 81 52 50 B2 31 A4 31 31 3A 87 45 52 24 28 52 |..RP.1.11:.ER$(R|
000011F0: 50 29 3A 82 00 3B 1A C2 0B 83 22 41 4C 4C 20 4F |P):..;...."ALL O|
00001200: 4B 22 2C 22 4E 4F 20 48 45 41 44 45 52 20 46 4F |K","NO HEADER FO|
00001210: 55 4E 44 22 2C 22 4E 4F 20 53 59 4E 43 20 46 4F |UND","NO SYNC FO|
00001220: 55 4E 44 22 2C 22 44 41 54 41 20 42 4C 4F 43 4B |UND","DATA BLOCK|
00001230: 20 4E 4F 54 20 46 4F 55 4E 44 22 00 84 1A CC 0B | NOT FOUND".....|
00001240: 83 22 43 48 45 43 4B 53 55 4D 20 45 52 52 4F 52 |."CHECKSUM ERROR|
00001250: 20 49 4E 20 44 41 54 41 22 2C 22 42 59 54 45 20 | IN DATA","BYTE |
00001260: 44 45 43 4F 44 49 4E 47 20 45 52 52 4F 52 22 2C |DECODING ERROR",|
00001270: 22 57 52 49 54 45 20 56 45 52 49 46 59 20 45 52 |"WRITE VERIFY ER|
00001280: 52 4F 52 22 00 C9 1A D6 0B 83 22 57 52 49 54 45 |ROR"......"WRITE|
00001290: 20 50 52 4F 54 45 43 54 20 4F 4E 22 2C 22 43 48 | PROTECT ON","CH|
000012A0: 45 43 4B 53 55 4D 20 45 52 52 4F 52 20 49 4E 20 |ECKSUM ERROR IN |
000012B0: 48 45 41 44 45 52 22 2C 22 4C 4F 4E 47 20 44 41 |HEADER","LONG DA|
000012C0: 54 41 20 42 4C 4F 43 4B 22 00 E1 1A E0 0B 83 22 |TA BLOCK"......"|
000012D0: 44 49 53 4B 20 49 44 20 4D 49 53 4D 41 54 43 48 |DISK ID MISMATCH|
000012E0: 22 00 E9 1A EA 0B 8C 3A 8E 00 00 00 41 00 81 52 |"......:....A..R|
000012F0: 50 84 40 00 00 |P.@.. |
.."....A.0.A.1:."MONITOR$8000",8,1.<....
A.1.A.2:."ZMACH",8,1.N....52,31:.56,31.]
.#..49152:.40...(..53280,11:.53281,11:.:
.ER$(11):.3000...-..".. DISKPICKER.
PSIDAC(C)84 VBN.".R.2..". ***
MENU ***"...<..".(1) TRANSFER DISK MEMO
RY TO BUFFER"...A..".(2) ENABLE MONITOR
MODE".H.F..".(3) TRANSFER BUFFER TO DISK
MEMORY".P.K..".(4) DIRECT EXECUTE USER
PROGRAM"...N..".(5) JOB QUE EXECUTE USER
PROGRAM"...P..".(6) LOAD SECTOR TO DISK
BUFFER"...R..".(7) INITIALIZE DISK IO".
..S..".(8) FORMAT DISKETTE". .T..".(9) P
OSITION READ/WRITE HEAD".D.U..".SELECT C
HOICE";CH$:CH.E(CH$).Q.X..CH.9.40..Z..C
H . 100,300,400,500,600,700,800,900,805.
.._..40...D.."..(1) TRANSFER DISK MEMORY
TO BUFFER":.2000...I..".INPUT DISK STAR
T ADDRESS";X$:.1000:SA.X...N..".INPUT DI
SK END ADDRESS";X$:.1000:EA.X.N.X..".INP
UT BUFFER ADDRESS";X$:.1000:BA.X:.X.8192
..2030.A.}..X.32767..2040......".DISK ME
M. TO BUFF. TRANSFER IN PROCESS":.".BYTE
COUNT =";.K...NB.EA.SA:SH..(SA.256):SL.
SA.(SH.256)......15,8,15:.LP.0.NB... ..1
5,"M-R"G(SL)G(SH):.#15,A$:PN.F(A$.G(0)).
?....BA,PN:BA.BA.1:SL.SL.1:.SL.256.SL.0:
SH.SH.1.P.....12)LP".":..{... 15:."..END
TRANSFER":.TD.1.3000:.:.40. .,..".PRINT
ER Y/N";YN$:.YN$."Y".P.1.C....YN$.."Y".Y
N$.."N".."...":.300.V.1..:.P.1..4,4:.4..
.6..32768...@........"..(3) TRANSFER BUF
FER TO DISK MEMORY":.2000.H....".INPUT D
ISK START ADDRESS";X$:.1000:SA.X.U....".
INPUT DISK END ADDRESS";X$:.1000:EA.X...
...".INPUT BUFFER ADDRESS";X$:.1000:BA.X
:.X.8192..2030.A....X.32767..2040......"
.BUFF. TO DISK MEM. TRANSFER IN PROCESS"
:.".BYTE COUNT =";.+...NB.EA.SA:SH..(SA.
256):SL.SA.(SH.256).A.B..15,8,15:.LP.0.N
B.K.L.PN.B(BA):.15,"M-W"G(SL)G(SH)G(1)G(
PN)...V.BA.BA.1:SL.SL.1:.SL.256.SL.0:SH.
SH.1.......12)LP".":..P... 15:."..END TR
ANSFER":.TD.1.3000:.:.40......"..(4) DIR
ECT EXECUTE USER PROGRAM":.2000.4....".I
NPUT DISK PROG. ENTRY ADDRESS";X$:.1000:
SA.X.T...SH..(SA.256):SL.SA.(SH.256).Y..
..15,8,15:.15,"M-E"G(SL)G(SH): 15......"
.PROGRAM EXECUTION ENABLED": 15:.TD.1.30
00:.:.40...X.."..(5) JOB QUE EXECUTE USE
R PROGRAM":.2000.!.]..".INPUT JOB CHOICE
.":."128=READ":."144=WRITE":."160=VERIFY
".Y.B.."176=SEEK":."184=SEC SEEK":."192=
BUMP":."208=JUMP"...G.."224=EXECUTE":.".
CHOICE";CH$:CH.E(CH$):X$.CH$:.1100...I..
CH.0.600:...J..CH..224.640...L..".SELECT
EXECUTE STARTING ADDRESS":.".ADDRESSES
AVAILABLE ARE:".,.Q..".(1)=0300":."(2)=0
400":."(3)=0500":."(4)=0600".<.T.."(5)=0
700".\.V..".CHOICE";CH$:X$.CH$:.1100...X
.C1.E(CH$):.C1.640,640,640,640,640...{..
620......2000.....OK$."N":.".MULTI SECTO
R Y/N";OK$......"..INPUT HEADER #1 ";X$:
TN.E(X$):.X$."X"..1100......OK$."Y"..SN.
20.0..1:.651.?....".INPUT HEADER #2 ";X$
:SN.E(X$):.X$."X"..1100.L....15,8,15.]..
..CH..224.655......C1.1..15,"M-W"G(63)G(
0)G(1)G(C1.1)......C1..1..15,"M-W"G(0)G(
3)G(3)G(76)G(0)G(C1.2).U....15,"M-W"G(6)
G(0)G(1)G(TN)......15,"M-W"G(7)G(0)G(1)G
(SN)......15,"M-W"G(0)G(0)G(1)G(CH).5...
.".PROGRAM EXECUTION ENABLED".M....15,"M
-R"G(0)G(0):.#15,A$:OP.F(A$.G(0)):.OP.12
7.675......".TRK."TN" SEC."SN" OP STAT
US CODE = "OP......".."ER$(OP)".".N....O
K$."Y". 15:.:.2000:.40..... 15:.2000:.40
......"..(6) LOAD SECTOR TO DISK BUFFER"
:.2000.7.A..".INPUT TRACK # ";X$:TN.E(X$
):.1100.A.F..".INPUT SECTOR # ";X$:SN.E(
X$):.1100.Y.K..15,8,15:.2,8,2,"#"...P..1
5,"U1:"2;0;TN;SN:.15,A$,B$,C$,D$:."."A$,
B$,C$,D$.A.U..TD.1.3000:..P.Z. 2: 15:.40
... ..15,8,15,"I0": 15:.40...%.."..(9) P
OSITION READ/WRITE HEAD":TR$."18".Y.*.."
. TRACK WANTED";TR$:TR.E(TR$):HT.TR..
(TR):.TR$."X"..40.H.+..TR.41.805.../..15
,8,15,"I0":.15,"M-W"G(0)G(0)G(1)G(192):
15...1..TD.1.5000:..S.4..15,8,15:.15,"M-
W"G(6)G(0)G(1)G(TR)...>..15,"M-W"G(0)G(0
)G(1)G(176)...C..15,"M-R"G(0)G(0).-.H..#
15,A$:X.F(A$.G(0)):.X.127.840.A.M..HT...
5. 15:.40.M.R..15,"M-R"G(0)G(28):.#15,X$
:X.F(X$.G(0))...W.BI.X.3:BI.BI.1:BI.BI.3
:HP.(X.252).BI...Y..". TRACK = "TR" HE
AD PHASE = "BI...\..15,"M-W"G(0)G(28)G(1
)G(HP): 15:.TD.1.3000:....A..40.%....".I
NSERT DISKETTE TO BE FORMATTED":.2000.K.
...".DISKETTE NAME";X$:NM$.X$:.1100.U...
.".DISKETTE ID";X$:ID$.X$:.1100:.2000...
...".FORMAT ENABLED PLEASE WAIT".L....15
,8,15:.15,"N0:"NM$;G(44);ID$:.15,A$,B$,C
$,D$......"."A$,B$,C$,D$: 15:.TD.1.3000:
.:.40......X$."X"..40."....I.1.4:D$(I).J
(X$,I,1):..;....I.1.4:D(I).E(D$(I)).R...
.D$(I)."A".D(I).10.I....D$(I)."B".D(I).1
1......D$(I)."C".D(I).12......D$(I)."D".
D(I).13......D$(I)."E".D(I).14.E....D$(I
)."F".D(I).15.K.......$.D(1).D(1).4096:D
(2).D(2).256:D(3).D(3).16:X.D(1).D(2).D(
3).D(4)...)...$.L..X$.."X"...,.Q..40.M.P
..".CHECK DISK THEN PRESS F7".E.Z..F7$:.
F7$..".".2010.K.........."..BUFF ADDRESS
TOO LOW.":.TD.1.2000:.:.".":.120:......
."..BUFF ADDRESS TOO HIGH.":.TD.1.2000:.
:.".":.120:.......RP.1.11:.ER$(RP):..;.B
.."ALL OK","NO HEADER FOUND","NO SYNC FO
UND","DATA BLOCK NOT FOUND"...L.."CHECKS
UM ERROR IN DATA","BYTE DECODING ERROR",
"WRITE VERIFY ERROR".I.V.."WRITE PROTECT
ON","CHECKSUM ERROR IN HEADER","LONG DA
TA BLOCK"......"DISK ID MISMATCH"......:
....A..RP.@..
> CLICK IMAGE PREVIEW FOR FULL MODAL