FILING 2
FILE INFORMATION
FILENAME(S): FILING 2
FILE TYPE(S): PRG
FILE SIZE: 6.8K
FIRST SEEN: 2025-11-30 21:07:03
APPEARS ON: 1 disk(s)
FILE HASH
1006717d34296c2590d9d9ab7fa9ea8cc95f1f4379d1932e9ba9b37f43d1eb03
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITY PET 04 | FILING 2 | PRG | DuncanTwain | 33 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 11 04 64 00 9C 3A 97 35 39 34 36 38 2C 31 |....d..:.59468,1| 00000010: 34 00 5B 04 6E 00 99 22 93 D7 49 54 48 A0 54 48 |4.[.n.."..ITH.TH| 00000020: 45 A0 48 4F 50 45 A0 54 48 41 54 A0 54 48 45 A0 |E.HOPE.THAT.THE.| 00000030: 53 48 4F 52 54 20 42 52 45 41 4B A0 57 41 53 A0 |SHORT BREAK.WAS.| 00000040: 20 57 45 4C 43 4F 4D 45 2C 20 4C 45 54 27 53 A0 | WELCOME, LET'S.| 00000050: 43 4F 4E 54 49 4E 55 45 A0 22 3B 00 8E 04 78 00 |CONTINUE.";...x.| 00000060: 99 22 57 49 54 48 20 54 48 49 53 20 D0 45 54 2D |."WITH THIS .ET-| 00000070: 20 20 53 4F 46 54 A0 D4 55 54 4F 52 49 41 4C 2E | SOFT..UTORIAL.| 00000080: 22 3A 99 22 11 D9 4F 55 27 4C 4C A0 22 3B 00 DA |":."..OU'LL.";..| 00000090: 04 82 00 99 22 52 45 4D 45 4D 42 45 52 A0 54 48 |...."REMEMBER.TH| 000000A0: 41 54 A0 57 45 A0 57 45 52 45 20 45 58 41 4D 49 |AT.WE.WERE EXAMI| 000000B0: 4E 49 4E 47 A0 20 54 48 45 A0 56 41 52 49 4F 55 |NING. THE.VARIOU| 000000C0: 53 A0 53 54 41 54 45 4D 45 4E 54 53 A0 57 49 54 |S.STATEMENTS.WIT| 000000D0: 48 A0 57 48 49 43 48 A0 22 3B 00 26 05 8C 00 99 |H.WHICH.";.&....| 000000E0: 22 59 4F 55 A0 20 20 4E 45 45 44 A0 54 4F A0 42 |"YOU. NEED.TO.B| 000000F0: 45 A0 46 41 4D 49 4C 49 41 52 2C 20 41 4E 44 A0 |E.FAMILIAR, AND.| 00000100: 57 45 A0 48 41 44 A0 4A 55 53 54 A0 20 20 20 4C |WE.HAD.JUST. L| 00000110: 4F 4F 4B 45 44 A0 41 54 A0 D0 D2 C9 CE D4 23 20 |OOKED.AT......# | 00000120: 2D 20 41 20 22 3B 00 66 05 96 00 99 22 53 54 41 |- A ";.f...."STA| 00000130: 54 45 4D 45 4E 54 A0 57 48 49 43 48 A0 20 20 20 |TEMENT.WHICH. | 00000140: 50 52 49 4E 54 53 A0 44 41 54 41 A0 4F 4E A0 54 |PRINTS.DATA.ON.T| 00000150: 4F A0 54 41 50 45 2C 20 52 41 54 48 45 52 A0 54 |O.TAPE, RATHER.T| 00000160: 48 41 4E 20 22 3B 00 A3 05 A0 00 99 22 54 48 45 |HAN ";......"THE| 00000170: A0 44 49 53 50 4C 41 59 2E 22 3A 99 22 11 D4 48 |.DISPLAY.":."..H| 00000180: 45 A0 4E 45 58 54 A0 49 4E 53 54 52 55 43 54 49 |E.NEXT.INSTRUCTI| 00000190: 4F 4E A0 57 45 A0 4D 55 53 54 A0 4C 45 41 52 4E |ON.WE.MUST.LEARN| 000001A0: 20 22 3B 00 EE 05 AA 00 99 22 49 53 A0 20 20 C7 | ";......"IS. .| 000001B0: C5 D4 23 20 28 44 4F 4E 27 54 A0 46 4F 52 47 45 |..# (DON'T.FORGE| 000001C0: 54 A0 54 48 45 20 23 29 2E 20 C7 C5 D4 23 20 57 |T.THE #). ...# W| 000001D0: 49 4C 4C 20 20 20 20 43 41 55 53 45 A0 31 20 43 |ILL CAUSE.1 C| 000001E0: 48 41 52 41 43 54 45 52 A0 41 54 20 22 3B 00 36 |HARACTER.AT ";.6| 000001F0: 06 B4 00 99 22 41 A0 54 49 4D 45 A0 54 4F A0 42 |...."A.TIME.TO.B| 00000200: 45 A0 52 45 41 44 A0 20 46 52 4F 4D A0 41 A0 44 |E.READ. FROM.A.D| 00000210: 41 54 41 A0 54 41 50 45 2E 20 D4 48 45 52 45 A0 |ATA.TAPE. .HERE.| 00000220: 49 53 A0 4E 4F A0 4C 49 4D 49 54 A0 54 4F A0 20 |IS.NO.LIMIT.TO. | 00000230: 54 48 45 20 22 3B 00 81 06 BE 00 99 22 4E 55 4D |THE ";......"NUM| 00000240: 42 45 52 A0 4F 46 A0 43 48 41 52 41 43 54 45 52 |BER.OF.CHARACTER| 00000250: 53 A0 57 48 49 43 48 A0 43 41 4E A0 42 45 A0 20 |S.WHICH.CAN.BE. | 00000260: 20 27 47 4F 54 27 20 49 4E A0 54 48 49 53 A0 57 | 'GOT' IN.THIS.W| 00000270: 41 59 A0 28 55 4E 4C 49 4B 45 A0 54 48 45 20 22 |AY.(UNLIKE.THE "| 00000280: 3B 00 AD 06 C8 00 99 22 27 37 39 20 4C 49 4D 49 |;......"'79 LIMI| 00000290: 54 27 46 4F 52 A0 D0 D2 C9 CE D4 23 29 2E 22 3A |T'FOR......#).":| 000002A0: 99 22 11 D4 48 45 52 45 27 53 20 22 3B 00 E3 06 |."..HERE'S ";...| 000002B0: D2 00 99 22 4F 4E 45 A0 4D 4F 52 45 A0 49 4E 53 |..."ONE.MORE.INS| 000002C0: 54 52 55 43 54 49 4F 4E A0 46 4F 52 A0 55 53 A0 |TRUCTION.FOR.US.| 000002D0: 54 4F A0 20 4C 4F 4F 4B A0 41 54 3A 20 28 D3 D4 |TO. LOOK.AT: (..| 000002E0: 29 2E 22 00 ED 06 DC 00 8D 31 33 35 30 00 2D 07 |)."......1350.-.| 000002F0: E6 00 99 22 93 28 D3 D4 29 20 49 53 A0 53 49 4D |...".(..) IS.SIM| 00000300: 50 4C 59 A0 41 A0 50 52 4F 47 52 41 4D A0 44 45 |PLY.A.PROGRAM.DE| 00000310: 56 49 43 45 A0 54 4F A0 54 45 53 54 A0 54 48 45 |VICE.TO.TEST.THE| 00000320: A0 43 4F 4E 44 49 54 49 4F 4E 20 22 3B 00 70 07 |.CONDITION ";.p.| 00000330: F0 00 99 22 4F 46 A0 41 A0 46 49 4C 45 2E 22 3A |..."OF.A.FILE.":| 00000340: 99 22 11 C9 46 A0 28 D3 D4 29 20 49 53 A0 45 51 |."..F.(..) IS.EQ| 00000350: 55 41 4C A0 54 4F A0 36 34 2C 20 54 48 45 4E A0 |UAL.TO.64, THEN.| 00000360: 41 4E A0 C5 CF C6 20 28 C5 4E 44 CF 46 20 22 3B |AN.... (.ND.F ";| 00000370: 00 B7 07 FA 00 99 22 C6 49 4C 45 29 20 48 41 53 |......".ILE) HAS| 00000380: A0 42 45 45 4E A0 53 45 4E 53 45 44 2E 20 C9 46 |.BEEN.SENSED. .F| 00000390: 20 28 D3 D4 29 20 45 51 55 41 4C 53 31 32 38 2C | (..) EQUALS128,| 000003A0: 20 54 48 45 4E A0 41 4E A0 C5 CF D4 20 28 C5 4E | THEN.AN.... (.N| 000003B0: 44 A0 CF 46 A0 22 3B 00 ED 07 04 01 99 22 D4 41 |D..F.";......".A| 000003C0: 50 45 29 20 48 41 53 A0 42 45 45 4E A0 53 45 4E |PE) HAS.BEEN.SEN| 000003D0: 53 45 44 2E 20 D9 4F 55 27 4C 4C A0 48 41 56 45 |SED. .OU'LL.HAVE| 000003E0: A0 47 41 54 48 45 52 45 44 2C 20 22 3B 00 34 08 |.GATHERED, ";.4.| 000003F0: 0E 01 99 22 49 4E 43 49 44 45 4E 54 2D 20 41 4C |..."INCIDENT- AL| 00000400: 4C 59 2C 20 54 48 41 54 A0 28 D3 D4 29 20 4D 55 |LY, THAT.(..) MU| 00000410: 53 54 A0 41 50 50 45 41 52 A0 49 4E A0 42 52 41 |ST.APPEAR.IN.BRA| 00000420: 43 4B 45 54 53 20 28 41 53 A0 49 54 A0 44 4F 45 |CKETS (AS.IT.DOE| 00000430: 53 A0 22 3B 00 60 08 18 01 99 22 48 45 52 45 29 |S.";.`...."HERE)| 00000440: 20 57 48 45 4E A0 59 4F 55 A0 55 53 45 A0 49 54 | WHEN.YOU.USE.IT| 00000450: A0 49 4E A0 41 A0 20 50 52 4F 47 52 41 4D 2E 22 |.IN.A. PROGRAM."| 00000460: 00 A6 08 22 01 99 22 11 D7 49 54 48 20 28 D3 D4 |...".."..ITH (..| 00000470: 29 2C 20 41 4E 59 20 56 41 4C 55 45 A0 4F 54 48 |), ANY VALUE.OTH| 00000480: 45 52 A0 54 48 41 4E A0 36 34 20 4F 52 A0 20 20 |ER.THAN.64 OR. | 00000490: 31 32 38 20 49 53 A0 41 A0 46 41 55 4C 54 20 41 |128 IS.A.FAULT A| 000004A0: 4E 44 2C 20 22 3B 00 E4 08 2C 01 99 22 54 4F A0 |ND, ";...,.."TO.| 000004B0: 41 56 4F 49 44 A0 27 43 52 41 53 48 45 53 27 2C |AVOID.'CRASHES',| 000004C0: 20 59 4F 55 52 A0 50 52 4F 47 52 41 4D 53 A0 53 | YOUR.PROGRAMS.S| 000004D0: 48 4F 55 4C 44 A0 41 4C 57 41 59 53 A0 54 45 53 |HOULD.ALWAYS.TES| 000004E0: 54 A0 22 3B 00 2B 09 36 01 99 22 46 4F 52 A0 20 |T.";.+.6.."FOR. | 000004F0: 20 20 53 55 43 48 A0 41 A0 50 4F 53 53 49 42 49 | SUCH.A.POSSIBI| 00000500: 4C 49 54 59 2E 22 3A 99 22 11 D4 48 45 A0 54 45 |LITY.":."..HE.TE| 00000510: 53 54 A0 53 54 41 54 45 4D 45 4E 54 53 20 41 52 |ST.STATEMENTS AR| 00000520: 45 A0 46 41 49 52 4C 59 A0 22 3B 00 70 09 40 01 |E.FAIRLY.";.p.@.| 00000530: 99 22 53 54 52 41 49 47 48 54 2D 46 4F 52 57 41 |."STRAIGHT-FORWA| 00000540: 52 44 A0 28 42 55 54 A0 59 4F 55 A0 4D 49 47 48 |RD.(BUT.YOU.MIGH| 00000550: 54 A0 4C 49 4B 45 A0 54 4F A0 4E 4F 54 45 A0 54 |T.LIKE.TO.NOTE.T| 00000560: 48 45 4D 44 4F 57 4E 29 2C 20 41 4E 44 A0 22 3B |HEMDOWN), AND.";| 00000570: 00 96 09 4A 01 99 22 57 45 27 4C 4C A0 4C 4F 4F |...J.."WE'LL.LOO| 00000580: 4B A0 41 54 A0 54 48 45 4D A0 4E 45 58 54 2E 22 |K.AT.THEM.NEXT."| 00000590: 3A 8D 31 33 35 30 00 DB 09 54 01 99 22 93 D4 4F |:.1350...T.."..O| 000005A0: A0 54 45 53 54 A0 46 4F 52 A0 53 50 45 43 49 46 |.TEST.FOR.SPECIF| 000005B0: 49 43 A0 43 4F 4E 44 49 54 49 4F 4E 53 20 49 4E |IC.CONDITIONS IN| 000005C0: A0 50 52 4F 2D 20 47 52 41 4D 53 2C 20 57 45 A0 |.PRO- GRAMS, WE.| 000005D0: 55 53 45 A0 28 D3 D4 29 20 22 3B 00 1B 0A 5E 01 |USE.(..) ";...^.| 000005E0: 99 22 54 4F 47 45 54 48 45 52 A0 57 49 54 48 A0 |."TOGETHER.WITH.| 000005F0: 54 48 45 A0 C1 CE C4 53 54 41 54 45 4D 45 4E 54 |THE....STATEMENT| 00000600: 2C 20 41 4E 44 A0 54 57 4F A0 53 50 45 43 49 41 |, AND.TWO.SPECIA| 00000610: 4C A0 4E 55 4D 42 45 52 53 2E 22 00 46 0A 68 01 |L.NUMBERS.".F.h.| 00000620: 99 22 11 D4 4F A0 54 45 53 54 A0 46 4F 52 A0 C5 |."..O.TEST.FOR..| 00000630: CF C6 2C 20 57 45 20 53 41 59 A0 27 C9 C6 20 28 |.., WE SAY.'.. (| 00000640: D3 D4 29 20 22 3B 00 89 0A 72 01 99 22 C1 CE C4 |..) ";...r.."...| 00000650: 20 36 34 20 D4 C8 C5 CE 20 C7 CF D4 CF 20 28 54 | 64 .... .... (T| 00000660: 48 45 A0 4C 49 4E 45 20 4E 55 4D 42 45 52 A0 4F |HE.LINE NUMBER.O| 00000670: 46 A0 54 48 45 20 C3 CC CF D3 C5 20 53 54 41 54 |F.THE ..... STAT| 00000680: 45 4D 45 4E 54 29 27 2E 22 00 C5 0A 7C 01 99 22 |EMENT)'."...|.."| 00000690: 11 D4 4F A0 54 45 53 54 A0 46 4F 52 A0 C5 CF D4 |..O.TEST.FOR....| 000006A0: 2C 20 57 45 A0 53 41 59 A0 27 C9 C6 20 28 D3 D4 |, WE.SAY.'.. (..| 000006B0: 29 20 C1 CE C4 20 31 32 38 D4 C8 C5 CE 20 C7 CF |) ... 128.... ..| 000006C0: D4 CF 20 22 3B 00 09 0B 86 01 99 22 28 54 48 45 |.. ";......"(THE| 000006D0: A0 4C 49 4E 45 A0 4E 55 4D 42 45 52 A0 4F 46 A0 |.LINE.NUMBER.OF.| 000006E0: 54 48 45 A0 C3 CC CF D3 C5 20 53 54 41 54 45 4D |THE...... STATEM| 000006F0: 45 4E 54 29 27 2E 22 3A 99 22 11 D4 48 45 A0 4E |ENT)'.":."..HE.N| 00000700: 55 4D 42 45 52 53 20 22 3B 00 53 0B 90 01 99 22 |UMBERS ";.S...."| 00000710: 52 45 50 52 45 53 45 4E 54 A0 54 48 45 A0 27 42 |REPRESENT.THE.'B| 00000720: 49 54 53 27 20 53 45 54 A0 49 4E A0 D0 C5 D4 27 |ITS' SET.IN....'| 00000730: 53 20 4D 45 4D 4F 52 59 A0 2D 20 44 4F 4E 27 54 |S MEMORY.- DON'T| 00000740: A0 57 4F 52 52 59 A0 41 42 4F 55 54 A0 54 48 45 |.WORRY.ABOUT.THE| 00000750: 4D 2E 22 00 93 0B 9A 01 99 22 11 D4 48 45 A0 42 |M."......"..HE.B| 00000760: 45 53 54 A0 57 41 59 A0 54 4F A0 54 45 53 54 A0 |EST.WAY.TO.TEST.| 00000770: 46 4F 52 A0 41 4E 59 20 45 52 52 4F 52 A0 54 48 |FOR.ANY ERROR.TH| 00000780: 41 54 A0 43 4F 55 4C 44 A0 50 52 4F 44 55 43 45 |AT.COULD.PRODUCE| 00000790: A0 22 3B 00 DD 0B A4 01 99 22 41 20 27 43 52 41 |.";......"A 'CRA| 000007A0: 53 48 27 20 49 53 A0 54 4F 20 53 41 59 A0 27 C9 |SH' IS.TO SAY.'.| 000007B0: C6 20 20 20 28 D3 D4 29 20 3E 20 30 20 D4 C8 C5 |. (..) > 0 ...| 000007C0: CE 20 C7 CF D4 CF 20 28 54 48 45 A0 4C 49 4E 45 |. .... (THE.LINE| 000007D0: A0 4E 55 4D 42 45 52 A0 4F 46 20 22 3B 00 18 0C |.NUMBER.OF ";...| 000007E0: AE 01 99 22 20 54 48 45 A0 C3 CC CF D3 C5 20 53 |..." THE...... S| 000007F0: 54 41 54 45 4D 45 4E 54 29 27 2E 20 C9 4E 20 54 |TATEMENT)'. .N T| 00000800: 45 53 54 49 4E 47 A0 46 4F 52 A0 20 20 41 4C 4C |ESTING.FOR. ALL| 00000810: A0 28 D3 D4 29 20 22 3B 00 5F 0C B8 01 99 22 43 |.(..) ";._...."C| 00000820: 4F 4E 44 49 54 49 4F 4E 53 2C 20 54 48 49 53 A0 |ONDITIONS, THIS.| 00000830: 41 55 54 4F 4D 41 54 49 43 41 4C 4C 59 A0 43 4C |AUTOMATICALLY.CL| 00000840: 4F 53 45 53 A0 54 48 45 A0 46 49 4C 45 A0 49 46 |OSES.THE.FILE.IF| 00000850: A0 28 D3 D4 29 20 56 41 52 49 45 53 20 22 3B 00 |.(..) VARIES ";.| 00000860: 8F 0C C2 01 99 22 46 52 4F 4D A0 27 30 27 2C 4E |....."FROM.'0',N| 00000870: 4F A0 4D 41 54 54 45 52 A0 57 48 41 54 A0 54 48 |O.MATTER.WHAT.TH| 00000880: 45 A0 43 41 55 53 45 2E 22 3A 8D 31 33 35 30 00 |E.CAUSE.":.1350.| 00000890: D7 0C CC 01 99 22 93 D9 4F 55 A0 41 52 45 A0 4E |....."..OU.ARE.N| 000008A0: 4F 57 A0 56 45 52 59 A0 4E 45 41 52 A0 54 48 45 |OW.VERY.NEAR.THE| 000008B0: A0 50 4F 49 4E 54 A0 41 54 A0 57 48 49 43 48 59 |.POINT.AT.WHICHY| 000008C0: 4F 55 A0 43 41 4E A0 54 52 59 A0 55 53 49 4E 47 |OU.CAN.TRY.USING| 000008D0: A0 54 48 45 A0 22 3B 00 1F 0D D6 01 99 22 46 49 |.THE.";......"FI| 000008E0: 4C 45 A0 53 59 53 54 45 4D A0 46 4F 52 A0 20 20 |LE.SYSTEM.FOR. | 000008F0: 59 4F 55 52 53 45 4C 46 2E 20 D4 48 45 52 45 A0 |YOURSELF. .HERE.| 00000900: 41 52 45 2C 20 48 4F 57 45 56 45 52 2C 20 53 4F |ARE, HOWEVER, SO| 00000910: 4D 45 A0 53 4F 46 54 2D 57 41 52 45 A0 22 3B 00 |ME.SOFT-WARE.";.| 00000920: 60 0D E0 01 99 22 50 52 4F 47 52 41 4D A0 27 50 |`...."PROGRAM.'P| 00000930: 41 54 43 48 45 53 27 20 59 4F 55 A0 53 48 4F 55 |ATCHES' YOU.SHOU| 00000940: 4C 44 A0 4B 4E 4F 57 20 20 41 42 4F 55 54 2C 20 |LD.KNOW ABOUT, | 00000950: 54 4F A0 48 45 4C 50 A0 41 56 4F 49 44 A0 22 3B |TO.HELP.AVOID.";| 00000960: 00 94 0D EA 01 99 22 45 52 52 4F 52 53 2E 22 3A |......"ERRORS.":| 00000970: 99 22 11 D4 48 45 A0 46 49 52 53 54 A0 49 53 A0 |."..HE.FIRST.IS.| 00000980: 55 53 45 44 A0 57 48 45 4E A0 52 55 4E 4E 49 4E |USED.WHEN.RUNNIN| 00000990: 47 A0 22 3B 00 DD 0D F4 01 99 22 D0 D2 C9 CE D4 |G.";......".....| 000009A0: 23 20 20 20 46 49 4C 45 53 20 49 4E A0 57 48 49 |# FILES IN.WHI| 000009B0: 43 48 A0 54 48 45 A0 CF D0 C5 CE 20 53 54 41 54 |CH.THE..... STAT| 000009C0: 45 4D 45 4E 54 A0 48 41 53 A0 20 20 43 4F 4E 43 |EMENT.HAS. CONC| 000009D0: 4C 55 44 45 44 A0 57 49 54 48 20 22 3B 00 19 0E |LUDED.WITH ";...| 000009E0: FE 01 99 22 41 A0 31 20 4F 52 20 32 20 28 54 48 |..."A.1 OR 2 (TH| 000009F0: 55 53 A0 43 41 4C 4C 49 4E 47 A0 20 20 45 49 54 |US.CALLING. EIT| 00000A00: 48 45 52 A0 41 4E A0 C5 CF C6 20 4F 52 A0 41 4E |HER.AN.... OR.AN| 00000A10: A0 C5 CF D4 29 2E 20 22 3B 00 63 0E 08 02 99 22 |....). ";.c...."| 00000A20: D4 48 45 A0 50 41 54 43 48 A0 20 20 20 20 4D 41 |.HE.PATCH. MA| 00000A30: 4B 45 53 A0 53 55 52 45 A0 54 48 41 54 A0 D0 C5 |KES.SURE.THAT...| 00000A40: D4 20 4B 4E 4F 57 53 A0 57 48 45 52 45 A0 49 54 |. KNOWS.WHERE.IT| 00000A50: 53 A0 54 41 50 45 42 55 46 46 45 52 A0 49 53 2C |S.TAPEBUFFER.IS,| 00000A60: 20 22 3B 00 99 0E 12 02 99 22 42 59 A0 55 53 49 | ";......"BY.USI| 00000A70: 4E 47 A0 D0 CF CB C5 2E 22 3A 99 22 11 D9 4F 55 |NG......":."..OU| 00000A80: A0 53 48 4F 55 4C 44 A0 4E 4F 54 45 A0 54 48 41 |.SHOULD.NOTE.THA| 00000A90: 54 A0 54 48 49 53 A0 22 3B 00 DD 0E 1C 02 99 22 |T.THIS.";......"| 00000AA0: 49 53 A0 46 4F 52 A0 D0 D2 C9 CE D4 23 20 46 49 |IS.FOR......# FI| 00000AB0: 4C 45 53 A0 4F 4E 4C 59 2C 20 53 49 4E 43 45 A0 |LES.ONLY, SINCE.| 00000AC0: 49 54 27 53 A0 49 4D 50 4F 53 53 49 42 4C 45 A0 |IT'S.IMPOSSIBLE.| 00000AD0: 54 4F 20 A0 20 20 48 41 56 45 20 22 3B 00 25 0F |TO . HAVE ";.%.| 00000AE0: 26 02 99 22 42 4F 54 48 A0 D0 D2 C9 CE D4 23 20 |&.."BOTH......# | 00000AF0: 41 4E 44 20 C9 CE D0 D5 D4 23 20 28 4F 52 A0 D0 |AND .....# (OR..| 00000B00: D2 C9 CE D4 23 20 20 41 4E 44 A0 C7 C5 D4 23 29 |....# AND....#)| 00000B10: 20 4F 50 45 52 41 54 49 4F 4E 53 A0 41 54 A0 54 | OPERATIONS.AT.T| 00000B20: 48 45 A0 22 3B 00 64 0F 30 02 99 22 53 41 4D 45 |HE.";.d.0.."SAME| 00000B30: A0 54 49 4D 45 A0 20 20 57 49 54 48 49 4E A0 54 |.TIME. WITHIN.T| 00000B40: 48 45 A0 53 41 4D 45 A0 46 49 4C 45 2E 22 3A 99 |HE.SAME.FILE.":.| 00000B50: 22 11 D9 4F 55 27 4C 4C A0 46 49 4E 44 A0 54 48 |"..OU'LL.FIND.TH| 00000B60: 45 20 22 3B 00 98 0F 3A 02 99 22 50 41 54 43 48 |E ";...:.."PATCH| 00000B70: 20 46 55 4C 4C 59 20 44 45 53 43 52 49 42 45 44 | FULLY DESCRIBED| 00000B80: 20 4F 4E 54 48 45 A0 4E 45 58 54 A0 50 41 47 45 | ONTHE.NEXT.PAGE| 00000B90: 2E 22 3A 8D 31 33 35 30 00 D7 0F 44 02 99 22 93 |.":.1350...D..".| 00000BA0: CF 4E A0 54 48 45 A0 50 52 45 56 49 4F 55 53 A0 |.N.THE.PREVIOUS.| 00000BB0: 50 41 47 45 2C 20 57 45 A0 53 41 49 44 A0 54 48 |PAGE, WE.SAID.TH| 00000BC0: 41 54 A0 48 45 52 45 20 57 45 27 44 A0 4C 41 59 |AT.HERE WE'D.LAY| 00000BD0: A0 4F 55 54 20 22 3B 00 16 10 4E 02 99 22 54 48 |.OUT ";...N.."TH| 00000BE0: 45 A0 46 49 52 53 54 A0 4F 46 A0 4F 55 52 A0 53 |E.FIRST.OF.OUR.S| 00000BF0: 4F 46 54 57 41 52 45 A0 20 50 41 54 43 48 45 53 |OFTWARE. PATCHES| 00000C00: 2E 20 C1 53 A0 57 45 A0 4E 4F 54 45 44 2C 20 49 |. .S.WE.NOTED, I| 00000C10: 54 27 53 A0 22 3B 00 50 10 58 02 99 22 49 4E 54 |T'S.";.P.X.."INT| 00000C20: 45 4E 44 45 44 A0 54 4F A0 20 54 45 4C 4C A0 D0 |ENDED.TO. TELL..| 00000C30: C5 D4 A0 57 48 45 52 45 A0 54 48 45 A0 D4 C1 D0 |...WHERE.THE....| 00000C40: C5 20 23 31 20 42 55 46 46 45 52 A0 49 53 2E 22 |. #1 BUFFER.IS."| 00000C50: 00 98 10 62 02 99 22 11 C9 54 27 53 A0 41 43 48 |...b.."..T'S.ACH| 00000C60: 49 45 56 45 44 20 4C 49 4B 45 A0 54 48 49 53 2E |IEVED LIKE.THIS.| 00000C70: 20 C9 4D 4D 45 44 49 41 54 45 4C 59 A0 42 45 2D | .MMEDIATELY.BE-| 00000C80: 46 4F 52 45 A0 41 4E A0 CF D0 C5 CE 20 43 4F 4D |FORE.AN..... COM| 00000C90: 4D 41 4E 44 2C 20 22 3B 00 CD 10 6C 02 99 22 49 |MAND, ";...l.."I| 00000CA0: 4E 43 4C 55 44 45 20 54 48 45 20 4C 49 4E 45 3A |NCLUDE THE LINE:| 00000CB0: 22 3A 99 22 11 1D 1D 1D 1D 1D D0 CF CB C5 20 32 |":.".......... 2| 00000CC0: 34 33 2C 31 32 32 3A D0 CF CB C5 22 3B 00 14 11 |43,122:....";...| 00000CD0: 76 02 99 22 20 32 34 34 2C 32 22 3A 99 22 11 D3 |v.." 244,2":."..| 00000CE0: 48 4F 55 4C 44 A0 59 4F 55 A0 42 45 A0 55 53 49 |HOULD.YOU.BE.USI| 00000CF0: 4E 47 A0 41 A0 53 45 43 4F 4E 44 A0 54 41 50 45 |NG.A.SECOND.TAPE| 00000D00: A0 55 4E 49 54 20 20 28 D4 C1 D0 C5 20 23 32 29 |.UNIT (.... #2)| 00000D10: 2C 20 22 3B 00 52 11 80 02 99 22 54 48 45 4E A0 |, ";.R...."THEN.| 00000D20: 54 48 45 A0 4C 49 4E 45 A0 42 45 43 4F 4D 45 53 |THE.LINE.BECOMES| 00000D30: 3A 22 3A 99 22 11 1D 1D 1D 1D 1D D0 CF CB C5 20 |:":.".......... | 00000D40: 32 34 33 2C 35 38 3A D0 CF CB C5 20 32 34 34 2C |243,58:.... 244,| 00000D50: 33 22 00 97 11 8A 02 99 22 11 D4 48 45 20 47 41 |3"......"..HE GA| 00000D60: 50 20 42 45 54 57 45 45 4E A0 D0 CF CB C5 20 41 |P BETWEEN..... A| 00000D70: 4E 44 A0 54 48 45 A0 4E 55 4D 42 45 52 53 A0 43 |ND.THE.NUMBERS.C| 00000D80: 41 4E 42 45 A0 52 45 4D 4F 56 45 44 A0 49 4E A0 |ANBE.REMOVED.IN.| 00000D90: 59 4F 55 52 A0 22 3B 00 E2 11 94 02 99 22 50 52 |YOUR.";......"PR| 00000DA0: 4F 47 52 41 4D 2C 20 4F 46 A0 43 4F 55 52 53 45 |OGRAM, OF.COURSE| 00000DB0: 2E 20 20 C9 54 27 53 A0 4F 4E 4C 59 A0 42 45 45 |. .T'S.ONLY.BEE| 00000DC0: 4E A0 55 53 45 44 A0 49 4E A0 54 48 45 A0 45 58 |N.USED.IN.THE.EX| 00000DD0: 41 4D 50 4C 45 53 A0 54 4F A0 20 48 45 4C 50 A0 |AMPLES.TO. HELP.| 00000DE0: 22 3B 00 27 12 9E 02 99 22 4D 41 4B 45 A0 54 48 |";.'...."MAKE.TH| 00000DF0: 45 4D A0 43 4C 45 41 52 2E 20 D2 45 4D 45 4D 42 |EM.CLEAR. .EMEMB| 00000E00: 45 52 2C 20 49 4E 43 4C 55 44 45 A0 45 49 54 48 |ER, INCLUDE.EITH| 00000E10: 45 52 20 4F 52 A0 42 4F 54 48 20 4C 49 4E 45 53 |ER OR.BOTH LINES| 00000E20: 2C 20 41 53 A0 22 3B 00 56 12 A8 02 99 22 41 50 |, AS.";.V...."AP| 00000E30: 50 52 4F 50 52 49 41 54 45 2C 20 20 20 49 4D 4D |PROPRIATE, IMM| 00000E40: 45 44 49 41 54 45 4C 59 A0 42 45 46 4F 52 45 A0 |EDIATELY.BEFORE.| 00000E50: CF D0 C5 CE 2E 22 00 60 12 B2 02 8D 31 33 35 30 |.....".`....1350| 00000E60: 00 9F 12 BC 02 99 22 93 D4 48 45 A0 53 45 43 4F |......"..HE.SECO| 00000E70: 4E 44 A0 50 41 54 43 48 A0 49 53 A0 41 A0 53 4D |ND.PATCH.IS.A.SM| 00000E80: 41 4C 4C 20 53 55 42 52 4F 55 54 49 4E 45 A0 20 |ALL SUBROUTINE. | 00000E90: 57 48 49 43 48 A0 53 48 4F 55 4C 44 A0 22 3B 00 |WHICH.SHOULD.";.| 00000EA0: E5 12 C6 02 99 22 42 45 A0 43 41 4C 4C 45 44 A0 |....."BE.CALLED.| 00000EB0: 41 46 54 45 52 A0 41 4C 4C A0 D0 D2 C9 CE D4 23 |AFTER.ALL......#| 00000EC0: 20 53 54 41 54 45 4D 45 4E 54 53 2E 20 C3 41 4C | STATEMENTS. .AL| 00000ED0: 4C A0 49 54 A0 49 4E A0 54 48 45 A0 4E 4F 52 4D |L.IT.IN.THE.NORM| 00000EE0: 41 4C 20 22 3B 00 29 13 D0 02 99 22 57 41 59 20 |AL ";.)...."WAY | 00000EF0: 20 20 57 49 54 48 A0 C7 CF D3 D5 C2 20 41 4E 44 | WITH...... AND| 00000F00: 2C 20 4F 46 A0 43 4F 55 52 53 45 2C 20 43 48 41 |, OF.COURSE, CHA| 00000F10: 4E 47 45 A0 54 48 45 20 A0 20 4C 49 4E 45 A0 4E |NGE.THE . LINE.N| 00000F20: 55 4D 42 45 52 53 A0 22 3B 00 6A 13 DA 02 99 22 |UMBERS.";.j...."| 00000F30: 49 4E A0 54 48 45 A0 4C 49 53 54 49 4E 47 A0 42 |IN.THE.LISTING.B| 00000F40: 45 4C 4F 57 A0 54 4F A0 20 20 20 46 49 54 20 59 |ELOW.TO. FIT Y| 00000F50: 4F 55 52 A0 50 52 4F 47 52 41 4D 2E 22 3A 99 22 |OUR.PROGRAM.":."| 00000F60: 11 C1 A0 46 55 4C 4C 20 22 3B 00 A9 13 E4 02 99 |...FULL ";......| 00000F70: 22 45 58 50 4C 41 4E 41 54 49 4F 4E A0 4F 46 A0 |"EXPLANATION.OF.| 00000F80: 54 48 45 A0 57 41 59 20 49 4E A0 57 48 49 43 48 |THE.WAY IN.WHICH| 00000F90: A0 20 49 54 A0 57 4F 52 4B 53 A0 49 53 A0 53 4F |. IT.WORKS.IS.SO| 00000FA0: 4D 45 57 48 41 54 A0 22 3B 00 F0 13 EE 02 99 22 |MEWHAT.";......"| 00000FB0: 4F 55 54 53 49 44 45 20 54 48 45 A0 53 43 4F 50 |OUTSIDE THE.SCOP| 00000FC0: 45 A0 20 4F 46 A0 54 48 49 53 A0 D4 55 54 4F 52 |E. OF.THIS..UTOR| 00000FD0: 49 41 4C 2C 20 41 4E 44 A0 49 4E 44 45 45 44 A0 |IAL, AND.INDEED.| 00000FE0: 4F 46 A0 54 48 45 A0 41 56 2D 20 41 49 4C 22 3B |OF.THE.AV- AIL";| 00000FF0: 00 3B 14 F8 02 99 22 41 42 4C 45 20 D0 C5 D4 20 |.;...."ABLE ... | 00001000: 4D 45 4D 4F 52 59 21 20 D5 53 49 4E 47 A0 49 54 |MEMORY! .SING.IT| 00001010: A0 57 49 4C 4C 2C 20 48 4F 57 2D 20 45 56 45 52 |.WILL, HOW- EVER| 00001020: 2C 20 4D 41 4B 45 A0 54 52 4F 55 42 4C 45 2D 46 |, MAKE.TROUBLE-F| 00001030: 52 45 45 A0 46 49 4C 45 A0 22 3B 00 6C 14 02 03 |REE.FILE.";.l...| 00001040: 99 22 4F 50 45 52 41 54 49 4F 4E A0 20 45 56 45 |."OPERATION. EVE| 00001050: 4E A0 4D 4F 52 45 A0 43 45 52 54 41 49 4E 2E 20 |N.MORE.CERTAIN. | 00001060: C8 45 52 45 20 49 54 A0 49 53 3A 22 00 93 14 0C |.ERE IT.IS:"....| 00001070: 03 99 22 11 1D 1D 32 30 30 30 20 C9 C6 20 D0 C5 |.."...2000 .. ..| 00001080: C5 CB 28 36 32 35 29 3E 31 38 30 D4 C8 C5 CE 32 |..(625)>180....2| 00001090: 30 32 30 00 A7 14 16 03 99 22 1D 1D 32 30 31 30 |020......"..2010| 000010A0: 20 D2 C5 D4 D5 D2 CE 00 C6 14 20 03 99 22 1D 1D | ......... .."..| 000010B0: 32 30 32 30 20 D0 CF CB C5 35 39 34 31 31 2C 35 |2020 ....59411,5| 000010C0: 33 3A D4 3D D4 C9 00 E4 14 2A 03 99 22 1D 1D 32 |3:.=.....*.."..2| 000010D0: 30 33 30 20 C9 C6 D4 C9 2D D4 3C 36 D4 C8 C5 CE |030 ....-.<6....| 000010E0: 32 30 33 30 00 05 15 34 03 99 22 1D 1D 32 30 34 |2030...4.."..204| 000010F0: 30 20 D0 CF CB C5 35 39 34 31 31 2C 36 31 3A D2 |0 ....59411,61:.| 00001100: C5 D4 D5 D2 CE 00 37 15 3E 03 99 22 11 D4 48 49 |......7.>.."..HI| 00001110: 53 A0 53 55 42 52 4F 55 54 49 4E 45 A0 49 53 A0 |S.SUBROUTINE.IS.| 00001120: 46 4F 52 A0 D4 C1 D0 C5 20 23 31 2E 20 C3 48 41 |FOR..... #1. .HA| 00001130: 4E 47 45 53 A0 22 3B 00 66 15 48 03 99 22 46 4F |NGES.";.f.H.."FO| 00001140: 52 A0 D4 C1 D0 C5 20 23 32 20 41 52 45 A0 53 48 |R..... #2 ARE.SH| 00001150: 4F 57 4E A0 4F 4E A0 54 48 45 A0 4E 45 58 54 A0 |OWN.ON.THE.NEXT.| 00001160: 50 41 47 45 2E 22 00 70 15 52 03 8D 31 33 35 30 |PAGE.".p.R..1350| 00001170: 00 B5 15 5C 03 99 22 93 D4 48 45 A0 53 55 42 52 |...\.."..HE.SUBR| 00001180: 4F 55 54 49 4E 45 A0 4E 45 45 44 53 A0 53 4F 4D |OUTINE.NEEDS.SOM| 00001190: 45 A0 53 4D 41 4C 4C A0 43 48 41 4E 47 45 53 A0 |E.SMALL.CHANGES.| 000011A0: 49 46 A0 49 54 27 53 A0 54 4F A0 42 45 A0 55 53 |IF.IT'S.TO.BE.US| 000011B0: 45 44 A0 22 3B 00 EE 15 66 03 99 22 57 49 54 48 |ED.";...f.."WITH| 000011C0: A0 D4 C1 D0 C5 20 23 32 2E 20 C6 49 52 53 54 2C |..... #2. .IRST,| 000011D0: 20 48 45 52 45 27 53 A0 54 48 45 A0 53 55 42 52 | HERE'S.THE.SUBR| 000011E0: 4F 55 54 49 4E 45 A0 41 47 41 49 4E 3A 22 00 15 |OUTINE.AGAIN:"..| 000011F0: 16 70 03 99 22 11 1D 1D 32 30 30 30 20 C9 C6 20 |.p.."...2000 .. | 00001200: D0 C5 C5 CB 28 36 32 35 29 3E 31 38 30 D4 C8 C5 |....(625)>180...| 00001210: CE 32 30 32 30 00 29 16 7A 03 99 22 1D 1D 32 30 |.2020.).z.."..20| 00001220: 31 30 20 D2 C5 D4 D5 D2 CE 00 48 16 84 03 99 22 |10 .......H...."| 00001230: 1D 1D 32 30 32 30 20 D0 CF CB C5 35 39 34 31 31 |..2020 ....59411| 00001240: 2C 35 33 3A D4 3D D4 C9 00 66 16 8E 03 99 22 1D |,53:.=...f....".| 00001250: 1D 32 30 33 30 20 C9 C6 D4 C9 2D D4 3C 36 D4 C8 |.2030 ....-.<6..| 00001260: C5 CE 32 30 33 30 00 87 16 98 03 99 22 1D 1D 32 |..2030......"..2| 00001270: 30 34 30 20 D0 CF CB C5 35 39 34 31 31 2C 36 31 |040 ....59411,61| 00001280: 3A D2 C5 D4 D5 D2 CE 00 BD 16 A2 03 99 22 11 C6 |:............"..| 00001290: 4F 52 A0 55 53 45 A0 57 49 54 48 A0 D4 C1 D0 C5 |OR.USE.WITH.....| 000012A0: 20 23 32 2C 20 49 54 A0 57 49 4C 4C A0 4C 4F 4F | #2, IT.WILL.LOO| 000012B0: 4B A0 4C 49 4B 45 A0 54 48 49 53 3A 22 00 E4 16 |K.LIKE.THIS:"...| 000012C0: AC 03 99 22 11 1D 2A 32 30 30 30 20 C9 C6 20 D0 |..."..*2000 .. .| 000012D0: C5 C5 CB 28 36 32 36 29 3E 31 38 30 D4 C8 C5 CE |...(626)>180....| 000012E0: 32 30 32 30 00 F8 16 B6 03 99 22 1D 1D 32 30 31 |2020......"..201| 000012F0: 30 20 D2 C5 D4 D5 D2 CE 00 18 17 C0 03 99 22 1D |0 ............".| 00001300: 2A 32 30 32 30 20 D0 CF CB C5 35 39 34 35 36 2C |*2020 ....59456,| 00001310: 32 30 37 3A D4 3D D4 C9 00 36 17 CA 03 99 22 1D |207:.=...6....".| 00001320: 1D 32 30 33 30 20 C9 C6 D4 C9 2D D4 3C 36 D4 C8 |.2030 ....-.<6..| 00001330: C5 CE 32 30 33 30 00 58 17 D4 03 99 22 1D 2A 32 |..2030.X....".*2| 00001340: 30 34 30 20 D0 CF CB C5 35 39 34 35 36 2C 32 32 |040 ....59456,22| 00001350: 33 3A D2 C5 D4 D5 D2 CE 00 95 17 DE 03 99 22 11 |3:............".| 00001360: D4 48 45 A0 54 48 52 45 45 20 43 48 41 4E 47 45 |.HE.THREE CHANGE| 00001370: 44 A0 4C 49 4E 45 53 20 41 52 45 A0 48 41 56 45 |D.LINES ARE.HAVE| 00001380: A0 42 45 45 4E 20 20 A0 41 53 54 45 52 49 53 4B |.BEEN .ASTERISK| 00001390: 45 44 2E 22 3B 00 D3 17 E8 03 99 22 D4 48 45 A0 |ED.";......".HE.| 000013A0: 4E 45 58 54 A0 50 41 47 45 A0 48 41 53 20 41 A0 |NEXT.PAGE.HAS A.| 000013B0: 42 52 49 45 46 A0 20 20 20 4E 4F 54 45 20 4F 46 |BRIEF. NOTE OF| 000013C0: A0 54 48 45 A0 49 44 45 41 20 42 45 48 49 4E 44 |.THE.IDEA BEHIND| 000013D0: A0 22 3B 00 F4 17 F2 03 99 22 D0 C5 C5 CB 2F D0 |.";......"..../.| 000013E0: CF CB C5 20 20 20 20 20 20 20 43 4F 4D 4D 41 4E |... COMMAN| 000013F0: 44 53 2E 22 00 FE 17 FC 03 8D 31 33 35 30 00 42 |DS."......1350.B| 00001400: 18 06 04 99 22 93 C6 49 52 53 54 2C 20 57 48 59 |...."..IRST, WHY| 00001410: A0 54 48 45 A0 D0 CF CB C5 20 43 4F 4D 4D 41 4E |.THE..... COMMAN| 00001420: 44 53 20 49 4E A0 42 4F 54 48 20 54 48 45 53 4F |DS IN.BOTH THESO| 00001430: 46 54 57 41 52 45 A0 50 41 54 43 48 45 53 3F 20 |FTWARE.PATCHES? | 00001440: 22 3B 00 7E 18 10 04 99 22 C5 58 50 45 52 49 45 |";.~....".XPERIE| 00001450: 4E 43 45 A0 48 41 53 A0 53 48 4F 57 4E 20 A0 54 |NCE.HAS.SHOWN .T| 00001460: 48 41 54 A0 4D 41 4E 59 A0 54 41 50 45 A0 46 49 |HAT.MANY.TAPE.FI| 00001470: 4C 45 A0 50 52 4F 42 4C 45 4D 53 20 22 3B 00 C7 |LE.PROBLEMS ";..| 00001480: 18 1A 04 99 22 48 41 0D 45 A0 43 45 4E 54 2D 20 |...."HA.E.CENT- | 00001490: 52 45 44 A0 4F 4E A0 54 48 45 A0 53 54 41 52 54 |RED.ON.THE.START| 000014A0: 2D 55 50 A0 4F 46 A0 54 48 45 A0 43 41 53 53 45 |-UP.OF.THE.CASSE| 000014B0: 54 54 45 A0 55 4E 49 54 44 52 49 56 45 A0 4D 4F |TTE.UNITDRIVE.MO| 000014C0: 54 4F 52 2E 20 22 3B 00 0C 19 24 04 99 22 C1 56 |TOR. ";...$..".V| 000014D0: 4F 49 44 49 4E 47 A0 54 45 43 48 4E 49 43 41 4C |OIDING.TECHNICAL| 000014E0: 49 54 49 45 53 2C 20 20 20 54 48 45 A0 50 41 54 |ITIES, THE.PAT| 000014F0: 43 48 45 53 A0 4F 56 45 52 43 4F 4D 45 A0 54 48 |CHES.OVERCOME.TH| 00001500: 45 53 45 A0 42 59 A0 50 55 54 22 3B 00 4C 19 2E |ESE.BY.PUT";.L..| 00001510: 04 99 22 54 49 4E 47 20 20 20 54 48 45 A0 44 52 |.."TING THE.DR| 00001520: 49 56 45 A0 55 4E 44 45 52 A0 50 52 4F 47 52 41 |IVE.UNDER.PROGRA| 00001530: 4D A0 43 4F 4E 54 52 4F 4C 2E 22 3A 99 22 11 D3 |M.CONTROL.":."..| 00001540: 49 4D 49 4C 41 52 4C 59 2C 20 22 3B 00 95 19 38 |IMILARLY, ";...8| 00001550: 04 99 22 54 48 45 20 D0 C5 C5 CB 20 43 4F 4D 4D |.."THE .... COMM| 00001560: 41 4E 44 A0 45 58 41 4D 49 4E 45 53 A0 54 48 45 |AND.EXAMINES.THE| 00001570: 54 41 50 45 A0 42 55 46 46 45 52 2C 20 41 4E 44 |TAPE.BUFFER, AND| 00001580: A0 41 4C 53 4F A0 43 4F 4E 54 52 4F 4C 53 A0 54 |.ALSO.CONTROLS.T| 00001590: 48 45 A0 22 3B 00 D1 19 42 04 99 22 44 52 49 56 |HE.";...B.."DRIV| 000015A0: 45 4D 4F 54 4F 52 A0 41 54 A0 54 48 45 A0 43 4F |EMOTOR.AT.THE.CO| 000015B0: 52 52 45 43 54 A0 50 4F 49 4E 54 53 2C 20 54 4F |RRECT.POINTS, TO| 000015C0: A0 4D 49 4E 49 4D 49 53 45 45 52 52 4F 52 53 2E |.MINIMISEERRORS.| 000015D0: 22 00 0F 1A 4C 04 99 22 11 C1 20 43 4F 4D 50 4C |"...L..".. COMPL| 000015E0: 45 54 45 A0 53 41 4D 50 4C 45 A0 46 49 4C 45 A0 |ETE.SAMPLE.FILE.| 000015F0: 50 52 4F 47 52 41 4D 2C 20 43 4F 4E 54 41 49 4E |PROGRAM, CONTAIN| 00001600: 2D 49 4E 47 A0 41 4C 4C A0 54 48 45 A0 22 3B 00 |-ING.ALL.THE.";.| 00001610: 49 1A 56 04 99 22 53 41 46 45 54 59 A0 46 45 41 |I.V.."SAFETY.FEA| 00001620: 54 55 52 45 53 A0 41 4E 44 A0 50 41 54 43 48 45 |TURES.AND.PATCHE| 00001630: 53 A0 44 45 53 43 52 49 42 45 44 2C 20 46 4F 52 |S.DESCRIBED, FOR| 00001640: 4D 53 A0 54 48 45 20 22 3B 00 81 1A 60 04 99 22 |MS.THE ";...`.."| 00001650: 4C 41 53 54 A0 50 41 52 54 20 4F 46 A0 54 48 49 |LAST.PART OF.THI| 00001660: 53 A0 20 D4 55 54 4F 52 49 41 4C 2E 22 3A 99 22 |S. .UTORIAL.":."| 00001670: 11 C9 54 A0 57 49 4C 4C A0 52 45 50 41 59 A0 22 |..T.WILL.REPAY."| 00001680: 3B 00 B9 1A 6A 04 99 22 53 54 55 44 59 2C 20 57 |;...j.."STUDY, W| 00001690: 48 49 43 48 A0 59 4F 55 A0 43 41 4E A0 44 4F A0 |HICH.YOU.CAN.DO.| 000016A0: 42 59 CC C9 D3 D4 49 4E 47 A0 49 54 2C 20 4F 46 |BY....ING.IT, OF| 000016B0: A0 43 4F 55 52 53 45 2E 22 00 C3 1A 74 04 8D 31 |.COURSE."...t..1| 000016C0: 33 35 30 00 05 1B 7E 04 99 22 93 C2 45 46 4F 52 |350...~.."..EFOR| 000016D0: 45 A0 57 45 A0 46 49 4E 41 4C 4C 59 A0 4C 4F 41 |E.WE.FINALLY.LOA| 000016E0: 44 A0 54 48 45 A0 4C 41 53 54 A0 53 45 43 54 49 |D.THE.LAST.SECTI| 000016F0: 4F 4E 20 4F 46 A0 54 48 45 A0 D4 55 54 4F 52 49 |ON OF.THE..UTORI| 00001700: 41 4C 20 22 3B 00 3E 1B 88 04 99 22 28 54 48 45 |AL ";.>...."(THE| 00001710: A0 53 41 4D 50 4C 45 A0 46 49 4C 45 29 2C 57 4F |.SAMPLE.FILE),WO| 00001720: 55 4C 44 A0 59 4F 55 A0 4C 49 4B 45 A0 54 4F A0 |ULD.YOU.LIKE.TO.| 00001730: 52 45 56 49 45 57 A0 54 48 49 53 A0 22 3B 00 85 |REVIEW.THIS.";..| 00001740: 1B 92 04 99 22 53 45 43 4F 4E 44 20 53 45 43 54 |...."SECOND SECT| 00001750: 49 4F 4E 20 A0 41 47 41 49 4E 3F 22 3A 99 22 11 |ION .AGAIN?":.".| 00001760: C9 46 A0 59 4F 55 A0 57 4F 55 4C 44 2C 20 50 52 |.F.YOU.WOULD, PR| 00001770: 45 53 53 A0 D9 20 28 46 4F 52 A0 27 59 45 53 27 |ESS.. (FOR.'YES'| 00001780: 29 2E 20 22 3B 00 C5 1B 9C 04 99 22 D9 4F 55 20 |). ";......".OU | 00001790: A0 57 49 4C 4C A0 54 48 45 4E A0 41 55 54 4F 4D |.WILL.THEN.AUTOM| 000017A0: 41 54 49 43 41 4C 4C 59 20 47 4F 20 42 41 43 4B |ATICALLY GO BACK| 000017B0: A0 54 4F A0 54 48 45 20 A0 42 45 47 49 4E 4E 49 |.TO.THE .BEGINNI| 000017C0: 4E 47 20 22 3B 00 DC 1B A6 04 99 22 4F 46 A0 54 |NG ";......"OF.T| 000017D0: 48 45 A0 53 45 43 54 49 4F 4E 2E 22 00 1D 1C B0 |HE.SECTION."....| 000017E0: 04 99 22 11 C9 46 2C 20 48 4F 57 45 56 45 52 2C |.."..F, HOWEVER,| 000017F0: 20 59 4F 55 A0 41 52 45 A0 48 41 50 50 59 A0 57 | YOU.ARE.HAPPY.W| 00001800: 49 54 48 A0 59 4F 55 52 A0 55 4E 2D 44 45 52 53 |ITH.YOUR.UN-DERS| 00001810: 54 41 4E 44 49 4E 47 A0 4F 46 20 22 3B 00 67 1C |TANDING.OF ";.g.| 00001820: BA 04 99 22 57 48 41 54 A0 59 4F 55 27 56 45 A0 |..."WHAT.YOU'VE.| 00001830: 4C 45 41 52 4E 54 2C 20 50 52 45 53 53 CE 20 28 |LEARNT, PRESS. (| 00001840: 46 4F 52 A0 27 4E 4F 27 29 20 41 4E 44 A0 43 41 |FOR.'NO') AND.CA| 00001850: 52 52 59 A0 4F 4E A0 54 4F A0 54 48 45 A0 4E 45 |RRY.ON.TO.THE.NE| 00001860: 58 54 20 20 20 22 3B 00 AE 1C C4 04 99 22 50 41 |XT ";......"PA| 00001870: 47 45 2C 20 57 48 49 43 48 20 42 52 49 45 46 4C |GE, WHICH BRIEFL| 00001880: 59 A0 44 45 53 43 52 49 42 45 53 20 54 48 45 A0 |Y.DESCRIBES THE.| 00001890: 46 49 4C 45 20 A0 50 52 4F 47 52 41 4D A0 42 45 |FILE .PROGRAM.BE| 000018A0: 46 4F 52 45 A0 4C 4F 41 44 49 4E 47 2E 22 00 DD |FORE.LOADING."..| 000018B0: 1C CE 04 99 22 11 11 11 1D 1D 1D 1D 1D 1D 12 20 |....".......... | 000018C0: 57 4F 55 4C 44 A0 59 4F 55 A0 4C 49 4B 45 A0 54 |WOULD.YOU.LIKE.T| 000018D0: 4F A0 52 45 56 49 45 57 20 3F 20 92 22 00 F1 1C |O.REVIEW ? ."...| 000018E0: D8 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 32 34 |...A$:.A$."".124| 000018F0: 30 00 2C 1D E2 04 8B 41 24 B2 22 4E 22 A7 99 22 |0.,....A$."N".."| 00001900: 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................| 00001910: 1D 1D 1D 12 20 4E 4F 20 92 22 3A 81 49 B2 31 A4 |.... NO .":.I.1.| 00001920: 31 37 35 30 3A 82 3A 89 31 32 39 30 00 62 1D EC |1750:.:.1290.b..| 00001930: 04 8B 41 24 B2 22 59 22 A7 99 22 11 11 1D 1D 1D |..A$."Y"..".....| 00001940: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 |............... | 00001950: 59 45 53 20 92 22 3A 81 49 B2 31 A4 31 35 30 30 |YES .":.I.1.1500| 00001960: 3A 82 00 AD 1D F6 04 99 22 13 11 11 11 11 11 11 |:.......".......| 00001970: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001980: 11 12 52 45 54 55 52 4E 49 4E 47 A0 54 4F A0 46 |..RETURNING.TO.F| 00001990: 49 52 53 54 A0 50 41 47 45 20 49 4E A0 41 A0 46 |IRST.PAGE IN.A.F| 000019A0: 45 57 A0 53 45 43 4F 4E 44 53 92 22 3B 00 C2 1D |EW.SECONDS.";...| 000019B0: 00 05 81 49 B2 31 A4 36 30 30 30 3A 82 3A 89 31 |...I.1.6000:.:.1| 000019C0: 30 30 00 04 1E 0A 05 8D 31 33 35 30 3A 99 22 93 |00......1350:.".| 000019D0: 11 11 11 11 11 11 11 11 11 11 D7 45 27 4C 4C A0 |...........E'LL.| 000019E0: 4E 4F 57 A0 4C 4F 41 44 A0 54 48 45 A0 44 45 4D |NOW.LOAD.THE.DEM| 000019F0: 4F 4E 53 54 52 41 54 49 4F 4E 20 46 49 4C 45 20 |ONSTRATION FILE | 00001A00: 20 20 22 3B 00 47 1E 14 05 99 22 50 52 4F 47 52 | ";.G...."PROGR| 00001A10: 41 4D 2E 20 D9 4F 55 27 4C 4C A0 4E 45 45 44 A0 |AM. .OU'LL.NEED.| 00001A20: 41 A0 42 4C 41 4E 4B A0 43 41 53 53 45 54 54 45 |A.BLANK.CASSETTE| 00001A30: A0 20 20 41 46 54 45 52 A0 54 48 45 A0 4C 4F 41 |. AFTER.THE.LOA| 00001A40: 44 49 4E 47 20 22 3B 00 7E 1E 1E 05 99 22 49 53 |DING ";.~...."IS| 00001A50: A0 43 4F 4D 50 4C 45 54 45 44 2E 20 D0 4C 45 41 |.COMPLETED. .LEA| 00001A60: 53 45 20 A0 48 41 56 45 A0 4F 4E 45 A0 41 56 41 |SE .HAVE.ONE.AVA| 00001A70: 49 4C 41 42 4C 45 2E 22 3A 8D 31 33 35 30 00 B8 |ILABLE.":.1350..| 00001A80: 1E 28 05 9C 3A 99 22 93 11 11 11 11 11 11 11 11 |.(..:.".........| 00001A90: 11 11 1D 1D 1D 1D 12 20 44 45 4D 4F 4E 53 54 52 |....... DEMONSTR| 00001AA0: 41 54 49 4F 4E A0 50 52 4F 47 52 41 4D A0 4C 4F |ATION.PROGRAM.LO| 00001AB0: 41 44 49 4E 47 20 92 22 00 EC 1E 32 05 8B C2 28 |ADING ."...2...(| 00001AC0: 34 35 30 35 38 29 B2 31 38 30 A7 3A 24 58 2C C2 |45058).180.:$X,.| 00001AD0: 28 34 35 30 35 31 29 AB 34 38 2C 22 46 49 4C 49 |(45051).48,"FILI| 00001AE0: 4E 47 20 33 20 20 20 30 30 54 30 31 00 F4 1E 3C |NG 3 00T01...<| 00001AF0: 05 93 3A 80 00 3A 1F 46 05 99 22 13 1D 1D 1D 11 |..:..:.F..".....| 00001B00: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001B10: 11 11 11 11 11 11 12 20 50 52 45 53 53 A0 54 48 |....... PRESS.TH| 00001B20: 45 A0 53 50 41 43 45 A0 4B 45 59 A0 54 4F A0 43 |E.SPACE.KEY.TO.C| 00001B30: 4F 4E 54 49 4E 55 45 20 92 22 00 49 1F 50 05 92 |ONTINUE .".I.P..| 00001B40: 35 39 34 31 30 2C 34 2C 34 00 5D 1F 5A 05 81 42 |59410,4,4.].Z..B| 00001B50: B2 31 A4 33 30 3A A1 41 24 3A 82 3A 8E 00 00 00 |.1.30:.A$:.:....|
....D..:.59468,14.[.N..".WITH THE HOPE T HAT THE SHORT BREAK WAS WELCOME, LET'S CONTINUE ";...X.."WITH THIS PET- SOFT T UTORIAL.":.".YOU'LL ";.Z...."REMEMBER TH AT WE WERE EXAMINING THE VARIOUS STATEM ENTS WITH WHICH ";.&...."YOU NEED TO B E FAMILIAR, AND WE HAD JUST LOOKED AT PRINT# - A ";.F...."STATEMENT WHICH PRINTS DATA ON TO TAPE, RATHER THAN ";.. . .."THE DISPLAY.":.".THE NEXT INSTRUCTI ON WE MUST LEARN ";......"IS GET# (DON 'T FORGET THE #). GET# WILL CAUSE 1 C HARACTER AT ";.6...."A TIME TO BE READ FROM A DATA TAPE. THERE IS NO LIMIT TO THE ";......"NUMBER OF CHARACTERS WHICH CAN BE 'GOT' IN THIS WAY (UNLIKE THE " ;...H.."'79 LIMIT'FOR PRINT#).":.".THERE 'S ";...R.."ONE MORE INSTRUCTION FOR US TO LOOK AT: (ST)."......1350.-....".(ST ) IS SIMPLY A PROGRAM DEVICE TO TEST THE CONDITION ";.P...."OF A FILE.":.".IF (S T) IS EQUAL TO 64, THEN AN EOF (ENDOF "; ......"FILE) HAS BEEN SENSED. IF (ST) EQ UALS128, THEN AN EOT (END OF ";......"TA PE) HAS BEEN SENSED. YOU'LL HAVE GATHERE D, ";.4...."INCIDENT- ALLY, THAT (ST) MU ST APPEAR IN BRACKETS (AS IT DOES ";.`.. .."HERE) WHEN YOU USE IT IN A PROGRAM." ..."..".WITH (ST), ANY VALUE OTHER THAN 64 OR 128 IS A FAULT AND, ";...,.."TO AVOID 'CRASHES', YOUR PROGRAMS SHOULD AL WAYS TEST ";.+.6.."FOR SUCH A POSSIBI LITY.":.".THE TEST STATEMENTS ARE FAIRLY ";.P.@.."STRAIGHT-FORWARD (BUT YOU MIGH T LIKE TO NOTE THEMDOWN), AND ";...J.."W E'LL LOOK AT THEM NEXT.":.1350...T..".TO TEST FOR SPECIFIC CONDITIONS IN PRO- GR AMS, WE USE (ST) ";...^.."TOGETHER WITH THE ANDSTATEMENT, AND TWO SPECIAL NUMBER S.".F.H..".TO TEST FOR EOF, WE SAY 'IF ( ST) ";...R.."AND 64 THEN GOTO (THE LINE NUMBER OF THE CLOSE STATEMENT)'.".E.|.." .TO TEST FOR EOT, WE SAY 'IF (ST) AND 12 8THEN GOTO ";......"(THE LINE NUMBER OF THE CLOSE STATEMENT)'.":.".THE NUMBERS " ;.S...."REPRESENT THE 'BITS' SET IN PET' S MEMORY - DON'T WORRY ABOUT THEM."..... .".THE BEST WAY TO TEST FOR ANY ERROR TH AT COULD PRODUCE ";......"A 'CRASH' IS T O SAY 'IF (ST) > 0 THEN GOTO (THE LINE NUMBER OF ";......" THE CLOSE STATEMENT )'. IN TESTING FOR ALL (ST) ";._...."C ONDITIONS, THIS AUTOMATICALLY CLOSES THE FILE IF (ST) VARIES ";...B.."FROM '0',N O MATTER WHAT THE CAUSE.":.1350.W.L..".Y OU ARE NOW VERY NEAR THE POINT AT WHICHY OU CAN TRY USING THE ";...V.."FILE SYSTE M FOR YOURSELF. THERE ARE, HOWEVER, SO ME SOFT-WARE ";.`...."PROGRAM 'PATCHES' YOU SHOULD KNOW ABOUT, TO HELP AVOID "; ......"ERRORS.":.".THE FIRST IS USED WHE N RUNNING ";......"PRINT# FILES IN WHI CH THE OPEN STATEMENT HAS CONCLUDED WI TH ";......"A 1 OR 2 (THUS CALLING EIT HER AN EOF OR AN EOT). ";.C...."THE PATC H MAKES SURE THAT PET KNOWS WHERE IT S TAPEBUFFER IS, ";......"BY USING POKE. ":.".YOU SHOULD NOTE THAT THIS ";......" IS FOR PRINT# FILES ONLY, SINCE IT'S IMP OSSIBLE TO HAVE ";.%.&.."BOTH PRINT# AND INPUT# (OR PRINT# AND GET#) OPERATI ONS AT THE ";.D.0.."SAME TIME WITHIN T HE SAME FILE.":.".YOU'LL FIND THE ";...: .."PATCH FULLY DESCRIBED ONTHE NEXT PAGE .":.1350.W.D..".ON THE PREVIOUS PAGE, WE SAID THAT HERE WE'D LAY OUT ";...N.."TH E FIRST OF OUR SOFTWARE PATCHES. AS WE NOTED, IT'S ";.P.X.."INTENDED TO TELL P ET WHERE THE TAPE #1 BUFFER IS."...B..". IT'S ACHIEVED LIKE THIS. IMMEDIATELY BE- FORE AN OPEN COMMAND, ";.M.L.."INCLUDE T HE LINE:":."......POKE 243,122:POKE";... V.." 244,2":.".SHOULD YOU BE USING A SEC OND TAPE UNIT (TAPE #2), ";.R...."THEN THE LINE BECOMES:":."......POKE 243,58:P OKE 244,3"......".THE GAP BETWEEN POKE A ND THE NUMBERS CANBE REMOVED IN YOUR ";. ....."PROGRAM, OF COURSE. IT'S ONLY BEE N USED IN THE EXAMPLES TO HELP ";.'.... "MAKE THEM CLEAR. REMEMBER, INCLUDE EITH ER OR BOTH LINES, AS ";.V...."APPROPRIAT E, IMMEDIATELY BEFORE OPEN.".`....1350 ......".THE SECOND PATCH IS A SMALL SUBR OUTINE WHICH SHOULD ";...F.."BE CALLED AFTER ALL PRINT# STATEMENTS. CALL IT IN THE NORMAL ";.).P.."WAY WITH GOSUB AND , OF COURSE, CHANGE THE LINE NUMBERS " ;.J.Z.."IN THE LISTING BELOW TO FIT Y OUR PROGRAM.":.".A FULL ";......"EXPLANA TION OF THE WAY IN WHICH IT WORKS IS SO MEWHAT ";......"OUTSIDE THE SCOPE OF TH IS TUTORIAL, AND INDEED OF THE AV- AIL"; .;...."ABLE PET MEMORY! USING IT WILL, H OW- EVER, MAKE TROUBLE-FREE FILE ";.L... ."OPERATION EVEN MORE CERTAIN. HERE IT IS:"......"...2000 IF PEEK(625)>180THEN2 020......"..2010 RETURN.F. .."..2020 POK E59411,53:T=TI...*.."..2030 IFTI-T<6THEN 2030...4.."..2040 POKE59411,61:RETURN.7. >..".THIS SUBROUTINE IS FOR TAPE #1. CHA NGES ";.F.H.."FOR TAPE #2 ARE SHOWN ON T HE NEXT PAGE.".P.R..1350...\..".THE SUBR OUTINE NEEDS SOME SMALL CHANGES IF IT'S TO BE USED ";...F.."WITH TAPE #2. FIRST, HERE'S THE SUBROUTINE AGAIN:"...P.."... 2000 IF PEEK(625)>180THEN2020.).Z.."..20 10 RETURN.H...."..2020 POKE59411,53:T=TI .F...."..2030 IFTI-T<6THEN2030......"..2 040 POKE59411,61:RETURN......".FOR USE W ITH TAPE #2, IT WILL LOOK LIKE THIS:"... ..."..*2000 IF PEEK(626)>180THEN2020.... .."..2010 RETURN......".*2020 POKE59456, 207:T=TI.6.J.."..2030 IFTI-T<6THEN2030.X .T..".*2040 POKE59456,223:RETURN......". THE THREE CHANGED LINES ARE HAVE BEEN ASTERISKED.";.S...."THE NEXT PAGE HAS A BRIEF NOTE OF THE IDEA BEHIND ";..... ."PEEK/POKE COMMANDS."......1350.B ....".FIRST, WHY THE POKE COMMANDS IN BO TH THESOFTWARE PATCHES? ";.~...."EXPERIE NCE HAS SHOWN THAT MANY TAPE FILE PROBL EMS ";.G...."HA.E CENT- RED ON THE START -UP OF THE CASSETTE UNITDRIVE MOTOR. ";. ..$.."AVOIDING TECHNICALITIES, THE PAT CHES OVERCOME THESE BY PUT";.L...."TING THE DRIVE UNDER PROGRAM CONTROL.":.".S IMILARLY, ";...8.."THE PEEK COMMAND EXAM INES THETAPE BUFFER, AND ALSO CONTROLS T HE ";.Q.B.."DRIVEMOTOR AT THE CORRECT PO INTS, TO MINIMISEERRORS."...L..".A COMPL ETE SAMPLE FILE PROGRAM, CONTAIN-ING ALL THE ";.I.V.."SAFETY FEATURES AND PATCHE S DESCRIBED, FORMS THE ";...`.."LAST PAR T OF THIS TUTORIAL.":.".IT WILL REPAY " ;...J.."STUDY, WHICH YOU CAN DO BYLISTIN G IT, OF COURSE.".C.T..1350...~..".BEFOR E WE FINALLY LOAD THE LAST SECTION OF TH E TUTORIAL ";.>...."(THE SAMPLE FILE),WO ULD YOU LIKE TO REVIEW THIS ";......"SEC OND SECTION AGAIN?":.".IF YOU WOULD, PR ESS Y (FOR 'YES'). ";.E...."YOU WILL TH EN AUTOMATICALLY GO BACK TO THE BEGINNI NG ";......"OF THE SECTION."......".IF, HOWEVER, YOU ARE HAPPY WITH YOUR UN-DERS TANDING OF ";.G...."WHAT YOU'VE LEARNT, PRESSN (FOR 'NO') AND CARRY ON TO THE NE XT ";...D.."PAGE, WHICH BRIEFLY DESCRI BES THE FILE PROGRAM BEFORE LOADING.".. .N..".......... WOULD YOU LIKE TO REVIEW ? ."...X..A$:.A$."".1240.,....A$."N".." .................... NO .":.I.1.1750:.:. 1290.B....A$."Y"..".................... YES .":.I.1.1500:......."............... ..........RETURNING TO FIRST PAGE IN A F EW SECONDS.";.B....I.1.6000:.:.100...... 1350:."...........WE'LL NOW LOAD THE DEM ONSTRATION FILE ";.G...."PROGRAM. YOU' LL NEED A BLANK CASSETTE AFTER THE LOA DING ";.~...."IS COMPLETED. PLEASE HAVE ONE AVAILABLE.":.1350...(..:."......... ....... DEMONSTRATION PROGRAM LOADING ." ...2..B(45058).180.:$X,B(45051).48,"FILI NG 3 00T01...<..:..:.F.."............. ............... PRESS THE SPACE KEY TO C ONTINUE .".I.P..59410,4,4.].Z..B.1.30:.A $:.:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL