Q R/W DISK NAME

00000000: 01 08 2D 08 64 00 8F 20  4A 4F 42 20 51 55 45 55  |..-.d.. JOB QUEU|
00000010: 45 20 52 45 41 44 2F 57  52 49 54 45 20 2D 20 45  |E READ/WRITE - E|
00000020: 44 49 54 20 44 49 53 4B  20 4E 41 4D 45 00 39 08  |DIT DISK NAME.9.|
00000030: 6E 00 81 49 B2 31 A4 31  36 00 4E 08 78 00 50 41  |n..I.1.16.N.x.PA|
00000040: 44 24 B2 50 41 44 24 AA  C7 28 31 36 30 29 00 55  |D$.PAD$..(160).U|
00000050: 08 82 00 82 49 00 73 08  8C 00 99 22 93 45 44 49  |....I.s....".EDI|
00000060: 54 20 44 49 53 4B 20 4E  41 4D 45 20 2D 20 31 35  |T DISK NAME - 15|
00000070: 34 31 22 00 96 08 96 00  99 22 11 52 45 4D 4F 56  |41"......".REMOV|
00000080: 45 20 12 57 52 49 54 45  20 50 52 4F 54 45 43 54  |E .WRITE PROTECT|
00000090: 20 54 41 42 92 22 00 B7  08 A0 00 99 22 11 49 4E  | TAB."......".IN|
000000A0: 53 45 52 54 20 44 49 53  4B 45 54 54 45 20 49 4E  |SERT DISKETTE IN|
000000B0: 20 44 52 49 56 45 22 00  DA 08 AA 00 99 22 11 50  | DRIVE"......".P|
000000C0: 52 45 53 53 20 12 52 45  54 55 52 4E 92 20 54 4F  |RESS .RETURN. TO|
000000D0: 20 43 4F 4E 54 49 4E 55  45 22 00 ED 08 B4 00 A1  | CONTINUE"......|
000000E0: 43 24 3A 8B 43 24 B2 22  22 A7 31 38 30 00 00 09  |C$:.C$."".180...|
000000F0: BE 00 8B 43 24 B3 B1 C7  28 31 33 29 A7 31 38 30  |...C$...(13).180|
00000100: 00 0A 09 C8 00 99 22 4F  4B 22 00 17 09 D2 00 9F  |......"OK"......|
00000110: 31 35 2C 38 2C 31 35 00  24 09 DC 00 98 31 35 2C  |15,8,15.$....15,|
00000120: 22 49 30 22 00 3C 09 E6  00 84 31 35 2C 45 4E 24  |"I0".<....15,EN$|
00000130: 2C 45 4D 24 2C 45 54 24  2C 45 53 24 00 4E 09 F0  |,EM$,ET$,ES$.N..|
00000140: 00 8B 45 4E 24 B2 22 30  30 22 89 32 39 30 00 6D  |..EN$."00".290.m|
00000150: 09 FA 00 99 22 11 22 45  4E 24 22 2C 20 22 45 4D  |...."."EN$", "EM|
00000160: 24 22 2C 22 45 54 24 22  2C 22 45 53 24 00 75 09  |$","ET$","ES$.u.|
00000170: 04 01 A0 31 35 00 7B 09  0E 01 80 00 86 09 18 01  |...15.{.........|
00000180: 8F 20 53 45 45 4B 00 8F  09 22 01 54 B2 31 38 00  |. SEEK...".T.18.|
00000190: 97 09 2C 01 53 B2 30 00  A3 09 36 01 4A 4F 42 B2  |..,.S.0...6.JOB.|
000001A0: 31 37 36 00 AC 09 40 01  8D 36 36 30 00 B7 09 4A  |176...@..660...J|
000001B0: 01 8F 20 52 45 41 44 00  C3 09 54 01 4A 4F 42 B2  |.. READ...T.JOB.|
000001C0: 31 32 38 00 CC 09 5E 01  8D 36 36 30 00 E9 09 68  |128...^..660...h|
000001D0: 01 98 31 35 2C 22 4D 2D  52 22 C7 28 31 34 34 29  |..15,"M-R".(144)|
000001E0: C7 28 35 29 C7 28 31 36  29 00 F5 09 72 01 81 49  |.(5).(16)...r..I|
000001F0: B2 31 A4 31 36 00 01 0A  7C 01 A1 23 31 35 2C 42  |.1.16...|..#15,B|
00000200: 24 00 14 0A 86 01 8B 42  24 B2 22 22 A7 42 24 B2  |$......B$."".B$.|
00000210: C7 28 30 29 00 20 0A 90  01 41 B2 C6 28 42 24 29  |.(0). ...A..(B$)|
00000220: 00 33 0A 9A 01 8B 41 B1  31 32 37 A7 41 B2 41 AB  |.3....A.127.A.A.|
00000230: 31 32 38 00 47 0A A4 01  8B 41 B3 33 32 B0 41 B1  |128.G....A.32.A.|
00000240: 39 35 A7 41 B2 36 33 00  56 0A AE 01 8B 41 B2 33  |95.A.63.V....A.3|
00000250: 34 A7 41 B2 36 33 00 69  0A B8 01 4F 44 4E 24 B2  |4.A.63.i...ODN$.|
00000260: 4F 44 4E 24 AA C7 28 41  29 00 70 0A C2 01 82 49  |ODN$..(A).p....I|
00000270: 00 8D 0A CC 01 99 22 11  4F 4C 44 20 44 49 53 4B  |......".OLD DISK|
00000280: 20 4E 41 4D 45 3A 20 22  3B 4F 44 4E 24 00 A9 0A  | NAME: ";ODN$...|
00000290: D6 01 85 20 22 11 4E 45  57 20 44 49 53 4B 20 4E  |... ".NEW DISK N|
000002A0: 41 4D 45 22 3B 4E 44 4E  24 00 C8 0A E0 01 8B C3  |AME";NDN$.......|
000002B0: 28 4E 44 4E 24 29 B3 B1  30 AF C3 28 4E 44 4E 24  |(NDN$)..0..(NDN$|
000002C0: 29 B3 31 37 89 35 30 30  00 D1 0A EA 01 89 36 33  |).17.500......63|
000002D0: 30 00 F5 0A F4 01 85 22  11 41 52 45 20 59 4F 55  |0......".ARE YOU|
000002E0: 20 53 55 52 45 20 28 59  2F 4E 29 20 20 59 9D 9D  | SURE (Y/N)  Y..|
000002F0: 9D 22 3B 51 24 00 06 0B  FE 01 8B 51 24 B3 B1 22  |.";Q$......Q$.."|
00000300: 59 22 89 36 33 30 00 1F  0B 08 02 4E 44 4E 24 B2  |Y".630.....NDN$.|
00000310: C8 28 4E 44 4E 24 AA 50  41 44 24 2C 31 36 29 00  |.(NDN$.PAD$,16).|
00000320: 40 0B 12 02 98 31 35 2C  22 4D 2D 57 22 C7 28 31  |@....15,"M-W".(1|
00000330: 34 34 29 C7 28 35 29 C7  28 31 36 29 4E 44 4E 24  |44).(5).(16)NDN$|
00000340: 00 4C 0B 1C 02 8F 20 57  52 49 54 45 00 58 0B 26  |.L.... WRITE.X.&|
00000350: 02 4A 4F 42 B2 31 34 34  00 61 0B 30 02 8D 36 36  |.JOB.144.a.0..66|
00000360: 30 00 6E 0B 3A 02 98 31  35 2C 22 49 30 22 00 86  |0.n.:..15,"I0"..|
00000370: 0B 44 02 84 31 35 2C 45  4E 24 2C 45 4D 24 2C 45  |.D..15,EN$,EM$,E|
00000380: 54 24 2C 45 53 24 00 8E  0B 4E 02 A0 31 35 00 9C  |T$,ES$...N..15..|
00000390: 0B 58 02 99 22 11 44 4F  4E 45 21 22 00 A2 0B 62  |.X..".DONE!"...b|
000003A0: 02 80 00 AE 0B 6C 02 8F  20 43 4C 4F 53 45 00 B6  |.....l.. CLOSE..|
000003B0: 0B 76 02 A0 31 35 00 BC  0B 80 02 80 00 CC 0B 8A  |.v..15..........|
000003C0: 02 8F 20 4A 4F 42 20 51  55 45 55 45 00 D6 0B 94  |.. JOB QUEUE....|
000003D0: 02 54 52 59 B2 30 00 F9  0B 9E 02 98 31 35 2C 22  |.TRY.0......15,"|
000003E0: 4D 2D 57 22 C7 28 31 30  29 C7 28 30 29 C7 28 32  |M-W".(10).(0).(2|
000003F0: 29 C7 28 54 29 C7 28 53  29 00 19 0C A8 02 98 31  |).(T).(S)......1|
00000400: 35 2C 22 4D 2D 57 22 C7  28 32 29 C7 28 30 29 C7  |5,"M-W".(2).(0).|
00000410: 28 31 29 C7 28 4A 4F 42  29 00 27 0C B2 02 54 52  |(1).(JOB).'...TR|
00000420: 59 B2 54 52 59 AA 31 00  3D 0C BC 02 98 31 35 2C  |Y.TRY.1.=....15,|
00000430: 22 4D 2D 52 22 C7 28 32  29 C7 28 30 29 00 49 0C  |"M-R".(2).(0).I.|
00000440: C6 02 A1 23 31 35 2C 45  24 00 5C 0C D0 02 8B 45  |...#15,E$.\....E|
00000450: 24 B2 22 22 A7 45 24 B2  C7 28 30 29 00 68 0C DA  |$."".E$..(0).h..|
00000460: 02 45 B2 C6 28 45 24 29  00 7A 0C E4 02 8B 20 54  |.E..(E$).z.... T|
00000470: 52 59 B2 35 30 30 89 37  38 30 00 89 0C EE 02 8B  |RY.500.780......|
00000480: 45 B1 31 32 37 89 36 39  30 00 94 0C F8 02 8B 45  |E.127.690......E|
00000490: B2 31 A7 8E 00 A8 0C 02  03 8F 20 45 52 52 4F 52  |.1........ ERROR|
000004A0: 20 48 41 4E 44 4C 45 52  00 C2 0C 0C 03 45 54 24  | HANDLER.....ET$|
000004B0: B2 C9 28 C4 28 54 29 2C  C3 28 C4 28 54 29 29 AB  |..(.(T),.(.(T)).|
000004C0: 31 29 00 D8 0C 16 03 8B  54 B3 31 30 A7 45 54 24  |1)......T.10.ET$|
000004D0: B2 22 30 22 AA 45 54 24  00 F2 0C 20 03 45 54 24  |."0".ET$... .ET$|
000004E0: B2 C9 28 C4 28 53 29 2C  C3 28 C4 28 53 29 29 AB  |..(.(S),.(.(S)).|
000004F0: 31 29 00 08 0D 2A 03 8B  53 B3 31 30 A7 45 53 24  |1)...*..S.10.ES$|
00000500: B2 22 30 22 AA 45 53 24  00 2C 0D 34 03 8B 45 B1  |."0".ES$.,.4..E.|
00000510: 31 AF 45 B3 31 32 A7 45  4E 24 B2 C9 28 C4 28 45  |1.E.12.EN$..(.(E|
00000520: AA 31 38 29 2C 32 29 3A  89 38 34 30 00 4E 0D 3E  |.18),2):.840.N.>|
00000530: 03 45 4E 24 B2 22 30 32  22 3A 45 4D 24 B2 22 3F  |.EN$."02":EM$."?|
00000540: 54 49 4D 45 20 4F 55 54  22 3A 89 38 36 30 00 72  |TIME OUT":.860.r|
00000550: 0D 48 03 8B 45 B2 37 B0  45 B2 38 A7 45 4D 24 B2  |.H..E.7.E.8.EM$.|
00000560: 22 57 52 49 54 45 20 45  52 52 4F 52 22 3A 89 38  |"WRITE ERROR":.8|
00000570: 36 30 00 87 0D 52 03 45  4D 24 B2 22 52 45 41 44  |60...R.EM$."READ|
00000580: 20 45 52 52 4F 52 22 00  A6 0D 5C 03 99 22 11 22  | ERROR"...\.."."|
00000590: 45 4E 24 22 2C 20 22 45  4D 24 22 2C 22 45 54 24  |EN$", "EM$","ET$|
000005A0: 22 2C 22 45 53 24 00 B7  0D 66 03 99 22 11 12 46  |","ES$...f.."..F|
000005B0: 41 49 4C 45 44 92 22 00  BF 0D 70 03 A0 31 35 00  |AILED."...p..15.|
000005C0: C5 0D 7A 03 80 00 00 00                           |..z.....        |

..-.D.. JOB QUEUE READ/WRITE - EDIT DISK
 NAME.9.N..I.1.16.N.X.PAD$.PAD$.G(160).U
....I.S....".EDIT DISK NAME - 1541".....
.".REMOVE .WRITE PROTECT TAB."... ..".IN
SERT DISKETTE IN DRIVE".Z....".PRESS .RE
TURN. TO CONTINUE"......C$:.C$."".180...
...C$..G(13).180...H.."OK"...R..15,8,15.
$....15,"I0".<....15,EN$,EM$,ET$,ES$.N..
..EN$."00".290.M...."."EN$", "EM$","ET$"
,"ES$.U... 15.{.......... SEEK...".T.18.
..,.S.0...6.JOB.176...@..660...J.. READ.
C.T.JOB.128.L.^..660...H..15,"M-R"G(144)
G(5)G(16)...R..I.1.16...|..#15,B$......B
$."".B$.G(0). ...A.F(B$).3....A.127.A.A.
128.G....A.32.A.95.A.63.V....A.34.A.63.I
...ODN$.ODN$.G(A).P.B..I...L..".OLD DISK
 NAME: ";ODN$...V.. ".NEW DISK NAME";NDN
$.H....C(NDN$)..0.C(NDN$).17.500.Q....63
0......".ARE YOU SURE (Y/N)  Y...";Q$...
...Q$.."Y".630.....NDN$.H(NDN$.PAD$,16).
@....15,"M-W"G(144)G(5)G(16)NDN$.L.... W
RITE.X.&.JOB.144.A.0..660.N.:..15,"I0"..
.D..15,EN$,EM$,ET$,ES$...N. 15...X..".DO
NE!"...B.....L.. CLOSE...V. 15.......L..
.. JOB QUEUE.V...TRY.0......15,"M-W"G(10
)G(0)G(2)G(T)G(S)......15,"M-W"G(2)G(0)G
(1)G(JOB).'...TRY.TRY.1.=....15,"M-R"G(2
)G(0).I.F..#15,E$.\.P..E$."".E$.G(0).H.Z
.E.F(E$).Z.... TRY.500.780......E.127.69
0......E.1........ ERROR HANDLER.B...ET$
.I(D(T),C(D(T)).1).X....T.10.ET$."0".ET$
... .ET$.I(D(S),C(D(S)).1)...*..S.10.ES$
."0".ES$.,.4..E.1.E.12.EN$.I(D(E.18),2):
.840.N.>.EN$."02":EM$."?TIME OUT":.860.R
.H..E.7.E.8.EM$."WRITE ERROR":.860...R.E
M$."READ ERROR"...\.."."EN$", "EM$","ET$
","ES$...F.."..FAILED."...P. 15.E.Z.....

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL