TUT6
FILE INFORMATION
FILENAME(S): TUT6
FILE TYPE(S): PRG
FILE SIZE: 8.1K
FIRST SEEN: 2025-10-19 22:48:23
APPEARS ON: 4 disk(s)
FILE HASH
5434839047d1d2d31dcd4d583828e945083df4345df18b06cb797afd47db4c5a
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BANKSTREETWRITER | TUT6 | PRG | Radd Maxx | 8 | 0 | DOWNLOAD FILE |
| MM UTILITY | TUT6 | PRG | Radd Maxx | 8 | 0 | DOWNLOAD FILE |
| BANKSTREETWRITER | TUT6 | PRG | DuncanTwain | 8 | 0 | DOWNLOAD FILE |
| BANKSTREETWRITER | TUT6 | PRG | DuncanTwain | 8 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 02 00 9C 00 0D 08 09 00 9C 00 18 08 |................|
00000010: 0A 00 8D 20 36 30 30 30 00 45 08 0F 00 41 24 B2 |... 6000.E...A$.|
00000020: 22 22 3A 41 31 24 B2 22 22 3A 41 32 24 B2 22 22 |"":A1$."":A2$.""|
00000030: 3A 41 33 24 B2 22 22 3A 41 34 24 B2 22 22 3A 41 |:A3$."":A4$."":A|
00000040: 35 24 B2 22 22 00 50 08 14 00 8D 20 38 31 30 30 |5$."".P.... 8100|
00000050: 00 5A 08 8C 00 89 20 32 39 30 00 60 08 96 00 9C |.Z.... 290.`....|
00000060: 00 6B 08 A0 00 8D 20 36 30 30 30 00 76 08 AA 00 |.k.... 6000.v...|
00000070: 8D 20 38 31 30 30 00 A3 08 B4 00 41 24 B2 22 22 |. 8100.....A$.""|
00000080: 3A 41 31 24 B2 22 22 3A 41 32 24 B2 22 22 3A 41 |:A1$."":A2$."":A|
00000090: 33 24 B2 22 22 3A 41 34 24 B2 22 22 3A 41 35 24 |3$."":A4$."":A5$|
000000A0: B2 22 22 00 AE 08 C8 00 8D 20 37 30 30 30 00 CE |.""...... 7000..|
000000B0: 08 FA 00 99 20 3A 99 20 22 C2 41 4E 4B 20 D3 54 |.... :. ".ANK .T|
000000C0: 52 45 45 54 20 D7 52 49 54 45 52 22 3A 99 00 E1 |REET .RITER":...|
000000D0: 08 04 01 99 20 22 D4 D5 D4 CF D2 C9 C1 CC 22 3A |.... "........":|
000000E0: 99 00 EC 08 0E 01 8D 20 37 35 30 30 00 10 09 18 |....... 7500....|
000000F0: 01 99 20 22 CC 45 53 53 4F 4E 20 34 3A 20 CD 4F |.. ".ESSON 4: .O|
00000100: 56 45 20 41 4E 44 20 CD 4F 56 45 42 41 43 4B 22 |VE AND .OVEBACK"|
00000110: 00 1B 09 1D 01 8D 20 38 39 30 30 00 27 09 1F 01 |...... 8900.'...|
00000120: 8D 20 31 30 31 30 30 00 3D 09 22 01 8D 20 37 31 |. 10100.=.".. 71|
00000130: 30 30 3A 59 B2 38 3A 8D 20 35 30 33 30 00 6B 09 |00:Y.8:. 5030.k.|
00000140: 2C 01 99 20 22 20 20 20 20 CD CF D6 C5 20 49 53 |,.. " .... IS|
00000150: 20 54 48 45 20 43 4F 4D 4D 41 4E 44 20 54 48 41 | THE COMMAND THA|
00000160: 54 20 4C 45 54 53 20 59 4F 55 22 00 96 09 36 01 |T LETS YOU"...6.|
00000170: 99 20 22 4D 4F 56 45 20 42 4C 4F 43 4B 53 20 4F |. "MOVE BLOCKS O|
00000180: 46 20 54 45 58 54 20 41 52 4F 55 4E 44 20 49 4E |F TEXT AROUND IN|
00000190: 20 59 4F 55 52 22 00 C3 09 40 01 99 20 22 46 49 | YOUR"...@.. "FI|
000001A0: 4C 45 2E 20 D9 4F 55 20 43 41 4E 20 4D 4F 56 45 |LE. .OU CAN MOVE|
000001B0: 20 41 20 57 4F 52 44 2C 20 41 20 50 48 52 41 53 | A WORD, A PHRAS|
000001C0: 45 2C 22 00 EE 09 4A 01 99 20 22 41 20 53 45 4E |E,"...J.. "A SEN|
000001D0: 54 45 4E 43 45 20 4F 52 20 41 20 50 41 52 41 47 |TENCE OR A PARAG|
000001E0: 52 41 50 48 20 2D 2D 20 55 50 20 54 4F 22 00 00 |RAPH -- UP TO"..|
000001F0: 0A 54 01 99 20 22 31 35 20 4C 49 4E 45 53 2E 22 |.T.. "15 LINES."|
00000200: 00 2C 0A 5E 01 99 20 22 20 20 20 20 C1 46 54 45 |.,.^.. " .FTE|
00000210: 52 20 59 4F 55 20 48 41 56 45 20 4D 4F 56 45 44 |R YOU HAVE MOVED|
00000220: 20 41 20 42 4C 4F 43 4B 20 4F 46 22 00 5B 0A 68 | A BLOCK OF".[.h|
00000230: 01 99 20 22 54 45 58 54 2C 20 59 4F 55 20 43 41 |.. "TEXT, YOU CA|
00000240: 4E 20 50 55 54 20 49 54 20 42 41 43 4B 20 57 48 |N PUT IT BACK WH|
00000250: 45 52 45 20 49 54 20 57 41 53 22 00 89 0A 72 01 |ERE IT WAS"...r.|
00000260: 99 20 22 57 49 54 48 20 54 48 45 20 CD CF D6 C5 |. "WITH THE ....|
00000270: C2 C1 C3 CB 20 43 4F 4D 4D 41 4E 44 2E 20 C9 46 |.... COMMAND. .F|
00000280: 20 59 4F 55 20 55 53 45 22 00 B6 0A 7C 01 99 20 | YOU USE"...|.. |
00000290: 22 CD CF D6 C5 C2 C1 C3 CB 2C 20 59 4F 55 20 4D |"........, YOU M|
000002A0: 55 53 54 20 44 4F 20 49 54 20 52 49 47 48 54 20 |UST DO IT RIGHT |
000002B0: 41 46 54 45 52 22 00 CC 0A 86 01 99 20 22 59 4F |AFTER"...... "YO|
000002C0: 55 20 55 53 45 20 CD CF D6 C5 2E 22 00 D7 0A 8B |U USE ....."....|
000002D0: 01 8D 20 34 39 30 30 00 E2 0A 8E 01 8D 20 39 34 |.. 4900...... 94|
000002E0: 30 30 00 ED 0A 90 01 8D 20 37 32 30 30 00 F8 0A |00...... 7200...|
000002F0: 9A 01 8D 20 37 30 30 30 00 03 0B A4 01 8D 20 37 |... 7000...... 7|
00000300: 37 30 30 00 0E 0B AE 01 8D 20 38 37 30 30 00 19 |700...... 8700..|
00000310: 0B B8 01 8D 20 38 39 30 30 00 22 0B CC 01 4B B2 |.... 8900."...K.|
00000320: 31 31 00 39 0B D6 01 8D 20 37 31 30 30 3A 59 B2 |11.9.... 7100:Y.|
00000330: 31 34 3A 8D 20 35 30 33 30 00 64 0B E0 01 99 20 |14:. 5030.d.... |
00000340: 22 20 D3 55 50 50 4F 53 45 20 59 4F 55 20 57 41 |" .UPPOSE YOU WA|
00000350: 4E 54 45 44 20 54 4F 20 53 45 45 20 48 4F 57 20 |NTED TO SEE HOW |
00000360: 54 48 45 22 00 8E 0B EA 01 99 20 22 20 43 4F 55 |THE"...... " COU|
00000370: 50 4C 45 54 53 20 41 42 4F 56 45 20 57 4F 55 4C |PLETS ABOVE WOUL|
00000380: 44 20 52 45 41 44 20 49 46 20 54 48 45 22 00 BC |D READ IF THE"..|
00000390: 0B F4 01 99 20 22 20 53 45 43 4F 4E 44 20 57 45 |.... " SECOND WE|
000003A0: 52 45 20 46 49 52 53 54 2E 20 C8 45 52 45 27 53 |RE FIRST. .ERE'S|
000003B0: 20 48 4F 57 20 59 4F 55 20 44 4F 22 00 D8 0B FE | HOW YOU DO"....|
000003C0: 01 99 20 22 20 54 48 41 54 20 55 53 49 4E 47 20 |.. " THAT USING |
000003D0: CD CF D6 C5 2E 22 3A 99 00 E5 0B 0A 02 45 52 52 |.....":......ERR|
000003E0: 43 4E 54 B2 30 00 F4 0B 0B 02 42 B2 30 3A 8D 20 |CNT.0.....B.0:. |
000003F0: 39 33 30 30 00 02 0C 0D 02 97 20 43 44 4E 55 4D |9300...... CDNUM|
00000400: 2C 30 00 0D 0C 0F 02 8D 20 34 38 30 30 00 24 0C |,0...... 4800.$.|
00000410: 12 02 9E 20 28 53 57 49 4E 44 4F 57 29 3A 8D 20 |... (SWINDOW):. |
00000420: 39 30 30 30 00 3B 0C 1C 02 8B 20 C2 28 43 44 4E |9000.;.... .(CDN|
00000430: 55 4D 29 B2 31 20 A7 20 36 30 30 00 4D 0C 26 02 |UM).1 . 600.M.&.|
00000440: 8D 20 34 36 32 30 3A 8D 20 34 36 30 30 00 58 0C |. 4620:. 4600.X.|
00000450: 2B 02 8D 20 38 33 30 30 00 6D 0C 2D 02 8B 20 45 |+.. 8300.m.-.. E|
00000460: 52 52 43 4E 54 B2 30 20 A7 20 35 39 30 00 91 0C |RRCNT.0 . 590...|
00000470: 30 02 99 20 22 20 D9 4F 55 20 48 41 56 45 20 4E |0.. " .OU HAVE N|
00000480: 4F 54 20 53 45 4C 45 43 54 45 44 20 CD CF D6 C5 |OT SELECTED ....|
00000490: 22 00 B0 0C 3A 02 99 20 22 20 43 4F 52 52 45 43 |"...:.. " CORREC|
000004A0: 54 4C 59 2E 20 D4 52 59 20 41 47 41 49 4E 2E 22 |TLY. .RY AGAIN."|
000004B0: 00 BB 0C 44 02 8D 20 38 34 30 30 00 CD 0C 4E 02 |...D.. 8400...N.|
000004C0: 8D 20 34 36 32 30 3A 8D 20 34 36 30 30 00 D7 0C |. 4620:. 4600...|
000004D0: 53 02 89 20 35 32 35 00 E4 0C 58 02 45 52 52 43 |S.. 525...X.ERRC|
000004E0: 4E 54 B2 30 00 F3 0C 5D 02 42 B2 30 3A 8D 20 39 |NT.0...].B.0:. 9|
000004F0: 33 30 30 00 05 0D 62 02 8D 20 34 36 32 30 3A 8D |300...b.. 4620:.|
00000500: 20 34 36 30 30 00 2F 0D 6C 02 99 20 22 20 33 2E | 4600./.l.. " 3.|
00000510: 20 CD 4F 56 45 20 54 48 45 20 43 55 52 53 4F 52 | .OVE THE CURSOR|
00000520: 20 54 4F 20 54 48 45 20 27 C9 27 20 4F 46 22 00 | TO THE '.' OF".|
00000530: 52 0D 76 02 99 20 22 20 20 20 20 27 C9 4E 27 20 |R.v.. " '.N' |
00000540: 49 4E 20 54 48 45 20 54 48 49 52 44 20 4C 49 4E |IN THE THIRD LIN|
00000550: 45 22 00 6E 0D 80 02 99 3A 99 20 22 20 34 2E 20 |E".n....:. " 4. |
00000560: D0 52 45 53 53 20 20 D2 C5 D4 D5 D2 CE 22 00 84 |.RESS ......"..|
00000570: 0D 8A 02 9E 28 53 57 49 4E 44 4F 57 29 3A 8D 20 |....(SWINDOW):. |
00000580: 37 39 30 30 00 8F 0D 94 02 8D 20 39 35 30 30 00 |7900...... 9500.|
00000590: 9A 0D 9E 02 8D 20 34 35 30 30 00 AA 0D A8 02 8B |..... 4500......|
000005A0: 20 4D B2 30 20 A7 20 37 32 30 00 B5 0D B2 02 8D | M.0 . 720......|
000005B0: 20 34 34 30 30 00 BF 0D C6 02 89 20 36 30 35 00 | 4400...... 605.|
000005C0: CC 0D D0 02 45 52 52 43 4E 54 B2 30 00 DE 0D D5 |....ERRCNT.0....|
000005D0: 02 8D 20 34 36 32 30 3A 8D 20 34 36 30 30 00 0B |.. 4620:. 4600..|
000005E0: 0E DA 02 99 20 22 20 35 2E 20 CD 4F 56 45 20 54 |.... " 5. .OVE T|
000005F0: 48 45 20 43 55 52 53 4F 52 20 44 4F 57 4E 20 54 |HE CURSOR DOWN T|
00000600: 48 52 45 45 20 4C 49 4E 45 53 22 00 41 0E E4 02 |HREE LINES".A...|
00000610: 99 20 22 20 20 20 20 57 49 54 48 20 54 48 45 20 |. " WITH THE |
00000620: 12 22 3B C7 28 32 35 32 29 3B 22 92 20 28 D5 D0 |.";.(252);". (..|
00000630: 2D C4 CF D7 CE 20 41 52 52 4F 57 29 20 4B 45 59 |-.... ARROW) KEY|
00000640: 22 00 5C 0E EE 02 99 3A 99 20 22 20 36 2E 20 D0 |".\....:. " 6. .|
00000650: 52 45 53 53 20 D2 C5 D4 D5 D2 CE 22 00 6C 0E F8 |RESS ......".l..|
00000660: 02 42 B2 35 32 3A 8D 20 39 33 30 30 00 82 0E 02 |.B.52:. 9300....|
00000670: 03 9E 28 53 57 49 4E 44 4F 57 29 3A 8D 20 37 39 |..(SWINDOW):. 79|
00000680: 30 30 00 8D 0E 0C 03 8D 20 39 35 31 30 00 98 0E |00...... 9510...|
00000690: 16 03 8D 20 34 33 30 30 00 A8 0E 20 03 8B 20 4D |... 4300... .. M|
000006A0: B2 30 20 A7 20 38 33 30 00 B3 0E 2A 03 8D 20 34 |.0 . 830...*.. 4|
000006B0: 34 30 30 00 BD 0E 34 03 89 20 37 32 35 00 CA 0E |400...4.. 725...|
000006C0: 3E 03 45 52 52 43 4E 54 B2 30 00 DC 0E 48 03 8D |>.ERRCNT.0...H..|
000006D0: 20 34 36 32 30 3A 8D 20 34 36 30 30 00 06 0F 52 | 4620:. 4600...R|
000006E0: 03 99 20 22 20 37 2E 20 CD 4F 56 45 20 54 48 45 |.. " 7. .OVE THE|
000006F0: 20 43 55 52 53 4F 52 20 54 4F 20 54 48 45 20 27 | CURSOR TO THE '|
00000700: D4 27 20 4F 46 22 00 2A 0F 5C 03 99 20 22 20 20 |.' OF".*.\.. " |
00000710: 20 20 27 D4 48 45 27 20 49 4E 20 54 48 45 20 46 | '.HE' IN THE F|
00000720: 49 52 53 54 20 4C 49 4E 45 22 00 45 0F 66 03 99 |IRST LINE".E.f..|
00000730: 3A 99 20 22 20 38 2E 20 D0 52 45 53 53 20 D2 C5 |:. " 8. .RESS ..|
00000740: D4 D5 D2 CE 22 00 55 0F 6B 03 42 B2 35 32 3A 8D |....".U.k.B.52:.|
00000750: 20 39 33 30 30 00 6B 0F 70 03 9E 28 53 57 49 4E | 9300.k.p..(SWIN|
00000760: 44 4F 57 29 3A 8D 20 39 35 32 30 00 76 0F 7A 03 |DOW):. 9520.v.z.|
00000770: 8D 20 34 32 30 30 00 86 0F 84 03 8B 20 4D B2 30 |. 4200...... M.0|
00000780: 20 A7 20 39 34 30 00 98 0F 89 03 8D 20 34 36 32 | . 940...... 462|
00000790: 30 3A 8D 20 34 36 30 30 00 C0 0F 8E 03 99 20 22 |0:. 4600...... "|
000007A0: 20 D9 4F 55 20 48 41 56 45 20 4E 4F 54 20 50 4C | .OU HAVE NOT PL|
000007B0: 41 43 45 44 20 54 48 45 20 43 55 52 53 4F 52 22 |ACED THE CURSOR"|
000007C0: 00 EE 0F 98 03 99 20 22 20 43 4F 52 52 45 43 54 |...... " CORRECT|
000007D0: 4C 59 2E 20 D9 4F 55 27 4C 4C 20 48 41 56 45 20 |LY. .OU'LL HAVE |
000007E0: 54 4F 20 53 54 41 52 54 20 4F 56 45 52 22 00 00 |TO START OVER"..|
000007F0: 10 9D 03 8D 20 38 31 30 30 3A 8D 20 39 34 30 30 |.... 8100:. 9400|
00000800: 00 0A 10 A2 03 89 20 34 31 30 00 17 10 AC 03 45 |...... 410.....E|
00000810: 52 52 43 4E 54 B2 30 00 29 10 B1 03 8D 20 34 36 |RRCNT.0.).... 46|
00000820: 32 30 3A 8D 20 34 36 30 30 00 57 10 B6 03 99 20 |20:. 4600.W.... |
00000830: 22 20 39 2E 20 D4 59 50 45 20 27 D9 27 20 54 4F |" 9. .YPE '.' TO|
00000840: 20 4B 45 45 50 20 48 49 47 48 4C 49 47 48 54 45 | KEEP HIGHLIGHTE|
00000850: 44 20 54 45 58 54 22 00 79 10 C0 03 99 20 22 20 |D TEXT".y.... " |
00000860: 20 20 20 57 48 45 52 45 20 59 4F 55 27 56 45 20 | WHERE YOU'VE |
00000870: 4D 4F 56 45 44 20 49 54 22 00 90 10 CA 03 9E 20 |MOVED IT"...... |
00000880: 28 53 57 49 4E 44 4F 57 29 3A 8D 20 39 35 33 30 |(SWINDOW):. 9530|
00000890: 00 A2 10 D4 03 53 24 B2 C7 28 C2 28 43 48 41 52 |.....S$..(.(CHAR|
000008A0: 29 29 00 BF 10 DE 03 8B 20 53 24 B2 22 D9 22 20 |))...... S$."." |
000008B0: B0 20 53 24 B2 22 59 22 20 A7 20 31 30 35 30 00 |. S$."Y" . 1050.|
000008C0: D8 10 E8 03 8D 20 38 33 30 30 3A 8D 20 34 36 32 |..... 8300:. 462|
000008D0: 30 3A 8D 20 34 36 30 30 00 F6 10 F2 03 99 20 22 |0:. 4600...... "|
000008E0: 20 D9 4F 55 20 44 49 44 20 4E 4F 54 20 54 59 50 | .OU DID NOT TYP|
000008F0: 45 20 27 D9 27 22 00 19 11 FC 03 99 20 22 20 D9 |E '.'"...... " .|
00000900: 4F 55 27 4C 4C 20 48 41 56 45 20 54 4F 20 53 54 |OU'LL HAVE TO ST|
00000910: 41 52 54 20 4F 56 45 52 22 00 2B 11 01 04 8D 20 |ART OVER".+.... |
00000920: 38 31 30 30 3A 8D 20 39 34 30 30 00 42 11 06 04 |8100:. 9400.B...|
00000930: 9E 20 28 53 57 49 4E 44 4F 57 29 3A 8D 20 39 35 |. (SWINDOW):. 95|
00000940: 34 30 00 4C 11 10 04 89 20 34 31 30 00 63 11 1A |40.L.... 410.c..|
00000950: 04 9E 20 28 53 57 49 4E 44 4F 57 29 3A 8D 20 39 |.. (SWINDOW):. 9|
00000960: 35 34 30 00 73 11 24 04 4B B2 31 31 3A 8D 20 37 |540.s.$.K.11:. 7|
00000970: 32 35 30 00 8F 11 2E 04 8D 20 37 31 30 30 3A 59 |250...... 7100:Y|
00000980: B2 31 34 3A 4B B2 31 31 3A 8D 20 35 30 33 30 00 |.14:K.11:. 5030.|
00000990: BD 11 38 04 99 20 22 20 C9 46 20 59 4F 55 20 4C |..8.. " .F YOU L|
000009A0: 49 4B 45 44 20 49 54 20 42 45 54 54 45 52 20 57 |IKED IT BETTER W|
000009B0: 48 45 52 45 20 49 54 20 57 41 53 2C 22 00 D4 11 |HERE IT WAS,"...|
000009C0: 42 04 99 20 22 20 55 53 45 20 CD CF D6 C5 C2 C1 |B.. " USE ......|
000009D0: C3 CB 2E 22 00 E1 11 4C 04 45 52 52 43 4E 54 B2 |..."...L.ERRCNT.|
000009E0: 30 00 F3 11 51 04 8D 20 34 36 32 30 3A 8D 20 34 |0...Q.. 4620:. 4|
000009F0: 36 30 30 00 0F 12 56 04 99 20 22 20 31 2E 20 D3 |600...V.. " 1. .|
00000A00: 45 4C 45 43 54 20 CD CF D6 C5 C2 C1 C3 CB 22 00 |ELECT ........".|
00000A10: 2A 12 60 04 99 3A 99 20 22 20 32 2E 20 D0 52 45 |*.`..:. " 2. .RE|
00000A20: 53 53 20 D2 C5 D4 D5 D2 CE 22 00 38 12 6A 04 97 |SS ......".8.j..|
00000A30: 20 43 44 4E 55 4D 2C 30 00 4E 12 74 04 9E 28 53 | CDNUM,0.N.t..(S|
00000A40: 57 49 4E 44 4F 57 29 3A 8D 20 39 30 30 30 00 67 |WINDOW):. 9000.g|
00000A50: 12 7E 04 8B 20 C2 28 43 44 4E 55 4D 29 B2 34 20 |.~.. .(CDNUM).4 |
00000A60: 20 A7 20 31 32 33 30 00 79 12 88 04 8D 20 34 36 | . 1230.y.... 46|
00000A70: 32 30 3A 8D 20 34 36 30 30 00 84 12 92 04 8D 20 |20:. 4600...... |
00000A80: 38 33 30 30 00 9A 12 9C 04 8B 20 45 52 52 43 4E |8300...... ERRCN|
00000A90: 54 B2 30 20 A7 20 31 32 32 30 00 C2 12 A6 04 99 |T.0 . 1220......|
00000AA0: 20 22 20 D9 4F 55 20 48 41 56 45 20 4E 4F 54 20 | " .OU HAVE NOT |
00000AB0: 53 45 4C 45 43 54 45 44 20 CD CF D6 C5 C2 C1 C3 |SELECTED .......|
00000AC0: CB 22 00 E1 12 B0 04 99 20 22 20 43 4F 52 52 45 |."...... " CORRE|
00000AD0: 43 54 4C 59 2E 20 D4 52 59 20 41 47 41 49 4E 2E |CTLY. .RY AGAIN.|
00000AE0: 22 00 EC 12 BA 04 8D 20 38 34 30 30 00 F7 12 C4 |"...... 8400....|
00000AF0: 04 89 20 31 31 30 35 00 04 13 CE 04 45 52 52 43 |.. 1105.....ERRC|
00000B00: 4E 54 B2 30 00 16 13 D8 04 8D 20 34 36 32 30 3A |NT.0...... 4620:|
00000B10: 8D 20 34 36 30 30 00 44 13 E2 04 99 20 22 20 33 |. 4600.D.... " 3|
00000B20: 2E 20 D4 59 50 45 20 27 D9 27 20 54 4F 20 4D 4F |. .YPE '.' TO MO|
00000B30: 56 45 20 54 48 45 20 43 4F 55 50 4C 45 54 20 42 |VE THE COUPLET B|
00000B40: 41 43 4B 22 00 69 13 EC 04 99 20 22 20 20 20 20 |ACK".i.... " |
00000B50: 54 4F 20 49 54 53 20 4F 52 49 47 49 4E 41 4C 20 |TO ITS ORIGINAL |
00000B60: 50 4F 53 49 54 49 4F 4E 22 00 80 13 F6 04 9E 20 |POSITION"...... |
00000B70: 28 53 57 49 4E 44 4F 57 29 3A 8D 20 39 35 35 30 |(SWINDOW):. 9550|
00000B80: 00 92 13 00 05 53 24 B2 C7 28 C2 28 43 48 41 52 |.....S$..(.(CHAR|
00000B90: 29 29 00 AF 13 0A 05 8B 20 53 24 B2 22 D9 22 20 |))...... S$."." |
00000BA0: B0 20 53 24 B2 22 59 22 20 A7 20 31 33 36 30 00 |. S$."Y" . 1360.|
00000BB0: C1 13 14 05 8D 20 34 36 32 30 3A 8D 20 34 36 30 |..... 4620:. 460|
00000BC0: 30 00 CC 13 1E 05 8D 20 38 33 30 30 00 E2 13 28 |0...... 8300...(|
00000BD0: 05 8B 20 45 52 52 43 4E 54 B2 30 20 A7 20 31 33 |.. ERRCNT.0 . 13|
00000BE0: 35 30 00 0C 14 32 05 99 20 22 20 D9 4F 55 20 44 |50...2.. " .OU D|
00000BF0: 49 44 20 4E 4F 54 20 54 59 50 45 20 27 D9 27 2E |ID NOT TYPE '.'.|
00000C00: 20 D4 52 59 20 41 47 41 49 4E 2E 22 00 17 14 3C | .RY AGAIN."...<|
00000C10: 05 8D 20 38 34 30 30 00 22 14 46 05 89 20 31 32 |.. 8400.".F.. 12|
00000C20: 34 30 00 2D 14 50 05 8D 20 38 37 30 30 00 38 14 |40.-.P.. 8700.8.|
00000C30: 55 05 8D 20 38 39 30 30 00 49 14 5A 05 4B B2 31 |U.. 8900.I.Z.K.1|
00000C40: 31 3A 20 8D 20 37 32 35 30 00 60 14 64 05 8D 20 |1: . 7250.`.d.. |
00000C50: 37 31 30 30 3A 59 B2 31 34 3A 8D 20 35 30 33 30 |7100:Y.14:. 5030|
00000C60: 00 8D 14 6E 05 99 20 22 20 D9 4F 55 20 48 41 56 |...n.. " .OU HAV|
00000C70: 45 20 46 49 4E 49 53 48 45 44 20 CC 45 53 53 4F |E FINISHED .ESSO|
00000C80: 4E 20 34 2E 20 D9 4F 55 20 43 41 4E 22 00 B2 14 |N 4. .OU CAN"...|
00000C90: 78 05 99 20 22 20 4E 4F 57 20 44 4F 20 4F 4E 45 |x.. " NOW DO ONE|
00000CA0: 20 4F 46 20 54 48 52 45 45 20 54 48 49 4E 47 53 | OF THREE THINGS|
00000CB0: 2E 22 00 D5 14 82 05 99 3A 99 20 22 20 31 2E 20 |."......:. " 1. |
00000CC0: C4 4F 20 54 48 49 53 20 4C 45 53 53 4F 4E 20 41 |.O THIS LESSON A|
00000CD0: 47 41 49 4E 22 00 FA 14 8C 05 99 20 22 20 32 2E |GAIN"...... " 2.|
00000CE0: 20 C7 4F 20 4F 4E 20 54 4F 20 54 48 45 20 4E 45 | .O ON TO THE NE|
00000CF0: 58 54 20 4C 45 53 53 4F 4E 22 00 22 15 96 05 99 |XT LESSON"."....|
00000D00: 20 22 20 33 2E 20 D2 45 54 55 52 4E 20 54 4F 20 | " 3. .ETURN TO |
00000D10: 54 48 45 20 D4 55 54 4F 52 49 41 4C 20 4D 45 4E |THE .UTORIAL MEN|
00000D20: 55 22 00 4A 15 A0 05 99 3A 99 20 22 20 D7 48 41 |U".J....:. " .HA|
00000D30: 54 20 57 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 |T WOULD YOU LIKE|
00000D40: 20 54 4F 20 44 4F 3F 20 22 3B 00 55 15 AA 05 8D | TO DO? ";.U....|
00000D50: 20 37 34 30 30 00 5F 15 AF 05 4E 24 B2 53 24 00 | 7400._...N$.S$.|
00000D60: 88 15 B4 05 8B 20 4E 24 B3 B1 22 31 22 20 AF 20 |..... N$.."1" . |
00000D70: 4E 24 B3 B1 22 32 22 20 AF 20 4E 24 B3 B1 22 33 |N$.."2" . N$.."3|
00000D80: 22 20 A7 20 31 34 35 30 00 92 15 B9 05 99 20 4E |" . 1450...... N|
00000D90: 24 3B 00 A5 15 BE 05 8B 20 4E 24 B2 22 31 22 20 |$;...... N$."1" |
00000DA0: A7 20 31 35 30 00 C5 15 BF 05 8F 20 2A 2A 2A 2A |. 150...... ****|
00000DB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DC0: 2A 2A 2A 2A 2A 00 CB 15 C0 05 8F 00 E9 15 C1 05 |*****...........|
00000DD0: 9F 20 33 2C 38 2C 33 2C 22 40 30 3A 55 54 49 4C |. 3,8,3,"@0:UTIL|
00000DE0: 44 41 54 41 2C 53 2C 52 22 00 F4 15 C3 05 8D 20 |DATA,S,R"...... |
00000DF0: 39 37 30 30 00 FC 15 C4 05 A0 20 33 00 0C 16 C6 |9700...... 3....|
00000E00: 05 8B 20 4E 52 20 A7 20 31 34 38 35 00 17 16 C8 |.. NR . 1485....|
00000E10: 05 8D 20 39 38 30 30 00 22 16 CA 05 89 20 31 34 |.. 9800.".... 14|
00000E20: 37 33 00 36 16 CD 05 8B 20 4E 24 B2 22 32 22 20 |73.6.... N$."2" |
00000E30: A7 20 32 30 30 30 00 4C 16 D2 05 8D 20 31 30 30 |. 2000.L.... 100|
00000E40: 30 30 3A 93 22 54 55 54 32 22 2C 38 00 57 16 D0 |00:."TUT2",8.W..|
00000E50: 07 8D 20 37 30 30 30 00 75 16 DA 07 99 20 3A 99 |.. 7000.u.... :.|
00000E60: 20 22 C2 41 4E 4B 20 D3 54 52 45 45 54 20 D7 52 | ".ANK .TREET .R|
00000E70: 49 54 45 52 22 00 88 16 E4 07 99 3A 99 20 22 D4 |ITER"......:. ".|
00000E80: D5 D4 CF D2 C9 C1 CC 22 00 95 16 EE 07 99 3A 8D |......."......:.|
00000E90: 20 37 35 30 30 00 B8 16 F8 07 99 20 22 CC 45 53 | 7500...... ".ES|
00000EA0: 53 4F 4E 20 35 3A 20 C6 49 4E 44 20 41 4E 44 20 |SON 5: .IND AND |
00000EB0: D2 45 50 4C 41 43 45 22 00 C3 16 02 08 8D 20 38 |.EPLACE"...... 8|
00000EC0: 39 30 30 00 D9 16 0C 08 8D 20 31 30 30 30 30 3A |900...... 10000:|
00000ED0: 93 22 54 55 54 37 22 2C 38 00 F2 16 68 10 4D B2 |."TUT7",8...h.M.|
00000EE0: 30 3A 20 20 20 8F 20 45 52 52 4F 52 20 43 48 45 |0: . ERROR CHE|
00000EF0: 43 4B 00 FD 16 72 10 8D 20 39 32 30 30 00 0F 17 |CK...r.. 9200...|
00000F00: 7C 10 8B 20 59 5A B3 B1 30 20 A7 20 4D B2 31 00 ||.. YZ..0 . M.1.|
00000F10: 15 17 86 10 8E 00 1D 17 CC 10 4D B2 30 00 28 17 |..........M.0.(.|
00000F20: D6 10 8D 20 39 36 30 30 00 3C 17 E0 10 8B 20 59 |... 9600.<.... Y|
00000F30: 5A B3 B1 31 33 37 20 A7 20 4D B2 31 00 42 17 EA |Z..137 . M.1.B..|
00000F40: 10 8E 00 54 17 30 11 8D 20 34 36 32 30 3A 8D 20 |...T.0.. 4620:. |
00000F50: 34 36 30 30 00 5F 17 3A 11 8D 20 38 33 30 30 00 |4600._.:.. 8300.|
00000F60: 75 17 3F 11 8B 20 45 52 52 43 4E 54 B2 30 20 A7 |u.?.. ERRCNT.0 .|
00000F70: 20 34 34 35 30 00 9D 17 44 11 99 20 22 20 D9 4F | 4450...D.. " .O|
00000F80: 55 20 48 41 56 45 20 4E 4F 54 20 50 4C 41 43 45 |U HAVE NOT PLACE|
00000F90: 44 20 54 48 45 20 43 55 52 53 4F 52 22 00 BC 17 |D THE CURSOR"...|
00000FA0: 4E 11 99 20 22 20 43 4F 52 52 45 43 54 4C 59 2E |N.. " CORRECTLY.|
00000FB0: 20 D4 52 59 20 41 47 41 49 4E 2E 22 00 C7 17 58 | .RY AGAIN."...X|
00000FC0: 11 8D 20 38 34 30 30 00 CD 17 62 11 8E 00 E5 17 |.. 8400...b.....|
00000FD0: 94 11 4D B2 30 3A 20 20 8F 20 45 52 52 4F 52 20 |..M.0: . ERROR |
00000FE0: 43 48 45 43 4B 00 F0 17 9E 11 8D 20 39 32 30 30 |CHECK...... 9200|
00000FF0: 00 03 18 A8 11 8B 20 59 5A B3 B1 35 32 20 A7 20 |...... YZ..52 . |
00001000: 4D B2 31 00 09 18 B2 11 8E 00 20 18 F8 11 8D 20 |M.1....... .... |
00001010: 37 31 30 30 3A 59 B2 31 39 3A 8D 20 35 30 33 30 |7100:Y.19:. 5030|
00001020: 00 26 18 02 12 8E 00 31 18 0C 12 8D 20 34 36 30 |.&.....1.... 460|
00001030: 30 00 40 18 16 12 4B B2 34 3A 8D 20 37 32 36 30 |0.@...K.4:. 7260|
00001040: 00 46 18 20 12 8E 00 72 18 C0 12 99 20 22 20 31 |.F. ...r.... " 1|
00001050: 2E 20 CD 4F 56 45 20 54 48 45 20 53 45 4C 45 43 |. .OVE THE SELEC|
00001060: 54 4F 52 20 41 54 20 54 48 45 20 54 4F 50 20 4F |TOR AT THE TOP O|
00001070: 46 22 00 9E 18 CA 12 99 20 22 20 20 20 20 54 48 |F"...... " TH|
00001080: 45 20 53 43 52 45 45 4E 20 54 4F 20 CD CF D6 C5 |E SCREEN TO ....|
00001090: 20 28 55 53 45 20 3C 20 4F 52 20 3E 29 22 00 B9 | (USE < OR >)"..|
000010A0: 18 D4 12 99 3A 99 20 22 20 32 2E 20 D0 52 45 53 |....:. " 2. .RES|
000010B0: 53 20 D2 C5 D4 D5 D2 CE 22 00 BF 18 DE 12 8E 00 |S ......".......|
000010C0: EC 18 24 13 41 31 24 B2 22 D4 48 45 20 53 4F 55 |..$.A1$.".HE SOU|
000010D0: 4E 44 20 4F 46 20 41 20 44 4F 47 27 53 20 42 41 |ND OF A DOG'S BA|
000010E0: 52 4B 20 49 53 22 AA C7 28 31 33 29 00 13 19 2E |RK IS"..(13)....|
000010F0: 13 41 32 24 B2 22 C1 20 44 49 41 4D 4F 4E 44 20 |.A2$.". DIAMOND |
00001100: 49 4E 20 54 48 45 20 52 55 46 46 2E 22 AA C7 28 |IN THE RUFF."..(|
00001110: 31 33 29 00 42 19 38 13 41 33 24 B2 22 C9 4E 20 |13).B.8.A3$.".N |
00001120: 41 20 48 4F 55 53 45 20 57 48 45 52 45 20 44 4F |A HOUSE WHERE DO|
00001130: 47 53 20 41 4E 44 20 43 41 54 53 22 AA C7 28 31 |GS AND CATS"..(1|
00001140: 33 29 00 6F 19 42 13 41 34 24 B2 22 20 20 20 41 |3).o.B.A4$." A|
00001150: 52 45 20 54 52 45 41 54 45 44 20 4C 49 4B 45 20 |RE TREATED LIKE |
00001160: 52 4F 59 41 4C 54 59 2C 22 AA C7 28 31 33 29 00 |ROYALTY,"..(13).|
00001170: 98 19 4C 13 41 35 24 B2 22 C9 54 20 52 45 49 47 |..L.A5$.".T REIG|
00001180: 4E 53 20 43 41 54 53 20 41 4E 44 20 44 4F 47 53 |NS CATS AND DOGS|
00001190: 2E 22 AA C7 28 31 33 29 00 9E 19 56 13 8E 00 A4 |."..(13)...V....|
000011A0: 19 87 13 80 00 C5 19 88 13 81 20 49 B2 31 20 A4 |.......... I.1 .|
000011B0: 20 58 20 3A 8F 20 50 4F 53 49 54 49 4F 4E 20 43 | X :. POSITION C|
000011C0: 55 52 53 4F 52 00 D0 19 92 13 99 20 22 1D 22 3B |URSOR...... ".";|
000011D0: 00 D8 19 9C 13 82 20 49 00 05 1A A6 13 81 20 4A |...... I...... J|
000011E0: B2 31 20 A4 20 59 20 3A 8F 20 4D 4F 56 45 20 43 |.1 . Y :. MOVE C|
000011F0: 55 52 53 4F 52 20 44 4F 57 4E 20 54 48 45 20 53 |URSOR DOWN THE S|
00001200: 43 52 45 45 4E 00 10 1A B0 13 99 20 22 11 22 3B |CREEN...... ".";|
00001210: 00 18 1A BA 13 82 20 4A 00 1E 1A C4 13 8E 00 3C |...... J.......<|
00001220: 1A 70 17 42 41 53 45 B2 36 AC 34 30 39 36 20 3A |.p.BASE.6.4096 :|
00001230: 8F 20 49 4E 49 54 49 41 4C 49 5A 45 00 4A 1A 72 |. INITIALIZE.J.r|
00001240: 17 42 55 46 B2 34 39 31 35 32 00 56 1A 73 17 42 |.BUF.49152.V.s.B|
00001250: 4C 45 B2 42 55 46 00 6A 1A 75 17 42 32 B2 39 AC |LE.BUF.j.u.B2.9.|
00001260: 34 30 39 36 AA 35 AC 32 35 36 00 77 1A 77 17 45 |4096.5.256.w.w.E|
00001270: 52 52 43 4E 54 B2 30 00 98 1A 7A 17 49 4E 49 54 |RRCNT.0...z.INIT|
00001280: 55 54 B2 C2 28 42 41 53 45 29 AA C2 28 42 41 53 |UT..(BASE)..(BAS|
00001290: 45 AA 31 29 AC 32 35 36 00 BC 1A 7F 17 4D 4F 56 |E.1).256.....MOV|
000012A0: 45 43 55 52 B2 C2 28 42 41 53 45 AA 34 29 AA C2 |ECUR..(BASE.4)..|
000012B0: 28 42 41 53 45 AA 35 29 AC 32 35 36 00 DE 1A 84 |(BASE.5).256....|
000012C0: 17 42 4F 58 B2 C2 28 42 41 53 45 AA 35 34 29 AA |.BOX..(BASE.54).|
000012D0: C2 28 42 41 53 45 AA 35 35 29 AC 32 35 36 00 03 |.(BASE.55).256..|
000012E0: 1B 86 17 46 4F 55 52 41 52 B2 C2 28 42 41 53 45 |...FOURAR..(BASE|
000012F0: AA 34 32 29 AA C2 28 42 41 53 45 AA 34 33 29 AC |.42)..(BASE.43).|
00001300: 32 35 36 00 26 1B 89 17 47 45 43 4D B2 C2 28 42 |256.&...GECM..(B|
00001310: 41 53 45 AA 34 36 29 AA C2 28 42 41 53 45 AA 34 |ASE.46)..(BASE.4|
00001320: 37 29 AC 32 35 36 00 4A 1B 8E 17 47 4B 42 44 20 |7).256.J...GKBD |
00001330: B2 C2 28 42 41 53 45 AA 35 36 29 AA C2 28 42 41 |..(BASE.56)..(BA|
00001340: 53 45 AA 35 37 29 AC 32 35 36 00 6B 1B 8F 17 4D |SE.57).256.k...M|
00001350: 31 B2 C2 28 42 41 53 45 AA 31 36 29 AA C2 28 42 |1..(BASE.16)..(B|
00001360: 41 53 45 AA 31 37 29 AC 32 35 36 00 8C 1B 90 17 |ASE.17).256.....|
00001370: 4D 32 B2 C2 28 42 41 53 45 AA 31 38 29 AA C2 28 |M2..(BASE.18)..(|
00001380: 42 41 53 45 AA 31 39 29 AC 32 35 36 00 AD 1B 91 |BASE.19).256....|
00001390: 17 4D 33 B2 C2 28 42 41 53 45 AA 32 30 29 AA C2 |.M3..(BASE.20)..|
000013A0: 28 42 41 53 45 AA 32 31 29 AC 32 35 36 00 CE 1B |(BASE.21).256...|
000013B0: 92 17 4D 34 B2 C2 28 42 41 53 45 AA 32 32 29 AA |..M4..(BASE.22).|
000013C0: C2 28 42 41 53 45 AA 32 33 29 AC 32 35 36 00 EF |.(BASE.23).256..|
000013D0: 1B 93 17 4D 35 B2 C2 28 42 41 53 45 AA 32 34 29 |...M5..(BASE.24)|
000013E0: AA C2 28 42 41 53 45 AA 32 35 29 AC 32 35 36 00 |..(BASE.25).256.|
000013F0: 14 1C 94 17 4D 56 42 41 43 4B B2 C2 28 42 41 53 |....MVBACK..(BAS|
00001400: 45 AA 32 36 29 AA C2 28 42 41 53 45 AA 32 37 29 |E.26)..(BASE.27)|
00001410: AC 32 35 36 00 3A 1C 96 17 53 57 49 4E 44 4F 57 |.256.:...SWINDOW|
00001420: B2 C2 28 42 41 53 45 AA 35 38 29 AA C2 28 42 41 |..(BASE.58)..(BA|
00001430: 53 45 AA 35 39 29 AC 32 35 36 00 5B 1C 98 17 49 |SE.59).256.[...I|
00001440: 53 52 54 B2 C2 28 42 41 53 45 AA 36 29 AA C2 28 |SRT..(BASE.6)..(|
00001450: 42 41 53 45 AA 37 29 AC 32 35 36 00 7F 1C A7 17 |BASE.7).256.....|
00001460: 43 4D 57 52 54 B2 C2 28 42 41 53 45 AA 33 36 29 |CMWRT..(BASE.36)|
00001470: AA C2 28 42 41 53 45 AA 33 37 29 AC 32 35 36 00 |..(BASE.37).256.|
00001480: A0 1C AC 17 52 45 44 4F B2 C2 28 42 41 53 45 AA |....REDO..(BASE.|
00001490: 32 29 AA C2 28 42 41 53 45 AA 33 29 AC 32 35 36 |2)..(BASE.3).256|
000014A0: 00 C4 1C B1 17 57 54 45 4E 54 B2 C2 28 42 41 53 |.....WTENT..(BAS|
000014B0: 45 AA 33 38 29 AA C2 28 42 41 53 45 AA 33 39 29 |E.38)..(BASE.39)|
000014C0: AC 32 35 36 00 E9 1C B6 17 57 52 54 45 4E 31 B2 |.256.....WRTEN1.|
000014D0: C2 28 42 41 53 45 AA 35 30 29 AA C2 28 42 41 53 |.(BASE.50)..(BAS|
000014E0: 45 AA 35 31 29 AC 32 35 36 00 0E 1D BB 17 4D 59 |E.51).256.....MY|
000014F0: 42 45 4C 32 B2 C2 28 42 41 53 45 AA 35 32 29 AA |BEL2..(BASE.52).|
00001500: C2 28 42 41 53 45 AA 35 33 29 AC 32 35 36 00 1D |.(BASE.53).256..|
00001510: 1D C0 17 4C 42 55 46 42 45 47 B2 42 32 00 2E 1D |...LBUFBEG.B2...|
00001520: C5 17 48 42 55 46 42 45 47 B2 42 32 AA 31 00 3C |..HBUFBEG.B2.1.<|
00001530: 1D CA 17 4C 4D 49 4E B2 42 32 AA 32 00 4A 1D CF |...LMIN.B2.2.J..|
00001540: 17 48 4D 49 4E B2 42 32 AA 33 00 59 1D D4 17 4C |.HMIN.B2.3.Y...L|
00001550: 4F 4D 41 58 B2 42 32 AA 34 00 68 1D D9 17 48 49 |OMAX.B2.4.h...HI|
00001560: 4D 41 58 B2 42 32 AA 35 00 77 1D DE 17 4C 50 54 |MAX.B2.5.w...LPT|
00001570: 45 4E B2 42 32 AA 36 00 86 1D E3 17 48 50 54 45 |EN.B2.6.....HPTE|
00001580: 4E B2 42 32 AA 37 00 96 1D E8 17 47 43 46 4C 41 |N.B2.7.....GCFLA|
00001590: 47 B2 42 32 AA 38 00 A4 1D ED 17 57 42 54 4D B2 |G.B2.8.....WBTM.|
000015A0: 42 32 AA 39 00 B5 1D F2 17 4D 49 44 4C 49 4E B2 |B2.9.....MIDLIN.|
000015B0: 42 32 AA 31 30 00 C5 1D F7 17 44 4C 49 4E 45 B2 |B2.10.....DLINE.|
000015C0: 42 32 AA 31 31 00 D5 1D FC 17 43 44 4E 55 4D B2 |B2.11.....CDNUM.|
000015D0: 42 32 AA 31 32 00 E4 1D 01 18 43 48 41 52 B2 42 |B2.12.....CHAR.B|
000015E0: 32 AA 31 33 00 F5 1D 06 18 53 43 52 41 4D 54 B2 |2.13.....SCRAMT.|
000015F0: 42 32 AA 31 34 00 05 1E 10 18 4C 4F 4C 44 32 B2 |B2.14.....LOLD2.|
00001600: 42 32 AA 33 39 00 15 1E 1A 18 48 4F 4C 44 32 B2 |B2.39.....HOLD2.|
00001610: 42 32 AA 34 30 00 24 1E 24 18 4C 43 55 52 50 54 |B2.40.$.$.LCURPT|
00001620: B2 32 35 31 00 33 1E 2E 18 48 43 55 52 50 54 B2 |.251.3...HCURPT.|
00001630: 32 35 32 00 41 1E 6A 18 97 20 57 42 54 4D 2C 31 |252.A.j.. WBTM,1|
00001640: 32 00 50 1E B0 18 97 20 47 43 46 4C 41 47 2C 31 |2.P.... GCFLAG,1|
00001650: 00 5F 1E BA 18 97 20 4D 49 44 4C 49 4E 2C 39 00 |._.... MIDLIN,9.|
00001660: 6D 1E C4 18 97 20 44 4C 49 4E 45 2C 38 00 7C 1E |m.... DLINE,8.|.|
00001670: D8 18 97 20 53 43 52 41 4D 54 2C 34 00 82 1E F4 |... SCRAMT,4....|
00001680: 1A 8E 00 A7 1E 58 1B 99 22 93 22 3B 3A 8F 20 43 |.....X..".";:. C|
00001690: 4C 45 41 52 20 53 43 52 45 45 4E 20 48 4F 4D 45 |LEAR SCREEN HOME|
000016A0: 20 43 55 52 53 4F 52 00 AD 1E 62 1B 8E 00 C6 1E | CURSOR...b.....|
000016B0: BC 1B 99 22 13 22 3B 20 3A 8F 20 48 4F 4D 45 20 |..."."; :. HOME |
000016C0: 43 55 52 53 4F 52 00 CC 1E C6 1B 8E 00 EA 1E 20 |CURSOR......... |
000016D0: 1C 8F 20 54 45 53 54 20 46 4F 52 20 53 50 41 43 |.. TEST FOR SPAC|
000016E0: 45 20 42 41 52 20 50 55 53 48 00 03 1F 21 1C 8D |E BAR PUSH...!..|
000016F0: 37 31 30 30 3A 58 B2 34 3A 59 B2 32 34 3A 8D 35 |7100:X.4:Y.24:.5|
00001700: 30 30 30 00 2C 1F 23 1C 99 20 22 5B D0 52 45 53 |000.,.#.. "[.RES|
00001710: 53 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 43 |S SPACE BAR TO C|
00001720: 4F 4E 54 49 4E 55 45 5D 20 9D 22 3B 00 37 1F 25 |ONTINUE] .";.7.%|
00001730: 1C 8D 20 37 34 30 30 00 4E 1F 34 1C 8B 20 53 24 |.. 7400.N.4.. S$|
00001740: 20 B3 B1 20 22 20 22 20 A7 20 37 32 30 35 00 54 | .. " " . 7205.T|
00001750: 1F 3E 1C 8E 00 7D 1F 52 1C 8D 20 37 31 30 30 20 |.>...}.R.. 7100 |
00001760: 20 20 3A 8F 20 43 4C 45 41 52 20 42 4F 54 54 4F | :. CLEAR BOTTO|
00001770: 4D 20 48 41 4C 46 20 53 43 52 45 45 4E 00 8F 1F |M HALF SCREEN...|
00001780: 57 1C 59 B2 31 33 20 3A 20 8D 20 35 30 33 30 00 |W.Y.13 : . 5030.|
00001790: 9D 1F 5C 1C 81 20 49 B2 31 20 A4 20 4B 00 CD 1F |..\.. I.1 . K...|
000017A0: 66 1C 99 20 22 20 20 20 20 20 20 20 20 20 20 20 |f.. " |
000017B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000017C0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 D5 1F | "...|
000017D0: 70 1C 82 20 49 00 06 20 7A 1C 99 20 22 20 20 20 |p.. I.. z.. " |
000017E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000017F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001800: 20 20 20 20 22 3B 00 0C 20 7F 1C 8E 00 31 20 84 | ";.. ....1 .|
00001810: 1C 8D 20 37 34 30 30 20 3A 8F 20 54 45 53 54 20 |.. 7400 :. TEST |
00001820: 46 4F 52 20 59 2F 4E 20 4B 45 59 20 50 52 45 53 |FOR Y/N KEY PRES|
00001830: 53 00 64 20 8E 1C 8B 20 53 24 B3 B1 22 59 22 20 |S.d ... S$.."Y" |
00001840: AF 20 53 24 B3 B1 22 D9 22 20 AF 20 53 24 B3 B1 |. S$.."." . S$..|
00001850: 22 4E 22 20 AF 20 53 24 B3 B1 22 CE 22 20 A7 20 |"N" . S$.."." . |
00001860: 37 33 30 30 00 91 20 98 1C 8B 20 53 24 B2 22 59 |7300.. ... S$."Y|
00001870: 22 20 B0 20 53 24 B2 22 D9 22 20 A7 20 99 20 22 |" . S$."." . . "|
00001880: D9 22 3B 3A 4E 24 B2 22 33 22 3A 89 20 31 34 37 |.";:N$."3":. 147|
00001890: 31 00 9C 20 A2 1C 99 20 22 CE 22 3B 00 A2 20 AC |1.. ... ".";.. .|
000018A0: 1C 8E 00 CD 20 E8 1C 9E 28 47 4B 42 44 29 20 3A |.... ...(GKBD) :|
000018B0: 8F 20 47 45 54 20 43 48 41 52 41 43 54 4F 52 20 |. GET CHARACTOR |
000018C0: 46 52 4F 4D 20 4B 45 59 42 4F 41 52 44 00 DF 20 |FROM KEYBOARD.. |
000018D0: F2 1C 53 24 B2 C7 28 C2 28 43 48 41 52 29 29 00 |..S$..(.(CHAR)).|
000018E0: E5 20 FC 1C 8E 00 03 21 4C 1D 99 20 22 12 22 3B |. .....!L.. ".";|
000018F0: 20 3A 8F 20 54 55 52 4E 20 52 45 56 45 52 53 45 | :. TURN REVERSE|
00001900: 20 4F 4E 00 09 21 56 1D 8E 00 27 21 B0 1D 99 20 | ON..!V...'!... |
00001910: 22 92 22 20 3A 8F 20 54 55 52 4E 20 4F 46 46 20 |"." :. TURN OFF |
00001920: 52 45 56 45 52 53 45 00 2D 21 BA 1D 8E 00 45 21 |REVERSE.-!....E!|
00001930: 14 1E 9E 20 28 42 4F 58 29 20 3A 8F 20 44 52 41 |... (BOX) :. DRA|
00001940: 57 20 42 4F 58 00 4B 21 1E 1E 8E 00 69 21 78 1E |W BOX.K!....i!x.|
00001950: 8D 20 38 31 30 30 20 3A 8F 20 41 4C 4C 4F 57 20 |. 8100 :. ALLOW |
00001960: 49 4E 53 45 52 54 49 4F 4E 00 74 21 82 1E 8D 20 |INSERTION.t!... |
00001970: 37 39 30 30 00 81 21 8C 1E 9E 20 28 49 53 52 54 |7900..!... (ISRT|
00001980: 29 00 87 21 96 1E 8E 00 97 21 DC 1E 9E 20 28 52 |)..!.....!... (R|
00001990: 45 44 4F 29 20 3A 8F 00 9D 21 E6 1E 8E 00 AF 21 |EDO) :...!.....!|
000019A0: 40 1F 9E 20 28 53 45 54 42 4E 44 29 20 3A 8F 00 |@.. (SETBND) :..|
000019B0: B5 21 4A 1F 8E 00 C7 21 A4 1F 9E 20 28 49 4E 49 |.!J....!... (INI|
000019C0: 54 55 54 29 20 3A 8F 00 CD 21 AE 1F 8E 00 F3 21 |TUT) :...!.....!|
000019D0: 08 20 9E 20 28 57 52 54 45 4E 31 29 20 3A 8F 20 |. . (WRTEN1) :. |
000019E0: 50 52 49 4E 54 20 54 4F 50 20 4F 46 20 53 43 52 |PRINT TOP OF SCR|
000019F0: 45 45 4E 00 F9 21 12 20 8E 00 19 22 6C 20 9E 20 |EEN..!. ..."l . |
00001A00: 28 4D 59 42 45 4C 32 29 20 3A 8F 20 45 52 52 4F |(MYBEL2) :. ERRO|
00001A10: 52 20 52 4F 55 54 49 4E 45 00 2D 22 76 20 45 52 |R ROUTINE.-"v ER|
00001A20: 52 43 4E 54 B2 45 52 52 43 4E 54 AA 31 00 40 22 |RCNT.ERRCNT.1.@"|
00001A30: 80 20 8B 20 45 52 52 43 4E 54 B3 34 20 A7 20 8E |. . ERRCNT.4 . .|
00001A40: 00 4D 22 99 20 45 52 52 43 4E 54 B2 30 00 7C 22 |.M". ERRCNT.0.|"|
00001A50: 9E 20 99 20 22 20 D9 4F 55 20 41 50 50 45 41 52 |. . " .OU APPEAR|
00001A60: 20 54 4F 20 42 45 20 48 41 56 49 4E 47 20 53 4F | TO BE HAVING SO|
00001A70: 4D 45 20 54 52 4F 55 42 4C 45 2E 22 00 A6 22 A3 |ME TROUBLE."..".|
00001A80: 20 99 20 22 20 D7 4F 55 4C 44 20 59 4F 55 20 4C | . " .OULD YOU L|
00001A90: 49 4B 45 20 54 4F 20 52 45 54 55 52 4E 20 54 4F |IKE TO RETURN TO|
00001AA0: 20 54 48 45 20 22 00 C7 22 A8 20 99 20 22 20 D4 | THE "..". . " .|
00001AB0: 55 54 4F 52 49 41 4C 20 4D 45 4E 55 20 28 D9 2F |UTORIAL MENU (./|
00001AC0: CE 29 20 20 9D 22 3B 00 D2 22 AD 20 8D 20 37 33 |.) .";..". . 73|
00001AD0: 30 30 00 E4 22 B2 20 8D 20 34 36 32 30 3A 8D 20 |00..". . 4620:. |
00001AE0: 34 36 30 30 00 EA 22 C6 20 8E 00 03 23 D0 20 81 |4600..". ...#. .|
00001AF0: 20 49 B2 31 20 A4 20 38 30 30 20 3A 8F 20 50 41 | I.1 . 800 :. PA|
00001B00: 55 53 45 00 0B 23 DA 20 82 20 49 00 11 23 E4 20 |USE..#. . I..#. |
00001B10: 8E 00 3E 23 34 21 8D 20 38 31 30 30 20 20 3A 8F |..>#4!. 8100 :.|
00001B20: 20 47 49 56 45 53 20 57 52 49 54 45 20 4F 52 20 | GIVES WRITE OR |
00001B30: 43 4F 52 52 45 43 54 20 53 43 52 45 45 4E 00 49 |CORRECT SCREEN.I|
00001B40: 23 3E 21 8D 20 37 39 30 30 00 57 23 48 21 9E 20 |#>!. 7900.W#H!. |
00001B50: 28 57 54 45 4E 54 29 00 5D 23 52 21 8E 00 7B 23 |(WTENT).]#R!..{#|
00001B60: 98 21 8F 20 50 4F 4B 45 20 53 54 52 49 4E 47 20 |.!. POKE STRING |
00001B70: 49 4E 54 4F 20 42 55 46 46 45 52 00 8E 23 A2 21 |INTO BUFFER..#.!|
00001B80: 42 4C 45 B2 54 42 55 46 AA C3 28 41 24 29 00 9A |BLE.TBUF..(A$)..|
00001B90: 23 AC 21 41 B2 C3 28 41 24 29 00 A8 23 B6 21 81 |#.!A..(A$)..#.!.|
00001BA0: 20 49 B2 31 20 A4 20 41 00 C6 23 C0 21 97 20 28 | I.1 . A..#.!. (|
00001BB0: 54 42 55 46 AA 49 AB 31 29 2C C6 28 CA 28 41 24 |TBUF.I.1),.(.(A$|
00001BC0: 2C 49 2C 31 29 29 00 CE 23 C5 21 82 20 49 00 EF |,I,1))..#.!. I..|
00001BD0: 23 CA 21 97 20 4C 50 54 45 4E 2C 42 4C 45 AB 28 |#.!. LPTEN,BLE.(|
00001BE0: 32 35 36 AC B5 28 42 4C 45 AD 32 35 36 29 29 00 |256..(BLE.256)).|
00001BF0: 06 24 CF 21 97 20 48 50 54 45 4E 2C B5 28 42 4C |.$.!. HPTEN,.(BL|
00001C00: 45 AD 32 35 36 29 00 28 24 D4 21 97 20 4C 43 55 |E.256).($.!. LCU|
00001C10: 52 50 54 2C 42 4C 45 AB 28 32 35 36 AC B5 28 42 |RPT,BLE.(256..(B|
00001C20: 4C 45 AD 32 35 36 29 29 00 40 24 D9 21 97 20 48 |LE.256)).@$.!. H|
00001C30: 43 55 52 50 54 2C B5 28 42 4C 45 AD 32 35 36 29 |CURPT,.(BLE.256)|
00001C40: 00 46 24 FB 21 8E 00 6B 24 FC 21 9E 20 28 43 4D |.F$.!..k$.!. (CM|
00001C50: 57 52 54 29 20 3A 8F 20 47 49 56 45 53 20 52 45 |WRT) :. GIVES RE|
00001C60: 54 55 52 4E 20 53 43 52 45 45 4E 00 71 24 06 22 |TURN SCREEN.q$."|
00001C70: 8E 00 88 24 60 22 9E 20 28 53 57 49 4E 44 4F 57 |...$`". (SWINDOW|
00001C80: 29 3A 8D 20 37 39 30 30 00 98 24 65 22 9E 20 28 |):. 7900..$e". (|
00001C90: 4D 4F 56 45 43 55 52 29 00 9E 24 6A 22 8E 00 C2 |MOVECUR)..$j"...|
00001CA0: 24 C4 22 9E 20 28 46 4F 55 52 41 52 29 20 3A 8F |$.". (FOURAR) :.|
00001CB0: 20 44 52 41 57 53 20 46 4F 55 52 20 41 52 52 4F | DRAWS FOUR ARRO|
00001CC0: 57 53 00 C8 24 CE 22 8E 00 F5 24 28 23 8D 20 37 |WS..$."...$(#. 7|
00001CD0: 39 30 30 20 3A 20 8F 20 41 4C 4C 4F 57 20 54 4F |900 : . ALLOW TO|
00001CE0: 50 20 4F 46 20 53 43 52 45 45 4E 20 53 45 4C 45 |P OF SCREEN SELE|
00001CF0: 43 54 49 4F 4E 00 02 25 32 23 9E 20 28 47 45 43 |CTION..%2#. (GEC|
00001D00: 4D 29 00 08 25 3C 23 8E 00 34 25 F0 23 59 B2 C2 |M)..%<#..4%.#Y..|
00001D10: 28 4C 43 55 52 50 54 29 3A 20 20 20 8F 20 4C 4F |(LCURPT): . LO|
00001D20: 43 41 54 45 53 20 43 55 52 20 50 4F 53 20 4F 46 |CATES CUR POS OF|
00001D30: 46 53 45 54 00 48 25 FA 23 5A B2 C2 28 48 43 55 |FSET.H%.#Z..(HCU|
00001D40: 52 50 54 29 AC 32 35 36 00 57 25 04 24 59 5A B2 |RPT).256.W%.$YZ.|
00001D50: 59 AA 5A AB 42 55 46 00 5D 25 0E 24 8E 00 94 25 |Y.Z.BUF.]%.$...%|
00001D60: 54 24 8F 20 50 4C 41 43 45 53 20 43 55 52 53 4F |T$. PLACES CURSO|
00001D70: 52 20 50 54 52 20 41 54 20 42 45 47 49 4E 49 4E |R PTR AT BEGININ|
00001D80: 47 20 4F 46 20 42 55 46 46 45 52 20 2B 20 4F 46 |G OF BUFFER + OF|
00001D90: 46 53 45 54 00 B8 25 59 24 97 20 4C 43 55 52 50 |FSET..%Y$. LCURP|
00001DA0: 54 2C 42 55 46 AA 42 AB 28 32 35 36 AC B5 28 42 |T,BUF.B.(256..(B|
00001DB0: 55 46 AD 32 35 36 29 29 00 D0 25 5E 24 97 20 48 |UF.256))..%^$. H|
00001DC0: 43 55 52 50 54 2C B5 28 42 55 46 AD 32 35 36 29 |CURPT,.(BUF.256)|
00001DD0: 00 D6 25 68 24 8E 00 E3 25 B8 24 54 42 55 46 B2 |..%h$...%.$TBUF.|
00001DE0: 42 55 46 00 FE 25 C2 24 41 24 B2 41 31 24 3A 8D |BUF..%.$A$.A1$:.|
00001DF0: 20 38 36 30 30 3A 54 42 55 46 B2 42 4C 45 00 19 | 8600:TBUF.BLE..|
00001E00: 26 CC 24 41 24 B2 41 32 24 3A 8D 20 38 36 30 30 |&.$A$.A2$:. 8600|
00001E10: 3A 54 42 55 46 B2 42 4C 45 00 34 26 D6 24 41 24 |:TBUF.BLE.4&.$A$|
00001E20: B2 41 33 24 3A 8D 20 38 36 30 30 3A 54 42 55 46 |.A3$:. 8600:TBUF|
00001E30: B2 42 4C 45 00 4F 26 E0 24 41 24 B2 41 34 24 3A |.BLE.O&.$A$.A4$:|
00001E40: 8D 20 38 36 30 30 3A 54 42 55 46 B2 42 4C 45 00 |. 8600:TBUF.BLE.|
00001E50: 61 26 EA 24 41 24 B2 41 35 24 3A 8D 20 38 36 30 |a&.$A$.A5$:. 860|
00001E60: 30 00 67 26 F4 24 8E 00 72 26 1C 25 9E 20 28 4D |0.g&.$..r&.%. (M|
00001E70: 31 29 00 78 26 21 25 8E 00 83 26 26 25 9E 20 28 |1).x&!%...&&%. (|
00001E80: 4D 32 29 00 89 26 2B 25 8E 00 94 26 30 25 9E 20 |M2)..&+%...&0%. |
00001E90: 28 4D 33 29 00 9A 26 35 25 8E 00 A5 26 3A 25 9E |(M3)..&5%...&:%.|
00001EA0: 20 28 4D 34 29 00 AB 26 3F 25 8E 00 B6 26 44 25 | (M4)..&?%...&D%|
00001EB0: 9E 20 28 4D 35 29 00 BC 26 49 25 8E 00 CB 26 4E |. (M5)..&I%...&N|
00001EC0: 25 9E 20 28 4D 56 42 41 43 4B 29 00 D1 26 53 25 |%. (MVBACK)..&S%|
00001ED0: 8E 00 E0 26 80 25 59 B2 C2 28 4C 4F 4C 44 32 29 |...&.%Y..(LOLD2)|
00001EE0: 00 F3 26 8A 25 5A B2 C2 28 48 4F 4C 44 32 29 AC |..&.%Z..(HOLD2).|
00001EF0: 32 35 36 00 02 27 94 25 59 5A B2 59 AA 5A AB 42 |256..'.%YZ.Y.Z.B|
00001F00: 55 46 00 08 27 9E 25 8E 00 26 27 E4 25 8F 20 2A |UF..'.%..&'.%. *|
00001F10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001F20: 2A 2A 2A 2A 2A 2A 00 44 27 EE 25 8F 20 20 20 20 |******.D'.%. |
00001F30: 43 48 45 43 4B 20 46 4F 52 20 44 49 53 4B 20 45 |CHECK FOR DISK E|
00001F40: 52 52 4F 52 00 4A 27 F8 25 8F 00 53 27 02 26 4E |RROR.J'.%..S'.&N|
00001F50: 52 B2 31 00 61 27 07 26 9F 20 31 35 2C 38 2C 31 |R.1.a'.&. 15,8,1|
00001F60: 35 00 76 27 0C 26 84 31 35 2C 45 4E 2C 45 44 24 |5.v'.&.15,EN,ED$|
00001F70: 2C 45 46 2C 45 53 00 7F 27 11 26 A0 20 31 35 00 |,EF,ES..'.&. 15.|
00001F80: 92 27 16 26 8B 20 45 4E B3 B1 30 20 A7 20 4E 52 |.'.&. EN..0 . NR|
00001F90: B2 30 00 98 27 20 26 8E 00 AF 27 48 26 8D 20 37 |.0..' &...'H&. 7|
00001FA0: 30 30 30 3A 59 B2 31 30 3A 8D 20 35 30 33 30 00 |000:Y.10:. 5030.|
00001FB0: D7 27 52 26 99 20 22 D5 4E 41 42 4C 45 20 54 4F |.'R&. ".NABLE TO|
00001FC0: 20 4C 4F 43 41 54 45 20 54 55 54 4F 52 49 41 4C | LOCATE TUTORIAL|
00001FD0: 20 46 49 4C 45 53 22 00 E6 27 54 26 9E 20 28 4D | FILES"..'T&. (M|
00001FE0: 59 42 45 4C 32 29 00 F1 27 57 26 8D 20 37 32 30 |YBEL2)..'W&. 720|
00001FF0: 30 00 FC 27 59 26 8D 20 37 30 30 30 00 02 28 5C |0..'Y&. 7000..(\|
00002000: 26 8E 00 08 28 0F 27 80 00 23 28 10 27 8D 20 37 |&...(.'..#(.'. 7|
00002010: 31 30 30 3A 59 B2 32 34 3A 58 B2 34 3A 8D 20 35 |100:Y.24:X.4:. 5|
00002020: 30 30 30 00 41 28 1A 27 99 20 22 CC 4F 41 44 49 |000.A(.'. ".OADI|
00002030: 4E 47 2C 20 50 4C 45 41 53 45 20 57 41 49 54 22 |NG, PLEASE WAIT"|
00002040: 3B 00 47 28 24 27 8E 00 62 28 74 27 8D 20 37 31 |;.G($'..b(t'. 71|
00002050: 30 30 3A 59 B2 32 34 3A 58 B2 34 3A 8D 20 35 30 |00:Y.24:X.4:. 50|
00002060: 30 30 00 80 28 7E 27 99 20 22 20 20 20 20 20 20 |00..(~'. " |
00002070: 20 20 20 D0 4C 45 41 53 45 20 57 41 49 54 22 3B | .LEASE WAIT";|
00002080: 00 86 28 88 27 8E 00 00 00 |..(.'.... |
................... 6000.E...A$."":A1$."
":A2$."":A3$."":A4$."":A5$."".P.... 8100
.Z.... 290.`.....K. .. 6000.V.... 8100..
...A$."":A1$."":A2$."":A3$."":A4$."":A5$
.""...H.. 7000.N.... :. "BANK STREET WRI
TER":....... "TUTORIAL":....... 7500....
.. "LESSON 4: MOVE AND MOVEBACK"...... 8
900.'.... 10100.=.".. 7100:Y.8:. 5030.K.
,.. " MOVE IS THE COMMAND THAT LETS Y
OU"...6.. "MOVE BLOCKS OF TEXT AROUND IN
YOUR".C.@.. "FILE. YOU CAN MOVE A WORD,
A PHRASE,"...J.. "A SENTENCE OR A PARAG
RAPH -- UP TO"...T.. "15 LINES.".,.^.. "
AFTER YOU HAVE MOVED A BLOCK OF".[.H
.. "TEXT, YOU CAN PUT IT BACK WHERE IT W
AS"...R.. "WITH THE MOVEBACK COMMAND. IF
YOU USE"...|.. "MOVEBACK, YOU MUST DO I
T RIGHT AFTER".L.... "YOU USE MOVE.".W..
.. 4900...... 9400...... 7200...... 7000
...... 7700...... 8700...... 8900.".L.K.
11.9.V.. 7100:Y.14:. 5030.D.... " SUPPOS
E YOU WANTED TO SEE HOW THE"...... " COU
PLETS ABOVE WOULD READ IF THE"...... " S
ECOND WERE FIRST. HERE'S HOW YOU DO".X..
.. " THAT USING MOVE.":......ERRCNT.0...
..B.0:. 9300...... CDNUM,0...... 4800.$.
... (SWINDOW):. 9000.;.... B(CDNUM).1 .
600.M.&.. 4620:. 4600.X.+.. 8300.M.-.. E
RRCNT.0 . 590...0.. " YOU HAVE NOT SELEC
TED MOVE"...:.. " CORRECTLY. TRY AGAIN."
...D.. 8400.M.N.. 4620:. 4600.W.S.. 525.
..X.ERRCNT.0...].B.0:. 9300...B.. 4620:.
4600./.L.. " 3. MOVE THE CURSOR TO THE
'I' OF".R.V.. " 'IN' IN THE THIRD LIN
E".N....:. " 4. PRESS RETURN"......(SWI
NDOW):. 7900...... 9500...... 4500......
M.0 . 720...... 4400...F.. 605.L.P.ERRC
NT.0...U.. 4620:. 4600...Z.. " 5. MOVE T
HE CURSOR DOWN THREE LINES".A.... " W
ITH THE .";G(252);". (UP-DOWN ARROW) KEY
".\....:. " 6. PRESS RETURN".L...B.52:.
9300......(SWINDOW):. 7900...... 9510...
... 4300... .. M.0 . 830...*.. 4400...4.
. 725.J.>.ERRCNT.0...H.. 4620:. 4600...R
.. " 7. MOVE THE CURSOR TO THE 'T' OF".*
.\.. " 'THE' IN THE FIRST LINE".E.F..
:. " 8. PRESS RETURN".U.K.B.52:. 9300.K.
P..(SWINDOW):. 9520.V.Z.. 4200...... M.0
. 940...... 4620:. 4600...... " YOU HAV
E NOT PLACED THE CURSOR"...... " CORRECT
LY. YOU'LL HAVE TO START OVER"...... 810
0:. 9400...... 410.....ERRCNT.0.).... 46
20:. 4600.W.... " 9. TYPE 'Y' TO KEEP HI
GHLIGHTED TEXT".Y.... " WHERE YOU'VE
MOVED IT"...J.. (SWINDOW):. 9530...T.S$.
G(B(CHAR))...... S$."Y" . S$."Y" . 1050.
X.... 8300:. 4620:. 4600...... " YOU DID
NOT TYPE 'Y'"...... " YOU'LL HAVE TO ST
ART OVER".+.... 8100:. 9400.B.... (SWIND
OW):. 9540.L.... 410.C.... (SWINDOW):. 9
540.S.$.K.11:. 7250...... 7100:Y.14:K.11
:. 5030...8.. " IF YOU LIKED IT BETTER W
HERE IT WAS,".T.B.. " USE MOVEBACK."...L
.ERRCNT.0...Q.. 4620:. 4600...V.. " 1. S
ELECT MOVEBACK".*.`..:. " 2. PRESS RETUR
N".8.J.. CDNUM,0.N.T..(SWINDOW):. 9000.G
.~.. B(CDNUM).4 . 1230.Y.... 4620:. 460
0...... 8300...... ERRCNT.0 . 1220.B....
" YOU HAVE NOT SELECTED MOVEBACK"......
" CORRECTLY. TRY AGAIN."...... 8400...D
.. 1105...N.ERRCNT.0...X.. 4620:. 4600.D
.... " 3. TYPE 'Y' TO MOVE THE COUPLET B
ACK".I.... " TO ITS ORIGINAL POSITION
"...... (SWINDOW):. 9550.....S$.G(B(CHAR
))...... S$."Y" . S$."Y" . 1360.A.... 46
20:. 4600.L.... 8300...(.. ERRCNT.0 . 13
50...2.. " YOU DID NOT TYPE 'Y'. TRY AGA
IN."...<.. 8400.".F.. 1240.-.P.. 8700.8.
U.. 8900.I.Z.K.11: . 7250.`.D.. 7100:Y.1
4:. 5030...N.. " YOU HAVE FINISHED LESSO
N 4. YOU CAN"...X.. " NOW DO ONE OF THRE
E THINGS.".U....:. " 1. DO THIS LESSON A
GAIN"...... " 2. GO ON TO THE NEXT LESSO
N".".... " 3. RETURN TO THE TUTORIAL MEN
U".J. ..:. " WHAT WOULD YOU LIKE TO DO?
";.U.... 7400._...N$.S$...... N$.."1" .
N$.."2" . N$.."3" . 1450...... N$;......
N$."1" . 150.E.... ********************
*****.K.......A.. 3,8,3,"@0:UTILDATA,S,R
"...C.. 9700...D. 3...F.. NR . 1485...H
.. 9800.".J.. 1473.6.M.. N$."2" . 2000.L
.R.. 10000:."TUT2",8.W.P.. 7000.U.Z.. :.
"BANK STREET WRITER"......:. "TUTORIAL"
......:. 7500...... "LESSON 5: FIND AND
REPLACE".C.... 8900.Y.... 10000:."TUT7",
8...H.M.0: . ERROR CHECK...R.. 9200...
|.. YZ..0 . M.1.........L.M.0.(.V.. 9600
.<.... YZ..137 . M.1.B.....T.0.. 4620:.
4600._.:.. 8300.U.?.. ERRCNT.0 . 4450...
D.. " YOU HAVE NOT PLACED THE CURSOR"...
N.. " CORRECTLY. TRY AGAIN.".G.X.. 8400.
M.B.......M.0: . ERROR CHECK...... 9200
...... YZ..52 . M.1....... .... 7100:Y.1
9:. 5030.&.....1.... 4600.@...K.4:. 7260
.F. ...R.... " 1. MOVE THE SELECTOR AT T
HE TOP OF"...J.. " THE SCREEN TO MOVE
(USE < OR >)"...T..:. " 2. PRESS RETURN
".........$.A1$."THE SOUND OF A DOG'S BA
RK IS".G(13).....A2$."A DIAMOND IN THE R
UFF.".G(13).B.8.A3$."IN A HOUSE WHERE DO
GS AND CATS".G(13).O.B.A4$." ARE TREAT
ED LIKE ROYALTY,".G(13)...L.A5$."IT REIG
NS CATS AND DOGS.".G(13)...V.........E..
.. I.1 . X :. POSITION CURSOR.P.... ".";
.X.... I...... J.1 . Y :. MOVE CURSOR DO
WN THE SCREEN...... ".";...... J...D...<
.P.BASE.6.4096 :. INITIALIZE.J.R.BUF.491
52.V.S.BLE.BUF.J.U.B2.9.4096.5.256.W.W.E
RRCNT.0...Z.INITUT.B(BASE).B(BASE.1).256
....MOVECUR.B(BASE.4).B(BASE.5).256....
.BOX.B(BASE.54).B(BASE.55).256.....FOURA
R.B(BASE.42).B(BASE.43).256.&...GECM.B(B
ASE.46).B(BASE.47).256.J...GKBD .B(BASE.
56).B(BASE.57).256.K...M1.B(BASE.16).B(B
ASE.17).256.....M2.B(BASE.18).B(BASE.19)
.256.....M3.B(BASE.20).B(BASE.21).256.N.
..M4.B(BASE.22).B(BASE.23).256.....M5.B(
BASE.24).B(BASE.25).256.....MVBACK.B(BAS
E.26).B(BASE.27).256.:...SWINDOW.B(BASE.
58).B(BASE.59).256.[...ISRT.B(BASE.6).B(
BASE.7).256....CMWRT.B(BASE.36).B(BASE.
37).256. ...REDO.B(BASE.2).B(BASE.3).256
.D...WTENT.B(BASE.38).B(BASE.39).256....
.WRTEN1.B(BASE.50).B(BASE.51).256.....MY
BEL2.B(BASE.52).B(BASE.53).256.....LBUFB
EG.B2...E.HBUFBEG.B2.1.<.J.LMIN.B2.2.J.O
.HMIN.B2.3.Y.T.LOMAX.B2.4.H.Y.HIMAX.B2.5
.W...LPTEN.B2.6.....HPTEN.B2.7.....GCFLA
G.B2.8.....WBTM.B2.9.....MIDLIN.B2.10.E.
..DLINE.B2.11.U...CDNUM.B2.12.....CHAR.B
2.13.....SCRAMT.B2.14.....LOLD2.B2.39...
..HOLD2.B2.40.$.$.LCURPT.251.3...HCURPT.
252.A.J.. WBTM,12.P.... GCFLAG,1._.... M
IDLIN,9.M.D.. DLINE,8.|.X.. SCRAMT,4....
.....X..".";:. CLEAR SCREEN HOME CURSOR.
..B...F...."."; :. HOME CURSOR.L.F.....
.. TEST FOR SPACE BAR PUSH...!..7100:X.4
:Y.24:.5000.,.#.. "[PRESS SPACE BAR TO C
ONTINUE] .";.7.%.. 7400.N.4.. S$ .. " "
. 7205.T.>...}.R.. 7100 :. CLEAR BOTTO
M HALF SCREEN...W.Y.13 : . 5030...\.. I.
1 . K.M.F.. "
".U.P.. I.. Z.. "
";.. ...1 .
.. 7400 :. TEST FOR Y/N KEY PRESS.D ...
S$.."Y" . S$.."Y" . S$.."N" . S$.."N" .
7300.. ... S$."Y" . S$."Y" . . "Y";:N$."
3":. 1471.. ... "N";.. ....M ...(GKBD) :
. GET CHARACTOR FROM KEYBOARD.. ..S$.G(B
(CHAR)).. .....!L.. "."; :. TURN REVERSE
ON..!V...'!... "." :. TURN OFF REVERSE.
-!....E!... (BOX) :. DRAW BOX.K!....I!X.
. 8100 :. ALLOW INSERTION.T!... 7900..!.
.. (ISRT)..!.....!... (REDO) :...!.....!
@.. (SETBND) :...!J...G!... (INITUT) :..
M!.....!. . (WRTEN1) :. PRINT TOP OF SCR
EEN..!. ..."L . (MYBEL2) :. ERROR ROUTIN
E.-"V ERRCNT.ERRCNT.1.@". . ERRCNT.4 . .
.M". ERRCNT.0.|". . " YOU APPEAR TO BE H
AVING SOME TROUBLE."..". . " WOULD YOU L
IKE TO RETURN TO THE ".G". . " TUTORIAL
MENU (Y/N) .";.R". . 7300..". . 4620:.
4600.."F ...#P . I.1 . 800 :. PAUSE..#Z
. I..#. ..>#4!. 8100 :. GIVES WRITE OR
CORRECT SCREEN.I#>!. 7900.W#H!. (WTENT).
]#R!..{#.!. POKE STRING INTO BUFFER..#.!
BLE.TBUF.C(A$)..#.!A.C(A$)..#.!. I.1 . A
.F#.!. (TBUF.I.1),F(J(A$,I,1)).N#E!. I..
#J!. LPTEN,BLE.(256..(BLE.256))..$O!. HP
TEN,.(BLE.256).($T!. LCURPT,BLE.(256..(B
LE.256)).@$Y!. HCURPT,.(BLE.256).F$.!..K
$.!. (CMWRT) :. GIVES RETURN SCREEN.Q$."
...$`". (SWINDOW):. 7900..$E". (MOVECUR)
..$J"..B$D". (FOURAR) :. DRAWS FOUR ARRO
WS.H$N"...$(#. 7900 : . ALLOW TOP OF SCR
EEN SELECTION..%2#. (GECM)..%<#..4%.#Y.B
(LCURPT): . LOCATES CUR POS OFFSET.H%.
#Z.B(HCURPT).256.W%.$YZ.Y.Z.BUF.]%.$...%
T$. PLACES CURSOR PTR AT BEGINING OF BUF
FER + OFFSET..%Y$. LCURPT,BUF.B.(256..(B
UF.256)).P%^$. HCURPT,.(BUF.256).V%H$...
%.$TBUF.BUF..%B$A$.A1$:. 8600:TBUF.BLE..
&L$A$.A2$:. 8600:TBUF.BLE.4&V$A$.A3$:. 8
600:TBUF.BLE.O&.$A$.A4$:. 8600:TBUF.BLE.
A&.$A$.A5$:. 8600.G&.$..R&.%. (M1).X&!%.
..&&%. (M2)..&+%...&0%. (M3)..&5%...&:%.
(M4)..&?%...&D%. (M5)..&I%..K&N%. (MVBA
CK).Q&S%...&.%Y.B(LOLD2)..&.%Z.B(HOLD2).
256..'.%YZ.Y.Z.BUF..'.%..&'.%. *********
**************.D'.%. CHECK FOR DISK E
RROR.J'.%..S'.&NR.1.A'.&. 15,8,15.V'.&.1
5,EN,ED$,EF,ES.'.& 15..'.&. EN..0 . NR
.0..' &...'H&. 7000:Y.10:. 5030.W'R&. "U
NABLE TO LOCATE TUTORIAL FILES"..'T&. (M
YBEL2)..'W&. 7200..'Y&. 7000..(\&...(.'.
.#(.'. 7100:Y.24:X.4:. 5000.A(.'. "LOADI
NG, PLEASE WAIT";.G($'..B(T'. 7100:Y.24:
X.4:. 5000..(~'. " PLEASE WAIT";
..(.'....
> CLICK IMAGE PREVIEW FOR FULL MODAL