> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 56 04 8F 20 20 20 20 20 20 20 57 52 |....V.. WR|
00000010: 49 54 54 45 4E 20 42 59 00 35 08 60 04 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 6A 04 99 22 93 22 00 61 |ISTER.>.j..".".a|
00000040: 08 74 04 99 22 20 20 20 20 20 20 20 20 20 20 20 |.t.." |
00000050: 50 45 52 46 4F 52 4D 41 4E 43 45 20 54 45 53 54 |PERFORMANCE TEST|
00000060: 22 00 6A 08 7E 04 99 22 20 22 00 96 08 88 04 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 92 04 99 22 41 4E 59 |LLOWS"......"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 9C 04 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 A6 |F THE DISK "....|
000000F0: 04 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 B0 04 99 22 55 53 45 20 54 48 49 53 20 50 52 |...."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 BA |OU SUSPECT ".j..|
00000140: 04 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 75 09 C4 04 8D |HE DRIVE.".u....|
00000170: 31 30 30 30 30 00 7E 09 CE 04 99 22 20 22 00 9B |10000.~...." "..|
00000180: 09 D8 04 99 22 20 20 20 20 20 20 20 53 45 51 2E |...." SEQ.|
00000190: 46 49 4C 45 2E 44 45 4D 4F 20 22 00 B8 09 E2 04 |FILE.DEMO ".....|
000001A0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 41 4E |." AN|
000001B0: 44 20 20 20 20 20 20 22 00 D5 09 EC 04 99 22 20 |D "......" |
000001C0: 20 20 20 20 20 20 52 45 4C 2E 46 49 4C 45 2E 44 | REL.FILE.D|
000001D0: 45 4D 4F 20 22 00 DE 09 F6 04 99 22 20 22 00 0D |EMO "......" "..|
000001E0: 0A 00 05 99 22 20 54 48 45 53 45 20 54 57 4F 20 |...." THESE TWO |
000001F0: 50 52 4F 47 52 41 4D 53 20 41 52 45 20 49 4E 43 |PROGRAMS ARE INC|
00000200: 4C 55 44 45 44 20 4F 4E 20 54 48 45 22 00 39 0A |LUDED ON THE".9.|
00000210: 0A 05 99 22 44 49 53 4B 20 41 53 20 50 52 4F 47 |..."DISK AS PROG|
00000220: 52 41 4D 4D 49 4E 47 20 45 58 41 4D 50 4C 45 53 |RAMMING EXAMPLES|
00000230: 20 41 4E 44 20 43 41 4E 22 00 64 0A 14 05 99 22 | AND CAN".d...."|
00000240: 42 45 20 55 53 45 44 20 41 53 20 47 55 49 44 45 |BE USED AS GUIDE|
00000250: 4C 49 4E 45 53 20 57 48 45 4E 20 57 52 49 54 49 |LINES WHEN WRITI|
00000260: 4E 47 20 22 00 8A 0A 1E 05 99 22 59 4F 55 52 20 |NG "......"YOUR |
00000270: 4F 57 4E 20 50 52 4F 47 52 41 4D 53 2E 20 20 54 |OWN PROGRAMS. T|
00000280: 48 45 59 20 41 4C 53 4F 20 22 00 B5 0A 28 05 99 |HEY ALSO "...(..|
00000290: 22 49 4C 4C 55 53 54 52 41 54 45 20 54 48 45 20 |"ILLUSTRATE THE |
000002A0: 49 4D 50 4F 52 54 41 4E 54 20 54 45 43 48 4E 49 |IMPORTANT TECHNI|
000002B0: 51 55 45 20 22 00 E0 0A 32 05 99 22 4F 46 20 43 |QUE "...2.."OF C|
000002C0: 48 45 43 4B 49 4E 47 20 84 48 45 20 45 52 52 4F |HECKING .HE ERRO|
000002D0: 52 20 43 48 41 4E 4E 45 4C 20 41 46 84 45 52 22 |R CHANNEL AF.ER"|
000002E0: 00 07 0B 3C 05 99 22 45 41 43 48 20 41 43 43 45 |...<.."EACH ACCE|
000002F0: 53 53 20 54 4F 20 54 48 45 20 44 49 53 4B 20 44 |SS TO THE DISK D|
00000300: 52 49 56 45 2E 20 22 00 33 0B 46 05 99 22 53 45 |RIVE. ".3.F.."SE|
00000310: 51 2E 46 49 4C 45 2E 44 45 4D 4F 20 41 4E 44 20 |Q.FILE.DEMO AND |
00000320: 52 45 4C 2E 46 49 4C 45 2E 44 45 4D 4F 20 42 4F |REL.FILE.DEMO BO|
00000330: 54 48 22 00 5D 0B 50 05 99 22 52 45 51 55 49 52 |TH".].P.."REQUIR|
00000340: 45 20 54 48 45 20 33 4B 20 45 58 50 41 4E 53 49 |E THE 3K EXPANSI|
00000350: 4F 4E 20 43 41 52 54 52 49 44 47 45 22 00 84 0B |ON CARTRIDGE"...|
00000360: 5A 05 99 22 54 4F 20 4C 4F 41 44 20 50 52 4F 50 |Z.."TO LOAD PROP|
00000370: 45 52 4C 59 20 4F 4E 20 54 48 45 20 56 49 43 2D |ERLY ON THE VIC-|
00000380: 32 30 20 22 00 A2 0B 64 05 99 22 42 45 43 41 55 |20 "...d.."BECAU|
00000390: 53 45 20 4F 46 20 54 48 45 49 52 20 53 49 5A 45 |SE OF THEIR SIZE|
000003A0: 2E 22 00 AD 0B 6E 05 8D 31 30 30 30 30 00 D1 0B |."...n..10000...|
000003B0: 78 05 99 22 20 20 20 20 20 53 44 2E 42 41 43 4B |x.." SD.BACK|
000003C0: 55 50 2E 2D 2D 2D 20 50 52 4F 47 52 41 4D 53 20 |UP.--- PROGRAMS |
000003D0: 22 00 DA 0B 82 05 99 22 20 22 00 08 0C 8C 05 99 |"......" "......|
000003E0: 22 54 48 45 53 45 20 50 52 4F 47 52 41 4D 53 20 |"THESE PROGRAMS |
000003F0: 41 52 45 20 44 45 53 49 47 4E 45 44 20 54 4F 20 |ARE DESIGNED TO |
00000400: 52 55 4E 20 4F 4E 20 22 00 34 0C 96 05 99 22 54 |RUN ON ".4...."T|
00000410: 48 45 20 49 4E 44 49 43 41 54 45 44 20 43 4F 4D |HE INDICATED COM|
00000420: 50 55 54 45 52 53 20 57 49 54 48 20 41 20 31 35 |PUTERS WITH A 15|
00000430: 34 31 20 22 00 5B 0C A0 05 99 22 44 49 53 4B 20 |41 ".[...."DISK |
00000440: 44 52 49 56 45 2E 20 20 54 48 45 59 20 41 4C 4C |DRIVE. THEY ALL|
00000450: 4F 57 20 42 41 43 4B 55 50 20 22 00 88 0C AA 05 |OW BACKUP ".....|
00000460: 99 22 44 49 53 4B 45 54 54 45 53 20 54 4F 20 42 |."DISKETTES TO B|
00000470: 45 20 43 52 45 41 54 45 44 20 4F 4E 20 41 20 53 |E CREATED ON A S|
00000480: 59 53 54 45 4D 20 20 22 00 B4 0C B4 05 99 22 57 |YSTEM "......"W|
00000490: 49 54 48 20 4F 4E 4C 59 20 41 20 53 49 4E 47 4C |ITH ONLY A SINGL|
000004A0: 45 20 31 35 34 31 20 44 49 53 4B 20 44 52 49 56 |E 1541 DISK DRIV|
000004B0: 45 2E 20 22 00 E0 0C BE 05 99 22 54 48 45 59 20 |E. "......"THEY |
000004C0: 57 4F 52 4B 20 42 59 20 46 49 52 53 54 20 52 45 |WORK BY FIRST RE|
000004D0: 41 44 49 4E 47 20 46 52 4F 4D 20 54 48 45 20 22 |ADING FROM THE "|
000004E0: 00 0C 0D C8 05 99 22 53 4F 55 52 43 45 20 44 49 |......"SOURCE DI|
000004F0: 53 4B 45 54 54 45 20 41 4E 44 20 54 48 45 4E 20 |SKETTE AND THEN |
00000500: 57 52 49 54 49 4E 47 20 54 4F 20 22 00 39 0D D2 |WRITING TO ".9..|
00000510: 05 99 22 54 48 45 20 44 45 53 54 49 4E 41 54 49 |.."THE DESTINATI|
00000520: 4F 4E 20 44 49 53 4B 45 54 54 45 20 49 4E 20 41 |ON DISKETTE IN A|
00000530: 20 53 45 52 49 45 53 20 22 00 56 0D DC 05 99 22 | SERIES ".V...."|
00000540: 4F 46 20 44 49 53 4B 45 54 54 45 20 27 53 57 41 |OF DISKETTE 'SWA|
00000550: 50 53 27 2E 20 22 00 61 0D E6 05 8D 31 30 30 30 |PS'. ".a....1000|
00000560: 30 00 80 0D F0 05 99 22 20 20 20 20 20 20 20 20 |0......" |
00000570: 50 52 49 4E 54 2E 2D 2D 2D 2E 55 54 49 4C 20 22 |PRINT.---.UTIL "|
00000580: 00 AC 0D FA 05 99 22 54 48 45 53 45 20 50 52 4F |......"THESE PRO|
00000590: 47 52 41 4D 53 20 41 4C 4C 4F 57 20 54 48 45 20 |GRAMS ALLOW THE |
000005A0: 55 53 45 52 20 54 4F 20 42 45 20 22 00 DA 0D 04 |USER TO BE "....|
000005B0: 06 99 22 41 42 4C 45 20 54 4F 20 47 45 4E 45 52 |.."ABLE TO GENER|
000005C0: 41 54 45 20 41 20 53 43 52 45 45 4E 20 50 52 49 |ATE A SCREEN PRI|
000005D0: 4E 54 20 41 4E 44 2F 4F 52 22 00 07 0E 0E 06 99 |NT AND/OR"......|
000005E0: 22 41 20 53 43 41 4C 41 52 20 56 41 52 49 41 42 |"A SCALAR VARIAB|
000005F0: 4C 45 20 44 55 4D 50 20 57 48 49 4C 45 20 41 20 |LE DUMP WHILE A |
00000600: 42 41 53 49 43 20 22 00 33 0E 18 06 99 22 50 52 |BASIC ".3...."PR|
00000610: 4F 47 52 41 4D 20 49 53 20 41 4C 53 4F 20 49 4E |OGRAM IS ALSO IN|
00000620: 20 4D 45 4D 4F 52 59 2E 20 20 54 48 45 20 54 57 | MEMORY. THE TW|
00000630: 4F 20 22 00 5F 0E 22 06 99 22 55 54 49 4C 49 54 |O "._.".."UTILIT|
00000640: 49 45 53 20 4D 41 59 20 42 45 20 55 53 45 44 20 |IES MAY BE USED |
00000650: 53 45 50 41 52 41 54 45 4C 59 20 4F 52 20 22 00 |SEPARATELY OR ".|
00000660: 8D 0E 2C 06 99 22 54 4F 47 45 54 48 45 52 20 41 |..,.."TOGETHER A|
00000670: 53 20 4D 41 59 20 42 45 20 4E 45 43 45 53 53 41 |S MAY BE NECESSA|
00000680: 52 59 20 54 4F 20 41 56 4F 49 44 20 22 00 BA 0E |RY TO AVOID "...|
00000690: 36 06 99 22 43 4F 4E 46 4C 49 43 54 20 57 49 54 |6.."CONFLICT WIT|
000006A0: 48 20 41 4E 59 20 4F 54 48 45 52 20 4D 41 43 48 |H ANY OTHER MACH|
000006B0: 49 4E 45 20 43 4F 44 45 20 22 00 CE 0E 40 06 99 |INE CODE "...@..|
000006C0: 22 49 4E 20 4D 45 4D 4F 52 59 2E 20 20 22 00 D9 |"IN MEMORY. "..|
000006D0: 0E 4A 06 8D 31 30 30 30 30 00 02 0F 54 06 99 22 |.J..10000...T.."|
000006E0: 11 20 50 52 45 53 53 20 52 45 54 55 52 4E 20 54 |. PRESS RETURN T|
000006F0: 4F 20 4C 4F 41 44 20 50 41 52 54 20 46 4F 55 52 |O LOAD PART FOUR|
00000700: 2E 22 00 2D 0F 5E 06 99 22 41 46 54 45 52 20 49 |.".-.^.."AFTER I|
00000710: 54 20 4C 4F 41 44 53 3B 20 54 59 50 45 20 27 52 |T LOADS; TYPE 'R|
00000720: 55 4E 27 20 26 20 52 45 54 55 52 4E 22 00 60 0F |UN' & RETURN".`.|
00000730: 68 06 99 22 11 11 11 4C 4F 41 44 22 AA C7 28 33 |h.."...LOAD"..(3|
00000740: 34 29 AA 22 48 4F 57 20 50 41 52 54 20 46 4F 55 |4)."HOW PART FOU|
00000750: 52 22 AA C7 28 33 34 29 AA 22 2C 38 91 91 91 22 |R"..(34).",8..."|
00000760: 00 66 0F 72 06 80 00 82 0F 10 27 99 22 20 3C 3C |.f.r......'." <<|
00000770: 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 3E |PRESS SPACE BAR>|
00000780: 3E 22 00 97 0F 1A 27 A1 41 24 3A 8B 41 24 B2 22 |>"....'.A$:.A$."|
00000790: 22 A7 31 30 30 31 30 00 A3 0F 24 27 99 22 93 22 |".10010...$'."."|
000007A0: 3B 3A 8E 00 00 00 |;:.... |
....V.. WRITTEN BY.5.`.. PATRI
CK MCALLISTER.>.J..".".A.T.."
PERFORMANCE TEST".J.~.." "......" THE PE
RFORMANCE TEST PROGRAM ALLOWS"......"ANY
ONE TO TEST THE ELECTRONIC AND "......"M
ECHANICAL CAPABILITIES OF THE DISK "....
.."DRIVE WHENEVER NECESSARY. ".<...."USE
THIS PROGRAM WHENEVER YOU SUSPECT ".J..
.."THAT THERE MAY BE DAMAGE TO THE DRIVE
.".U.D..10000.~.N.." "...X.." SEQ.
FILE.DEMO "......" AND "
.U...." REL.FILE.DEMO "......" "..
...." THESE TWO PROGRAMS ARE INCLUDED ON
THE".9...."DISK AS PROGRAMMING EXAMPLES
AND CAN".D...."BE USED AS GUIDELINES WH
EN WRITING "......"YOUR OWN PROGRAMS. T
HEY ALSO "...(.."ILLUSTRATE THE IMPORTAN
T TECHNIQUE "...2.."OF CHECKING .HE ERRO
R CHANNEL AF.ER"...<.."EACH ACCESS TO TH
E DISK DRIVE. ".3.F.."SEQ.FILE.DEMO AND
REL.FILE.DEMO BOTH".].P.."REQUIRE THE 3K
EXPANSION CARTRIDGE"...Z.."TO LOAD PROP
ERLY ON THE VIC-20 "...D.."BECAUSE OF TH
EIR SIZE."...N..10000.Q.X.." SD.BACK
UP.--- PROGRAMS ".Z...." "......"THESE P
ROGRAMS ARE DESIGNED TO RUN ON ".4...."T
HE INDICATED COMPUTERS WITH A 1541 ".[.
.."DISK DRIVE. THEY ALLOW BACKUP ".....
."DISKETTES TO BE CREATED ON A SYSTEM "
......"WITH ONLY A SINGLE 1541 DISK DRIV
E. "......"THEY WORK BY FIRST READING FR
OM THE "...H.."SOURCE DISKETTE AND THEN
WRITING TO ".9.R.."THE DESTINATION DISKE
TTE IN A SERIES ".V...."OF DISKETTE 'SWA
PS'. ".A....10000......" PRINT.--
-.UTIL "......"THESE PROGRAMS ALLOW THE
USER TO BE ".Z...."ABLE TO GENERATE A SC
REEN PRINT AND/OR"......"A SCALAR VARIAB
LE DUMP WHILE A BASIC ".3...."PROGRAM IS
ALSO IN MEMORY. THE TWO "._.".."UTILIT
IES MAY BE USED SEPARATELY OR "...,.."TO
GETHER AS MAY BE NECESSARY TO AVOID "...
6.."CONFLICT WITH ANY OTHER MACHINE CODE
".N.@.."IN MEMORY. ".Y.J..10000...T.."
. PRESS RETURN TO LOAD PART FOUR.".-.^..
"AFTER IT LOADS; TYPE 'RUN' & RETURN".`.
H.."...LOAD".G(34)."HOW PART FOUR".G(34)
.",8...".F.R......'." <<PRESS SPACE BAR>
>"....'.A$:.A$."".10010...$'.".";:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL