TUT7
FILE INFORMATION
FILENAME(S): TUT7
FILE TYPE(S): PRG
FILE SIZE: 8.9K
FIRST SEEN: 2025-10-19 22:48:23
APPEARS ON: 4 disk(s)
FILE HASH
dd212ef6e8fa65dcf30fc240ea271e8bdb2291bffe51ab72bad7c3a699b5b676
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BANKSTREETWRITER | TUT7 | PRG | Radd Maxx | 7 | 2 | DOWNLOAD FILE |
| MM UTILITY | TUT7 | PRG | Radd Maxx | 7 | 2 | DOWNLOAD FILE |
| BANKSTREETWRITER | TUT7 | PRG | DuncanTwain | 7 | 2 | DOWNLOAD FILE |
| BANKSTREETWRITER | TUT7 | PRG | DuncanTwain | 7 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 01 00 8F 20 54 55 54 37 00 30 08 0A |....... TUT7.0..|
00000010: 00 97 20 35 31 2C 30 3A 97 20 35 32 2C 38 34 3A |.. 51,0:. 52,84:|
00000020: 97 20 35 35 2C 30 3A 97 20 35 36 2C 38 34 3A 9C |. 55,0:. 56,84:.|
00000030: 00 3A 08 32 00 89 20 31 39 35 00 45 08 64 00 8D |.:.2.. 195.E.d..|
00000040: 20 36 30 30 30 00 50 08 6E 00 8D 20 37 30 30 30 | 6000.P.n.. 7000|
00000050: 00 59 08 78 00 4B B2 31 30 00 5F 08 7D 00 99 00 |.Y.x.K.10._.}...|
00000060: 7A 08 82 00 99 20 22 C2 41 4E 4B 20 D3 54 52 45 |z.... ".ANK .TRE|
00000070: 45 54 20 D7 52 49 54 45 52 22 00 80 08 8C 00 99 |ET .RITER"......|
00000080: 00 91 08 96 00 99 20 22 D4 D5 D4 CF D2 C9 C1 CC |...... "........|
00000090: 22 00 97 08 A0 00 99 00 A2 08 AA 00 8D 20 37 35 |"............ 75|
000000A0: 30 30 00 C5 08 B4 00 99 20 22 CC 45 53 53 4F 4E |00...... ".ESSON|
000000B0: 20 35 3A 20 C6 49 4E 44 20 41 4E 44 20 D2 45 50 | 5: .IND AND .EP|
000000C0: 4C 41 43 45 22 00 D0 08 BE 00 8D 20 37 36 30 30 |LACE"...... 7600|
000000D0: 00 DC 08 C0 00 8D 20 31 35 30 30 30 00 F0 08 C3 |...... 15000....|
000000E0: 00 8D 20 36 30 30 30 20 3A 20 8D 20 38 31 30 30 |.. 6000 : . 8100|
000000F0: 00 FB 08 C8 00 8D 20 37 31 30 30 00 0C 09 D2 00 |...... 7100.....|
00000100: 59 B2 39 20 3A 20 8D 20 35 30 33 30 00 37 09 DC |Y.9 : . 5030.7..|
00000110: 00 99 20 22 20 20 20 D3 4F 4D 45 54 49 4D 45 53 |.. " .OMETIMES|
00000120: 20 57 48 45 4E 20 59 4F 55 20 48 41 56 45 20 57 | WHEN YOU HAVE W|
00000130: 52 49 54 54 45 4E 22 00 62 09 E6 00 99 20 22 41 |RITTEN".b.... "A|
00000140: 20 4C 4F 54 2C 20 49 54 20 49 53 20 44 49 46 46 | LOT, IT IS DIFF|
00000150: 49 43 55 4C 54 20 54 4F 20 4C 4F 43 41 54 45 20 |ICULT TO LOCATE |
00000160: 41 22 00 8F 09 F0 00 99 20 22 53 50 45 43 49 46 |A"...... "SPECIF|
00000170: 49 43 20 50 4C 41 43 45 20 49 4E 20 59 4F 55 52 |IC PLACE IN YOUR|
00000180: 20 54 45 58 54 2E 20 D9 4F 55 20 43 41 4E 22 00 | TEXT. .OU CAN".|
00000190: B9 09 FA 00 99 20 22 55 53 45 20 C6 C9 CE C4 20 |..... "USE .... |
000001A0: 54 4F 20 48 45 4C 50 20 59 4F 55 20 44 4F 20 54 |TO HELP YOU DO T|
000001B0: 48 49 53 2E 20 C6 4F 52 22 00 E2 09 04 01 99 20 |HIS. .OR"...... |
000001C0: 22 45 58 41 4D 50 4C 45 2C 20 49 46 20 59 4F 55 |"EXAMPLE, IF YOU|
000001D0: 20 57 41 4E 54 20 54 4F 20 4D 4F 56 45 20 54 48 | WANT TO MOVE TH|
000001E0: 45 22 00 10 0A 0E 01 99 20 22 43 55 52 53 4F 52 |E"...... "CURSOR|
000001F0: 20 54 4F 20 54 48 45 20 50 4C 41 43 45 20 57 48 | TO THE PLACE WH|
00000200: 45 52 45 20 59 4F 55 20 4D 45 4E 54 49 4F 4E 22 |ERE YOU MENTION"|
00000210: 00 3B 0A 18 01 99 20 22 27 CE 45 57 20 D9 4F 52 |.;.... "'.EW .OR|
00000220: 4B 27 2C 20 59 4F 55 20 55 53 45 20 C6 C9 CE C4 |K', YOU USE ....|
00000230: 20 54 4F 20 4C 4F 43 41 54 45 22 00 59 0A 22 01 | TO LOCATE".Y.".|
00000240: 99 20 22 54 48 45 20 57 4F 52 44 53 20 27 CE 45 |. "THE WORDS '.E|
00000250: 57 20 D9 4F 52 4B 27 2E 22 00 86 0A 2C 01 99 20 |W .ORK'."...,.. |
00000260: 22 20 20 20 D7 49 54 48 20 D2 C5 D0 CC C1 C3 C5 |" .ITH .......|
00000270: 20 59 4F 55 20 43 41 4E 20 43 48 41 4E 47 45 20 | YOU CAN CHANGE |
00000280: 57 4F 52 44 53 22 00 B1 0A 36 01 99 20 22 54 48 |WORDS"...6.. "TH|
00000290: 41 54 20 4F 43 43 55 52 20 41 54 20 53 45 56 45 |AT OCCUR AT SEVE|
000002A0: 52 41 4C 20 4C 4F 43 41 54 49 4F 4E 53 20 49 4E |RAL LOCATIONS IN|
000002B0: 22 00 D7 0A 40 01 99 20 22 59 4F 55 52 20 54 45 |"...@.. "YOUR TE|
000002C0: 58 54 2E 20 D2 C5 D0 CC C1 C3 C5 20 46 49 4E 44 |XT. ....... FIND|
000002D0: 53 20 45 41 43 48 22 00 03 0B 4A 01 99 20 22 4F |S EACH"...J.. "O|
000002E0: 43 43 55 52 52 45 4E 43 45 20 4F 46 20 53 4F 4D |CCURRENCE OF SOM|
000002F0: 45 20 54 45 58 54 20 41 4E 44 20 43 48 41 4E 47 |E TEXT AND CHANG|
00000300: 45 53 22 00 2B 0B 54 01 99 20 22 49 54 20 54 4F |ES".+.T.. "IT TO|
00000310: 20 4E 45 57 20 54 45 58 54 20 54 48 41 54 20 59 | NEW TEXT THAT Y|
00000320: 4F 55 20 53 55 50 50 4C 59 2E 22 00 3A 0B 55 01 |OU SUPPLY.".:.U.|
00000330: 9E 20 28 46 4F 55 52 41 52 29 00 44 0B 5A 01 8D |. (FOURAR).D.Z..|
00000340: 20 35 32 35 00 5F 0B 5C 01 8D 20 37 31 30 30 20 | 525._.\.. 7100 |
00000350: 3A 20 59 B2 32 34 20 3A 20 8D 20 35 30 33 30 00 |: Y.24 : . 5030.|
00000360: 85 0B 5D 01 99 20 22 20 20 20 20 20 20 20 20 20 |..].. " |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000380: 20 20 20 22 3B 00 90 0B 5E 01 8D 20 37 32 30 30 | ";...^.. 7200|
00000390: 00 9B 0B 68 01 8D 20 37 30 30 30 00 A6 0B 72 01 |...h.. 7000...r.|
000003A0: 8D 20 38 37 30 30 00 B1 0B 7C 01 8D 20 37 37 30 |. 8700...|.. 770|
000003B0: 30 00 BC 0B 86 01 8D 20 37 31 30 30 00 CE 0B 90 |0...... 7100....|
000003C0: 01 59 B2 31 35 20 3A 20 8D 20 35 30 33 30 00 F3 |.Y.15 : . 5030..|
000003D0: 0B 9A 01 99 20 22 20 D5 53 45 20 C6 C9 CE C4 20 |.... " .SE .... |
000003E0: 54 4F 20 4C 4F 43 41 54 45 20 54 48 45 20 57 4F |TO LOCATE THE WO|
000003F0: 52 44 22 00 12 0C A4 01 99 20 22 20 27 43 4C 55 |RD"...... " 'CLU|
00000400: 45 27 20 49 4E 20 54 48 45 20 4A 49 4E 47 4C 45 |E' IN THE JINGLE|
00000410: 2E 22 00 1C 0C AE 01 8D 20 34 35 30 00 26 0C B8 |."...... 450.&..|
00000420: 01 89 20 35 32 32 00 31 0C C2 01 8D 20 39 37 30 |.. 522.1.... 970|
00000430: 30 00 3C 0C CC 01 8D 20 37 31 30 30 00 4E 0C D6 |0.<.... 7100.N..|
00000440: 01 59 B2 31 39 20 3A 20 8D 20 35 30 33 30 00 7A |.Y.19 : . 5030.z|
00000450: 0C E0 01 99 20 22 20 31 2E 20 CD 4F 56 45 20 54 |.... " 1. .OVE T|
00000460: 48 45 20 53 45 4C 45 43 54 4F 52 20 41 54 20 54 |HE SELECTOR AT T|
00000470: 48 45 20 54 4F 50 20 4F 46 22 00 A3 0C EA 01 99 |HE TOP OF"......|
00000480: 20 22 20 54 48 45 20 53 43 52 45 45 4E 20 54 4F | " THE SCREEN TO|
00000490: 20 C6 C9 CE C4 20 28 55 53 45 20 3C 20 4F 52 20 | .... (USE < OR |
000004A0: 3E 29 22 00 A9 0C F4 01 99 00 C3 0C FE 01 99 20 |>)"............ |
000004B0: 22 20 32 2E 20 D0 52 45 53 53 20 D2 C5 D4 D5 D2 |" 2. .RESS .....|
000004C0: CE 22 3B 00 C9 0C 08 02 8E 00 D3 0C 0A 02 89 20 |.";............ |
000004D0: 36 36 35 00 E0 0C 0D 02 54 42 55 46 B2 42 55 46 |665.....TBUF.BUF|
000004E0: 00 07 0D 12 02 41 31 24 B2 22 D7 48 59 20 54 48 |.....A1$.".HY TH|
000004F0: 52 4F 55 47 48 20 49 53 20 54 48 52 4F 55 47 48 |ROUGH IS THROUGH|
00000500: 22 AA C7 28 31 33 29 00 26 0D 1C 02 41 24 B2 41 |"..(13).&...A$.A|
00000510: 31 24 20 3A 20 54 42 55 46 B2 42 55 46 20 3A 20 |1$ : TBUF.BUF : |
00000520: 8D 20 38 36 30 30 00 49 0D 26 02 41 32 24 B2 22 |. 8600.I.&.A2$."|
00000530: 41 4E 44 20 54 48 52 45 57 20 49 53 20 54 48 52 |AND THREW IS THR|
00000540: 45 57 22 AA C7 28 31 33 29 00 68 0D 30 02 41 24 |EW"..(13).h.0.A$|
00000550: B2 41 32 24 20 3A 20 54 42 55 46 B2 42 4C 45 20 |.A2$ : TBUF.BLE |
00000560: 3A 20 8D 20 38 36 30 30 00 89 0D 3A 02 41 33 24 |: . 8600...:.A3$|
00000570: B2 22 C9 20 48 41 56 45 4E 27 54 20 41 20 43 4C |.". HAVEN'T A CL|
00000580: 55 45 22 AA C7 28 31 33 29 00 A8 0D 44 02 41 24 |UE"..(13)...D.A$|
00000590: B2 41 33 24 20 3A 20 54 42 55 46 B2 42 4C 45 20 |.A3$ : TBUF.BLE |
000005A0: 3A 20 8D 20 38 36 30 30 00 CB 0D 4E 02 41 34 24 |: . 8600...N.A4$|
000005B0: B2 22 C1 4E 44 20 57 48 45 4E 20 C9 27 4D 20 54 |.".ND WHEN .'M T|
000005C0: 48 52 45 57 22 AA C7 28 31 33 29 00 EA 0D 58 02 |HREW"..(13)...X.|
000005D0: 41 24 B2 41 34 24 20 3A 20 54 42 55 46 B2 42 4C |A$.A4$ : TBUF.BL|
000005E0: 45 20 3A 20 8D 20 38 36 30 30 00 16 0E 62 02 41 |E : . 8600...b.A|
000005F0: 35 24 B2 22 D3 50 45 4C 4C 49 4E 47 20 54 48 52 |5$.".PELLING THR|
00000600: 45 57 20 46 4F 52 20 54 48 52 4F 55 47 48 2C 22 |EW FOR THROUGH,"|
00000610: AA C7 28 31 33 29 00 35 0E 6C 02 41 24 B2 41 35 |..(13).5.l.A$.A5|
00000620: 24 20 3A 20 54 42 55 46 B2 42 4C 45 20 3A 20 8D |$ : TBUF.BLE : .|
00000630: 20 38 36 30 30 00 60 0E 76 02 41 36 24 B2 22 C9 | 8600.`.v.A6$.".|
00000640: 27 4D 20 54 49 52 45 44 20 54 48 52 45 57 20 41 |'M TIRED THREW A|
00000650: 4E 44 20 54 48 52 45 57 3B 22 AA C7 28 31 33 29 |ND THREW;"..(13)|
00000660: 00 7F 0E 80 02 41 24 B2 41 36 24 20 3A 20 54 42 |.....A$.A6$ : TB|
00000670: 55 46 B2 42 4C 45 20 3A 20 8D 20 38 36 30 30 00 |UF.BLE : . 8600.|
00000680: B5 0E 8A 02 41 37 24 B2 22 53 4F 20 C9 20 45 58 |....A7$."SO . EX|
00000690: 43 4C 41 49 4D 20 41 20 4D 49 47 48 54 59 2C 20 |CLAIM A MIGHTY, |
000006A0: 22 AA C7 28 33 34 29 AA 22 D0 48 45 57 21 22 AA |"..(34).".HEW!".|
000006B0: C7 28 33 34 29 00 D4 0E 94 02 41 24 B2 41 37 24 |.(34).....A$.A7$|
000006C0: 20 3A 20 54 42 55 46 B2 42 4C 45 20 3A 20 8D 20 | : TBUF.BLE : . |
000006D0: 38 36 30 30 00 DA 0E 96 02 8E 00 E7 0E 99 02 45 |8600...........E|
000006E0: 52 52 43 4E 54 B2 30 00 F5 0E 9E 02 9E 20 28 53 |RRCNT.0...... (S|
000006F0: 57 49 4E 44 29 00 03 0F A3 02 97 20 43 44 4E 55 |WIND)...... CDNU|
00000700: 4D 2C 30 00 12 0F A5 02 9E 20 28 46 4F 55 52 41 |M,0...... (FOURA|
00000710: 52 29 00 1D 0F A6 02 8D 20 39 31 30 30 00 28 0F |R)...... 9100.(.|
00000720: A8 02 8D 20 39 30 30 30 00 3F 0F B2 02 8B 20 C2 |... 9000.?.... .|
00000730: 28 43 44 4E 55 4D 29 B2 32 20 A7 20 37 39 30 00 |(CDNUM).2 . 790.|
00000740: 4A 0F BC 02 8D 20 38 33 30 30 00 69 0F C1 02 8B |J.... 8300.i....|
00000750: 20 45 52 52 43 4E 54 B2 4F 20 A7 20 8D 20 34 35 | ERRCNT.O . . 45|
00000760: 30 20 3A 20 89 20 36 37 30 00 78 0F C3 02 9E 20 |0 : . 670.x.... |
00000770: 28 46 4F 55 52 41 52 29 00 83 0F C6 02 8D 20 39 |(FOURAR)...... 9|
00000780: 37 30 30 00 8E 0F D0 02 8D 20 37 31 30 30 00 A0 |700...... 7100..|
00000790: 0F DA 02 59 B2 31 39 20 3A 20 8D 20 35 30 33 30 |...Y.19 : . 5030|
000007A0: 00 C1 0F E4 02 99 20 22 20 D9 4F 55 20 44 49 44 |...... " .OU DID|
000007B0: 20 4E 4F 54 20 53 45 4C 45 43 54 20 C6 C9 CE C4 | NOT SELECT ....|
000007C0: 22 00 D4 0F EE 02 99 20 22 20 D4 52 59 20 41 47 |"...... " .RY AG|
000007D0: 41 49 4E 22 00 DF 0F F8 02 8D 20 38 34 30 30 00 |AIN"...... 8400.|
000007E0: E9 0F 02 03 8D 20 34 35 30 00 F3 0F 0C 03 89 20 |..... 450...... |
000007F0: 36 37 30 00 FE 0F 16 03 8D 20 39 37 30 30 00 08 |670...... 9700..|
00000800: 10 1F 03 8D 20 38 31 30 00 12 10 20 03 89 20 38 |.... 810... .. 8|
00000810: 38 30 00 1D 10 2A 03 8D 20 39 37 30 30 00 28 10 |80...*.. 9700.(.|
00000820: 34 03 8D 20 37 31 30 30 00 3A 10 3E 03 59 B2 31 |4.. 7100.:.>.Y.1|
00000830: 39 20 3A 20 8D 20 35 30 33 30 00 5F 10 48 03 99 |9 : . 5030._.H..|
00000840: 20 22 20 33 2E 20 D2 45 53 50 4F 4E 44 20 42 59 | " 3. .ESPOND BY|
00000850: 20 54 59 50 49 4E 47 20 27 43 4C 55 45 27 22 00 | TYPING 'CLUE'".|
00000860: 78 10 52 03 99 20 22 20 34 2E 20 D0 52 45 53 53 |x.R.. " 4. .RESS|
00000870: 20 D2 C5 D4 D5 D2 CE 22 00 9D 10 5C 03 99 20 22 | ......"...\.. "|
00000880: 20 35 2E 20 C1 4E 53 57 45 52 20 4E 45 58 54 20 | 5. .NSWER NEXT |
00000890: 51 55 45 53 54 49 4F 4E 20 27 CE 27 22 00 A3 10 |QUESTION '.'"...|
000008A0: 66 03 8E 00 B0 10 70 03 45 52 52 43 4E 54 B2 30 |f.....p.ERRCNT.0|
000008B0: 00 BE 10 72 03 9E 20 28 53 57 49 4E 44 29 00 C9 |...r.. (SWIND)..|
000008C0: 10 75 03 8D 20 39 38 30 30 00 D4 10 7A 03 8D 20 |.u.. 9800...z.. |
000008D0: 37 39 30 30 00 DF 10 7F 03 8D 20 39 36 30 30 00 |7900...... 9600.|
000008E0: F1 10 84 03 8B 20 5A B2 35 34 20 A7 20 31 30 31 |..... Z.54 . 101|
000008F0: 30 00 FC 10 8E 03 8D 20 38 33 30 30 00 1B 11 98 |0...... 8300....|
00000900: 03 8B 20 45 52 52 43 4E 54 B2 30 20 A7 20 8D 20 |.. ERRCNT.0 . . |
00000910: 38 31 30 20 3A 20 89 20 38 38 32 00 26 11 A2 03 |810 : . 882.&...|
00000920: 8D 20 39 37 30 30 00 31 11 AC 03 8D 20 37 31 30 |. 9700.1.... 710|
00000930: 30 00 43 11 B6 03 59 B2 31 39 20 3A 20 8D 20 35 |0.C...Y.19 : . 5|
00000940: 30 33 30 00 6A 11 C0 03 99 20 22 20 D9 4F 55 20 |030.j.... " .OU |
00000950: 44 49 44 20 4E 4F 54 20 46 4F 4C 4C 4F 57 20 44 |DID NOT FOLLOW D|
00000960: 49 52 45 43 54 49 4F 4E 53 22 00 7D 11 CA 03 99 |IRECTIONS".}....|
00000970: 20 22 20 D4 52 59 20 41 47 41 49 4E 22 00 88 11 | " .RY AGAIN"...|
00000980: D4 03 8D 20 38 34 30 30 00 92 11 DE 03 8D 20 38 |... 8400...... 8|
00000990: 31 30 00 9C 11 E8 03 89 20 38 38 32 00 B3 11 F2 |10...... 882....|
000009A0: 03 8B 20 C2 28 43 48 41 52 29 B2 39 35 20 A7 20 |.. .(CHAR).95 . |
000009B0: 39 31 30 00 C5 11 F4 03 4B B2 31 30 20 3A 20 8D |910.....K.10 : .|
000009C0: 20 37 32 35 30 00 D0 11 F7 03 8D 20 37 31 30 30 | 7250...... 7100|
000009D0: 00 E2 11 FC 03 59 B2 31 35 20 3A 20 8D 20 35 30 |.....Y.15 : . 50|
000009E0: 33 30 00 10 12 06 04 99 20 22 20 CE 4F 57 20 43 |30...... " .OW C|
000009F0: 4F 52 52 45 43 54 20 54 48 45 20 4D 49 53 53 50 |ORRECT THE MISSP|
00000A00: 45 4C 4C 45 44 20 27 54 48 52 45 57 27 53 27 22 |ELLED 'THREW'S'"|
00000A10: 00 3C 12 10 04 99 20 22 20 49 4E 20 4C 49 4E 45 |.<.... " IN LINE|
00000A20: 53 20 34 20 41 4E 44 20 36 20 42 59 20 55 53 49 |S 4 AND 6 BY USI|
00000A30: 4E 47 20 D2 C5 D0 CC C1 C3 C5 2E 22 00 47 12 1A |NG ........".G..|
00000A40: 04 8D 20 31 30 37 30 00 52 12 24 04 89 20 31 31 |.. 1070.R.$.. 11|
00000A50: 33 30 00 5D 12 2E 04 8D 20 39 37 30 30 00 68 12 |30.].... 9700.h.|
00000A60: 33 04 8D 20 37 31 30 30 00 7A 12 38 04 59 B2 31 |3.. 7100.z.8.Y.1|
00000A70: 39 20 3A 20 8D 20 35 30 33 30 00 A3 12 42 04 99 |9 : . 5030...B..|
00000A80: 20 22 20 31 2E 20 CD 4F 56 45 20 54 48 45 20 53 | " 1. .OVE THE S|
00000A90: 45 4C 45 43 54 4F 52 20 54 4F 20 D2 C5 D0 CC C1 |ELECTOR TO .....|
00000AA0: C3 C5 22 00 A9 12 4C 04 99 00 C2 12 56 04 99 20 |.."...L.....V.. |
00000AB0: 22 20 32 2E 20 D0 52 45 53 53 20 D2 C5 D4 D5 D2 |" 2. .RESS .....|
00000AC0: CE 22 00 C8 12 60 04 8E 00 D5 12 6A 04 45 52 52 |."...`.....j.ERR|
00000AD0: 43 4E 54 B2 30 00 E3 12 74 04 97 20 43 44 4E 55 |CNT.0...t.. CDNU|
00000AE0: 4D 2C 30 00 F1 12 7E 04 9E 20 28 53 57 49 4E 44 |M,0...~.. (SWIND|
00000AF0: 29 00 00 13 83 04 9E 20 28 46 4F 55 52 41 52 29 |)...... (FOURAR)|
00000B00: 00 0B 13 88 04 8D 20 39 30 30 30 00 23 13 92 04 |...... 9000.#...|
00000B10: 8B 20 C2 28 43 44 4E 55 4D 29 B2 35 20 A7 20 31 |. .(CDNUM).5 . 1|
00000B20: 32 37 30 00 2E 13 9C 04 8D 20 38 33 30 30 00 4F |270...... 8300.O|
00000B30: 13 A6 04 8B 20 45 52 52 43 4E 54 B2 30 20 A7 20 |.... ERRCNT.0 . |
00000B40: 8D 20 31 30 37 30 20 3A 20 89 20 31 31 34 30 00 |. 1070 : . 1140.|
00000B50: 5A 13 B0 04 8D 20 39 37 30 30 00 6C 13 BA 04 59 |Z.... 9700.l...Y|
00000B60: B2 31 39 20 3A 20 8D 20 35 30 33 30 00 90 13 C4 |.19 : . 5030....|
00000B70: 04 99 20 22 20 D9 4F 55 20 44 49 44 20 4E 4F 54 |.. " .OU DID NOT|
00000B80: 20 53 45 4C 45 43 54 20 D2 C5 D0 CC C1 C3 C5 22 | SELECT ......."|
00000B90: 00 A3 13 CE 04 99 20 22 20 D4 52 59 20 41 47 41 |...... " .RY AGA|
00000BA0: 49 4E 22 00 AE 13 D8 04 8D 20 38 34 30 30 00 B9 |IN"...... 8400..|
00000BB0: 13 E2 04 8D 20 31 30 37 30 00 C4 13 EC 04 89 20 |.... 1070...... |
00000BC0: 31 31 34 30 00 CF 13 F6 04 8D 20 31 33 30 30 00 |1140...... 1300.|
00000BD0: DA 13 0A 05 89 20 31 33 37 30 00 E5 13 14 05 8D |..... 1370......|
00000BE0: 20 39 37 30 30 00 F0 13 1E 05 8D 20 37 31 30 30 | 9700...... 7100|
00000BF0: 00 02 14 28 05 59 B2 31 39 20 3A 20 8D 20 35 30 |...(.Y.19 : . 50|
00000C00: 33 30 00 28 14 32 05 99 20 22 20 33 2E 20 D2 45 |30.(.2.. " 3. .E|
00000C10: 53 50 4F 4E 44 20 42 59 20 54 59 50 49 4E 47 20 |SPOND BY TYPING |
00000C20: 27 54 48 52 45 57 27 22 00 2E 14 3C 05 99 00 47 |'THREW'"...<...G|
00000C30: 14 46 05 99 20 22 20 34 2E 20 D0 52 45 53 53 20 |.F.. " 4. .RESS |
00000C40: D2 C5 D4 D5 D2 CE 22 00 4D 14 50 05 8E 00 5A 14 |......".M.P...Z.|
00000C50: 5A 05 45 52 52 43 4E 54 B2 30 00 68 14 64 05 9E |Z.ERRCNT.0.h.d..|
00000C60: 20 28 53 57 49 4E 44 29 00 73 14 6E 05 8D 20 39 | (SWIND).s.n.. 9|
00000C70: 39 30 30 00 7E 14 78 05 8D 20 39 36 30 30 00 90 |900.~.x.. 9600..|
00000C80: 14 82 05 8B 20 5A B2 32 37 20 A7 20 31 35 32 30 |.... Z.27 . 1520|
00000C90: 00 9B 14 8C 05 8D 20 38 33 30 30 00 BC 14 96 05 |...... 8300.....|
00000CA0: 8B 20 45 52 52 43 4E 54 B2 30 20 A7 20 8D 20 31 |. ERRCNT.0 . . 1|
00000CB0: 33 30 30 20 3A 20 89 20 31 33 38 30 00 C7 14 A0 |300 : . 1380....|
00000CC0: 05 8D 20 39 37 30 30 00 D2 14 AA 05 8D 20 37 31 |.. 9700...... 71|
00000CD0: 30 30 00 E4 14 B4 05 59 B2 31 39 20 3A 20 8D 20 |00.....Y.19 : . |
00000CE0: 35 30 33 30 00 12 15 BE 05 99 20 22 20 D9 4F 55 |5030...... " .OU|
00000CF0: 20 44 49 44 20 4E 4F 54 20 54 59 50 45 20 27 54 | DID NOT TYPE 'T|
00000D00: 48 52 45 57 27 20 54 48 45 4E 20 D2 C5 D4 D5 D2 |HREW' THEN .....|
00000D10: CE 22 00 18 15 C8 05 99 00 2B 15 D2 05 99 20 22 |.".......+.... "|
00000D20: 20 D4 52 59 20 41 47 41 49 4E 22 00 36 15 D7 05 | .RY AGAIN".6...|
00000D30: 8D 20 38 34 30 30 00 41 15 DC 05 8D 20 31 33 30 |. 8400.A.... 130|
00000D40: 30 00 4C 15 E6 05 89 20 31 33 38 30 00 57 15 F0 |0.L.... 1380.W..|
00000D50: 05 8D 20 31 35 34 30 00 62 15 FA 05 89 20 31 37 |.. 1540.b.... 17|
00000D60: 30 30 00 6D 15 04 06 8D 20 39 37 30 30 00 78 15 |00.m.... 9700.x.|
00000D70: 0E 06 8D 20 37 31 30 30 00 8A 15 18 06 59 B2 31 |... 7100.....Y.1|
00000D80: 39 20 3A 20 8D 20 35 30 33 30 00 B2 15 22 06 99 |9 : . 5030..."..|
00000D90: 20 22 20 35 2E 20 D2 45 53 50 4F 4E 44 20 42 59 | " 5. .ESPOND BY|
00000DA0: 20 54 59 50 49 4E 47 20 27 54 48 52 4F 55 47 48 | TYPING 'THROUGH|
00000DB0: 27 22 00 B8 15 2C 06 99 00 D1 15 36 06 99 20 22 |'"...,.....6.. "|
00000DC0: 20 36 2E 20 D0 52 45 53 53 20 D2 C5 D4 D5 D2 CE | 6. .RESS ......|
00000DD0: 22 00 D7 15 40 06 8E 00 FF 15 7C 06 99 20 22 20 |"...@.....|.. " |
00000DE0: 35 2E 20 D2 45 53 50 4F 4E 44 20 42 59 20 54 59 |5. .ESPOND BY TY|
00000DF0: 50 49 4E 47 20 27 54 48 52 4F 55 47 48 27 22 00 |PING 'THROUGH'".|
00000E00: 0C 16 A4 06 45 52 52 43 4E 54 B2 30 00 1A 16 AE |....ERRCNT.0....|
00000E10: 06 9E 20 28 53 57 49 4E 44 29 00 26 16 B8 06 8D |.. (SWIND).&....|
00000E20: 20 31 30 30 30 30 00 3F 16 C2 06 8B 20 C2 28 43 | 10000.?.... .(C|
00000E30: 48 41 52 29 B3 B1 39 35 20 A7 20 31 38 35 30 00 |HAR)..95 . 1850.|
00000E40: 4A 16 CC 06 8D 20 38 33 30 30 00 6B 16 D6 06 8B |J.... 8300.k....|
00000E50: 20 45 52 52 43 4E 54 B2 30 20 A7 20 8D 20 31 35 | ERRCNT.0 . . 15|
00000E60: 34 30 20 3A 20 89 20 31 37 31 30 00 76 16 E0 06 |40 : . 1710.v...|
00000E70: 8D 20 39 37 30 30 00 81 16 EA 06 8D 20 37 31 30 |. 9700...... 710|
00000E80: 30 00 93 16 F4 06 59 B2 31 39 20 3A 20 8D 20 35 |0.....Y.19 : . 5|
00000E90: 30 33 30 00 BA 16 FE 06 99 20 22 20 D9 4F 55 20 |030...... " .OU |
00000EA0: 44 49 44 20 4E 4F 54 20 46 4F 4C 4C 4F 57 20 44 |DID NOT FOLLOW D|
00000EB0: 49 52 45 43 54 49 4F 4E 53 22 00 C0 16 08 07 99 |IRECTIONS"......|
00000EC0: 00 D3 16 12 07 99 20 22 20 D4 52 59 20 41 47 41 |...... " .RY AGA|
00000ED0: 49 4E 22 00 DE 16 1C 07 8D 20 38 34 30 30 00 E9 |IN"...... 8400..|
00000EE0: 16 26 07 8D 20 31 35 34 30 00 F4 16 30 07 89 20 |.&.. 1540...0.. |
00000EF0: 31 37 31 30 00 FF 16 3A 07 8D 20 31 38 37 30 00 |1710...:.. 1870.|
00000F00: 0A 17 44 07 89 20 31 39 34 30 00 15 17 4E 07 8D |..D.. 1940...N..|
00000F10: 20 39 37 30 30 00 27 17 58 07 59 B2 31 39 20 3A | 9700.'.X.Y.19 :|
00000F20: 20 8D 20 35 30 33 30 00 53 17 62 07 99 20 22 20 | . 5030.S.b.. " |
00000F30: 37 2E 20 C1 4E 53 57 45 52 20 27 CE 27 20 54 4F |7. .NSWER '.' TO|
00000F40: 20 4C 45 41 56 45 20 54 48 45 20 43 4F 52 52 45 | LEAVE THE CORRE|
00000F50: 43 54 22 00 82 17 6C 07 99 20 22 20 20 20 20 27 |CT"...l.. " '|
00000F60: 54 48 52 45 57 27 53 27 20 4F 4E 20 4C 49 4E 45 |THREW'S' ON LINE|
00000F70: 53 20 32 20 41 4E 44 20 35 2E 20 C1 4E 53 57 45 |S 2 AND 5. .NSWE|
00000F80: 52 22 00 AA 17 76 07 99 20 22 20 20 20 20 27 D9 |R"...v.. " '.|
00000F90: 27 20 54 4F 20 52 45 50 4C 41 43 45 20 27 54 48 |' TO REPLACE 'TH|
00000FA0: 52 45 57 27 20 57 49 54 48 22 00 D2 17 80 07 99 |REW' WITH"......|
00000FB0: 20 22 20 20 20 20 27 54 48 52 4F 55 47 48 27 20 | " 'THROUGH' |
00000FC0: 4F 4E 20 4C 49 4E 45 53 20 34 20 41 4E 44 20 36 |ON LINES 4 AND 6|
00000FD0: 2E 22 00 D8 17 8A 07 8E 00 E5 17 94 07 45 52 52 |."...........ERR|
00000FE0: 43 4E 54 B2 30 00 F3 17 9E 07 9E 20 28 53 57 49 |CNT.0...... (SWI|
00000FF0: 4E 44 29 00 FF 17 A8 07 8D 20 31 30 31 30 30 00 |ND)...... 10100.|
00001000: 0A 18 AD 07 46 4C 41 47 B2 30 00 2B 18 B2 07 8B |....FLAG.0.+....|
00001010: 20 C2 28 42 55 46 AA 33 30 29 B3 B1 C6 28 22 45 | .(BUF.30)...("E|
00001020: 22 29 20 A7 20 46 4C 41 47 B2 31 00 4C 18 BC 07 |") . FLAG.1.L...|
00001030: 8B 20 C2 28 42 55 46 AA 33 39 29 B3 B1 C6 28 22 |. .(BUF.39)...("|
00001040: 45 22 29 20 A7 20 46 4C 41 47 B2 31 00 6D 18 C6 |E") . FLAG.1.m..|
00001050: 07 8B 20 C2 28 42 55 46 AA 37 35 29 B3 B1 C6 28 |.. .(BUF.75)...(|
00001060: 22 4F 22 29 20 A7 20 46 4C 41 47 B2 31 00 8E 18 |"O") . FLAG.1...|
00001070: D0 07 8B 20 C2 28 42 55 46 AA 39 32 29 B3 B1 C6 |... .(BUF.92)...|
00001080: 28 22 45 22 29 20 A7 20 46 4C 41 47 B2 31 00 B0 |("E") . FLAG.1..|
00001090: 18 DA 07 8B 20 C2 28 42 55 46 AA 31 32 31 29 B3 |.... .(BUF.121).|
000010A0: B1 C6 28 22 4F 22 29 20 A7 20 46 4C 41 47 B2 31 |..("O") . FLAG.1|
000010B0: 00 D2 18 E4 07 8B 20 C2 28 42 55 46 AA 31 33 33 |...... .(BUF.133|
000010C0: 29 B3 B1 C6 28 22 4F 22 29 20 A7 20 46 4C 41 47 |)...("O") . FLAG|
000010D0: B2 31 00 EC 18 EE 07 8B 20 C2 28 43 48 41 52 29 |.1...... .(CHAR)|
000010E0: B2 39 35 20 A7 20 46 4C 41 47 B2 31 00 00 19 F8 |.95 . FLAG.1....|
000010F0: 07 8B 20 46 4C 41 47 B2 30 20 A7 20 32 31 31 30 |.. FLAG.0 . 2110|
00001100: 00 0B 19 02 08 8D 20 39 37 30 30 00 16 19 0C 08 |...... 9700.....|
00001110: 8D 20 37 31 30 30 00 28 19 16 08 59 B2 31 39 20 |. 7100.(...Y.19 |
00001120: 3A 20 8D 20 35 30 33 30 00 57 19 20 08 99 20 22 |: . 5030.W. .. "|
00001130: 20 D9 4F 55 20 44 49 44 20 4E 4F 54 20 46 4F 4C | .OU DID NOT FOL|
00001140: 4C 4F 57 20 41 4C 4C 20 54 48 45 20 44 49 52 45 |LOW ALL THE DIRE|
00001150: 43 54 49 4F 4E 53 22 00 83 19 2A 08 99 20 22 20 |CTIONS"...*.. " |
00001160: 42 55 54 20 59 4F 55 27 56 45 20 53 45 45 4E 20 |BUT YOU'VE SEEN |
00001170: 48 4F 57 20 54 4F 20 55 53 45 20 D2 C5 D0 CC C1 |HOW TO USE .....|
00001180: C3 C5 22 00 8E 19 34 08 8D 20 38 34 30 30 00 A0 |.."...4.. 8400..|
00001190: 19 3E 08 4B B2 31 30 20 3A 20 8D 20 37 32 35 30 |.>.K.10 : . 7250|
000011A0: 00 AB 19 42 08 8D 20 38 37 30 30 00 BD 19 43 08 |...B.. 8700...C.|
000011B0: 8F 20 53 59 53 28 46 4F 55 52 41 52 29 00 C8 19 |. SYS(FOURAR)...|
000011C0: 48 08 8D 20 37 31 30 30 00 DA 19 52 08 59 B2 31 |H.. 7100...R.Y.1|
000011D0: 35 20 3A 20 8D 20 35 30 33 30 00 07 1A 5C 08 99 |5 : . 5030...\..|
000011E0: 20 22 20 D9 4F 55 20 48 41 56 45 20 46 49 4E 49 | " .OU HAVE FINI|
000011F0: 53 48 45 44 20 CC 45 53 53 4F 4E 20 35 2E 20 D9 |SHED .ESSON 5. .|
00001200: 4F 55 20 43 41 4E 22 00 30 1A 66 08 99 20 22 20 |OU CAN".0.f.. " |
00001210: 4E 4F 57 20 44 4F 20 45 49 54 48 45 52 20 4F 46 |NOW DO EITHER OF|
00001220: 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E 47 2E 22 | THE FOLLOWING."|
00001230: 00 36 1A 70 08 99 00 57 1A 7A 08 99 20 22 20 31 |.6.p...W.z.. " 1|
00001240: 2E 20 C4 4F 20 54 48 49 53 20 4C 45 53 53 4F 4E |. .O THIS LESSON|
00001250: 20 41 47 41 49 4E 22 00 7F 1A 84 08 99 20 22 20 | AGAIN"...... " |
00001260: 32 2E 20 D2 45 54 55 52 4E 20 54 4F 20 54 48 45 |2. .ETURN TO THE|
00001270: 20 D4 55 54 4F 52 49 41 4C 20 4D 45 4E 55 22 00 | .UTORIAL MENU".|
00001280: 85 1A 8E 08 99 00 AB 1A 98 08 99 20 22 20 D7 48 |........... " .H|
00001290: 41 54 20 57 4F 55 4C 44 20 59 4F 55 20 4C 49 4B |AT WOULD YOU LIK|
000012A0: 45 20 54 4F 20 44 4F 3F 20 22 3B 00 B6 1A A2 08 |E TO DO? ";.....|
000012B0: 8D 20 37 34 30 30 00 D7 1A AC 08 8B 20 C2 28 43 |. 7400...... .(C|
000012C0: 48 41 52 29 B2 34 39 20 A7 20 99 20 22 31 22 20 |HAR).49 . . "1" |
000012D0: 3A 20 89 20 31 30 30 00 0E 1B B6 08 8B 20 C2 28 |: . 100...... .(|
000012E0: 43 48 41 52 29 B2 35 30 20 A7 20 99 20 22 32 22 |CHAR).50 . . "2"|
000012F0: 20 3A 20 8D 20 31 31 30 30 30 20 3A 8D 20 31 33 | : . 11000 :. 13|
00001300: 30 30 30 3A 20 93 22 54 55 54 32 22 2C 38 00 19 |000: ."TUT2",8..|
00001310: 1B C0 08 89 20 32 32 31 30 00 24 1B 87 13 89 20 |.... 2210.$.... |
00001320: 39 39 39 39 00 45 1B 88 13 81 20 49 B2 31 20 A4 |9999.E.... I.1 .|
00001330: 20 58 20 3A 8F 20 50 4F 53 49 54 49 4F 4E 20 43 | X :. POSITION C|
00001340: 55 52 53 4F 52 00 50 1B 92 13 99 20 22 1D 22 3B |URSOR.P.... ".";|
00001350: 00 58 1B 9C 13 82 20 49 00 85 1B A6 13 81 20 4A |.X.... I...... J|
00001360: B2 31 20 A4 20 59 20 3A 8F 20 4D 4F 56 45 20 43 |.1 . Y :. MOVE C|
00001370: 55 52 53 4F 52 20 44 4F 57 4E 20 54 48 45 20 53 |URSOR DOWN THE S|
00001380: 43 52 45 45 4E 00 90 1B B0 13 99 20 22 11 22 3B |CREEN...... ".";|
00001390: 00 98 1B BA 13 82 20 4A 00 9E 1B C4 13 8E 00 BC |...... J........|
000013A0: 1B 70 17 42 41 53 45 B2 36 AC 34 30 39 36 20 3A |.p.BASE.6.4096 :|
000013B0: 8F 20 49 4E 49 54 49 41 4C 49 5A 45 00 CA 1B 72 |. INITIALIZE...r|
000013C0: 17 42 55 46 B2 34 39 31 35 32 00 D6 1B 73 17 42 |.BUF.49152...s.B|
000013D0: 4C 45 B2 42 55 46 00 EA 1B 75 17 42 32 B2 39 AC |LE.BUF...u.B2.9.|
000013E0: 34 30 39 36 AA 35 AC 32 35 36 00 F7 1B 77 17 45 |4096.5.256...w.E|
000013F0: 52 52 43 4E 54 B2 30 00 18 1C 7A 17 49 4E 49 54 |RRCNT.0...z.INIT|
00001400: 55 54 B2 C2 28 42 41 53 45 29 AA C2 28 42 41 53 |UT..(BASE)..(BAS|
00001410: 45 AA 31 29 AC 32 35 36 00 23 1C 7F 17 8D 20 38 |E.1).256.#.... 8|
00001420: 31 30 30 00 45 1C 84 17 42 4F 58 B2 C2 28 42 41 |100.E...BOX..(BA|
00001430: 53 45 AA 35 34 29 AA C2 28 42 41 53 45 AA 35 35 |SE.54)..(BASE.55|
00001440: 29 AC 32 35 36 00 68 1C 89 17 47 45 43 4D B2 C2 |).256.h...GECM..|
00001450: 28 42 41 53 45 AA 34 36 29 AA C2 28 42 41 53 45 |(BASE.46)..(BASE|
00001460: AA 34 37 29 AC 32 35 36 00 8C 1C 8E 17 47 4B 42 |.47).256.....GKB|
00001470: 44 20 B2 C2 28 42 41 53 45 AA 35 36 29 AA C2 28 |D ..(BASE.56)..(|
00001480: 42 41 53 45 AA 35 37 29 AC 32 35 36 00 B0 1C 93 |BASE.57).256....|
00001490: 17 53 57 49 4E 44 B2 C2 28 42 41 53 45 AA 35 38 |.SWIND..(BASE.58|
000014A0: 29 AA C2 28 42 41 53 45 AA 35 39 29 AC 32 35 36 |)..(BASE.59).256|
000014B0: 00 D1 1C 98 17 49 53 52 54 B2 C2 28 42 41 53 45 |.....ISRT..(BASE|
000014C0: AA 36 29 AA C2 28 42 41 53 45 AA 37 29 AC 32 35 |.6)..(BASE.7).25|
000014D0: 36 00 F3 1C 9D 17 44 31 45 4C 54 B2 C2 28 42 41 |6.....D1ELT..(BA|
000014E0: 53 45 AA 38 29 AA C2 28 42 41 53 45 AA 39 29 AC |SE.8)..(BASE.9).|
000014F0: 32 35 36 00 17 1D 9E 17 44 32 45 4C 54 B2 C2 28 |256.....D2ELT..(|
00001500: 42 41 53 45 AA 31 30 29 AA C2 28 42 41 53 45 AA |BASE.10)..(BASE.|
00001510: 31 31 29 AC 32 35 36 00 3B 1D 9F 17 44 33 45 4C |11).256.;...D3EL|
00001520: 54 B2 C2 28 42 41 53 45 AA 31 32 29 AA C2 28 42 |T..(BASE.12)..(B|
00001530: 41 53 45 AA 31 33 29 AC 32 35 36 00 60 1D A0 17 |ASE.13).256.`...|
00001540: 50 55 54 42 41 43 B2 C2 28 42 41 53 45 AA 31 34 |PUTBAC..(BASE.14|
00001550: 29 AA C2 28 42 41 53 45 AA 31 35 29 AC 32 35 36 |)..(BASE.15).256|
00001560: 00 72 1D A2 17 53 45 54 42 4E 44 B2 49 4E 49 54 |.r...SETBND.INIT|
00001570: 55 54 00 96 1D A7 17 43 4D 57 52 54 B2 C2 28 42 |UT.....CMWRT..(B|
00001580: 41 53 45 AA 33 36 29 AA C2 28 42 41 53 45 AA 33 |ASE.36)..(BASE.3|
00001590: 37 29 AC 32 35 36 00 B7 1D AC 17 52 45 44 4F B2 |7).256.....REDO.|
000015A0: C2 28 42 41 53 45 AA 32 29 AA C2 28 42 41 53 45 |.(BASE.2)..(BASE|
000015B0: AA 33 29 AC 32 35 36 00 DB 1D B1 17 57 54 45 4E |.3).256.....WTEN|
000015C0: 54 B2 C2 28 42 41 53 45 AA 33 38 29 AA C2 28 42 |T..(BASE.38)..(B|
000015D0: 41 53 45 AA 33 39 29 AC 32 35 36 00 00 1E B6 17 |ASE.39).256.....|
000015E0: 57 52 54 45 4E 31 B2 C2 28 42 41 53 45 AA 35 30 |WRTEN1..(BASE.50|
000015F0: 29 AA C2 28 42 41 53 45 AA 35 31 29 AC 32 35 36 |)..(BASE.51).256|
00001600: 00 25 1E B8 17 46 4F 55 52 41 52 B2 C2 28 42 41 |.%...FOURAR..(BA|
00001610: 53 45 AA 34 32 29 AA C2 28 42 41 53 45 AA 34 33 |SE.42)..(BASE.43|
00001620: 29 AC 32 35 36 00 4A 1E BB 17 4D 59 42 45 4C 32 |).256.J...MYBEL2|
00001630: B2 C2 28 42 41 53 45 AA 35 32 29 AA C2 28 42 41 |..(BASE.52)..(BA|
00001640: 53 45 AA 35 33 29 AC 32 35 36 00 6C 1E BC 17 46 |SE.53).256.l...F|
00001650: 49 44 B2 C2 28 42 41 53 45 AA 32 38 29 AA C2 28 |ID..(BASE.28)..(|
00001660: 42 41 53 45 AA 32 39 29 AC 32 35 36 00 91 1E BD |BASE.29).256....|
00001670: 17 43 31 41 4E 47 45 B2 C2 28 42 41 53 45 AA 33 |.C1ANGE..(BASE.3|
00001680: 30 29 AA C2 28 42 41 53 45 AA 33 31 29 AC 32 35 |0)..(BASE.31).25|
00001690: 36 00 B6 1E BE 17 43 32 41 4E 47 45 B2 C2 28 42 |6.....C2ANGE..(B|
000016A0: 41 53 45 AA 33 32 29 AA C2 28 42 41 53 45 AA 33 |ASE.32)..(BASE.3|
000016B0: 33 29 AC 32 35 36 00 DB 1E BF 17 43 33 41 4E 47 |3).256.....C3ANG|
000016C0: 45 B2 C2 28 42 41 53 45 AA 33 34 29 AA C2 28 42 |E..(BASE.34)..(B|
000016D0: 41 53 45 AA 33 35 29 AC 32 35 36 00 EA 1E C0 17 |ASE.35).256.....|
000016E0: 4C 42 55 46 42 45 47 B2 42 32 00 FB 1E C5 17 48 |LBUFBEG.B2.....H|
000016F0: 42 55 46 42 45 47 B2 42 32 AA 31 00 09 1F CA 17 |BUFBEG.B2.1.....|
00001700: 4C 4D 49 4E B2 42 32 AA 32 00 17 1F CF 17 48 4D |LMIN.B2.2.....HM|
00001710: 49 4E B2 42 32 AA 33 00 26 1F D4 17 4C 4F 4D 41 |IN.B2.3.&...LOMA|
00001720: 58 B2 42 32 AA 34 00 35 1F D9 17 48 49 4D 41 58 |X.B2.4.5...HIMAX|
00001730: B2 42 32 AA 35 00 44 1F DE 17 4C 50 54 45 4E B2 |.B2.5.D...LPTEN.|
00001740: 42 32 AA 36 00 53 1F E3 17 48 50 54 45 4E B2 42 |B2.6.S...HPTEN.B|
00001750: 32 AA 37 00 63 1F E8 17 47 43 46 4C 41 47 B2 42 |2.7.c...GCFLAG.B|
00001760: 32 AA 38 00 71 1F ED 17 57 42 54 4D B2 42 32 AA |2.8.q...WBTM.B2.|
00001770: 39 00 82 1F F2 17 4D 49 44 4C 49 4E B2 42 32 AA |9.....MIDLIN.B2.|
00001780: 31 30 00 92 1F F7 17 44 4C 49 4E 45 B2 42 32 AA |10.....DLINE.B2.|
00001790: 31 31 00 A2 1F FC 17 43 44 4E 55 4D B2 42 32 AA |11.....CDNUM.B2.|
000017A0: 31 32 00 B1 1F 01 18 43 48 41 52 B2 42 32 AA 31 |12.....CHAR.B2.1|
000017B0: 33 00 C2 1F 06 18 53 43 52 41 4D 54 B2 42 32 AA |3.....SCRAMT.B2.|
000017C0: 31 34 00 D2 1F 10 18 4C 4F 4C 44 32 B2 42 32 AA |14.....LOLD2.B2.|
000017D0: 34 37 00 E2 1F 1A 18 48 4F 4C 44 32 B2 42 32 AA |47.....HOLD2.B2.|
000017E0: 34 38 00 F1 1F 24 18 4C 43 55 52 50 54 B2 32 35 |48...$.LCURPT.25|
000017F0: 31 00 00 20 2E 18 48 43 55 52 50 54 B2 32 35 32 |1.. ..HCURPT.252|
00001800: 00 0E 20 6A 18 97 20 57 42 54 4D 2C 31 33 00 1D |.. j.. WBTM,13..|
00001810: 20 B0 18 97 20 47 43 46 4C 41 47 2C 31 00 2C 20 | ... GCFLAG,1., |
00001820: BA 18 97 20 4D 49 44 4C 49 4E 2C 39 00 3A 20 C4 |... MIDLIN,9.: .|
00001830: 18 97 20 44 4C 49 4E 45 2C 38 00 49 20 CE 18 97 |.. DLINE,8.I ...|
00001840: 20 43 44 4E 55 4D 2C 31 35 00 58 20 D8 18 97 20 | CDNUM,15.X ... |
00001850: 53 43 52 41 4D 54 2C 34 00 63 20 EC 18 46 4C 41 |SCRAMT,4.c ..FLA|
00001860: 47 B2 30 00 69 20 F4 1A 8E 00 8E 20 58 1B 99 22 |G.0.i ..... X.."|
00001870: 93 22 3B 3A 8F 20 43 4C 45 41 52 20 53 43 52 45 |.";:. CLEAR SCRE|
00001880: 45 4E 20 48 4F 4D 45 20 43 55 52 53 4F 52 00 94 |EN HOME CURSOR..|
00001890: 20 62 1B 8E 00 AD 20 BC 1B 99 22 13 22 3B 20 3A | b.... ..."."; :|
000018A0: 8F 20 48 4F 4D 45 20 43 55 52 53 4F 52 00 B3 20 |. HOME CURSOR.. |
000018B0: C6 1B 8E 00 D1 20 20 1C 8F 20 54 45 53 54 20 46 |..... .. TEST F|
000018C0: 4F 52 20 53 50 41 43 45 20 42 41 52 20 50 55 53 |OR SPACE BAR PUS|
000018D0: 48 00 EA 20 21 1C 8D 37 31 30 30 3A 58 B2 34 3A |H.. !..7100:X.4:|
000018E0: 59 B2 32 34 3A 8D 35 30 30 30 00 13 21 23 1C 99 |Y.24:.5000..!#..|
000018F0: 20 22 5B D0 52 45 53 53 20 53 50 41 43 45 20 42 | "[.RESS SPACE B|
00001900: 41 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 5D 20 |AR TO CONTINUE] |
00001910: 9D 22 3B 00 1E 21 25 1C 8D 20 37 34 30 30 00 35 |.";..!%.. 7400.5|
00001920: 21 34 1C 8B 20 53 24 20 B3 B1 20 22 20 22 20 A7 |!4.. S$ .. " " .|
00001930: 20 37 32 30 35 00 3B 21 3E 1C 8E 00 62 21 52 1C | 7205.;!>...b!R.|
00001940: 8D 20 37 31 30 30 20 3A 8F 20 43 4C 45 41 52 20 |. 7100 :. CLEAR |
00001950: 42 4F 54 54 4F 4D 20 48 41 4C 46 20 53 43 52 45 |BOTTOM HALF SCRE|
00001960: 45 4E 00 85 21 57 1C 59 B2 31 34 20 3A 20 8D 20 |EN..!W.Y.14 : . |
00001970: 35 30 33 30 20 20 20 20 20 20 20 20 20 20 20 20 |5030 |
00001980: 20 20 20 20 20 00 93 21 5C 1C 81 20 49 B2 31 20 | ..!\.. I.1 |
00001990: A4 20 4B 00 C2 21 66 1C 99 22 20 20 20 20 20 20 |. K..!f.." |
000019A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000019B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000019C0: 20 22 00 CA 21 70 1C 82 20 49 00 F9 21 7A 1C 99 | "..!p.. I..!z..|
000019D0: 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | " |
000019E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000019F0: 20 20 20 20 20 20 20 22 3B 00 FF 21 7F 1C 8E 00 | ";..!....|
00001A00: 24 22 84 1C 8D 20 37 34 30 30 20 3A 8F 20 54 45 |$"... 7400 :. TE|
00001A10: 53 54 20 46 4F 52 20 59 2F 4E 20 4B 45 59 20 50 |ST FOR Y/N KEY P|
00001A20: 52 45 53 53 00 42 22 98 1C 8B 20 28 53 24 B2 22 |RESS.B"... (S$."|
00001A30: 4E 22 29 20 B0 20 28 53 24 B2 22 CE 22 29 20 A7 |N") . (S$.".") .|
00001A40: 20 8E 00 7C 22 A2 1C 8B 20 28 53 24 B2 22 59 22 | ..|"... (S$."Y"|
00001A50: 29 20 B0 20 28 53 24 B2 22 D9 22 29 20 A7 20 8D |) . (S$.".") . .|
00001A60: 20 31 31 30 30 30 20 3A 20 8D 20 31 33 30 30 30 | 11000 : . 13000|
00001A70: 20 3A 20 93 22 54 55 54 32 22 2C 38 00 87 22 A7 | : ."TUT2",8..".|
00001A80: 1C 89 20 37 33 30 30 00 92 22 AC 1C 89 20 39 39 |.. 7300.."... 99|
00001A90: 39 39 00 BD 22 E8 1C 9E 28 47 4B 42 44 29 20 3A |99.."...(GKBD) :|
00001AA0: 8F 20 47 45 54 20 43 48 41 52 41 43 54 4F 52 20 |. GET CHARACTOR |
00001AB0: 46 52 4F 4D 20 4B 45 59 42 4F 41 52 44 00 CF 22 |FROM KEYBOARD.."|
00001AC0: F2 1C 53 24 B2 C7 28 C2 28 43 48 41 52 29 29 00 |..S$..(.(CHAR)).|
00001AD0: D5 22 FC 1C 8E 00 F3 22 4C 1D 99 20 22 12 22 3B |."....."L.. ".";|
00001AE0: 20 3A 8F 20 54 55 52 4E 20 52 45 56 45 52 53 45 | :. TURN REVERSE|
00001AF0: 20 4F 4E 00 F9 22 56 1D 8E 00 17 23 B0 1D 99 20 | ON.."V....#... |
00001B00: 22 92 22 20 3A 8F 20 54 55 52 4E 20 4F 46 46 20 |"." :. TURN OFF |
00001B10: 52 45 56 45 52 53 45 00 1D 23 BA 1D 8E 00 35 23 |REVERSE..#....5#|
00001B20: 14 1E 9E 20 28 42 4F 58 29 20 3A 8F 20 44 52 41 |... (BOX) :. DRA|
00001B30: 57 20 42 4F 58 00 3B 23 1E 1E 8E 00 51 23 78 1E |W BOX.;#....Q#x.|
00001B40: 8F 20 41 4C 4C 4F 57 20 49 4E 53 45 52 54 49 4F |. ALLOW INSERTIO|
00001B50: 4E 00 5C 23 82 1E 8D 20 37 39 30 30 00 69 23 8C |N.\#... 7900.i#.|
00001B60: 1E 9E 20 28 49 53 52 54 29 00 6F 23 96 1E 8E 00 |.. (ISRT).o#....|
00001B70: 7F 23 DC 1E 9E 20 28 52 45 44 4F 29 20 3A 8F 00 |.#... (REDO) :..|
00001B80: 85 23 E6 1E 8E 00 97 23 40 1F 9E 20 28 53 45 54 |.#.....#@.. (SET|
00001B90: 42 4E 44 29 20 3A 8F 00 9D 23 4A 1F 8E 00 AF 23 |BND) :...#J....#|
00001BA0: A4 1F 9E 20 28 49 4E 49 54 55 54 29 20 3A 8F 00 |... (INITUT) :..|
00001BB0: B5 23 AE 1F 8E 00 DB 23 08 20 9E 20 28 57 52 54 |.#.....#. . (WRT|
00001BC0: 45 4E 31 29 20 3A 8F 20 50 52 49 4E 54 20 54 4F |EN1) :. PRINT TO|
00001BD0: 50 20 4F 46 20 53 43 52 45 45 4E 00 E1 23 12 20 |P OF SCREEN..#. |
00001BE0: 8E 00 01 24 6C 20 9E 20 28 4D 59 42 45 4C 32 29 |...$l . (MYBEL2)|
00001BF0: 20 3A 8F 20 45 52 52 4F 52 20 52 4F 55 54 49 4E | :. ERROR ROUTIN|
00001C00: 45 00 15 24 76 20 45 52 52 43 4E 54 B2 45 52 52 |E..$v ERRCNT.ERR|
00001C10: 43 4E 54 AA 31 00 2A 24 80 20 8B 20 45 52 52 43 |CNT.1.*$. . ERRC|
00001C20: 4E 54 20 B3 20 34 20 A7 20 8E 00 35 24 85 20 8D |NT . 4 . ..5$. .|
00001C30: 20 37 31 30 30 00 56 24 86 20 59 B2 31 39 20 3A | 7100.V$. Y.19 :|
00001C40: 20 8D 20 35 30 33 30 20 3A 20 4B B2 33 20 3A 20 | . 5030 : K.3 : |
00001C50: 8D 20 37 32 36 30 00 61 24 8A 20 8D 20 37 31 30 |. 7260.a$. . 710|
00001C60: 30 00 73 24 94 20 59 B2 31 39 20 3A 20 8D 20 35 |0.s$. Y.19 : . 5|
00001C70: 30 33 30 00 80 24 99 20 45 52 52 43 4E 54 B2 30 |030..$. ERRCNT.0|
00001C80: 00 AF 24 9E 20 99 20 22 20 D9 4F 55 20 41 50 50 |..$. . " .OU APP|
00001C90: 45 41 52 20 54 4F 20 42 45 20 48 41 56 49 4E 47 |EAR TO BE HAVING|
00001CA0: 20 53 4F 4D 45 20 54 52 4F 55 42 4C 45 2E 22 00 | SOME TROUBLE.".|
00001CB0: D9 24 A3 20 99 20 22 20 D7 4F 55 4C 44 20 59 4F |.$. . " .OULD YO|
00001CC0: 55 20 4C 49 4B 45 20 54 4F 20 52 45 54 55 52 4E |U LIKE TO RETURN|
00001CD0: 20 54 4F 20 54 48 45 20 22 00 F9 24 A8 20 99 20 | TO THE "..$. . |
00001CE0: 22 20 D4 55 54 4F 52 49 41 4C 20 4D 45 4E 55 20 |" .UTORIAL MENU |
00001CF0: 28 D9 2F CE 29 20 9D 22 3B 00 04 25 AD 20 8D 20 |(./.) .";..%. . |
00001D00: 37 33 30 30 00 0F 25 B2 20 8D 20 37 31 30 30 00 |7300..%. . 7100.|
00001D10: 30 25 B7 20 59 B2 31 39 20 3A 20 8D 20 35 30 33 |0%. Y.19 : . 503|
00001D20: 30 20 3A 20 4B B2 33 20 3A 20 8D 20 37 32 36 30 |0 : K.3 : . 7260|
00001D30: 00 36 25 C6 20 8E 00 4F 25 D0 20 81 20 49 B2 31 |.6%. ..O%. . I.1|
00001D40: 20 A4 20 38 30 30 20 3A 8F 20 50 41 55 53 45 00 | . 800 :. PAUSE.|
00001D50: 57 25 DA 20 82 20 49 00 5D 25 E4 20 8E 00 8A 25 |W%. . I.]%. ...%|
00001D60: 34 21 8D 20 38 31 30 30 20 20 3A 8F 20 47 49 56 |4!. 8100 :. GIV|
00001D70: 45 53 20 57 52 49 54 45 20 4F 52 20 43 4F 52 52 |ES WRITE OR CORR|
00001D80: 45 43 54 20 53 43 52 45 45 4E 00 95 25 3E 21 8D |ECT SCREEN..%>!.|
00001D90: 20 37 39 30 30 00 A3 25 48 21 9E 20 28 57 54 45 | 7900..%H!. (WTE|
00001DA0: 4E 54 29 00 A9 25 52 21 8E 00 D8 25 98 21 42 4C |NT)..%R!...%.!BL|
00001DB0: 45 B2 54 42 55 46 AA C3 28 41 24 29 20 3A 20 8F |E.TBUF..(A$) : .|
00001DC0: 20 50 4F 4B 45 20 53 54 52 49 4E 47 20 49 4E 54 | POKE STRING INT|
00001DD0: 4F 20 42 55 46 46 45 52 00 E4 25 9D 21 41 B2 C3 |O BUFFER..%.!A..|
00001DE0: 28 41 24 29 00 F2 25 B1 21 81 20 49 B2 31 20 A4 |(A$)..%.!. I.1 .|
00001DF0: 20 41 00 10 26 C0 21 97 20 28 54 42 55 46 AA 49 | A..&.!. (TBUF.I|
00001E00: AB 31 29 2C C6 28 CA 28 41 24 2C 49 2C 31 29 29 |.1),.(.(A$,I,1))|
00001E10: 00 18 26 C5 21 82 20 49 00 39 26 CA 21 97 20 4C |..&.!. I.9&.!. L|
00001E20: 50 54 45 4E 2C 42 4C 45 AB 28 32 35 36 AC B5 28 |PTEN,BLE.(256..(|
00001E30: 42 4C 45 AD 32 35 36 29 29 00 50 26 CF 21 97 20 |BLE.256)).P&.!. |
00001E40: 48 50 54 45 4E 2C B5 28 42 4C 45 AD 32 35 36 29 |HPTEN,.(BLE.256)|
00001E50: 00 72 26 D4 21 97 20 4C 43 55 52 50 54 2C 42 4C |.r&.!. LCURPT,BL|
00001E60: 45 AB 28 32 35 36 AC B5 28 42 4C 45 AD 32 35 36 |E.(256..(BLE.256|
00001E70: 29 29 00 8A 26 D9 21 97 20 48 43 55 52 50 54 2C |))..&.!. HCURPT,|
00001E80: B5 28 42 4C 45 AD 32 35 36 29 00 90 26 DE 21 8E |.(BLE.256)..&.!.|
00001E90: 00 B5 26 FC 21 9E 20 28 43 4D 57 52 54 29 20 3A |..&.!. (CMWRT) :|
00001EA0: 8F 20 47 49 56 45 53 20 52 45 54 55 52 4E 20 53 |. GIVES RETURN S|
00001EB0: 43 52 45 45 4E 00 BB 26 06 22 8E 00 E8 26 28 23 |CREEN..&."...&(#|
00001EC0: 8D 20 37 39 30 30 20 3A 20 8F 20 41 4C 4C 4F 57 |. 7900 : . ALLOW|
00001ED0: 20 54 4F 50 20 4F 46 20 53 43 52 45 45 4E 20 53 | TOP OF SCREEN S|
00001EE0: 45 4C 45 43 54 49 4F 4E 00 F5 26 32 23 9E 20 28 |ELECTION..&2#. (|
00001EF0: 47 45 43 4D 29 00 FB 26 3C 23 8E 00 1D 27 8C 23 |GECM)..&<#...'.#|
00001F00: 97 20 4C 43 55 52 50 54 2C 42 55 46 AB 28 32 35 |. LCURPT,BUF.(25|
00001F10: 36 AC B5 28 42 55 46 AD 32 35 36 29 29 00 35 27 |6..(BUF.256)).5'|
00001F20: 96 23 97 20 48 43 55 52 50 54 2C B5 28 42 55 46 |.#. HCURPT,.(BUF|
00001F30: AD 32 35 36 29 00 3B 27 A0 23 8E 00 62 27 F0 23 |.256).;'.#..b'.#|
00001F40: 8D 20 37 39 30 30 20 3A 20 8F 20 44 52 41 57 20 |. 7900 : . DRAW |
00001F50: 46 49 52 53 54 20 45 52 41 53 45 20 53 43 52 45 |FIRST ERASE SCRE|
00001F60: 45 4E 00 70 27 FA 23 9E 20 28 44 31 45 4C 54 29 |EN.p'.#. (D1ELT)|
00001F70: 00 76 27 04 24 8E 00 A3 27 54 24 8D 20 37 39 30 |.v'.$...'T$. 790|
00001F80: 30 20 3A 20 8F 20 44 52 41 57 53 20 54 48 45 20 |0 : . DRAWS THE |
00001F90: 53 45 43 4F 4E 44 20 45 52 41 53 45 20 53 43 52 |SECOND ERASE SCR|
00001FA0: 45 45 4E 00 B1 27 5E 24 9E 20 28 44 32 45 4C 54 |EEN..'^$. (D2ELT|
00001FB0: 29 00 B7 27 68 24 8E 00 DA 27 B8 24 8F 20 44 52 |)..'h$...'.$. DR|
00001FC0: 41 57 53 20 54 48 45 20 54 48 49 52 44 20 45 52 |AWS THE THIRD ER|
00001FD0: 41 53 45 20 53 43 52 45 45 4E 00 E8 27 C2 24 9E |ASE SCREEN..'.$.|
00001FE0: 20 28 44 33 45 4C 54 29 00 EE 27 CC 24 8E 00 12 | (D3ELT)..'.$...|
00001FF0: 28 1C 25 8D 20 37 39 30 30 20 3A 20 8F 20 50 55 |(.%. 7900 : . PU|
00002000: 54 20 45 52 41 53 45 44 20 54 45 58 54 20 42 41 |T ERASED TEXT BA|
00002010: 43 4B 00 21 28 26 25 9E 20 28 50 55 54 42 41 43 |CK.!(&%. (PUTBAC|
00002020: 29 00 27 28 30 25 8E 00 43 28 80 25 8F 20 43 48 |).'(0%..C(.%. CH|
00002030: 45 43 4B 20 43 55 52 53 4F 52 20 4C 4F 43 41 54 |ECK CURSOR LOCAT|
00002040: 49 4F 4E 00 67 28 8A 25 5A B2 28 C2 28 4C 43 55 |ION.g(.%Z.(.(LCU|
00002050: 52 50 54 29 AA C2 28 48 43 55 52 50 54 29 AC 32 |RPT)..(HCURPT).2|
00002060: 35 36 29 AB 42 55 46 00 6D 28 94 25 8E 00 99 28 |56).BUF.m(.%...(|
00002070: E4 25 8D 20 37 31 30 30 20 3A 20 8F 20 43 4C 45 |.%. 7100 : . CLE|
00002080: 41 52 20 42 4F 54 54 4F 4D 20 54 48 49 52 44 20 |AR BOTTOM THIRD |
00002090: 4F 46 20 53 43 52 45 45 4E 00 BA 28 EE 25 59 B2 |OF SCREEN..(.%Y.|
000020A0: 31 39 20 3A 20 8D 20 35 30 33 30 20 3A 20 4B B2 |19 : . 5030 : K.|
000020B0: 34 20 3A 20 8D 20 37 32 36 30 00 C5 28 F8 25 8D |4 : . 7260..(.%.|
000020C0: 20 37 31 30 30 00 CB 28 02 26 8E 00 E7 28 48 26 | 7100..(.&...(H&|
000020D0: 9E 20 28 46 49 44 29 20 3A 20 8F 20 46 49 4E 44 |. (FID) : . FIND|
000020E0: 20 41 20 57 4F 52 44 00 ED 28 52 26 8E 00 08 29 | A WORD..(R&...)|
000020F0: AC 26 8F 20 46 49 52 53 54 20 52 45 50 4C 41 43 |.&. FIRST REPLAC|
00002100: 45 20 53 43 52 45 45 4E 00 17 29 B6 26 9E 20 28 |E SCREEN..).&. (|
00002110: 43 31 41 4E 47 45 29 00 1D 29 C0 26 8E 00 23 29 |C1ANGE)..).&..#)|
00002120: 0F 27 90 00 48 29 10 27 8D 20 37 39 30 30 20 3A |.'..H).'. 7900 :|
00002130: 20 8F 20 53 45 43 4F 4E 44 20 52 45 50 4C 41 43 | . SECOND REPLAC|
00002140: 45 20 53 43 52 45 45 4E 00 57 29 1A 27 9E 20 28 |E SCREEN.W).'. (|
00002150: 43 32 41 4E 47 45 29 00 5D 29 24 27 8E 00 78 29 |C2ANGE).])$'..x)|
00002160: 74 27 8F 20 54 48 49 52 44 20 52 45 50 4C 41 43 |t'. THIRD REPLAC|
00002170: 45 20 53 43 52 45 45 4E 00 87 29 7E 27 9E 20 28 |E SCREEN..)~'. (|
00002180: 43 33 41 4E 47 45 29 00 8D 29 88 27 8E 00 B3 29 |C3ANGE)..).'...)|
00002190: F8 2A 8F 20 43 48 45 43 4B 20 54 4F 20 53 45 45 |.*. CHECK TO SEE|
000021A0: 20 49 46 20 44 49 53 4B 20 49 53 20 50 52 45 53 | IF DISK IS PRES|
000021B0: 45 4E 54 00 D1 29 02 2B 9F 20 33 2C 38 2C 33 2C |ENT..).+. 3,8,3,|
000021C0: 22 40 30 3A 55 54 49 4C 44 41 54 41 2C 53 2C 52 |"@0:UTILDATA,S,R|
000021D0: 22 00 DA 29 0C 2B 4E 52 B2 31 00 E8 29 11 2B 9F |"..).+NR.1..).+.|
000021E0: 20 31 35 2C 38 2C 31 35 00 FD 29 16 2B 84 31 35 | 15,8,15..).+.15|
000021F0: 2C 45 4E 2C 45 44 24 2C 45 46 2C 45 53 00 06 2A |,EN,ED$,EF,ES..*|
00002200: 1B 2B A0 20 31 35 00 19 2A 20 2B 8B 20 45 4E B3 |.+. 15..* +. EN.|
00002210: B1 30 20 A7 20 4E 52 B2 30 00 2A 2A 2A 2B 8B 20 |.0 . NR.0.***+. |
00002220: 4E 52 20 A7 20 31 31 30 38 30 00 32 2A 2F 2B A0 |NR . 11080.2*/+.|
00002230: 20 33 00 3E 2A 34 2B 8D 20 31 32 30 30 30 00 4A | 3.>*4+. 12000.J|
00002240: 2A 3E 2B 89 20 31 31 30 30 30 00 50 2A 48 2B 8E |*>+. 11000.P*H+.|
00002250: 00 6B 2A E0 2E 8F 20 50 55 54 20 55 50 20 45 52 |.k*... PUT UP ER|
00002260: 52 4F 52 20 4D 45 53 53 41 47 45 00 74 2A EA 2E |ROR MESSAGE.t*..|
00002270: 99 22 93 22 00 86 2A F4 2E 59 B2 31 30 20 3A 20 |."."..*..Y.10 : |
00002280: 8D 20 35 30 33 30 00 AE 2A FE 2E 99 20 22 D5 4E |. 5030..*... ".N|
00002290: 41 42 4C 45 20 54 4F 20 4C 4F 43 41 54 45 20 54 |ABLE TO LOCATE T|
000022A0: 55 54 4F 52 49 41 4C 20 46 49 4C 45 53 22 00 BD |UTORIAL FILES"..|
000022B0: 2A 00 2F 9E 20 28 4D 59 42 45 4C 32 29 00 C8 2A |*./. (MYBEL2)..*|
000022C0: 02 2F 8D 20 37 32 30 30 00 D3 2A 04 2F 8D 20 37 |./. 7200..*./. 7|
000022D0: 30 30 30 00 D9 2A 08 2F 8E 00 F5 2A C8 32 8F 20 |000..*./...*.2. |
000022E0: 50 52 49 4E 54 20 4C 4F 41 44 49 4E 47 20 4D 45 |PRINT LOADING ME|
000022F0: 53 53 41 47 45 00 00 2B D2 32 8D 20 37 31 30 30 |SSAGE..+.2. 7100|
00002300: 00 18 2B DC 32 59 B2 32 34 20 3A 20 58 B2 34 20 |..+.2Y.24 : X.4 |
00002310: 3A 20 8D 20 35 30 30 30 00 36 2B E6 32 99 20 22 |: . 5000.6+.2. "|
00002320: CC 4F 41 44 49 4E 47 2C 20 50 4C 45 41 53 45 20 |.OADING, PLEASE |
00002330: 57 41 49 54 22 3B 00 3C 2B F0 32 8E 00 58 2B 98 |WAIT";.<+.2..X+.|
00002340: 3A 8F 20 50 52 49 4E 54 20 4C 4F 41 44 49 4E 47 |:. PRINT LOADING|
00002350: 20 4D 45 53 53 41 47 45 00 63 2B A2 3A 8D 20 37 | MESSAGE.c+.:. 7|
00002360: 31 30 30 00 7B 2B AC 3A 59 B2 32 34 20 3A 20 58 |100.{+.:Y.24 : X|
00002370: B2 34 20 3A 20 8D 20 35 30 30 30 00 99 2B B6 3A |.4 : . 5000..+.:|
00002380: 99 20 22 20 20 20 20 20 20 20 20 20 D0 4C 45 41 |. " .LEA|
00002390: 53 45 20 57 41 49 54 22 3B 00 9F 2B C0 3A 8E 00 |SE WAIT";..+.:..|
000023A0: 00 00 |.. |
....... TUT7.0.... 51,0:. 52,84:. 55,0:.
56,84:..:.2.. 195.E.D.. 6000.P.N.. 7000
.Y.X.K.10._.}...Z.... "BANK STREET WRITE
R"............ "TUTORIAL"... ........ 75
00.E.... "LESSON 5: FIND AND REPLACE".P.
... 7600...... 15000...C.. 6000 : . 8100
...H.. 7100...R.Y.9 : . 5030.7.... " S
OMETIMES WHEN YOU HAVE WRITTEN".B.... "A
LOT, IT IS DIFFICULT TO LOCATE A"......
"SPECIFIC PLACE IN YOUR TEXT. YOU CAN".
..... "USE FIND TO HELP YOU DO THIS. FOR
"...... "EXAMPLE, IF YOU WANT TO MOVE TH
E"...... "CURSOR TO THE PLACE WHERE YOU
MENTION".;.... "'NEW YORK', YOU USE FIND
TO LOCATE".Y.".. "THE WORDS 'NEW YORK'.
"...,.. " WITH REPLACE YOU CAN CHANGE
WORDS"...6.. "THAT OCCUR AT SEVERAL LOCA
TIONS IN".W.@.. "YOUR TEXT. REPLACE FIND
S EACH"...J.. "OCCURRENCE OF SOME TEXT A
ND CHANGES".+.T.. "IT TO NEW TEXT THAT Y
OU SUPPLY.".:.U.. (FOURAR).D.Z.. 525._.\
.. 7100 : Y.24 : . 5030...].. "
";...^.. 7200...H.. 7
000...R.. 8700...|.. 7700...... 7100.N..
.Y.15 : . 5030...... " USE FIND TO LOCAT
E THE WORD"...... " 'CLUE' IN THE JINGLE
."...... 450.&.... 522.1.B.. 9700.<.L..
7100.N.V.Y.19 : . 5030.Z.... " 1. MOVE T
HE SELECTOR AT THE TOP OF"...... " THE S
CREEN TO FIND (USE < OR >)".......C....
" 2. PRESS RETURN";.I.....S.... 665.....
TBUF.BUF.....A1$."WHY THROUGH IS THROUGH
".G(13).&...A$.A1$ : TBUF.BUF : . 8600.I
.&.A2$."AND THREW IS THREW".G(13).H.0.A$
.A2$ : TBUF.BLE : . 8600...:.A3$."I HAVE
N'T A CLUE".G(13)...D.A$.A3$ : TBUF.BLE
: . 8600.K.N.A4$."AND WHEN I'M THREW".G(
13)...X.A$.A4$ : TBUF.BLE : . 8600...B.A
5$."SPELLING THREW FOR THROUGH,".G(13).5
.L.A$.A5$ : TBUF.BLE : . 8600.`.V.A6$."I
'M TIRED THREW AND THREW;".G(13)....A$.
A6$ : TBUF.BLE : . 8600.....A7$."SO I EX
CLAIM A MIGHTY, ".G(34)."PHEW!".G(34).T.
..A$.A7$ : TBUF.BLE : . 8600.Z.........E
RRCNT.0...... (SWIND)...... CDNUM,0.....
. (FOURAR)...... 9100.(.... 9000.?.... B
(CDNUM).2 . 790.J.... 8300.I.A.. ERRCNT.
O . . 450 : . 670.X.C.. (FOURAR)...F.. 9
700...P.. 7100. .Z.Y.19 : . 5030.A.... "
YOU DID NOT SELECT FIND".T.... " TRY AG
AIN"...... 8400...... 450...... 670.....
. 9700...... 810... .. 880...*.. 9700.(.
4.. 7100.:.>.Y.19 : . 5030._.H.. " 3. RE
SPOND BY TYPING 'CLUE'".X.R.. " 4. PRESS
RETURN"...\.. " 5. ANSWER NEXT QUESTION
'N'"...F.....P.ERRCNT.0...R.. (SWIND).I
.U.. 9800.T.Z.. 7900..... 9600...... Z.
54 . 1010...... 8300...... ERRCNT.0 . .
810 : . 882.&.... 9700.1.... 7100.C...Y.
19 : . 5030.J.... " YOU DID NOT FOLLOW D
IRECTIONS".}.J.. " TRY AGAIN"...T.. 8400
...... 810...... 882...... B(CHAR).95 .
910.E...K.10 : . 7250.P.... 7100.....Y.1
5 : . 5030...... " NOW CORRECT THE MISSP
ELLED 'THREW'S'".<.... " IN LINES 4 AND
6 BY USING REPLACE.".G.... 1070.R.$.. 11
30.].... 9700.H.3.. 7100.Z.8.Y.19 : . 50
30...B.. " 1. MOVE THE SELECTOR TO REPLA
CE"...L...B.V.. " 2. PRESS RETURN".H.`..
.U.J.ERRCNT.0...T.. CDNUM,0...~.. (SWIND
)...... (FOURAR)...... 9000.#.... B(CDNU
M).5 . 1270...... 8300.O.... ERRCNT.0 .
. 1070 : . 1140.Z.... 9700.L...Y.19 : .
5030...D.. " YOU DID NOT SELECT REPLACE"
...N.. " TRY AGAIN"...X.. 8400...... 107
0.D.... 1140.O.... 1300.Z.... 1370......
9700...... 7100...(.Y.19 : . 5030.(.2..
" 3. RESPOND BY TYPING 'THREW'"...<...G
.F.. " 4. PRESS RETURN".M.P...Z.Z.ERRCNT
.0.H.D.. (SWIND).S.N.. 9900.~.X.. 9600..
.... Z.27 . 1520...... 8300...... ERRCNT
.0 . . 1300 : . 1380.G. .. 9700.R.... 71
00.....Y.19 : . 5030...... " YOU DID NOT
TYPE 'THREW' THEN RETURN"...H...+.R.. "
TRY AGAIN".6.W.. 8400.A.... 1300.L....
1380.W.... 1540.B.... 1700.M.... 9700.X.
... 7100.....Y.19 : . 5030...".. " 5. RE
SPOND BY TYPING 'THROUGH'"...,...Q.6.. "
6. PRESS RETURN".W.@.....|.. " 5. RESPO
ND BY TYPING 'THROUGH'".....ERRCNT.0....
.. (SWIND).&.... 10000.?.B.. B(CHAR)..95
. 1850.J.L.. 8300.K.V.. ERRCNT.0 . . 15
40 : . 1710.V.... 9700...... 7100.....Y.
19 : . 5030...... " YOU DID NOT FOLLOW D
IRECTIONS".......S.... " TRY AGAIN".....
. 8400...&.. 1540...0.. 1710...:.. 1870.
..D.. 1940...N.. 9700.'.X.Y.19 : . 5030.
S.B.. " 7. ANSWER 'N' TO LEAVE THE CORRE
CT"...L.. " 'THREW'S' ON LINES 2 AND
5. ANSWER"...V.. " 'Y' TO REPLACE 'TH
REW' WITH".R.... " 'THROUGH' ON LINES
4 AND 6.".X.........ERRCNT.0...... (SWI
ND)...... 10100.....FLAG.0.+.... B(BUF.3
0)..F("E") . FLAG.1.L.... B(BUF.39)..F("
E") . FLAG.1.M.F.. B(BUF.75)..F("O") . F
LAG.1...P.. B(BUF.92)..F("E") . FLAG.1..
.Z.. B(BUF.121)..F("O") . FLAG.1.R.... B
(BUF.133)..F("O") . FLAG.1...... B(CHAR)
.95 . FLAG.1...... FLAG.0 . 2110...... 9
700...... 7100.(...Y.19 : . 5030.W. .. "
YOU DID NOT FOLLOW ALL THE DIRECTIONS".
..*.. " BUT YOU'VE SEEN HOW TO USE REPLA
CE"...4.. 8400. .>.K.10 : . 7250...B.. 8
700...C.. SYS(FOURAR).H.H.. 7100.Z.R.Y.1
5 : . 5030...\.. " YOU HAVE FINISHED LES
SON 5. YOU CAN".0.F.. " NOW DO EITHER OF
THE FOLLOWING.".6.P...W.Z.. " 1. DO THI
S LESSON AGAIN"..... " 2. RETURN TO THE
TUTORIAL MENU"............ " WHAT WOULD
YOU LIKE TO DO? ";...... 7400.W.... B(C
HAR).49 . . "1" : . 100...... B(CHAR).50
. . "2" : . 11000 :. 13000: ."TUT2",8..
.... 2210.$.... 9999.E.... I.1 . X :. PO
SITION CURSOR.P.... ".";.X.... I...... J
.1 . Y :. MOVE CURSOR DOWN THE SCREEN...
... ".";...... J...D.....P.BASE.6.4096 :
. INITIALIZE.J.R.BUF.49152.V.S.BLE.BUF..
.U.B2.9.4096.5.256...W.ERRCNT.0...Z.INIT
UT.B(BASE).B(BASE.1).256.#... 8100.E...
BOX.B(BASE.54).B(BASE.55).256.H...GECM.B
(BASE.46).B(BASE.47).256.....GKBD .B(BAS
E.56).B(BASE.57).256.....SWIND.B(BASE.58
).B(BASE.59).256.Q...ISRT.B(BASE.6).B(BA
SE.7).256.....D1ELT.B(BASE.8).B(BASE.9).
256.....D2ELT.B(BASE.10).B(BASE.11).256.
;...D3ELT.B(BASE.12).B(BASE.13).256.`. .
PUTBAC.B(BASE.14).B(BASE.15).256.R...SET
BND.INITUT.....CMWRT.B(BASE.36).B(BASE.3
7).256.....REDO.B(BASE.2).B(BASE.3).256.
....WTENT.B(BASE.38).B(BASE.39).256.....
WRTEN1.B(BASE.50).B(BASE.51).256.%...FOU
RAR.B(BASE.42).B(BASE.43).256.J...MYBEL2
.B(BASE.52).B(BASE.53).256.L...FID.B(BAS
E.28).B(BASE.29).256.....C1ANGE.B(BASE.3
0).B(BASE.31).256.....C2ANGE.B(BASE.32).
B(BASE.33).256.....C3ANGE.B(BASE.34).B(B
ASE.35).256.....LBUFBEG.B2...E.HBUFBEG.B
2.1...J.LMIN.B2.2...O.HMIN.B2.3.&.T.LOMA
X.B2.4.5.Y.HIMAX.B2.5.D...LPTEN.B2.6.S..
.HPTEN.B2.7.C...GCFLAG.B2.8.Q...WBTM.B2.
9.....MIDLIN.B2.10.....DLINE.B2.11.....C
DNUM.B2.12.....CHAR.B2.13.B...SCRAMT.B2.
14.R...LOLD2.B2.47.....HOLD2.B2.48...$.L
CURPT.251.. ..HCURPT.252.. J.. WBTM,13..
... GCFLAG,1., ... MIDLIN,9.: D.. DLINE
,8.I N.. CDNUM,15.X X.. SCRAMT,4.C ..FLA
G.0.I ..... X..".";:. CLEAR SCREEN HOME
CURSOR.. B.... ..."."; :. HOME CURSOR..
F...Q .. TEST FOR SPACE BAR PUSH.. !..7
100:X.4:Y.24:.5000..!#.. "[PRESS SPACE B
AR TO CONTINUE] .";..!%.. 7400.5!4.. S$
.. " " . 7205.;!>...B!R.. 7100 :. CLEAR
BOTTOM HALF SCREEN..!W.Y.14 : . 5030
..!\.. I.1 . K.B!F.."
".J!P..
I..!Z.. "
";..!...$"... 7400 :. TEST FOR Y
/N KEY PRESS.B"... (S$."N") . (S$."N") .
..|"... (S$."Y") . (S$."Y") . . 11000 :
. 13000 : ."TUT2",8.."... 7300.."... 99
99.."...(GKBD) :. GET CHARACTOR FROM KEY
BOARD.O"..S$.G(B(CHAR)).U"....."L.. ".";
:. TURN REVERSE ON.."V....#... "." :. T
URN OFF REVERSE..#....5#... (BOX) :. DRA
W BOX.;#....Q#X.. ALLOW INSERTION.\#...
7900.I#... (ISRT).O#....#... (REDO) :..
.#.....#@.. (SETBND) :...#J....#... (INI
TUT) :...#.....#. . (WRTEN1) :. PRINT TO
P OF SCREEN..#. ...$L . (MYBEL2) :. ERRO
R ROUTINE..$V ERRCNT.ERRCNT.1.*$. . ERRC
NT . 4 . ..5$. . 7100.V$. Y.19 : . 5030
: K.3 : . 7260.A$. . 7100.S$. Y.19 : . 5
030..$. ERRCNT.0..$. . " YOU APPEAR TO B
E HAVING SOME TROUBLE.".Y$. . " WOULD YO
U LIKE TO RETURN TO THE "..$. . " TUTORI
AL MENU (Y/N) .";..%. . 7300..%. . 7100.
0%. Y.19 : . 5030 : K.3 : . 7260.6%F ..O
%P . I.1 . 800 :. PAUSE.W%Z . I.]%. ...%
4!. 8100 :. GIVES WRITE OR CORRECT SCRE
EN..%>!. 7900..%H!. (WTENT)..%R!..X%.!BL
E.TBUF.C(A$) : . POKE STRING INTO BUFFER
..%.!A.C(A$)..%.!. I.1 . A..&.!. (TBUF.I
.1),F(J(A$,I,1))..&E!. I.9&J!. LPTEN,BLE
.(256..(BLE.256)).P&O!. HPTEN,.(BLE.256)
.R&T!. LCURPT,BLE.(256..(BLE.256))..&Y!.
HCURPT,.(BLE.256)..&.!...&.!. (CMWRT) :
. GIVES RETURN SCREEN..&."...&(#. 7900 :
. ALLOW TOP OF SCREEN SELECTION..&2#. (
GECM)..&<#...'.#. LCURPT,BUF.(256..(BUF.
256)).5'.#. HCURPT,.(BUF.256).;' #..B'.#
. 7900 : . DRAW FIRST ERASE SCREEN.P'.#.
(D1ELT).V'.$...'T$. 7900 : . DRAWS THE
SECOND ERASE SCREEN..'^$. (D2ELT)..'H$..
Z'.$. DRAWS THE THIRD ERASE SCREEN..'B$.
(D3ELT)..'L$...(.%. 7900 : . PUT ERASED
TEXT BACK.!(&%. (PUTBAC).'(0%..C(.%. CH
ECK CURSOR LOCATION.G(.%Z.(B(LCURPT).B(H
CURPT).256).BUF.M(.%...(.%. 7100 : . CLE
AR BOTTOM THIRD OF SCREEN..(.%Y.19 : . 5
030 : K.4 : . 7260.E(.%. 7100.K(.&...(H&
. (FID) : . FIND A WORD..(R&...).&. FIRS
T REPLACE SCREEN..).&. (C1ANGE)..).&..#)
.'..H).'. 7900 : . SECOND REPLACE SCREEN
.W).'. (C2ANGE).])$'..X)T'. THIRD REPLAC
E SCREEN..)~'. (C3ANGE)..).'...).*. CHEC
K TO SEE IF DISK IS PRESENT.Q).+. 3,8,3,
"@0:UTILDATA,S,R".Z).+NR.1..).+. 15,8,15
..).+.15,EN,ED$,EF,ES..*.+ 15..* +. EN.
.0 . NR.0.***+. NR . 11080.2*/+ 3.>*4+.
12000.J*>+. 11000.P*H+..K*... PUT UP ER
ROR MESSAGE.T*..."."..*..Y.10 : . 5030..
*... "UNABLE TO LOCATE TUTORIAL FILES"..
*./. (MYBEL2).H*./. 7200.S*./. 7000.Y*./
...*H2. PRINT LOADING MESSAGE..+R2. 7100
..+.2Y.24 : X.4 : . 5000.6+.2. "LOADING,
PLEASE WAIT";.<+.2..X+.:. PRINT LOADING
MESSAGE.C+.:. 7100.{+.:Y.24 : X.4 : . 5
000..+.:. " PLEASE WAIT";..+.:..
..
> CLICK IMAGE PREVIEW FOR FULL MODAL