J.JS FORMATERING
FILE INFORMATION
FILENAME(S): J.JS FORMATERING
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-12-01 00:59:40
APPEARS ON: 1 disk(s)
FILE HASH
909e553f61d17de573b8e797aaf37fe835aeb71a5ac0da4af91b60e1fa34b5cf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| J J DISK 1 | J.JS FORMATERING | PRG | hedning, Dean | 23 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 E8 03 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |..$.... ========| 00000010: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000020: 3D 3D 3D 3D 00 45 08 F2 03 8F 20 20 20 20 20 4A |====.E.... J| 00000030: 45 52 52 59 53 20 46 4F 52 4D 41 54 45 52 49 4E |ERRYS FORMATERIN| 00000040: 47 20 32 2E 32 00 68 08 FC 03 8F 20 46 4F 52 20 |G 2.2.h.... FOR | 00000050: 56 49 43 32 30 2C 20 43 36 34 2C 20 50 4C 55 53 |VIC20, C64, PLUS| 00000060: 34 20 4F 52 20 43 31 36 00 8B 08 06 04 8F 20 41 |4 OR C16...... A| 00000070: 4E 44 20 53 49 4E 47 4C 45 20 46 4C 4F 50 50 59 |ND SINGLE FLOPPY| 00000080: 20 44 49 53 4B 20 44 52 49 56 45 00 AE 08 10 04 | DISK DRIVE.....| 00000090: 8F 20 52 45 56 20 31 31 2F 38 34 20 54 45 53 54 |. REV 11/84 TEST| 000000A0: 20 53 59 53 54 45 4D 53 20 44 45 50 54 2E 00 D1 | SYSTEMS DEPT...| 000000B0: 08 1A 04 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.... ===========| 000000C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 000000D0: 3D 00 DF 08 24 04 9F 20 31 35 2C 38 2C 31 35 00 |=...$.. 15,8,15.| 000000E0: 00 09 2E 04 99 20 22 93 11 C6 C6 C6 C6 C6 C6 C6 |..... ".........| 000000F0: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 22 |..............."| 00000100: 00 1D 09 38 04 99 20 22 20 20 4A 45 52 52 59 53 |...8.. " JERRYS| 00000110: 20 46 4F 52 4D 41 54 45 52 49 4E 47 22 00 3D 09 | FORMATERING".=.| 00000120: 42 04 99 20 22 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |B.. "...........| 00000130: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 11 22 00 57 09 |............".W.| 00000140: 4C 04 99 20 22 20 20 20 20 20 49 4E 53 45 52 54 |L.. " INSERT| 00000150: 20 42 4C 41 4E 4B 22 00 73 09 56 04 99 20 22 20 | BLANK".s.V.. " | 00000160: 20 44 49 53 4B 45 54 54 45 20 49 4E 20 44 52 49 | DISKETTE IN DRI| 00000170: 56 45 22 00 91 09 60 04 99 20 22 20 20 54 48 45 |VE"...`.. " THE| 00000180: 4E 20 50 52 45 53 53 20 12 52 45 54 55 52 4E 92 |N PRESS .RETURN.| 00000190: 22 00 AF 09 6A 04 A1 20 41 24 20 3A 20 8B 20 41 |"...j.. A$ : . A| 000001A0: 24 B3 B1 C7 28 31 33 29 20 A7 20 31 31 33 30 00 |$...(13) . 1130.| 000001B0: E5 09 74 04 98 31 35 2C 20 22 4D 2D 52 22 20 C7 |..t..15, "M-R" .| 000001C0: 28 32 35 35 29 20 C7 28 32 35 35 29 20 20 20 3A |(255) .(255) :| 000001D0: 20 8F 20 57 48 49 43 48 20 44 52 49 56 45 20 49 | . WHICH DRIVE I| 000001E0: 53 20 49 54 3F 00 F7 09 7E 04 3A 20 A1 23 31 35 |S IT?...~.: .#15| 000001F0: 2C 20 54 59 50 45 24 00 10 0A 88 04 3A 20 54 59 |, TYPE$.....: TY| 00000200: 50 45 B2 C6 28 54 59 50 45 24 AA C7 28 30 29 29 |PE..(TYPE$..(0))| 00000210: 00 4B 0A 92 04 3A 20 4D 41 58 B2 38 30 20 3A 20 |.K...: MAX.80 : | 00000220: 8B 20 54 59 50 45 B2 32 34 31 20 A7 20 4D 41 58 |. TYPE.241 . MAX| 00000230: B2 32 35 20 3A 20 8F 20 20 46 4F 52 20 31 35 35 |.25 : . FOR 155| 00000240: 31 20 46 41 53 54 20 44 49 53 4B 00 5F 0A 9C 04 |1 FAST DISK._...| 00000250: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |. -------------.| 00000260: 72 0A A6 04 8F 20 20 4E 45 57 20 43 4F 4D 4D 41 |r.... NEW COMMA| 00000270: 4E 44 00 86 0A B0 04 8F 20 2D 2D 2D 2D 2D 2D 2D |ND...... -------| 00000280: 2D 2D 2D 2D 2D 2D 00 97 0A BA 04 54 49 24 B2 22 |------.....TI$."| 00000290: 30 30 30 30 30 30 22 00 B4 0A C4 04 99 20 22 11 |000000"...... ".| 000002A0: 20 20 20 44 49 53 4B 20 4E 45 57 20 43 4F 4D 4D | DISK NEW COMM| 000002B0: 41 4E 44 22 00 D9 0A CE 04 99 20 22 57 41 49 54 |AND"...... "WAIT| 000002C0: 20 41 42 4F 55 54 22 AA C4 28 4D 41 58 29 AA 22 | ABOUT"..(MAX)."| 000002D0: 20 53 45 43 4F 4E 44 53 22 00 F9 0A D8 04 98 31 | SECONDS"......1| 000002E0: 35 2C 20 22 4E 30 3A 4A 45 52 52 59 53 20 44 49 |5, "N0:JERRYS DI| 000002F0: 53 4B 45 54 54 2C 30 30 22 00 04 0B E2 04 8D 20 |SKETT,00"...... | 00000300: 31 39 37 30 00 1B 0B EC 04 8B 20 54 49 B3 4D 41 |1970...... TI.MA| 00000310: 58 AC 36 30 20 A7 20 31 33 31 30 00 36 0B F6 04 |X.60 . 1310.6...| 00000320: 3A 20 99 20 22 11 20 20 53 59 53 54 45 4D 20 49 |: . ". SYSTEM I| 00000330: 53 20 4E 4F 54 22 00 56 0B 00 05 3A 20 99 20 22 |S NOT".V...: . "| 00000340: 20 52 45 53 50 4F 4E 44 49 4E 47 20 43 4F 52 52 | RESPONDING CORR| 00000350: 45 43 54 4C 59 22 00 70 0B 0A 05 3A 20 99 20 22 |ECTLY".p...: . "| 00000360: 20 20 20 20 54 4F 20 43 4F 4D 4D 41 4E 44 53 22 | TO COMMANDS"| 00000370: 00 7D 0B 14 05 3A 20 8D 20 32 30 30 30 00 9A 0B |.}...: . 2000...| 00000380: 1E 05 99 20 22 20 20 20 12 20 20 44 52 49 56 45 |... " . DRIVE| 00000390: 20 50 41 53 53 45 44 20 20 22 00 B8 0B 28 05 99 | PASSED "...(..| 000003A0: 20 22 20 20 20 12 4D 45 43 48 41 4E 49 43 41 4C | " .MECHANICAL| 000003B0: 20 54 45 53 54 53 11 22 00 D0 0B 32 05 8F 20 2D | TESTS."...2.. -| 000003C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000003D0: 00 E7 0B 3C 05 8F 20 20 53 45 51 2E 20 57 52 49 |...<.. SEQ. WRI| 000003E0: 54 45 20 54 45 53 54 00 FF 0B 46 05 8F 20 2D 2D |TE TEST...F.. --| 000003F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.| 00000400: 1A 0C 50 05 99 20 22 20 20 20 4F 50 45 4E 20 57 |..P.. " OPEN W| 00000410: 52 49 54 45 20 46 49 4C 45 22 00 3B 0C 5A 05 3A |RITE FILE".;.Z.:| 00000420: 20 9F 20 32 2C 38 2C 32 2C 20 22 30 3A 54 45 53 | . 2,8,2, "0:TES| 00000430: 54 20 46 49 4C 45 2C 53 2C 57 22 00 48 0C 64 05 |T FILE,S,W".H.d.| 00000440: 3A 20 8D 20 31 39 37 30 00 62 0C 6E 05 99 20 22 |: . 1970.b.n.. "| 00000450: 20 20 20 20 20 57 52 49 54 49 4E 47 20 44 41 54 | WRITING DAT| 00000460: 41 22 00 85 0C 78 05 3A 20 81 20 49 B2 31 30 30 |A"...x.: . I.100| 00000470: 30 20 A4 20 32 30 30 30 20 3A 20 98 20 32 2C 20 |0 . 2000 : . 2, | 00000480: 49 20 3A 20 82 00 92 0C 82 05 3A 20 8D 20 31 39 |I : ......: . 19| 00000490: 37 30 00 AE 0C 8C 05 99 20 22 20 20 20 43 4C 4F |70...... " CLO| 000004A0: 53 45 20 57 52 49 54 45 20 46 49 4C 45 22 00 B8 |SE WRITE FILE"..| 000004B0: 0C 96 05 3A 20 A0 20 32 00 C5 0C A0 05 3A 20 8D |...: . 2.....: .| 000004C0: 20 31 39 37 30 00 DC 0C AA 05 8F 20 2D 2D 2D 2D | 1970...... ----| 000004D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F2 0C B4 |------------....| 000004E0: 05 8F 20 20 53 45 51 2E 20 52 45 41 44 20 54 45 |.. SEQ. READ TE| 000004F0: 53 54 00 09 0D BE 05 8F 20 2D 2D 2D 2D 2D 2D 2D |ST...... -------| 00000500: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 24 0D C8 05 99 20 |---------.$.... | 00000510: 22 20 20 20 20 4F 50 45 4E 20 52 45 41 44 20 46 |" OPEN READ F| 00000520: 49 4C 45 22 00 45 0D D2 05 3A 20 9F 20 32 2C 38 |ILE".E...: . 2,8| 00000530: 2C 32 2C 20 22 30 3A 54 45 53 54 20 46 49 4C 45 |,2, "0:TEST FILE| 00000540: 2C 53 2C 52 22 00 52 0D DC 05 3A 20 8D 20 31 39 |,S,R".R...: . 19| 00000550: 37 30 00 6C 0D E6 05 99 20 22 20 20 20 20 20 52 |70.l.... " R| 00000560: 45 41 44 49 4E 47 20 44 41 54 41 22 00 82 0D F0 |EADING DATA"....| 00000570: 05 3A 20 81 20 49 B2 31 30 30 30 20 A4 20 32 30 |.: . I.1000 . 20| 00000580: 30 30 00 90 0D FA 05 3A 20 20 84 20 32 2C 20 4A |00.....: . 2, J| 00000590: 00 C0 0D 04 06 3A 20 20 8B 20 4A B3 B1 49 20 A7 |.....: . J..I .| 000005A0: 20 99 20 22 20 20 20 20 20 12 52 45 41 44 20 45 | . " .READ E| 000005B0: 52 52 4F 52 3A 92 22 20 3A 20 8D 20 31 39 37 30 |RROR:." : . 1970| 000005C0: 00 C8 0D 0E 06 3A 20 82 00 D5 0D 18 06 3A 20 8D |.....: ......: .| 000005D0: 20 31 39 37 30 00 F1 0D 22 06 99 20 22 20 20 20 | 1970...".. " | 000005E0: 20 43 4C 4F 53 45 20 52 45 41 44 20 46 49 4C 45 | CLOSE READ FILE| 000005F0: 22 00 FB 0D 2C 06 3A 20 A0 20 32 00 08 0E 36 06 |"...,.: . 2...6.| 00000600: 3A 20 8D 20 31 39 37 30 00 1D 0E 40 06 8F 20 2D |: . 1970...@.. -| 00000610: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 31 0E |-------------.1.| 00000620: 4A 06 8F 20 20 53 43 52 41 54 43 48 20 46 49 4C |J.. SCRATCH FIL| 00000630: 45 00 46 0E 54 06 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |E.F.T.. --------| 00000640: 2D 2D 2D 2D 2D 2D 00 60 0E 5E 06 99 20 22 20 20 |------.`.^.. " | 00000650: 20 20 20 53 43 52 41 54 43 48 20 46 49 4C 45 22 | SCRATCH FILE"| 00000660: 00 7A 0E 68 06 3A 20 98 31 35 2C 20 22 53 30 3A |.z.h.: .15, "S0:| 00000670: 54 45 53 54 20 46 49 4C 45 22 00 87 0E 72 06 3A |TEST FILE"...r.:| 00000680: 20 8D 20 31 39 37 30 00 9E 0E 7C 06 8F 20 2D 2D | . 1970...|.. --| 00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 B4 |--------------..| 000006A0: 0E 86 06 8F 20 20 54 26 53 20 41 44 44 52 45 53 |.... T&S ADDRES| 000006B0: 53 49 4E 47 00 CB 0E 90 06 8F 20 2D 2D 2D 2D 2D |SING...... -----| 000006C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 EC 0E 9A 06 |-----------.....| 000006D0: 9F 20 38 2C 38 2C 38 2C 22 23 22 20 20 3A 20 8F |. 8,8,8,"#" : .| 000006E0: 20 4F 50 45 4E 20 42 55 46 46 45 52 00 0E 0F A4 | OPEN BUFFER....| 000006F0: 06 4E 4E 25 B2 28 20 31 AA BB 28 54 49 29 AC 32 |.NN%.( 1..(TI).2| 00000700: 35 34 AA 4E 4E 25 20 29 20 AF 20 32 35 35 00 23 |54.NN% ) . 255.#| 00000710: 0F AE 06 98 31 35 2C 20 22 42 2D 50 22 3B 38 3B |....15, "B-P";8;| 00000720: 4E 4E 25 00 4F 0F B8 06 4E 4E 24 B2 22 22 20 3A |NN%.O...NN$."" :| 00000730: 20 81 20 49 B2 31 20 A4 20 32 35 35 20 3A 20 4E | . I.1 . 255 : N| 00000740: 4E 24 B2 4E 4E 24 AA C7 28 49 29 20 3A 20 82 00 |N$.NN$..(I) : ..| 00000750: 70 0F C2 06 98 20 38 2C 20 4E 4E 24 3B 20 3A 20 |p.... 8, NN$; : | 00000760: 8F 20 57 52 49 54 45 20 54 4F 20 42 55 46 46 2E |. WRITE TO BUFF.| 00000770: 00 8B 0F CC 06 99 20 22 20 20 20 20 57 52 49 54 |...... " WRIT| 00000780: 45 20 54 52 41 43 4B 20 33 35 22 00 A5 0F D6 06 |E TRACK 35".....| 00000790: 3A 20 98 31 35 2C 20 22 55 32 3A 22 3B 38 3B 30 |: .15, "U2:";8;0| 000007A0: 3B 33 35 3B 30 00 B2 0F E0 06 3A 20 8D 20 31 39 |;35;0.....: . 19| 000007B0: 37 30 00 CC 0F EA 06 99 20 22 20 20 20 20 57 52 |70...... " WR| 000007C0: 49 54 45 20 54 52 41 43 4B 20 31 22 00 E5 0F F4 |ITE TRACK 1"....| 000007D0: 06 3A 20 98 31 35 2C 20 22 55 32 3A 22 3B 38 3B |.: .15, "U2:";8;| 000007E0: 30 3B 31 3B 30 00 F2 0F FE 06 3A 20 8D 20 31 39 |0;1;0.....: . 19| 000007F0: 37 30 00 0C 10 08 07 99 20 22 20 20 20 20 52 45 |70...... " RE| 00000800: 41 44 20 54 52 41 43 4B 20 33 35 22 00 26 10 12 |AD TRACK 35".&..| 00000810: 07 3A 20 98 31 35 2C 20 22 55 31 3A 22 3B 38 3B |.: .15, "U1:";8;| 00000820: 30 3B 33 35 3B 30 00 33 10 1C 07 3A 20 8D 20 31 |0;35;0.3...: . 1| 00000830: 39 37 30 00 4D 10 26 07 99 20 22 20 20 20 20 20 |970.M.&.. " | 00000840: 52 45 41 44 20 54 52 41 43 4B 20 31 22 00 65 10 |READ TRACK 1".e.| 00000850: 30 07 3A 20 98 31 35 2C 22 55 31 3A 22 3B 38 3B |0.: .15,"U1:";8;| 00000860: 30 3B 31 3B 30 00 72 10 3A 07 3A 20 8D 20 31 39 |0;1;0.r.:.: . 19| 00000870: 37 30 00 7A 10 44 07 A0 20 38 00 80 10 4E 07 3A |70.z.D.. 8...N.:| 00000880: 00 9D 10 58 07 99 22 11 20 20 12 20 55 4E 49 54 |...X..". . UNIT| 00000890: 20 48 41 53 20 50 41 53 53 45 44 20 22 00 BB 10 | HAS PASSED "...| 000008A0: 62 07 99 22 20 20 12 4A 45 52 52 59 53 20 46 4F |b.." .JERRYS FO| 000008B0: 52 4D 41 54 45 52 49 4E 47 21 22 00 D9 10 6C 07 |RMATERING!"...l.| 000008C0: 99 22 11 20 52 45 4D 4F 56 45 20 44 49 53 4B 45 |.". REMOVE DISKE| 000008D0: 54 54 45 20 46 52 4F 4D 22 00 F6 10 76 07 99 22 |TTE FROM"...v.."| 000008E0: 20 44 52 49 56 45 20 42 45 46 4F 52 45 20 54 55 | DRIVE BEFORE TU| 000008F0: 52 4E 49 4E 47 22 00 0E 11 80 07 99 22 20 20 20 |RNING"......" | 00000900: 20 20 20 4F 46 46 20 50 4F 57 45 52 2E 22 00 14 | OFF POWER."..| 00000910: 11 8A 07 80 00 2B 11 94 07 3A 20 B2 B2 B2 B2 B2 |.....+...: .....| 00000920: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 00 3F 11 9E 07 |............?...| 00000930: 3A 20 43 48 45 43 4B 20 81 20 45 52 52 B0 53 00 |: CHECK . ERR.S.| 00000940: 56 11 A8 07 3A 20 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |V...: ..........| 00000950: B2 B2 B2 B2 B2 B2 00 6B 11 B2 07 84 31 35 2C 45 |.......k....15,E| 00000960: 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 87 11 BC 07 |N,EM$,ET,ES.....| 00000970: 99 20 A3 31 31 AB C3 28 45 4D 24 29 AD 32 29 3B |. .11..(EM$).2);| 00000980: 45 4D 24 3B 22 11 22 00 99 11 C6 07 8B 20 45 4E |EM$;"."...... EN| 00000990: B3 32 20 A7 20 32 30 39 30 00 B8 11 D0 07 3A 20 |.2 . 2090.....: | 000009A0: 99 20 22 11 12 20 20 55 4E 49 54 20 49 53 20 46 |. ".. UNIT IS F| 000009B0: 41 49 4C 49 4E 47 20 22 00 D8 11 DA 07 3A 20 99 |AILING ".....: .| 000009C0: 20 22 12 20 4A 45 52 52 59 53 20 46 4F 52 4D 41 | ". JERRYS FORMA| 000009D0: 54 45 52 49 4E 47 21 22 00 F7 11 E4 07 3A 20 99 |TERING!".....: .| 000009E0: 20 22 45 52 52 4F 52 3A 20 22 3B 45 54 3B 45 4D | "ERROR: ";ET;EM| 000009F0: 24 3B 45 54 3B 45 53 00 05 12 EE 07 3A 20 54 4D |$;ET;ES.....: TM| 00000A00: 24 B2 54 49 24 00 22 12 F8 07 3A 20 99 20 22 11 |$.TI$."...: . ".| 00000A10: 20 43 4F 4E 54 49 4E 55 45 20 28 59 2F 4E 29 3F | CONTINUE (Y/N)?| 00000A20: 22 3B 00 4A 12 02 08 3A 20 A1 20 41 24 20 3A 20 |";.J...: . A$ : | 00000A30: 8B 20 41 24 B3 B1 22 59 22 20 AF 20 41 24 B3 B1 |. A$.."Y" . A$..| 00000A40: 22 4E 22 20 A7 20 32 30 35 30 00 59 12 0C 08 3A |"N" . 2050.Y...:| 00000A50: 20 99 20 41 24 20 22 11 22 00 71 12 16 08 3A 20 | . A$ ".".q...: | 00000A60: 8B 20 41 24 B2 22 4E 22 20 A7 20 89 20 31 39 30 |. A$."N" . . 190| 00000A70: 30 00 7F 12 20 08 3A 20 54 49 24 B2 54 4D 24 00 |0... .: TI$.TM$.| 00000A80: 85 12 2A 08 8E 00 00 00 |..*..... |
..$.... ============================.E.. .. JERRYS FORMATERING 2.2.H.... FOR VIC20, C64, PLUS4 OR C16...... AND SINGL E FLOPPY DISK DRIVE...... REV 11/84 TEST SYSTEMS DEPT..Q.... =================== =========...$.. 15,8,15...... "..FFFFFFF FFFFFFFFFFFFFFF"...8.. " JERRYS FORMATE RING".=.B.. "DDDDDDDDDDDDDDDDDDDDDD.".W. L.. " INSERT BLANK".S.V.. " DISKETT E IN DRIVE"...`.. " THEN PRESS .RETURN. "...J.. A$ : . A$..G(13) . 1130...T..15, "M-R" G(255) G(255) : . WHICH DRIVE I S IT?...~.: .#15, TYPE$.....: TYPE.F(TYP E$.G(0)).K...: MAX.80 : . TYPE.241 . MAX .25 : . FOR 1551 FAST DISK._.... ------ -------.R.... NEW COMMAND...... ------- ------.....TI$."000000"...D.. ". DISK NEW COMMAND".Y.N.. "WAIT ABOUT".D(MAX)." SECONDS"...X..15, "N0:JERRYS DISKETT,00 "...... 1970...... TI.MAX.60 . 1310.6... : . ". SYSTEM IS NOT".V...: . " RESPOND ING CORRECTLY".P...: . " TO COMMANDS" .}...: . 2000...... " . DRIVE PASSED "...(.. " .MECHANICAL TESTS.".P.2.. - ----------------...<.. SEQ. WRITE TEST. ..F.. -----------------...P.. " OPEN W RITE FILE".;.Z.: . 2,8,2, "0:TEST FILE,S ,W".H.D.: . 1970.B.N.. " WRITING DAT A"...X.: . I.1000 . 2000 : . 2, I : .... ..: . 1970...... " CLOSE WRITE FILE".. ...: 2.E. .: . 1970...... ------------ ----...... SEQ. READ TEST...... ------- ---------.$.H.. " OPEN READ FILE".E.R .: . 2,8,2, "0:TEST FILE,S,R".R...: . 19 70.L.... " READING DATA".....: . I.1 000 . 2000.....: . 2, J.....: . J..I . . " .READ ERROR:." : . 1970.H...: . .U...: . 1970...".. " CLOSE READ FILE "...,.: 2...6.: . 1970...@.. --------- -----.1.J.. SCRATCH FILE.F.T.. -------- ------.`.^.. " SCRATCH FILE".Z.H.: . 15, "S0:TEST FILE"...R.: . 1970...|.. -- --------------...... T&S ADDRESSING.K.. .. ----------------...... 8,8,8,"#" : . OPEN BUFFER.....NN%.( 1..(TI).254.NN% ) . 255.#....15, "B-P";8;NN%.O...NN$."" : . I.1 . 255 : NN$.NN$.G(I) : ..P.B.. 8, NN$; : . WRITE TO BUFF....L.. " WRIT E TRACK 35"...V.: .15, "U2:";8;0;35;0... ..: . 1970.L.... " WRITE TRACK 1".... .: .15, "U2:";8;0;1;0.....: . 1970...... " READ TRACK 35".&...: .15, "U1:";8; 0;35;0.3...: . 1970.M.&.. " READ TRA CK 1".E.0.: .15,"U1:";8;0;1;0.R.:.: . 19 70.Z.D. 8...N.:...X..". . UNIT HAS PAS SED "...B.." .JERRYS FORMATERING!".Y.L. .". REMOVE DISKETTE FROM"...V.." DRIVE B EFORE TURNING"......" OFF POWER.".. .....+...: .................?...: CHECK . ERR.S.V...: .................K....15,E N,EM$,ET,ES...... .11.C(EM$).2);EM$;".". ..F.. EN.2 . 2090...P.: . ".. UNIT IS F AILING ".X.Z.: . ". JERRYS FORMATERING!" .....: . "ERROR: ";ET;EM$;ET;ES.....: TM $.TI$."...: . ". CONTINUE (Y/N)?";.J...: . A$ : . A$.."Y" . A$.."N" . 2050.Y...: . A$ ".".Q...: . A$."N" . . 1900.. .: TI$.TM$...*.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL