DISK WEDGE
FILE INFORMATION
FILENAME(S): DISK WEDGE
FILE TYPE(S): PRG
FILE SIZE: 6.5K
FIRST SEEN: 2025-11-30 16:59:31
APPEARS ON: 1 disk(s)
FILE HASH
c31317ad89712e27e647132337b9ff25628c31d5198362651fad17edcc4dc3de
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BASIC UTILITIES | DISK WEDGE | PRG | High Voltage Complete C64 Collection | 14 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 53 08 00 00 8F 78 A9 14 8D 14 03 A9 08 8D |..S....x........|
00000010: 15 03 58 60 EA A2 2D AD 20 D0 69 01 29 0F 8D 20 |..X`..-. .i.).. |
00000020: D0 A0 40 88 D0 FD CA D0 EE 4C 31 EA 20 32 30 35 |..@......L1. 205|
00000030: 34 20 20 20 EA 32 31 30 35 20 78 A9 31 8D 14 03 |4 .2105 x.1...|
00000040: A9 EA 8D 15 03 58 60 58 58 58 58 58 58 58 58 58 |.....X`XXXXXXXXX|
00000050: 58 58 58 00 9A 08 01 00 41 24 28 31 29 B2 22 CE |XXX.....A$(1).".|
00000060: 45 57 20 C4 49 53 4B 20 D7 45 44 47 45 22 20 20 |EW .ISK .EDGE" |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000080: 20 3A 41 24 28 32 29 B2 22 42 59 20 C2 52 49 41 | :A$(2)."BY .RIA|
00000090: 4E 20 CD 55 4E 53 48 41 57 22 00 D3 08 02 00 41 |N .UNSHAW".....A|
000000A0: 24 28 33 29 B2 22 D4 48 45 20 D4 52 41 4E 53 41 |$(3).".HE .RANSA|
000000B0: 43 54 4F 52 22 3A 20 20 20 20 20 20 20 20 20 20 |CTOR": |
000000C0: 20 20 20 20 41 24 28 34 29 B2 22 D0 41 47 45 20 | A$(4).".AGE |
000000D0: 32 32 22 00 23 09 03 00 41 24 28 35 29 B2 22 CD |22".#...A$(5).".|
000000E0: 41 59 20 31 39 38 35 22 3A 20 20 20 20 20 20 20 |AY 1985": |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 41 24 28 36 29 | A$(6)|
00000100: B2 22 54 59 50 45 44 20 42 59 20 C1 4C 4C 45 4E |."TYPED BY .LLEN|
00000110: 20 D3 50 4F 4B 41 4E 45 22 3A 97 35 33 32 37 32 | .POKANE":.53272|
00000120: 2C 32 33 00 6A 09 04 00 97 35 33 32 38 31 2C 30 |,23.j....53281,0|
00000130: 3A 97 35 33 32 38 30 2C 30 3A 41 24 B2 22 13 1F |:.53280,0:A$."..|
00000140: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000150: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000160: A6 A6 A6 A6 A6 A6 A6 A6 A6 22 00 86 09 05 00 81 |........."......|
00000170: 49 B2 31 A4 32 33 3A 41 24 B2 41 24 AA 22 9D 9D |I.1.23:A$.A$."..|
00000180: 11 A6 A6 22 3A 82 00 CE 09 06 00 41 24 B2 41 24 |...":......A$.A$|
00000190: AA 22 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |."..............|
000001A0: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
000001B0: A6 A6 A6 A6 A6 A6 A6 A6 22 3A 99 22 93 22 3A 81 |........":.".":.|
000001C0: 58 B2 31 A4 36 3A 97 36 34 36 2C 58 AA 31 00 0A |X.1.6:.646,X.1..|
000001D0: 0A 07 00 99 22 11 11 22 A3 32 30 AB B5 28 C3 28 |...."..".20..(.(|
000001E0: 41 24 28 58 29 29 AD 32 AA 2E 35 29 29 41 24 28 |A$(X)).2..5))A$(|
000001F0: 58 29 3A 82 3A 97 36 34 36 2C 33 3A 99 41 24 3B |X):.:.646,3:.A$;|
00000200: 3A 97 32 31 34 2C 32 31 3A 99 00 4D 0A 08 00 97 |:.214,21:..M....|
00000210: 32 30 32 33 2C 31 30 32 3A 97 35 36 32 39 35 2C |2023,102:.56295,|
00000220: 36 3A 99 22 1D 20 20 20 20 20 20 20 20 12 1E 50 |6:.". ..P|
00000230: 55 53 48 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |USH ANY KEY TO C|
00000240: 4F 4E 54 2E 92 22 3B 3A 9E 32 30 35 34 00 65 0A |ONT..";:.2054.e.|
00000250: 09 00 92 31 39 38 2C 31 3A 97 31 39 38 2C 30 3A |...198,1:.198,0:|
00000260: 9E 32 31 30 35 00 A3 0A 0A 00 97 35 33 32 37 32 |.2105......53272|
00000270: 2C 32 31 3A 97 35 33 32 38 31 2C 31 3A 97 35 33 |,21:.53281,1:.53|
00000280: 32 38 30 2C 30 3A 99 22 93 90 20 20 20 20 20 20 |280,0:.".. |
00000290: 20 20 20 20 20 20 49 4E 53 54 52 55 43 54 49 4F | INSTRUCTIO|
000002A0: 4E 53 22 00 D1 0A 0B 00 99 22 11 11 20 20 20 20 |NS"......".. |
000002B0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 41 44 | THIS PROGRAM AD|
000002C0: 44 53 20 38 20 4E 45 57 20 43 4F 4D 4D 41 4E 44 |DS 8 NEW COMMAND|
000002D0: 53 00 FE 0A 0C 00 99 22 54 4F 20 52 45 47 55 4C |S......"TO REGUL|
000002E0: 41 52 20 42 41 53 49 43 2C 20 49 54 20 4F 43 43 |AR BASIC, IT OCC|
000002F0: 55 50 49 45 53 20 54 48 45 20 41 52 45 41 00 2C |UPIES THE AREA.,|
00000300: 0B 0D 00 99 22 4F 46 20 4D 45 4D 4F 52 59 20 46 |...."OF MEMORY F|
00000310: 52 4F 4D 20 24 43 30 30 30 20 54 4F 20 24 43 32 |ROM $C000 TO $C2|
00000320: 43 33 2C 20 4F 52 20 34 39 31 35 32 00 3D 0B 0E |C3, OR 49152.=..|
00000330: 00 99 22 54 4F 20 34 39 38 35 38 2E 22 00 5C 0B |.."TO 49858.".\.|
00000340: 0F 00 99 22 11 11 20 20 20 20 20 12 4E 45 57 20 |...".. .NEW |
00000350: 43 4F 4D 4D 41 4E 44 20 23 31 3A 22 00 73 0B 10 |COMMAND #1:".s..|
00000360: 00 99 22 11 20 20 20 20 20 5C 20 5B 52 45 54 55 |..". \ [RETU|
00000370: 52 4E 5D 00 91 0B 11 00 99 22 11 28 41 42 42 52 |RN]......".(ABBR|
00000380: 45 56 49 41 54 49 4F 4E 3A 20 20 4E 4F 4E 45 29 |EVIATION: NONE)|
00000390: 22 00 C0 0B 12 00 99 22 11 20 20 20 20 20 54 48 |"......". TH|
000003A0: 49 53 20 43 4F 4D 4D 41 4E 44 20 57 49 4C 4C 20 |IS COMMAND WILL |
000003B0: 44 49 53 50 4C 41 59 20 54 48 45 20 44 49 53 4B |DISPLAY THE DISK|
000003C0: 00 E4 0B 13 00 99 22 53 54 41 54 55 53 20 4F 46 |......"STATUS OF|
000003D0: 20 54 48 45 20 44 45 46 41 55 4C 54 20 44 52 49 | THE DEFAULT DRI|
000003E0: 56 45 2E 22 00 11 0C 14 00 99 22 11 11 11 11 11 |VE."......".....|
000003F0: 11 20 20 20 20 20 20 20 12 48 49 54 20 41 4E 59 |. .HIT ANY|
00000400: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
00000410: 22 00 23 0C 15 00 A1 41 24 3A 8B 41 24 B2 22 22 |".#....A$:.A$.""|
00000420: A7 32 31 00 45 0C 16 00 99 22 93 20 20 20 20 20 |.21.E....". |
00000430: 20 20 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 2D | INSTRUCTIONS-|
00000440: 50 47 2E 32 22 00 64 0C 17 00 99 22 11 11 20 20 |PG.2".d....".. |
00000450: 20 20 20 12 4E 45 57 20 43 4F 4D 4D 41 4E 44 20 | .NEW COMMAND |
00000460: 23 32 3A 22 00 8A 0C 18 00 99 22 11 20 20 20 20 |#2:"......". |
00000470: 20 5C 44 45 56 49 43 45 2C 44 45 56 49 43 45 23 | \DEVICE,DEVICE#|
00000480: 20 5B 52 45 54 55 52 4E 5D 22 00 AF 0C 19 00 99 | [RETURN]"......|
00000490: 22 11 28 41 42 42 52 45 56 49 41 54 49 4F 4E 3A |".(ABBREVIATION:|
000004A0: 20 20 5C 44 45 2C 44 45 56 49 43 45 23 29 22 00 | \DE,DEVICE#)".|
000004B0: DC 0C 1A 00 99 22 11 20 20 20 20 20 54 48 49 53 |.....". THIS|
000004C0: 20 43 4F 4D 4D 41 4E 44 20 57 49 4C 4C 20 41 4C | COMMAND WILL AL|
000004D0: 4C 4F 57 20 54 48 45 20 55 53 45 52 00 05 0D 1B |LOW THE USER....|
000004E0: 00 99 22 54 4F 20 53 45 54 20 41 20 44 45 46 41 |.."TO SET A DEFA|
000004F0: 55 4C 54 20 44 45 56 49 43 45 2E 20 20 57 48 45 |ULT DEVICE. WHE|
00000500: 4E 20 54 48 45 00 32 0D 1C 00 99 22 55 54 49 4C |N THE.2...."UTIL|
00000510: 49 54 59 20 49 53 20 46 49 52 53 54 20 52 55 4E |ITY IS FIRST RUN|
00000520: 2C 20 38 20 49 53 20 54 48 45 20 44 45 46 41 55 |, 8 IS THE DEFAU|
00000530: 4C 54 00 5F 0D 1D 00 99 22 44 45 56 49 43 45 20 |LT._...."DEVICE |
00000540: 4E 55 4D 42 45 52 2E 20 20 54 48 49 53 20 4D 45 |NUMBER. THIS ME|
00000550: 41 4E 53 20 4C 4F 41 44 2C 20 53 41 56 45 2C 00 |ANS LOAD, SAVE,.|
00000560: 8D 0D 1E 00 99 22 41 4E 44 20 56 45 52 49 46 59 |....."AND VERIFY|
00000570: 20 55 53 45 20 54 48 49 53 20 4E 55 4D 42 45 52 | USE THIS NUMBER|
00000580: 20 41 53 20 41 20 44 45 46 41 55 4C 54 00 BA 0D | AS A DEFAULT...|
00000590: 1F 00 99 22 4E 55 4D 42 45 52 3B 20 49 45 2E 20 |..."NUMBER; IE. |
000005A0: 59 4F 55 20 4E 45 45 44 20 4E 4F 54 20 47 49 56 |YOU NEED NOT GIV|
000005B0: 45 20 41 20 44 45 56 49 43 45 00 FF 0D 20 00 99 |E A DEVICE... ..|
000005C0: 22 4E 55 4D 42 45 52 2E 22 3A 99 22 11 11 11 11 |"NUMBER.":."....|
000005D0: 11 11 11 20 20 20 20 20 12 48 49 54 20 41 4E 59 |... .HIT ANY|
000005E0: 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 45 | KEY TO CONTINUE|
000005F0: 22 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 00 |":.198,0:.198,1.|
00000600: 3C 0E 21 00 99 22 93 20 20 20 20 20 20 20 20 49 |<.!..". I|
00000610: 4E 53 54 52 55 43 54 49 4F 4E 53 2D 50 47 2E 33 |NSTRUCTIONS-PG.3|
00000620: 22 3A 99 22 11 11 20 20 20 20 20 12 4E 45 57 20 |":.".. .NEW |
00000630: 43 4F 4D 4D 41 4E 44 20 23 33 3A 22 00 5E 0E 22 |COMMAND #3:".^."|
00000640: 00 99 22 11 20 20 20 20 20 5C 44 4F 53 2C 53 54 |..". \DOS,ST|
00000650: 52 49 4E 47 20 5B 52 45 54 55 52 4E 5D 22 00 82 |RING [RETURN]"..|
00000660: 0E 23 00 99 22 11 28 41 42 42 52 45 56 49 41 54 |.#..".(ABBREVIAT|
00000670: 49 4F 4E 3A 20 20 5C 44 4F 2C 53 54 52 49 4E 47 |ION: \DO,STRING|
00000680: 29 22 00 AF 0E 24 00 99 22 11 20 20 20 20 20 54 |)"...$..". T|
00000690: 48 49 53 20 43 4F 4D 4D 41 4E 44 20 53 45 4E 44 |HIS COMMAND SEND|
000006A0: 53 20 54 48 45 20 53 54 52 49 4E 47 20 54 4F 00 |S THE STRING TO.|
000006B0: DB 0E 25 00 99 22 54 48 45 20 44 45 46 41 55 4C |..%.."THE DEFAUL|
000006C0: 54 20 44 52 49 56 45 2C 20 49 46 20 53 54 52 49 |T DRIVE, IF STRI|
000006D0: 4E 47 20 57 41 53 20 27 49 27 2C 00 06 0F 26 00 |NG WAS 'I',...&.|
000006E0: 99 22 54 48 45 4E 20 54 48 45 20 44 52 49 56 45 |."THEN THE DRIVE|
000006F0: 20 57 4F 55 4C 44 20 42 45 20 49 4E 49 54 49 41 | WOULD BE INITIA|
00000700: 4C 49 5A 45 44 2E 00 25 0F 27 00 99 22 11 11 20 |LIZED..%.'..".. |
00000710: 20 20 20 20 12 4E 45 57 20 43 4F 4D 4D 41 4E 44 | .NEW COMMAND|
00000720: 20 23 34 3A 22 00 49 0F 28 00 99 22 11 20 20 20 | #4:".I.(..". |
00000730: 20 20 5C 44 53 54 41 54 55 53 2C 56 41 52 24 20 | \DSTATUS,VAR$ |
00000740: 5B 52 45 54 55 52 4E 5D 22 00 6B 0F 29 00 99 22 |[RETURN]".k.).."|
00000750: 11 28 41 42 42 52 45 56 49 41 54 49 4F 4E 3A 20 |.(ABBREVIATION: |
00000760: 20 5C 44 53 2C 56 41 52 24 29 22 00 9D 0F 2A 00 | \DS,VAR$)"...*.|
00000770: 99 22 11 20 20 20 20 20 54 48 49 53 20 43 4F 4D |.". THIS COM|
00000780: 4D 41 4E 44 20 57 49 4C 4C 20 53 54 4F 52 45 20 |MAND WILL STORE |
00000790: 54 48 45 20 44 45 46 41 55 4C 54 22 3B 00 BC 0F |THE DEFAULT";...|
000007A0: 2B 00 99 22 44 52 49 56 45 27 53 20 53 54 41 54 |+.."DRIVE'S STAT|
000007B0: 55 53 20 49 4E 20 56 41 52 24 2E 22 00 F3 0F 2C |US IN VAR$."...,|
000007C0: 00 99 22 11 20 20 20 20 20 20 20 20 12 48 49 54 |..". .HIT|
000007D0: 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 | ANY KEY TO CONT|
000007E0: 49 4E 55 45 22 3A 97 31 39 38 2C 30 3A 92 31 39 |INUE":.198,0:.19|
000007F0: 38 2C 31 00 15 10 2D 00 99 22 93 20 20 20 20 20 |8,1...-..". |
00000800: 20 20 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 2D | INSTRUCTIONS-|
00000810: 50 47 2E 34 22 00 63 10 2E 00 99 22 11 20 20 20 |PG.4".c....". |
00000820: 20 20 12 4E 45 57 20 43 4F 4D 4D 41 4E 44 20 23 | .NEW COMMAND #|
00000830: 35 3A 22 3A 99 22 11 20 20 20 20 20 5C 4B 49 4C |5:":.". \KIL|
00000840: 4C 20 5B 52 45 54 55 52 4E 5D 22 3A 99 22 11 28 |L [RETURN]":.".(|
00000850: 41 42 42 52 45 56 49 41 54 49 4F 4E 3A 20 20 5C |ABBREVIATION: \|
00000860: 4B 29 22 00 95 10 2F 00 99 22 11 20 20 20 20 20 |K)".../..". |
00000870: 54 48 49 53 20 43 4F 4D 4D 41 4E 44 20 44 49 53 |THIS COMMAND DIS|
00000880: 45 4E 47 41 47 45 53 20 54 48 45 20 55 54 49 4C |ENGAGES THE UTIL|
00000890: 49 54 59 22 3B 00 C5 10 30 00 99 22 41 4E 44 20 |ITY";...0.."AND |
000008A0: 49 54 20 43 41 4E 20 42 45 20 52 45 2D 45 4E 47 |IT CAN BE RE-ENG|
000008B0: 41 47 45 44 20 57 49 54 48 20 53 59 53 20 34 39 |AGED WITH SYS 49|
000008C0: 31 35 32 2E 22 00 00 11 31 00 99 22 11 20 20 20 |152."...1..". |
000008D0: 20 20 12 4E 45 57 20 43 4F 4D 4D 41 4E 44 20 23 | .NEW COMMAND #|
000008E0: 36 3A 22 3A 99 22 11 20 20 20 20 20 5C 4C 49 53 |6:":.". \LIS|
000008F0: 54 2C 22 C7 28 33 34 29 22 24 22 C7 28 33 34 29 |T,".(34)"$".(34)|
00000900: 00 2D 11 32 00 99 22 11 28 41 42 42 52 45 56 49 |.-.2..".(ABBREVI|
00000910: 41 54 49 4F 4E 3A 20 20 5C 4C C9 2C 22 C7 28 33 |ATION: \L.,".(3|
00000920: 34 29 22 24 22 C7 28 33 34 29 22 29 22 00 5C 11 |4)"$".(34)")".\.|
00000930: 33 00 99 22 11 20 20 20 20 20 4C 49 53 54 53 20 |3..". LISTS |
00000940: 44 49 52 45 43 54 4F 52 59 20 54 4F 20 53 43 52 |DIRECTORY TO SCR|
00000950: 45 45 4E 2C 20 44 4F 45 53 4E 27 54 00 89 11 34 |EEN, DOESN'T...4|
00000960: 00 99 22 44 49 53 54 55 52 42 20 50 52 4F 47 52 |.."DISTURB PROGR|
00000970: 41 4D 20 49 4E 20 4D 45 4D 4F 52 59 2E 20 20 48 |AM IN MEMORY. H|
00000980: 4F 4C 44 20 53 50 41 43 45 00 B6 11 35 00 99 22 |OLD SPACE...5.."|
00000990: 42 41 52 20 54 4F 20 50 41 55 53 45 2E 20 20 48 |BAR TO PAUSE. H|
000009A0: 49 54 20 52 55 4E 2F 53 54 4F 50 20 54 4F 20 41 |IT RUN/STOP TO A|
000009B0: 42 4F 52 54 2E 22 00 E1 11 36 00 99 22 48 4F 4C |BORT."...6.."HOL|
000009C0: 44 20 43 54 52 4C 20 54 4F 20 53 4C 4F 57 20 44 |D CTRL TO SLOW D|
000009D0: 4F 57 4E 20 4C 49 53 54 49 4E 47 2E 20 20 59 4F |OWN LISTING. YO|
000009E0: 55 00 2C 12 37 00 99 22 43 41 4E 20 55 53 45 20 |U.,.7.."CAN USE |
000009F0: 53 54 41 4E 44 41 52 44 20 43 4F 4D 4D 4F 44 4F |STANDARD COMMODO|
00000A00: 52 45 20 41 42 42 52 45 56 49 41 54 49 4F 4E 53 |RE ABBREVIATIONS|
00000A10: 46 4F 52 20 41 20 53 45 4C 45 43 54 49 56 45 20 |FOR A SELECTIVE |
00000A20: 44 49 52 45 43 54 4F 52 59 2E 22 3B 00 71 12 38 |DIRECTORY.";.q.8|
00000A30: 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00000A40: 20 20 20 20 20 20 20 20 20 12 48 49 54 20 41 4E | .HIT AN|
00000A50: 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |Y KEY TO CONTINU|
00000A60: 45 22 3B 3A 97 31 39 38 2C 30 3A 92 31 39 38 2C |E";:.198,0:.198,|
00000A70: 31 00 96 12 39 00 99 3A 99 22 93 20 20 20 20 20 |1...9..:.". |
00000A80: 20 20 20 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 | INSTRUCTIONS|
00000A90: 2D 50 47 2E 35 22 00 B4 12 3A 00 99 22 11 20 20 |-PG.5"...:..". |
00000AA0: 20 20 20 12 4E 45 57 20 43 4F 4D 4D 41 4E 44 20 | .NEW COMMAND |
00000AB0: 23 37 3A 22 00 EB 12 3B 00 99 22 11 20 20 20 20 |#7:"...;..". |
00000AC0: 20 5C 4C 49 53 54 2C 22 C7 28 33 34 29 22 50 52 | \LIST,".(34)"PR|
00000AD0: 4F 47 52 41 4D 20 4E 41 4D 45 22 C7 28 33 34 29 |OGRAM NAME".(34)|
00000AE0: 22 20 5B 52 45 54 55 52 4E 5D 22 00 23 13 3C 00 |" [RETURN]".#.<.|
00000AF0: 99 22 11 28 41 42 42 52 45 56 49 41 54 49 4F 4E |.".(ABBREVIATION|
00000B00: 3A 20 20 5C 4C C9 2C 22 C7 28 33 34 29 22 50 52 |: \L.,".(34)"PR|
00000B10: 4F 47 52 41 4D 20 4E 41 4D 45 22 C7 28 33 34 29 |OGRAM NAME".(34)|
00000B20: 22 29 22 00 4A 13 3D 00 99 22 11 20 20 20 20 20 |")".J.=..". |
00000B30: 54 48 49 53 20 43 4F 4D 4D 41 4E 44 20 57 49 4C |THIS COMMAND WIL|
00000B40: 4C 20 4C 49 53 54 20 54 48 45 00 75 13 3E 00 99 |L LIST THE.u.>..|
00000B50: 22 4E 41 4D 45 44 20 50 52 4F 47 52 41 4D 20 46 |"NAMED PROGRAM F|
00000B60: 52 4F 4D 20 54 48 45 20 44 45 46 41 55 4C 54 20 |ROM THE DEFAULT |
00000B70: 44 52 49 56 45 00 A0 13 3F 00 99 22 54 4F 20 54 |DRIVE...?.."TO T|
00000B80: 48 45 20 53 43 52 45 45 4E 20 57 49 54 48 4F 55 |HE SCREEN WITHOU|
00000B90: 54 20 44 49 53 54 55 52 42 49 4E 47 20 54 48 45 |T DISTURBING THE|
00000BA0: 00 C9 13 40 00 99 22 50 52 4F 47 52 41 4D 20 49 |...@.."PROGRAM I|
00000BB0: 4E 20 4D 45 4D 4F 52 59 2E 20 20 48 4F 4C 44 20 |N MEMORY. HOLD |
00000BC0: 54 48 45 20 53 50 41 43 45 00 FA 13 41 00 99 22 |THE SPACE...A.."|
00000BD0: 42 41 52 20 54 4F 20 50 41 55 53 45 20 4C 49 53 |BAR TO PAUSE LIS|
00000BE0: 54 49 4E 47 2E 20 20 48 4F 4C 44 20 43 54 52 4C |TING. HOLD CTRL|
00000BF0: 20 54 4F 20 53 4C 4F 57 22 3B 00 24 14 42 00 99 | TO SLOW";.$.B..|
00000C00: 22 4C 49 53 54 49 4E 47 20 41 4E 44 20 48 49 54 |"LISTING AND HIT|
00000C10: 20 52 55 4E 2F 53 54 4F 50 20 54 4F 20 41 42 4F | RUN/STOP TO ABO|
00000C20: 52 54 2E 22 00 43 14 43 00 99 22 11 11 20 20 20 |RT.".C.C..".. |
00000C30: 20 20 12 4E 45 57 20 43 4F 4D 4D 41 4E 44 20 23 | .NEW COMMAND #|
00000C40: 38 3A 22 00 7B 14 44 00 99 22 11 20 20 20 20 20 |8:".{.D..". |
00000C50: 5C 50 52 49 4E 54 2C 22 C7 28 33 34 29 22 53 45 |\PRINT,".(34)"SE|
00000C60: 51 20 46 49 4C 45 4E 41 4D 45 22 C7 28 33 34 29 |Q FILENAME".(34)|
00000C70: 22 20 5B 52 45 54 55 52 4E 5D 22 00 B2 14 45 00 |" [RETURN]"...E.|
00000C80: 99 22 11 28 41 42 42 52 45 56 49 41 54 49 4F 4E |.".(ABBREVIATION|
00000C90: 3A 20 20 5C 3F 2C 22 C7 28 33 34 29 22 53 45 51 |: \?,".(34)"SEQ|
00000CA0: 20 46 49 4C 45 4E 41 4D 45 22 C7 28 33 34 29 22 | FILENAME".(34)"|
00000CB0: 29 22 00 E4 14 46 00 99 22 11 20 20 20 20 20 53 |)"...F..". S|
00000CC0: 41 4D 45 20 41 53 20 41 42 4F 56 45 20 42 55 54 |AME AS ABOVE BUT|
00000CD0: 20 4C 49 53 54 53 20 41 20 53 45 51 20 46 49 4C | LISTS A SEQ FIL|
00000CE0: 45 2E 22 3B 00 14 15 47 00 99 22 20 12 48 49 54 |E.";...G.." .HIT|
00000CF0: 20 41 4E 59 20 4B 45 59 20 54 4F 20 41 43 54 49 | ANY KEY TO ACTI|
00000D00: 56 41 54 45 20 4E 45 57 20 44 49 53 4B 20 57 45 |VATE NEW DISK WE|
00000D10: 44 47 45 22 00 2D 15 48 00 97 31 39 38 2C 30 3A |DGE".-.H..198,0:|
00000D20: 92 31 39 38 2C 31 3A 97 31 39 38 2C 30 00 5B 15 |.198,1:.198,0.[.|
00000D30: 4B 00 99 22 93 11 11 11 11 11 11 11 11 11 11 11 |K.."............|
00000D40: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000D50: 1D 1D 57 41 49 54 2E 2E 2E 2E 22 00 82 15 E8 03 |..WAIT....".....|
00000D60: 8F 2A 20 44 41 54 41 20 4C 4F 41 44 45 52 20 46 |.* DATA LOADER F|
00000D70: 4F 52 20 22 45 52 52 4F 52 20 57 45 44 47 45 22 |OR "ERROR WEDGE"|
00000D80: 20 2A 00 97 15 F2 03 8F 20 56 49 43 2F 36 34 20 | *...... VIC/64 |
00000D90: 56 45 52 53 49 4F 4E 00 A0 15 FC 03 43 53 B2 30 |VERSION.....CS.0|
00000DA0: 00 BB 15 06 04 81 49 B2 34 39 31 35 32 A4 34 39 |......I.49152.49|
00000DB0: 38 35 38 3A 87 41 3A 97 49 2C 41 00 CA 15 10 04 |858:.A:.I,A.....|
00000DC0: 43 53 B2 43 53 AA 41 3A 82 49 00 D0 15 1A 04 3A |CS.CS.A:.I.....:|
00000DD0: 00 06 16 24 04 8B 43 53 B3 B1 38 36 33 30 38 A7 |...$..CS..86308.|
00000DE0: 99 22 2A 2A 2A 2A 20 45 52 52 4F 52 20 49 4E 20 |."**** ERROR IN |
00000DF0: 44 41 54 41 20 53 54 41 54 45 4D 45 4E 54 53 2A |DATA STATEMENTS*|
00000E00: 2A 2A 2A 22 3A 80 00 11 16 2E 04 9E 34 39 31 35 |***":.......4915|
00000E10: 32 00 17 16 38 04 80 00 1D 16 42 04 3A 00 38 16 |2...8.....B.:.8.|
00000E20: 4C 04 83 37 36 2C 35 32 2C 31 39 32 2C 31 33 39 |L..76,52,192,139|
00000E30: 2C 32 32 37 2C 31 36 35 00 50 16 56 04 83 32 34 |,227,165.P.V..24|
00000E40: 34 2C 32 33 37 2C 32 34 35 2C 38 2C 39 32 2C 30 |4,237,245,8,92,0|
00000E50: 00 61 16 60 04 83 30 2C 30 2C 30 2C 30 2C 30 2C |.a.`..0,0,0,0,0,|
00000E60: 30 00 72 16 6A 04 83 30 2C 30 2C 30 2C 30 2C 30 |0.r.j..0,0,0,0,0|
00000E70: 2C 30 00 83 16 74 04 83 30 2C 30 2C 30 2C 30 2C |,0...t..0,0,0,0,|
00000E80: 30 2C 30 00 94 16 7E 04 83 30 2C 30 2C 30 2C 30 |0,0...~..0,0,0,0|
00000E90: 2C 30 2C 30 00 A5 16 88 04 83 30 2C 30 2C 30 2C |,0,0......0,0,0,|
00000EA0: 30 2C 30 2C 30 00 B6 16 92 04 83 30 2C 30 2C 30 |0,0,0......0,0,0|
00000EB0: 2C 30 2C 30 2C 30 00 C9 16 9C 04 83 30 2C 30 2C |,0,0,0......0,0,|
00000EC0: 30 2C 30 2C 31 37 33 2C 30 00 E0 16 A6 04 83 33 |0,0,173,0......3|
00000ED0: 2C 31 34 31 2C 33 2C 31 39 32 2C 31 37 33 2C 31 |,141,3,192,173,1|
00000EE0: 00 F9 16 B0 04 83 33 2C 31 34 31 2C 34 2C 31 39 |......3,141,4,19|
00000EF0: 32 2C 31 36 39 2C 31 34 34 00 12 17 BA 04 83 31 |2,169,144......1|
00000F00: 34 31 2C 30 2C 33 2C 31 36 39 2C 31 39 32 2C 31 |41,0,3,169,192,1|
00000F10: 34 31 00 28 17 C4 04 83 31 2C 33 2C 31 37 33 2C |41.(....1,3,173,|
00000F20: 35 30 2C 33 2C 31 34 31 00 40 17 CE 04 83 37 2C |50,3,141.@....7,|
00000F30: 31 39 32 2C 31 37 33 2C 35 31 2C 33 2C 31 34 31 |192,173,51,3,141|
00000F40: 00 5A 17 D8 04 83 38 2C 31 39 32 2C 31 36 39 2C |.Z....8,192,169,|
00000F50: 31 31 39 2C 31 34 31 2C 35 30 00 72 17 E2 04 83 |119,141,50.r....|
00000F60: 33 2C 31 36 39 2C 31 39 32 2C 31 34 31 2C 35 31 |3,169,192,141,51|
00000F70: 2C 33 00 8A 17 EC 04 83 31 37 33 2C 34 38 2C 33 |,3......173,48,3|
00000F80: 2C 31 34 31 2C 35 2C 31 39 32 00 A2 17 F6 04 83 |,141,5,192......|
00000F90: 31 37 33 2C 34 39 2C 33 2C 31 34 31 2C 36 2C 31 |173,49,3,141,6,1|
00000FA0: 39 32 00 BC 17 00 05 83 31 36 39 2C 31 32 37 2C |92......169,127,|
00000FB0: 31 34 31 2C 34 38 2C 33 2C 31 36 39 00 D5 17 0A |141,48,3,169....|
00000FC0: 05 83 31 39 32 2C 31 34 31 2C 34 39 2C 33 2C 39 |..192,141,49,3,9|
00000FD0: 36 2C 31 37 34 00 EE 17 14 05 83 39 2C 31 39 32 |6,174......9,192|
00000FE0: 2C 31 33 34 2C 31 38 36 2C 31 30 38 2C 37 00 09 |,134,186,108,7..|
00000FF0: 18 1E 05 83 31 39 32 2C 31 37 34 2C 39 2C 31 39 |....192,174,9,19|
00001000: 32 2C 31 33 34 2C 31 38 36 00 21 18 28 05 83 31 |2,134,186.!.(..1|
00001010: 30 38 2C 35 2C 31 39 32 2C 33 32 2C 31 31 35 2C |08,5,192,32,115,|
00001020: 30 00 3C 18 32 05 83 33 32 2C 31 35 38 2C 31 37 |0.<.2..32,158,17|
00001030: 33 2C 37 36 2C 31 36 33 2C 31 38 32 00 54 18 3C |3,76,163,182.T.<|
00001040: 05 83 32 32 34 2C 31 31 2C 32 34 30 2C 33 2C 31 |..224,11,240,3,1|
00001050: 30 38 2C 33 00 6D 18 46 05 83 31 39 32 2C 33 32 |08,3.m.F..192,32|
00001060: 2C 31 32 31 2C 30 2C 32 30 35 2C 31 30 00 86 18 |,121,0,205,10...|
00001070: 50 05 83 31 39 32 2C 32 34 30 2C 33 2C 31 30 38 |P..192,240,3,108|
00001080: 2C 33 2C 31 39 32 00 A1 18 5A 05 83 31 30 34 2C |,3,192...Z..104,|
00001090: 31 30 34 2C 33 32 2C 31 37 30 2C 31 39 32 2C 37 |104,32,170,192,7|
000010A0: 36 00 B9 18 64 05 83 36 2C 31 36 39 2C 33 32 2C |6...d..6,169,32,|
000010B0: 31 31 35 2C 30 2C 32 30 31 00 D1 18 6E 05 83 30 |115,0,201...n..0|
000010C0: 2C 32 34 30 2C 36 2C 32 30 31 2C 35 38 2C 32 34 |,240,6,201,58,24|
000010D0: 30 00 E8 18 78 05 83 32 2C 32 30 38 2C 36 2C 33 |0...x..2,208,6,3|
000010E0: 32 2C 34 35 2C 31 39 33 00 02 19 82 05 83 37 36 |2,45,193......76|
000010F0: 2C 38 37 2C 31 39 34 2C 32 30 31 2C 36 38 2C 32 |,87,194,201,68,2|
00001100: 30 38 00 19 19 8C 05 83 33 39 2C 33 32 2C 31 31 |08......39,32,11|
00001110: 35 2C 30 2C 37 32 2C 33 32 00 34 19 96 05 83 34 |5,0,72,32.4....4|
00001120: 35 2C 31 39 33 2C 31 30 34 2C 32 30 31 2C 36 39 |5,193,104,201,69|
00001130: 2C 32 30 38 00 4C 19 A0 05 83 37 2C 33 32 2C 32 |,208.L....7,32,2|
00001140: 34 31 2C 31 38 33 2C 31 34 32 2C 39 00 65 19 AA |41,183,142,9.e..|
00001150: 05 83 31 39 32 2C 39 36 2C 32 30 31 2C 37 39 2C |..192,96,201,79,|
00001160: 32 30 38 2C 33 00 7F 19 B4 05 83 37 36 2C 39 39 |208,3......76,99|
00001170: 2C 31 39 33 2C 32 30 31 2C 38 33 2C 32 34 30 00 |,193,201,83,240.|
00001180: 96 19 BE 05 83 33 2C 31 30 38 2C 33 2C 31 39 32 |.....3,108,3,192|
00001190: 2C 33 32 2C 34 35 00 B1 19 C8 05 83 31 39 33 2C |,32,45......193,|
000011A0: 37 36 2C 31 31 36 2C 31 39 34 2C 32 30 31 2C 37 |76,116,194,201,7|
000011B0: 35 00 CB 19 D2 05 83 32 30 38 2C 34 30 2C 33 32 |5......208,40,32|
000011C0: 2C 34 35 2C 31 39 33 2C 31 37 33 00 E2 19 DC 05 |,45,193,173.....|
000011D0: 83 33 2C 31 39 32 2C 31 34 31 2C 30 2C 33 2C 31 |.3,192,141,0,3,1|
000011E0: 37 33 00 F9 19 E6 05 83 34 2C 31 39 32 2C 31 34 |73......4,192,14|
000011F0: 31 2C 31 2C 33 2C 31 37 33 00 11 1A F0 05 83 37 |1,1,3,173......7|
00001200: 2C 31 39 32 2C 31 34 31 2C 35 30 2C 33 2C 31 37 |,192,141,50,3,17|
00001210: 33 00 29 1A FA 05 83 38 2C 31 39 32 2C 31 34 31 |3.)....8,192,141|
00001220: 2C 35 31 2C 33 2C 31 37 33 00 41 1A 04 06 83 35 |,51,3,173.A....5|
00001230: 2C 31 39 32 2C 31 34 31 2C 34 38 2C 33 2C 31 37 |,192,141,48,3,17|
00001240: 33 00 58 1A 0E 06 83 36 2C 31 39 32 2C 31 34 31 |3.X....6,192,141|
00001250: 2C 34 39 2C 33 2C 39 36 00 71 1A 18 06 83 32 30 |,49,3,96.q....20|
00001260: 31 2C 31 35 35 2C 32 30 38 2C 36 2C 33 32 2C 34 |1,155,208,6,32,4|
00001270: 35 00 8D 1A 22 06 83 31 39 33 2C 37 36 2C 31 33 |5..."..193,76,13|
00001280: 32 2C 31 39 33 2C 32 30 31 2C 31 35 33 00 A5 1A |2,193,201,153...|
00001290: 2C 06 83 32 30 38 2C 36 2C 33 32 2C 34 35 2C 31 |,..208,6,32,45,1|
000012A0: 39 33 2C 37 36 00 BE 1A 36 06 83 35 30 2C 31 39 |93,76...6..50,19|
000012B0: 34 2C 31 36 32 2C 31 31 2C 31 30 38 2C 33 00 D6 |4,162,11,108,3..|
000012C0: 1A 40 06 83 31 39 32 2C 33 32 2C 31 32 31 2C 30 |.@..192,32,121,0|
000012D0: 2C 32 30 31 2C 30 00 F0 1A 4A 06 83 32 34 30 2C |,201,0...J..240,|
000012E0: 31 34 2C 32 30 31 2C 34 34 2C 32 34 30 2C 31 30 |14,201,44,240,10|
000012F0: 00 09 1B 54 06 83 32 30 31 2C 35 38 2C 32 34 30 |...T..201,58,240|
00001300: 2C 36 2C 33 32 2C 31 31 35 00 20 1B 5E 06 83 30 |,6,32,115. .^..0|
00001310: 2C 37 36 2C 34 38 2C 31 39 33 2C 39 36 2C 33 32 |,76,48,193,96,32|
00001320: 00 3C 1B 68 06 83 32 30 34 2C 32 35 35 2C 31 36 |.<.h..204,255,16|
00001330: 39 2C 31 32 37 2C 37 36 2C 31 39 35 00 57 1B 72 |9,127,76,195.W.r|
00001340: 06 83 32 35 35 2C 33 32 2C 31 33 35 2C 31 39 32 |..255,32,135,192|
00001350: 2C 33 32 2C 31 38 39 00 74 1B 7C 06 83 32 35 35 |,32,189.t.|..255|
00001360: 2C 31 36 34 2C 32 35 33 2C 31 36 39 2C 31 32 37 |,164,253,169,127|
00001370: 2C 31 37 34 00 8D 1B 86 06 83 39 2C 31 39 32 2C |,174......9,192,|
00001380: 33 32 2C 31 38 36 2C 32 35 35 2C 33 32 00 A9 1B |32,186,255,32...|
00001390: 90 06 83 31 39 32 2C 32 35 35 2C 31 36 32 2C 31 |...192,255,162,1|
000013A0: 32 37 2C 37 36 2C 31 39 38 00 C3 1B 9A 06 83 32 |27,76,198......2|
000013B0: 35 35 2C 31 37 33 2C 39 2C 31 39 32 2C 33 32 2C |55,173,9,192,32,|
000013C0: 31 37 37 00 DF 1B A4 06 83 32 35 35 2C 31 36 39 |177......255,169|
000013D0: 2C 31 31 31 2C 33 32 2C 31 34 37 2C 32 35 35 00 |,111,32,147,255.|
000013E0: FB 1B AE 06 83 33 32 2C 31 33 35 2C 31 39 32 2C |.....32,135,192,|
000013F0: 31 33 34 2C 32 35 33 2C 31 33 32 00 16 1C B8 06 |134,253,132.....|
00001400: 83 32 35 34 2C 31 37 30 2C 31 36 30 2C 30 2C 31 |.254,170,160,0,1|
00001410: 37 37 2C 32 35 33 00 32 1C C2 06 83 33 32 2C 31 |77,253.2....32,1|
00001420: 36 38 2C 32 35 35 2C 32 30 30 2C 32 30 32 2C 32 |68,255,200,202,2|
00001430: 30 38 00 4C 1C CC 06 83 32 34 37 2C 37 36 2C 31 |08.L....247,76,1|
00001440: 37 34 2C 32 35 35 2C 31 36 39 2C 30 00 66 1C D6 |74,255,169,0.f..|
00001450: 06 83 31 33 33 2C 32 35 33 2C 33 32 2C 37 35 2C |..133,253,32,75,|
00001460: 31 39 33 2C 33 32 00 82 1C E0 06 83 32 30 37 2C |193,32......207,|
00001470: 32 35 35 2C 33 32 2C 32 30 37 2C 32 35 35 2C 31 |255,32,207,255,1|
00001480: 36 39 00 9B 1C EA 06 83 30 2C 31 34 31 2C 31 31 |69......0,141,11|
00001490: 2C 31 39 32 2C 31 36 39 2C 31 33 00 B6 1C F4 06 |,192,169,13.....|
000014A0: 83 33 32 2C 32 31 30 2C 32 35 35 2C 33 32 2C 32 |.32,210,255,32,2|
000014B0: 30 37 2C 32 35 35 00 D1 1C FE 06 83 33 32 2C 32 |07,255......32,2|
000014C0: 30 37 2C 32 35 35 2C 33 32 2C 32 30 37 2C 32 35 |07,255,32,207,25|
000014D0: 35 00 ED 1C 08 07 83 31 33 33 2C 32 35 33 2C 33 |5......133,253,3|
000014E0: 32 2C 32 30 37 2C 32 35 35 2C 31 33 33 00 07 1D |2,207,255,133...|
000014F0: 12 07 83 32 35 34 2C 33 32 2C 31 38 33 2C 32 35 |...254,32,183,25|
00001500: 35 2C 32 34 30 2C 33 00 22 1D 1C 07 83 37 36 2C |5,240,3."....76,|
00001510: 36 37 2C 31 39 33 2C 31 36 35 2C 32 35 34 2C 31 |67,193,165,254,1|
00001520: 36 34 00 3D 1D 26 07 83 32 35 33 2C 33 32 2C 31 |64.=.&..253,32,1|
00001530: 34 35 2C 31 37 39 2C 33 32 2C 32 32 31 00 54 1D |45,179,32,221.T.|
00001540: 30 07 83 31 38 39 2C 31 36 30 2C 31 2C 31 38 35 |0..189,160,1,185|
00001550: 2C 30 2C 31 00 6E 1D 3A 07 83 32 34 30 2C 36 2C |,0,1.n.:..240,6,|
00001560: 33 32 2C 32 31 30 2C 32 35 35 2C 32 30 30 00 89 |32,210,255,200..|
00001570: 1D 44 07 83 32 30 38 2C 32 34 35 2C 31 36 39 2C |.D..208,245,169,|
00001580: 33 32 2C 33 32 2C 32 31 30 00 A4 1D 4E 07 83 32 |32,32,210...N..2|
00001590: 35 35 2C 33 32 2C 32 32 35 2C 32 35 35 2C 32 34 |55,32,225,255,24|
000015A0: 30 2C 35 32 00 C0 1D 58 07 83 32 30 31 2C 32 33 |0,52...X..201,23|
000015B0: 39 2C 32 34 30 2C 32 34 37 2C 33 32 2C 32 30 37 |9,240,247,32,207|
000015C0: 00 DA 1D 62 07 83 32 35 35 2C 32 34 30 2C 31 38 |...b..255,240,18|
000015D0: 30 2C 34 38 2C 32 30 2C 33 32 00 F6 1D 6C 07 83 |0,48,20,32...l..|
000015E0: 32 31 30 2C 32 35 35 2C 32 30 31 2C 33 34 2C 32 |210,255,201,34,2|
000015F0: 30 38 2C 32 33 33 00 11 1E 76 07 83 32 33 38 2C |08,233...v..238,|
00001600: 31 31 2C 31 39 32 2C 31 37 33 2C 31 31 2C 31 39 |11,192,173,11,19|
00001610: 32 00 29 1E 80 07 83 34 31 2C 31 2C 31 34 31 2C |2.)....41,1,141,|
00001620: 31 31 2C 31 39 32 2C 31 36 00 43 1E 8A 07 83 32 |11,192,16.C....2|
00001630: 32 30 2C 31 37 34 2C 31 31 2C 31 39 32 2C 32 34 |20,174,11,192,24|
00001640: 30 2C 36 00 5E 1E 94 07 83 33 32 2C 32 31 30 2C |0,6.^....32,210,|
00001650: 32 35 35 2C 37 36 2C 32 30 37 2C 31 39 33 00 79 |255,76,207,193.y|
00001660: 1E 9E 07 83 32 30 31 2C 32 35 35 2C 32 34 30 2C |....201,255,240,|
00001670: 32 34 36 2C 33 32 2C 31 31 00 93 1E A8 07 83 31 |246,32,11......1|
00001680: 39 34 2C 37 36 2C 32 30 37 2C 31 39 33 2C 37 36 |94,76,207,193,76|
00001690: 2C 36 37 00 AD 1E B2 07 83 31 39 33 2C 31 36 30 |,67......193,160|
000016A0: 2C 30 2C 35 36 2C 32 33 33 2C 31 32 38 00 C9 1E |,0,56,233,128...|
000016B0: BC 07 83 32 34 30 2C 31 35 2C 31 37 30 2C 31 36 |...240,15,170,16|
000016C0: 39 2C 32 35 35 2C 32 30 30 00 E3 1E C6 07 83 31 |9,255,200......1|
000016D0: 38 35 2C 31 35 38 2C 31 36 30 2C 34 38 2C 32 2C |85,158,160,48,2,|
000016E0: 32 30 38 00 00 1F D0 07 83 32 34 38 2C 32 30 32 |208......248,202|
000016F0: 2C 32 30 38 2C 32 34 35 2C 32 30 30 2C 31 38 35 |,208,245,200,185|
00001700: 00 19 1F DA 07 83 31 35 38 2C 31 36 30 2C 34 38 |......158,160,48|
00001710: 2C 36 2C 33 32 2C 32 31 30 00 35 1F E4 07 83 32 |,6,32,210.5....2|
00001720: 35 35 2C 32 30 30 2C 32 30 38 2C 32 34 35 2C 35 |55,200,208,245,5|
00001730: 36 2C 32 33 33 00 4F 1F EE 07 83 31 32 38 2C 37 |6,233.O....128,7|
00001740: 36 2C 32 31 30 2C 32 35 35 2C 31 36 39 2C 32 00 |6,210,255,169,2.|
00001750: 69 1F F8 07 83 31 33 33 2C 32 35 33 2C 33 32 2C |i....133,253,32,|
00001760: 37 35 2C 31 39 33 2C 33 32 00 85 1F 02 08 83 32 |75,193,32......2|
00001770: 30 37 2C 32 35 35 2C 31 37 30 2C 33 32 2C 31 38 |07,255,170,32,18|
00001780: 33 2C 32 35 35 00 9E 1F 0C 08 83 32 34 30 2C 33 |3,255......240,3|
00001790: 2C 37 36 2C 36 37 2C 31 39 33 2C 31 33 38 00 B9 |,76,67,193,138..|
000017A0: 1F 16 08 83 33 32 2C 32 31 30 2C 32 35 35 2C 33 |....32,210,255,3|
000017B0: 32 2C 32 32 35 2C 32 35 35 00 D2 1F 20 08 83 32 |2,225,255... ..2|
000017C0: 30 38 2C 33 2C 37 36 2C 36 37 2C 31 39 33 2C 32 |08,3,76,67,193,2|
000017D0: 30 31 00 EF 1F 2A 08 83 32 33 39 2C 32 30 38 2C |01...*..239,208,|
000017E0: 32 32 38 2C 32 34 30 2C 32 34 32 2C 31 37 33 00 |228,240,242,173.|
000017F0: 09 20 34 08 83 39 2C 31 39 32 2C 33 32 2C 31 38 |. 4..9,192,32,18|
00001800: 30 2C 32 35 35 2C 31 36 39 00 23 20 3E 08 83 31 |0,255,169.# >..1|
00001810: 31 31 2C 33 32 2C 31 35 30 2C 32 35 35 2C 31 36 |11,32,150,255,16|
00001820: 39 2C 30 00 3E 20 48 08 83 31 33 33 2C 31 34 34 |9,0.> H..133,144|
00001830: 2C 33 32 2C 31 36 35 2C 32 35 35 2C 33 32 00 5A |,32,165,255,32.Z|
00001840: 20 52 08 83 32 31 30 2C 32 35 35 2C 33 32 2C 31 | R..210,255,32,1|
00001850: 38 33 2C 32 35 35 2C 32 34 30 00 74 20 5C 08 83 |83,255,240.t \..|
00001860: 32 34 35 2C 37 36 2C 31 37 31 2C 32 35 35 2C 31 |245,76,171,255,1|
00001870: 37 33 2C 39 00 90 20 66 08 83 31 39 32 2C 33 32 |73,9.. f..192,32|
00001880: 2C 31 38 30 2C 32 35 35 2C 31 36 39 2C 31 31 31 |,180,255,169,111|
00001890: 00 AA 20 70 08 83 33 32 2C 31 35 30 2C 32 35 35 |.. p..32,150,255|
000018A0: 2C 31 36 39 2C 30 2C 31 33 33 00 C6 20 7A 08 83 |,169,0,133.. z..|
000018B0: 31 34 34 2C 31 36 38 2C 33 32 2C 31 36 35 2C 32 |144,168,32,165,2|
000018C0: 35 35 2C 31 35 33 00 E1 20 84 08 83 31 32 2C 31 |55,153.. ...12,1|
000018D0: 39 32 2C 32 30 30 2C 33 32 2C 31 38 33 2C 32 35 |92,200,32,183,25|
000018E0: 35 00 FB 20 8E 08 83 32 30 38 2C 34 2C 31 39 32 |5.. ...208,4,192|
000018F0: 2C 34 30 2C 32 30 38 2C 32 34 30 00 16 21 98 08 |,40,208,240..!..|
00001900: 83 33 32 2C 31 37 31 2C 32 35 35 2C 31 33 36 2C |.32,171,255,136,|
00001910: 31 35 32 2C 37 32 00 2E 21 A2 08 83 37 32 2C 33 |152,72..!...72,3|
00001920: 32 2C 31 31 35 2C 30 2C 33 32 2C 31 33 39 00 48 |2,115,0,32,139.H|
00001930: 21 AC 08 83 31 37 36 2C 31 33 33 2C 37 33 2C 31 |!...176,133,73,1|
00001940: 33 32 2C 37 34 2C 33 32 00 64 21 B6 08 83 31 36 |32,74,32.d!...16|
00001950: 33 2C 31 38 32 2C 31 30 34 2C 33 32 2C 31 31 37 |3,182,104,32,117|
00001960: 2C 31 38 30 00 7C 21 C0 08 83 31 36 30 2C 32 2C |,180.|!...160,2,|
00001970: 31 38 35 2C 39 37 2C 30 2C 31 34 35 00 97 21 CA |185,97,0,145..!.|
00001980: 08 83 37 33 2C 31 33 36 2C 31 36 2C 32 34 38 2C |..73,136,16,248,|
00001990: 32 30 30 2C 31 30 34 00 B2 21 D4 08 83 31 37 30 |200,104..!...170|
000019A0: 2C 31 38 35 2C 31 32 2C 31 39 32 2C 31 34 35 2C |,185,12,192,145,|
000019B0: 39 38 00 CA 21 DE 08 83 32 30 30 2C 32 30 32 2C |98..!...200,202,|
000019C0: 32 30 38 2C 32 34 37 2C 39 36 00 E4 21 C4 09 97 |208,247,96..!...|
000019D0: 35 33 32 38 31 2C 32 34 36 3A 97 35 33 32 38 30 |53281,246:.53280|
000019E0: 2C 32 35 34 00 06 22 CE 09 99 22 93 9A 4E 45 57 |,254.."..."..NEW|
000019F0: 20 44 49 53 4B 20 57 45 44 47 45 20 41 43 54 49 | DISK WEDGE ACTI|
00001A00: 56 41 54 45 44 22 00 0C 22 D8 09 A2 00 00 00 |VATED".."...... |
..S....X..........X`..-. PI.).. P @.P.JP
.L1. 2054 .2105 X.1........X`XXXXXXXXX
XXX.....A$(1)."NEW DISK WEDGE"
:A$(2)."BY BRIAN MUNSHAW".S...A
$(3)."THE TRANSACTOR": A$(4
)."PAGE 22".#...A$(5)."MAY 1985":
A$(6)."TYPED BY ALLEN SPOKANE
":.53272,23.J....53281,0:.53280,0:A$."..
........................................
."......I.1.23:A$.A$.".....":..N...A$.A$
."......................................
":.".":.X.1.6:.646,X.1......"..".20..(C(
A$(X)).2..5))A$(X):.:.646,3:.A$;:.214,21
:..M....2023,102:.56295,6:.". ..P
USH ANY KEY TO CONT..";:.2054.E....198,1
:.198,0:.2105......53272,21:.53281,1:.53
280,0:.".. INSTRUCTIONS".Q...
.".. THIS PROGRAM ADDS 8 NEW COMMAND
S......"TO REGULAR BASIC, IT OCCUPIES TH
E AREA.,...."OF MEMORY FROM $C000 TO $C2
C3, OR 49152.=...."TO 49858.".\...."..
.NEW COMMAND #1:".S....". \ [RETU
RN]......".(ABBREVIATION: NONE)"......"
. THIS COMMAND WILL DISPLAY THE DISK
......"STATUS OF THE DEFAULT DRIVE."....
.."...... .HIT ANY KEY TO CONTINUE
".#....A$:.A$."".21.E....". INSTR
UCTIONS-PG.2".D....".. .NEW COMMAND
#2:"......". \DEVICE,DEVICE# [RETURN
]"......".(ABBREVIATION: \DE,DEVICE#)".
.....". THIS COMMAND WILL ALLOW THE
USER......"TO SET A DEFAULT DEVICE. WHE
N THE.2...."UTILITY IS FIRST RUN, 8 IS T
HE DEFAULT._...."DEVICE NUMBER. THIS ME
ANS LOAD, SAVE,......"AND VERIFY USE THI
S NUMBER AS A DEFAULT......"NUMBER; IE.
YOU NEED NOT GIVE A DEVICE... .."NUMBER.
":."....... .HIT ANY KEY TO CONTINUE
":.198,0:.198,1.<.!..". INSTRUCTI
ONS-PG.3":.".. .NEW COMMAND #3:".^."
..". \DOS,STRING [RETURN]"...#..".(A
BBREVIATION: \DO,STRING)"...$..". T
HIS COMMAND SENDS THE STRING TO...%.."TH
E DEFAULT DRIVE, IF STRING WAS 'I',...&.
."THEN THE DRIVE WOULD BE INITIALIZED..%
.'..".. .NEW COMMAND #4:".I.(..".
\DSTATUS,VAR$ [RETURN]".K.)..".(ABBREV
IATION: \DS,VAR$)"...*..". THIS COM
MAND WILL STORE THE DEFAULT";...+.."DRIV
E'S STATUS IN VAR$."...,..". .HIT
ANY KEY TO CONTINUE":.198,0:.198,1...-.
.". INSTRUCTIONS-PG.4".C....".
.NEW COMMAND #5:":.". \KILL [RETUR
N]":.".(ABBREVIATION: \K)".../..".
THIS COMMAND DISENGAGES THE UTILITY";.E.
0.."AND IT CAN BE RE-ENGAGED WITH SYS 49
152."...1..". .NEW COMMAND #6:":.".
\LIST,"G(34)"$"G(34).-.2..".(ABBREVI
ATION: \LI,"G(34)"$"G(34)")".\.3..".
LISTS DIRECTORY TO SCREEN, DOESN'T...4
.."DISTURB PROGRAM IN MEMORY. HOLD SPAC
E...5.."BAR TO PAUSE. HIT RUN/STOP TO A
BORT."...6.."HOLD CTRL TO SLOW DOWN LIST
ING. YOU.,.7.."CAN USE STANDARD COMMODO
RE ABBREVIATIONSFOR A SELECTIVE DIRECTOR
Y.";.Q.8.." .HIT AN
Y KEY TO CONTINUE";:.198,0:.198,1...9..:
.". INSTRUCTIONS-PG.5"...:..".
.NEW COMMAND #7:"...;..". \LIST,"
G(34)"PROGRAM NAME"G(34)" [RETURN]".#.<.
.".(ABBREVIATION: \LI,"G(34)"PROGRAM NA
ME"G(34)")".J.=..". THIS COMMAND WIL
L LIST THE.U.>.."NAMED PROGRAM FROM THE
DEFAULT DRIVE. .?.."TO THE SCREEN WITHOU
T DISTURBING THE.I.@.."PROGRAM IN MEMORY
. HOLD THE SPACE...A.."BAR TO PAUSE LIS
TING. HOLD CTRL TO SLOW";.$.B.."LISTING
AND HIT RUN/STOP TO ABORT.".C.C.."..
.NEW COMMAND #8:".{.D..". \PRINT,"
G(34)"SEQ FILENAME"G(34)" [RETURN]"...E.
.".(ABBREVIATION: \?,"G(34)"SEQ FILENAM
E"G(34)")"...F..". SAME AS ABOVE BUT
LISTS A SEQ FILE.";...G.." .HIT ANY KEY
TO ACTIVATE NEW DISK WEDGE".-.H..198,0:
.198,1:.198,0.[.K.."....................
..........WAIT...."......* DATA LOADER F
OR "ERROR WEDGE" *...... VIC/64 VERSION.
...CS.0......I.49152.49858:.A:.I,A.J...
CS.CS.A:.I.P...:...$..CS..86308.."**** E
RROR IN DATA STATEMENTS****":.......4915
2...8.....B.:.8.L..76,52,192,139,227,165
.P.V..244,237,245,8,92,0.A.`..0,0,0,0,0,
0.R.J..0,0,0,0,0,0...T..0,0,0,0,0,0...~.
.0,0,0,0,0,0......0,0,0,0,0,0......0,0,0
,0,0,0.I....0,0,0,0,173,0......3,141,3,1
92,173,1......3,141,4,192,169,144......1
41,0,3,169,192,141.(.D..1,3,173,50,3,141
.@.N..7,192,173,51,3,141.Z.X..8,192,169,
119,141,50.R....3,169,192,141,51,3......
173,48,3,141,5,192......173,49,3,141,6,1
92......169,127,141,48,3,169.U....192,14
1,49,3,96,174......9,192,134,186,108,7..
....192,174,9,192,134,186.!.(..108,5,192
,32,115,0.<.2..32,158,173,76,163,182.T.<
..224,11,240,3,108,3.M.F..192,32,121,0,2
05,10...P..192,240,3,108,3,192...Z..104,
104,32,170,192,76...D..6,169,32,115,0,20
1.Q.N..0,240,6,201,58,240...X..2,208,6,3
2,45,193......76,87,194,201,68,208......
39,32,115,0,72,32.4....45,193,104,201,69
,208.L. ..7,32,241,183,142,9.E....192,96
,201,79,208,3.....76,99,193,201,83,240.
.....3,108,3,192,32,45...H..193,76,116,1
94,201,75.K.R..208,40,32,45,193,173.....
.3,192,141,0,3,173......4,192,141,1,3,17
3......7,192,141,50,3,173.)....8,192,141
,51,3,173.A....5,192,141,48,3,173.X....6
,192,141,49,3,96.Q....201,155,208,6,32,4
5..."..193,76,132,193,201,153...,..208,6
,32,45,193,76...6..50,194,162,11,108,3.V
.@..192,32,121,0,201,0...J..240,14,201,4
4,240,10...T..201,58,240,6,32,115. .^..0
,76,48,193,96,32.<.H..204,255,169,127,76
,195.W.R..255,32,135,192,32,189.T.|..255
,164,253,169,127,174......9,192,32,186,2
55,32......192,255,162,127,76,198.C....2
55,173,9,192,32,177......255,169,111,32,
147,255......32,135,192,134,253,132.....
.254,170,160,0,177,253.2.B..32,168,255,2
00,202,208.L.L..247,76,174,255,169,0.F.V
..133,253,32,75,193,32......207,255,32,2
07,255,169......0,141,11,192,169,13.....
.32,210,255,32,207,255.Q....32,207,255,3
2,207,255......133,253,32,207,255,133...
...254,32,183,255,240,3."....76,67,193,1
65,254,164.=.&..253,32,145,179,32,221.T.
0..189,160,1,185,0,1.N.:..240,6,32,210,2
55,200...D..208,245,169,32,32,210...N..2
55,32,225,255,240,52...X..201,239,240,24
7,32,207.Z.B..255,240,180,48,20,32...L..
210,255,201,34,208,233...V..238,11,192,1
73,11,192.)....41,1,141,11,192,16.C....2
20,174,11,192,240,6.^....32,210,255,76,2
07,193.Y....201,255,240,246,32,11......1
94,76,207,193,76,67......193,160,0,56,23
3,128.I....240,15,170,169,255,200...F..1
85,158,160,48,2,208...P..248,202,208,245
,200,185...Z..158,160,48,6,32,210.5....2
55,200,208,245,56,233.O....128,76,210,25
5,169,2.I....133,253,32,75,193,32......2
07,255,170,32,183,255......240,3,76,67,1
93,138......32,210,255,32,225,255.R. ..2
08,3,76,67,193,201...*..239,208,228,240,
242,173.. 4..9,192,32,180,255,169.# >..1
11,32,150,255,169,0.> H..133,144,32,165,
255,32.Z R..210,255,32,183,255,240.T \..
245,76,171,255,173,9.. F..192,32,180,255
,169,111.. P..32,150,255,169,0,133.F Z..
144,168,32,165,255,153.. ...12,192,200,3
2,183,255.. ...208,4,192,40,208,240..!..
.32,171,255,136,152,72..!...72,32,115,0,
32,139.H!...176,133,73,132,74,32.D!...16
3,182,104,32,117,180.|!...160,2,185,97,0
,145..!J..73,136,16,248,200,104..!T..170
,185,12,192,145,98.J!...200,202,208,247,
96..!D..53281,246:.53280,254.."N.."..NEW
DISK WEDGE ACTIVATED".."X.....
> CLICK IMAGE PREVIEW FOR FULL MODAL