> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 0A 03 8F 20 20 20 20 20 20 20 57 52 |....... WR|
00000010: 49 54 54 45 4E 20 42 59 00 35 08 0B 03 8F 20 20 |ITTEN BY.5.... |
00000020: 20 20 20 50 41 54 52 49 43 4B 20 4D 43 41 4C 4C | PATRICK MCALL|
00000030: 49 53 54 45 52 00 3E 08 0C 03 99 22 93 22 00 61 |ISTER.>....".".a|
00000040: 08 16 03 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000050: 50 45 52 46 4F 52 4D 41 4E 43 45 20 54 45 53 54 |PERFORMANCE TEST|
00000060: 22 00 6A 08 20 03 99 22 20 22 00 96 08 2A 03 99 |".j. .." "...*..|
00000070: 22 20 54 48 45 20 50 45 52 46 4F 52 4D 41 4E 43 |" THE PERFORMANC|
00000080: 45 20 54 45 53 54 20 50 52 4F 47 52 41 4D 20 41 |E TEST PROGRAM A|
00000090: 4C 4C 4F 57 53 22 00 C0 08 34 03 99 22 41 4E 59 |LLOWS"...4.."ANY|
000000A0: 4F 4E 45 20 54 4F 20 54 45 53 54 20 54 48 45 20 |ONE TO TEST THE |
000000B0: 45 4C 45 43 54 52 4F 4E 49 43 20 41 4E 44 20 22 |ELECTRONIC AND "|
000000C0: 00 EC 08 3E 03 99 22 4D 45 43 48 41 4E 49 43 41 |...>.."MECHANICA|
000000D0: 4C 20 43 41 50 41 42 49 4C 49 54 49 45 53 20 4F |L CAPABILITIES O|
000000E0: 46 20 54 48 45 20 44 49 53 4B 20 22 00 0E 09 48 |F THE DISK "...H|
000000F0: 03 99 22 44 52 49 56 45 20 57 48 45 4E 45 56 45 |.."DRIVE WHENEVE|
00000100: 52 20 4E 45 43 45 53 53 41 52 59 2E 20 22 00 3C |R NECESSARY. ".<|
00000110: 09 52 03 99 22 55 53 45 20 54 48 49 53 20 50 52 |.R.."USE THIS PR|
00000120: 4F 47 52 41 4D 20 57 48 45 4E 45 56 45 52 20 59 |OGRAM WHENEVER Y|
00000130: 4F 55 20 53 55 53 50 45 43 54 20 22 00 6A 09 5C |OU SUSPECT ".j.\|
00000140: 03 99 22 54 48 41 54 20 54 48 45 52 45 20 4D 41 |.."THAT THERE MA|
00000150: 59 20 42 45 20 44 41 4D 41 47 45 20 54 4F 20 54 |Y BE DAMAGE TO T|
00000160: 48 45 20 44 52 49 56 45 2E 22 00 74 09 61 03 8D |HE DRIVE.".t.a..|
00000170: 39 30 30 30 00 7D 09 66 03 99 22 20 22 00 9A 09 |9000.}.f.." "...|
00000180: 70 03 99 22 20 20 20 20 20 20 20 53 45 51 2E 46 |p.." SEQ.F|
00000190: 49 4C 45 2E 44 45 4D 4F 20 22 00 B7 09 7A 03 99 |ILE.DEMO "...z..|
000001A0: 22 20 20 20 20 20 20 20 20 20 20 20 20 41 4E 44 |" AND|
000001B0: 20 20 20 20 20 20 22 00 D4 09 84 03 99 22 20 20 | "......" |
000001C0: 20 20 20 20 20 52 45 4C 2E 46 49 4C 45 2E 44 45 | REL.FILE.DE|
000001D0: 4D 4F 20 22 00 DD 09 8E 03 99 22 20 22 00 0C 0A |MO "......" "...|
000001E0: 98 03 99 22 20 54 48 45 53 45 20 54 57 4F 20 50 |..." THESE TWO P|
000001F0: 52 4F 47 52 41 4D 53 20 41 52 45 20 49 4E 43 4C |ROGRAMS ARE INCL|
00000200: 55 44 45 44 20 4F 4E 20 54 48 45 22 00 38 0A A2 |UDED ON THE".8..|
00000210: 03 99 22 44 49 53 4B 20 41 53 20 50 52 4F 47 52 |.."DISK AS PROGR|
00000220: 41 4D 4D 49 4E 47 20 45 58 41 4D 50 4C 45 53 20 |AMMING EXAMPLES |
00000230: 41 4E 44 20 43 41 4E 22 00 63 0A AC 03 99 22 42 |AND CAN".c...."B|
00000240: 45 20 55 53 45 44 20 41 53 20 47 55 49 44 45 4C |E USED AS GUIDEL|
00000250: 49 4E 45 53 20 57 48 45 4E 20 57 52 49 54 49 4E |INES WHEN WRITIN|
00000260: 47 20 22 00 89 0A B6 03 99 22 59 4F 55 52 20 4F |G "......"YOUR O|
00000270: 57 4E 20 50 52 4F 47 52 41 4D 53 2E 20 20 54 48 |WN PROGRAMS. TH|
00000280: 45 59 20 41 4C 53 4F 20 22 00 B4 0A C0 03 99 22 |EY ALSO "......"|
00000290: 49 4C 4C 55 53 54 52 41 54 45 20 54 48 45 20 49 |ILLUSTRATE THE I|
000002A0: 4D 50 4F 52 54 41 4E 54 20 54 45 43 48 4E 49 51 |MPORTANT TECHNIQ|
000002B0: 55 45 20 22 00 DF 0A CA 03 99 22 4F 46 20 43 48 |UE "......"OF CH|
000002C0: 45 43 4B 49 4E 47 20 54 48 45 20 45 52 52 4F 52 |ECKING THE ERROR|
000002D0: 20 43 48 41 4E 4E 45 4C 20 41 46 54 45 52 22 00 | CHANNEL AFTER".|
000002E0: 06 0B D4 03 99 22 45 41 43 48 20 41 43 43 45 53 |....."EACH ACCES|
000002F0: 53 20 54 4F 20 54 48 45 20 44 49 53 4B 20 44 52 |S TO THE DISK DR|
00000300: 49 56 45 2E 20 22 00 32 0B E8 03 99 22 53 45 51 |IVE. ".2...."SEQ|
00000310: 2E 46 49 4C 45 2E 44 45 4D 4F 20 41 4E 44 20 52 |.FILE.DEMO AND R|
00000320: 45 4C 2E 46 49 4C 45 2E 44 45 4D 4F 20 42 4F 54 |EL.FILE.DEMO BOT|
00000330: 48 22 00 5C 0B F2 03 99 22 52 45 51 55 49 52 45 |H".\...."REQUIRE|
00000340: 20 54 48 45 20 33 4B 20 45 58 50 41 4E 53 49 4F | THE 3K EXPANSIO|
00000350: 4E 20 43 41 52 54 52 49 44 47 45 22 00 83 0B FC |N CARTRIDGE"....|
00000360: 03 99 22 54 4F 20 4C 4F 41 44 20 50 52 4F 50 45 |.."TO LOAD PROPE|
00000370: 52 4C 59 20 4F 4E 20 54 48 45 20 56 49 43 2D 32 |RLY ON THE VIC-2|
00000380: 30 20 22 00 A1 0B 06 04 99 22 42 45 43 41 55 53 |0 "......"BECAUS|
00000390: 45 20 4F 46 20 54 48 45 49 52 20 53 49 5A 45 2E |E OF THEIR SIZE.|
000003A0: 22 00 AB 0B 2E 04 8D 39 30 30 30 00 CF 0B D0 07 |"......9000.....|
000003B0: 99 22 20 20 20 20 20 53 44 2E 42 41 43 4B 55 50 |." SD.BACKUP|
000003C0: 2E 2D 2D 2D 20 50 52 4F 47 52 41 4D 53 20 22 00 |.--- PROGRAMS ".|
000003D0: D8 0B DA 07 99 22 20 22 00 06 0C E4 07 99 22 54 |....." "......"T|
000003E0: 48 45 53 45 20 50 52 4F 47 52 41 4D 53 20 41 52 |HESE PROGRAMS AR|
000003F0: 45 20 44 45 53 49 47 4E 45 44 20 54 4F 20 52 55 |E DESIGNED TO RU|
00000400: 4E 20 4F 4E 20 22 00 32 0C EE 07 99 22 54 48 45 |N ON ".2...."THE|
00000410: 20 49 4E 44 49 43 41 54 45 44 20 43 4F 4D 50 55 | INDICATED COMPU|
00000420: 54 45 52 53 20 57 49 54 48 20 41 20 31 35 34 31 |TERS WITH A 1541|
00000430: 20 22 00 59 0C F8 07 99 22 44 49 53 4B 20 44 52 | ".Y...."DISK DR|
00000440: 49 56 45 2E 20 20 54 48 45 59 20 41 4C 4C 4F 57 |IVE. THEY ALLOW|
00000450: 20 42 41 43 4B 55 50 20 22 00 86 0C 02 08 99 22 | BACKUP "......"|
00000460: 44 49 53 4B 45 54 54 45 53 20 54 4F 20 42 45 20 |DISKETTES TO BE |
00000470: 43 52 45 41 54 45 44 20 4F 4E 20 41 20 53 59 53 |CREATED ON A SYS|
00000480: 54 45 4D 20 20 22 00 B2 0C 0C 08 99 22 57 49 54 |TEM "......"WIT|
00000490: 48 20 4F 4E 4C 59 20 41 20 53 49 4E 47 4C 45 20 |H ONLY A SINGLE |
000004A0: 31 35 34 31 20 44 49 53 4B 20 44 52 49 56 45 2E |1541 DISK DRIVE.|
000004B0: 20 22 00 DE 0C 16 08 99 22 54 48 45 59 20 57 4F | "......"THEY WO|
000004C0: 52 4B 20 42 59 20 46 49 52 53 54 20 52 45 41 44 |RK BY FIRST READ|
000004D0: 49 4E 47 20 46 52 4F 4D 20 54 48 45 20 22 00 0A |ING FROM THE "..|
000004E0: 0D 20 08 99 22 53 4F 55 52 43 45 20 44 49 53 4B |. .."SOURCE DISK|
000004F0: 45 54 54 45 20 41 4E 44 20 54 48 45 4E 20 57 52 |ETTE AND THEN WR|
00000500: 49 54 49 4E 47 20 54 4F 20 22 00 37 0D 2A 08 99 |ITING TO ".7.*..|
00000510: 22 54 48 45 20 44 45 53 54 49 4E 41 54 49 4F 4E |"THE DESTINATION|
00000520: 20 44 49 53 4B 45 54 54 45 20 49 4E 20 41 20 53 | DISKETTE IN A S|
00000530: 45 52 49 45 53 20 22 00 54 0D B8 0B 99 22 4F 46 |ERIES ".T...."OF|
00000540: 20 44 49 53 4B 45 54 54 45 20 27 53 57 41 50 53 | DISKETTE 'SWAPS|
00000550: 27 2E 20 22 00 5E 0D CC 0B 8D 39 30 30 30 00 7D |'. ".^....9000.}|
00000560: 0D D6 0B 99 22 20 20 20 20 20 20 20 20 50 52 49 |...." PRI|
00000570: 4E 54 2E 2D 2D 2D 2E 55 54 49 4C 20 22 00 A9 0D |NT.---.UTIL "...|
00000580: E0 0B 99 22 54 48 45 53 45 20 50 52 4F 47 52 41 |..."THESE PROGRA|
00000590: 4D 53 20 41 4C 4C 4F 57 20 54 48 45 20 55 53 45 |MS ALLOW THE USE|
000005A0: 52 20 54 4F 20 42 45 20 22 00 D7 0D EA 0B 99 22 |R TO BE "......"|
000005B0: 41 42 4C 45 20 54 4F 20 47 45 4E 45 52 41 54 45 |ABLE TO GENERATE|
000005C0: 20 41 20 53 43 52 45 45 4E 20 50 52 49 4E 54 20 | A SCREEN PRINT |
000005D0: 41 4E 44 2F 4F 52 22 00 04 0E F4 0B 99 22 41 20 |AND/OR"......"A |
000005E0: 53 43 41 4C 41 52 20 56 41 52 49 41 42 4C 45 20 |SCALAR VARIABLE |
000005F0: 44 55 4D 50 20 57 48 49 4C 45 20 41 20 42 41 53 |DUMP WHILE A BAS|
00000600: 49 43 20 22 00 30 0E FE 0B 99 22 50 52 4F 47 52 |IC ".0...."PROGR|
00000610: 41 4D 20 49 53 20 41 4C 53 4F 20 49 4E 20 4D 45 |AM IS ALSO IN ME|
00000620: 4D 4F 52 59 2E 20 20 54 48 45 20 54 57 4F 20 22 |MORY. THE TWO "|
00000630: 00 5C 0E 08 0C 99 22 55 54 49 4C 49 54 49 45 53 |.\...."UTILITIES|
00000640: 20 4D 41 59 20 42 45 20 55 53 45 44 20 53 45 50 | MAY BE USED SEP|
00000650: 41 52 41 54 45 4C 59 20 4F 52 20 22 00 8A 0E 12 |ARATELY OR "....|
00000660: 0C 99 22 54 4F 47 45 54 48 45 52 20 41 53 20 4D |.."TOGETHER AS M|
00000670: 41 59 20 42 45 20 4E 45 43 45 53 53 41 52 59 20 |AY BE NECESSARY |
00000680: 54 4F 20 41 56 4F 49 44 20 22 00 B7 0E A0 0F 99 |TO AVOID "......|
00000690: 22 43 4F 4E 46 4C 49 43 54 20 57 49 54 48 20 41 |"CONFLICT WITH A|
000006A0: 4E 59 20 4F 54 48 45 52 20 4D 41 43 48 49 4E 45 |NY OTHER MACHINE|
000006B0: 20 43 4F 44 45 20 22 00 CB 0E AA 0F 99 22 49 4E | CODE "......"IN|
000006C0: 20 4D 45 4D 4F 52 59 2E 20 20 22 00 D5 0E 40 1F | MEMORY. "...@.|
000006D0: 8D 39 30 30 30 00 FF 0E C4 22 99 22 11 20 50 52 |.9000....".". PR|
000006E0: 45 53 53 20 52 45 54 55 52 4E 20 54 4F 20 4C 4F |ESS RETURN TO LO|
000006F0: 41 44 20 50 41 52 54 20 54 48 52 45 45 2E 22 00 |AD PART THREE.".|
00000700: 2A 0F CE 22 99 22 41 46 54 45 52 20 49 54 20 4C |*.."."AFTER IT L|
00000710: 4F 41 44 53 3B 20 54 59 50 45 20 27 52 55 4E 27 |OADS; TYPE 'RUN'|
00000720: 20 26 20 52 45 54 55 52 4E 22 00 5E 0F D8 22 99 | & RETURN".^..".|
00000730: 22 11 11 11 4C 4F 41 44 22 AA C7 28 33 34 29 AA |"...LOAD"..(34).|
00000740: 22 48 4F 57 20 50 41 52 54 20 54 48 52 45 45 22 |"HOW PART THREE"|
00000750: AA C7 28 33 34 29 AA 22 2C 38 91 91 91 22 00 64 |..(34).",8...".d|
00000760: 0F E2 22 80 00 80 0F 28 23 99 22 20 3C 3C 50 52 |.."....(#." <<PR|
00000770: 45 53 53 20 53 50 41 43 45 20 42 41 52 3E 3E 22 |ESS SPACE BAR>>"|
00000780: 00 94 0F 32 23 A1 41 24 3A 8B 41 24 B2 22 22 A7 |...2#.A$:.A$."".|
00000790: 39 30 31 30 00 A0 0F 3C 23 99 22 93 22 3B 3A 8E |9010...<#.".";:.|
000007A0: 00 00 00 |... |
....... WRITTEN BY.5.... PATRI
CK MCALLISTER.>....".".A...."
PERFORMANCE TEST".J. .." "...*.." THE PE
RFORMANCE TEST PROGRAM ALLOWS"...4.."ANY
ONE TO TEST THE ELECTRONIC AND "...>.."M
ECHANICAL CAPABILITIES OF THE DISK "...H
.."DRIVE WHENEVER NECESSARY. ".<.R.."USE
THIS PROGRAM WHENEVER YOU SUSPECT ".J.\
.."THAT THERE MAY BE DAMAGE TO THE DRIVE
.".T.A..9000.}.F.." "...P.." SEQ.F
ILE.DEMO "...Z.." AND ".
T...." REL.FILE.DEMO "......" "...
..." THESE TWO PROGRAMS ARE INCLUDED ON
THE".8...."DISK AS PROGRAMMING EXAMPLES
AND CAN".C...."BE USED AS GUIDELINES WHE
N WRITING "......"YOUR OWN PROGRAMS. TH
EY ALSO "......"ILLUSTRATE THE IMPORTANT
TECHNIQUE "...J.."OF CHECKING THE ERROR
CHANNEL AFTER"...T.."EACH ACCESS TO THE
DISK DRIVE. ".2...."SEQ.FILE.DEMO AND R
EL.FILE.DEMO BOTH".\...."REQUIRE THE 3K
EXPANSION CARTRIDGE"......"TO LOAD PROPE
RLY ON THE VIC-20 "......"BECAUSE OF THE
IR SIZE."......9000.O.P.." SD.BACKUP
.--- PROGRAMS ".X.Z.." "......"THESE PRO
GRAMS ARE DESIGNED TO RUN ON ".2...."THE
INDICATED COMPUTERS WITH A 1541 ".Y....
"DISK DRIVE. THEY ALLOW BACKUP "......"
DISKETTES TO BE CREATED ON A SYSTEM "..
...."WITH ONLY A SINGLE 1541 DISK DRIVE.
"......"THEY WORK BY FIRST READING FROM
THE "... .."SOURCE DISKETTE AND THEN WR
ITING TO ".7.*.."THE DESTINATION DISKETT
E IN A SERIES ".T...."OF DISKETTE 'SWAPS
'. ".^.L..9000.}.V.." PRINT.---.U
TIL "......"THESE PROGRAMS ALLOW THE USE
R TO BE ".W...."ABLE TO GENERATE A SCREE
N PRINT AND/OR"......"A SCALAR VARIABLE
DUMP WHILE A BASIC ".0...."PROGRAM IS AL
SO IN MEMORY. THE TWO ".\...."UTILITIES
MAY BE USED SEPARATELY OR "......"TOGET
HER AS MAY BE NECESSARY TO AVOID "... ..
"CONFLICT WITH ANY OTHER MACHINE CODE ".
K...."IN MEMORY. ".U.@..9000...D".". PR
ESS RETURN TO LOAD PART THREE.".*.N"."AF
TER IT LOADS; TYPE 'RUN' & RETURN".^.X".
"...LOAD".G(34)."HOW PART THREE".G(34)."
,8...".D.."....(#." <<PRESS SPACE BAR>>"
...2#.A$:.A$."".9010. .<#.".";:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL