FAST READER
FILE INFORMATION
FILENAME(S): FAST READER
FILE TYPE(S): PRG
FILE SIZE: 11K
FIRST SEEN: 2025-11-30 21:26:14
APPEARS ON: 1 disk(s)
FILE HASH
f018ee2fcc3050d3c9888aca77513ac65533b293f9ce9fa39c128e1522c0ef2a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| EDUCATIEF 5A | FAST READER | PRG | DuncanTwain | 26 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23 00 8F 20 2B 2B 2B 20 49 |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B |NPUT SECTION +++|
000000F0: 00 08 09 28 00 97 55 4F 2C 30 3A 55 52 24 B2 22 |...(..UO,0:UR$."|
00000100: 22 3A 55 49 24 B2 22 22 00 18 09 2A 00 8B 55 4C |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 22 09 2D 00 97 55 43 |.0.UL.80.".-..UC|
00000120: 2C 30 00 36 09 32 00 A1 55 49 24 3A 8B 55 49 24 |,0.6.2..UI$:.UI$|
00000130: B2 22 22 A7 35 30 00 60 09 37 00 8B 55 49 24 B2 |."".50.`.7..UI$.|
00000140: C7 28 31 33 29 AF C3 28 55 52 24 29 B1 B2 31 A7 |.(13)..(UR$)..1.|
00000150: 97 55 43 2C 31 3A 99 22 20 9D 22 3B 3A 89 38 35 |.UC,1:." .";:.85|
00000160: 00 73 09 3C 00 8B 55 49 24 B2 C7 28 32 30 29 A7 |.s.<..UI$..(20).|
00000170: 31 30 35 00 87 09 3E 00 8B 20 C3 28 55 52 24 29 |105...>.. .(UR$)|
00000180: B2 B1 55 4C A7 35 30 00 AC 09 41 00 8D 31 32 30 |..UL.50...A..120|
00000190: 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |:. CHECK FOR VAL|
000001A0: 49 44 20 43 48 41 52 41 43 54 45 52 00 BC 09 46 |ID CHARACTER...F|
000001B0: 00 55 52 24 B2 55 52 24 AA 55 49 24 00 C6 09 4B |.UR$.UR$.UI$...K|
000001C0: 00 99 55 49 24 3B 00 CE 09 50 00 89 35 30 00 F3 |..UI$;...P..50..|
000001D0: 09 55 00 8F 20 2B 2B 2B 20 43 48 45 43 4B 20 46 |.U.. +++ CHECK F|
000001E0: 4F 52 20 48 45 4C 50 20 52 45 51 55 45 53 54 20 |OR HELP REQUEST |
000001F0: 2B 2B 2B 00 1B 0A 5A 00 8B 55 52 24 B2 55 58 24 |+++...Z..UR$.UX$|
00000200: A7 31 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 |.195:. EXIT TO H|
00000210: 45 4C 50 20 52 4F 55 54 49 4E 45 00 2A 0A 5F 00 |ELP ROUTINE.*._.|
00000220: 8B 55 46 B2 31 A7 8D 32 34 30 00 37 0A 64 00 55 |.UF.1..240.7.d.U|
00000230: 46 B2 30 3A 99 3A 8E 00 50 0A 66 00 8F 20 2B 2B |F.0:.:..P.f.. ++|
00000240: 20 43 48 45 43 4B 20 44 45 4C 45 54 45 20 2B 2B | CHECK DELETE ++|
00000250: 00 61 0A 69 00 8B C3 28 55 52 24 29 B3 31 A7 35 |.a.i...(UR$).1.5|
00000260: 30 00 79 0A 6E 00 55 52 24 B2 C8 28 55 52 24 2C |0.y.n.UR$..(UR$,|
00000270: C3 28 55 52 24 29 AB 31 29 00 8B 0A 73 00 99 22 |.(UR$).1)...s.."|
00000280: 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 B2 0A 78 00 |. ..";:.50...x.|
00000290: 8F 20 2B 2B 20 43 48 45 43 4B 20 46 4F 52 20 56 |. ++ CHECK FOR V|
000002A0: 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 53 20 |ALID CHARACTERS |
000002B0: 2B 2B 00 C4 0A 7D 00 8B C3 28 55 53 24 29 B2 30 |++...}...(US$).0|
000002C0: A7 31 35 30 00 D5 0A 82 00 81 55 53 B2 31 A4 C3 |.150......US.1..|
000002D0: 28 55 53 24 29 00 EC 0A 87 00 8B 55 49 24 B2 CA |(US$)......UI$..|
000002E0: 28 55 53 24 2C 55 53 2C 31 29 A7 8E 00 F2 0A 8C |(US$,US,1)......|
000002F0: 00 82 00 FF 0A 91 00 55 49 24 B2 22 22 3A 8E 00 |.......UI$."":..|
00000300: 1A 0B 96 00 8F 20 2A 2A 20 53 54 41 4E 44 41 52 |..... ** STANDAR|
00000310: 44 20 49 4E 50 55 54 20 2A 2A 00 2B 0B 98 00 8B |D INPUT **.+....|
00000320: C6 28 55 49 24 29 B2 34 36 A7 8E 00 3C 0B 9B 00 |.(UI$).46...<...|
00000330: 8B 55 49 24 B2 C7 28 33 32 29 A7 8E 00 59 0B A0 |.UI$..(32)...Y..|
00000340: 00 8B C6 28 55 49 24 29 B3 34 38 B0 C6 28 55 49 |...(UI$).48..(UI|
00000350: 24 29 B1 35 37 A7 31 37 30 00 5F 0B A5 00 8E 00 |$).57.170._.....|
00000360: 7C 0B AA 00 8B C6 28 55 49 24 29 B3 36 35 B0 C6 ||.....(UI$).65..|
00000370: 28 55 49 24 29 B1 39 30 A7 31 38 30 00 82 0B AF |(UI$).90.180....|
00000380: 00 8E 00 A6 0B B4 00 8B C6 28 55 49 24 29 B3 31 |.........(UI$).1|
00000390: 39 33 B0 C6 28 55 49 24 29 B1 32 31 38 A7 55 49 |93..(UI$).218.UI|
000003A0: 24 B2 22 22 3A 8E 00 C9 0B B9 00 8B C2 28 55 54 |$."":........(UT|
000003B0: 29 B2 55 55 25 A7 55 49 24 B2 C7 28 C6 28 55 49 |).UU%.UI$..(.(UI|
000003C0: 24 29 AB 31 32 38 29 3A 8E 00 CF 0B BB 00 8E 00 |$).128):........|
000003D0: DC 0B BE 00 55 49 24 B2 22 22 3A 8E 00 01 0C C3 |....UI$."":.....|
000003E0: 00 55 46 B2 31 3A 8F 20 2B 2B 2B 20 48 45 4C 50 |.UF.1:. +++ HELP|
000003F0: 20 52 4F 55 54 49 4E 45 20 45 58 49 54 20 2B 2B | ROUTINE EXIT ++|
00000400: 2B 00 0A 0C C5 00 8D 32 35 30 00 13 0C C8 00 8D |+......250......|
00000410: 32 34 35 00 32 0C CD 00 81 55 51 B2 55 42 A4 28 |245.2....UQ.UB.(|
00000420: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB |U2%.256.U1%.U3%.|
00000430: 32 29 00 4E 0C D2 00 55 51 25 28 55 51 AB 55 42 |2).N...UQ%(UQ.UB|
00000440: 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 00 61 |)..(UQ):.:.".".a|
00000450: 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 54 |...UZ.1:UV%..(UT|
00000460: 29 00 6A 0C D8 00 89 33 30 30 00 AD 0C D9 00 55 |).j....300.....U|
00000470: 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 B2 |Z.0:US$.UJ$:UG$.|
00000480: 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B 3A |UK$:UP.UJ:UL.UK:|
00000490: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
000004A0: 38 31 2C 36 3A 97 35 33 32 38 30 2C 36 00 E2 0C |81,6:.53280,6...|
000004B0: DC 00 55 54 24 B2 55 4C 24 3A 99 22 93 22 3B 3A |..UT$.UL$:.".";:|
000004C0: 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 42 A4 28 |.UT,UV%:.UQ.UB.(|
000004D0: 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB |U2%.256.U1%.U3%.|
000004E0: 33 29 00 F7 0C E1 00 97 55 51 2C 55 51 25 28 55 |3)......UQ,UQ%(U|
000004F0: 51 AB 55 42 29 3A 82 00 03 0D E6 00 97 55 31 2C |Q.UB):.......U1,|
00000500: 55 31 25 00 0F 0D E8 00 97 55 32 2C 55 32 25 00 |U1%......U2,U2%.|
00000510: 1B 0D E9 00 97 55 34 2C 55 34 25 00 29 0D EA 00 |.....U4,U4%.)...|
00000520: 97 55 33 2C 55 33 25 AB 31 00 31 0D EB 00 89 33 |.U3,U3%.1.1....3|
00000530: 35 00 63 0D F0 00 55 44 25 B2 28 28 55 32 25 AC |5.c...UD%.((U2%.|
00000540: 32 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 42 29 |256.U1%.U3%).UB)|
00000550: AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 |.40:..(UD$,UD%.1|
00000560: 29 3A 8E 00 9E 0D F5 00 99 C8 28 55 44 24 2C 32 |):........(UD$,2|
00000570: 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 |4);" |
00000580: 20 20 20 20 20 20 20 20 20 20 12 20 48 45 4C 50 | . HELP|
00000590: 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 CA | COMING . ":...|
000005A0: 0D FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 |...U1%..(U1):U2%|
000005B0: B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 |..(U2):U3%..(U3)|
000005C0: 3A 55 34 25 B2 C2 28 55 34 29 00 F2 0D FB 00 55 |:U4%..(U4).....U|
000005D0: 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 3A 55 |J$.US$:UK$.UG$:U|
000005E0: 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 4B B2 |L$.UT$:UJ.UP:UK.|
000005F0: 55 4C 00 F8 0D FF 00 8E 00 09 0E 2C 01 8F 20 2A |UL.........,.. *|
00000600: 2A 20 4D 45 4E 55 20 2A 2A 00 0F 0E 2D 01 3A 00 |* MENU **...-.:.|
00000610: 3E 0E 2E 01 99 22 93 22 3A 97 55 54 2C 55 55 25 |>....".":.UT,UU%|
00000620: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
00000630: 32 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 00 44 |281,9:.53280,8.D|
00000640: 0E 2F 01 3A 00 61 0E 31 01 99 22 13 20 20 20 20 |./.:.a.1..". |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 4E 55 | MENU|
00000660: 22 00 90 0E 36 01 99 22 20 2D 2D 2D 2D 2D 2D 2D |"...6.." -------|
00000670: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 |---------------"|
00000690: 00 B3 0E 3B 01 99 22 11 11 20 20 20 20 20 20 20 |...;..".. |
000006A0: 31 2E 20 20 20 52 45 41 44 45 52 20 42 45 47 49 |1. READER BEGI|
000006B0: 4E 53 22 00 DD 0E 40 01 99 22 11 11 20 20 20 20 |NS"...@..".. |
000006C0: 20 20 20 32 2E 20 20 20 53 54 55 44 45 4E 54 20 | 2. STUDENT |
000006D0: 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 07 0F |INSTRUCTIONS"...|
000006E0: 45 01 99 22 11 11 20 20 20 20 20 20 20 33 2E 20 |E..".. 3. |
000006F0: 20 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 55 | TEACHER INSTRU|
00000700: 43 54 49 4F 4E 53 22 00 23 0F 4F 01 99 22 11 11 |CTIONS".#.O.."..|
00000710: 20 20 20 20 20 20 20 34 2E 20 20 20 51 55 49 54 | 4. QUIT|
00000720: 11 11 22 00 52 0F 54 01 99 22 20 2D 2D 2D 2D 2D |..".R.T.." -----|
00000730: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000750: 2D 22 00 7D 0F 59 01 99 22 11 11 20 20 20 20 20 |-".}.Y..".. |
00000760: 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 45 52 | PRESS A NUMBER|
00000770: 20 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 A5 0F | KEY (1-4) ";...|
00000780: 5E 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 33 34 |^.UL.1:US$."1234|
00000790: 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 54 20 52 4F |":.35:. INPUT RO|
000007A0: 55 54 49 4E 45 00 B0 0F 60 01 55 53 24 B2 22 22 |UTINE...`.US$.""|
000007B0: 00 CD 0F 63 01 91 C5 28 55 52 24 29 8D 31 30 30 |...c...(UR$).100|
000007C0: 30 2C 34 30 30 2C 35 30 30 2C 33 39 36 00 D6 0F |0,400,500,396...|
000007D0: 68 01 89 33 30 30 00 FD 0F 8B 01 8F 20 2A 2A 20 |h..300...... ** |
000007E0: 52 45 2D 45 4E 41 42 4C 45 20 53 54 4F 50 20 4B |RE-ENABLE STOP K|
000007F0: 45 59 20 41 4E 44 20 45 4E 44 20 2A 2A 00 2C 10 |EY AND END **.,.|
00000800: 8C 01 8B C2 28 35 30 30 30 33 29 B3 B1 31 AF C2 |....(50003)..1..|
00000810: 28 35 30 30 30 33 29 B3 B1 31 36 30 AF C2 28 35 |(50003)..160..(5|
00000820: 30 30 30 33 29 B3 B1 30 A7 33 39 39 00 56 10 8D |0003)..0.399.V..|
00000830: 01 9E 55 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 |..UU.71:..(50003|
00000840: 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 |).0..53281,6:.53|
00000850: 32 38 30 2C 31 34 00 62 10 8E 01 99 22 9A 93 22 |280,14.b....".."|
00000860: 3A 80 00 6D 10 8F 01 8D 38 37 35 3A 8E 00 8E 10 |:..m....875:....|
00000870: 90 01 8F 20 2A 2A 20 53 54 55 44 45 4E 54 20 49 |... ** STUDENT I|
00000880: 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 BD |NSTRUCTIONS **..|
00000890: 10 95 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A |....".":.UT,UL%:|
000008A0: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
000008B0: 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 DE 10 |81,0:.53280,0...|
000008C0: 9A 01 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 |..UP.0:UG$.".TUD|
000008D0: 45 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 09 |ENT .NST":.850..|
000008E0: 11 A4 01 99 22 11 11 11 11 20 20 20 20 D4 48 49 |....".... .HI|
000008F0: 53 20 50 52 4F 47 52 41 4D 20 49 53 20 44 45 53 |S PROGRAM IS DES|
00000900: 49 47 4E 45 44 20 54 4F 22 00 35 11 A6 01 99 22 |IGNED TO".5...."|
00000910: 11 20 20 20 20 41 53 53 49 53 54 20 59 4F 55 20 |. ASSIST YOU |
00000920: 57 49 54 48 20 49 4E 43 52 45 41 53 49 4E 47 20 |WITH INCREASING |
00000930: 59 4F 55 52 22 00 60 11 A8 01 99 22 11 20 20 20 |YOUR".`....". |
00000940: 20 52 45 41 44 49 4E 47 20 53 50 45 45 44 2E 20 | READING SPEED. |
00000950: 20 D9 4F 55 20 4D 41 59 20 50 52 45 53 45 54 22 | .OU MAY PRESET"|
00000960: 00 88 11 AA 01 99 22 11 20 20 20 20 54 48 45 20 |......". THE |
00000970: 52 41 54 45 20 41 54 20 57 48 49 43 48 20 54 48 |RATE AT WHICH TH|
00000980: 45 20 4C 49 4E 45 53 22 00 B3 11 AC 01 99 22 11 |E LINES"......".|
00000990: 20 20 20 20 41 50 50 45 41 52 20 41 4E 44 20 59 | APPEAR AND Y|
000009A0: 4F 55 20 57 49 4C 4C 20 42 45 20 47 49 56 45 4E |OU WILL BE GIVEN|
000009B0: 20 41 22 00 DF 11 AE 01 99 22 11 20 20 20 20 53 | A"......". S|
000009C0: 48 4F 52 54 20 43 4F 4D 50 52 45 48 45 4E 53 49 |HORT COMPREHENSI|
000009D0: 4F 4E 20 51 55 49 5A 20 41 54 20 54 48 45 22 00 |ON QUIZ AT THE".|
000009E0: F0 11 B0 01 99 22 11 20 20 20 20 45 4E 44 2E 22 |.....". END."|
000009F0: 00 F9 11 E5 01 8D 38 33 35 00 0D 12 EA 01 8B 55 |......835......U|
00000A00: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 13 12 |Z.1..UP%:.217...|
00000A10: F3 01 8E 00 34 12 F4 01 8F 20 2A 2A 20 54 45 41 |....4.... ** TEA|
00000A20: 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E |CHER INSTRUCTION|
00000A30: 53 20 2A 2A 00 64 12 F5 01 99 22 93 22 3A 97 55 |S **.d....".":.U|
00000A40: 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UL%:..(50003).|
00000A50: 30 A7 97 35 33 32 38 31 2C 32 3A 97 35 33 32 38 |0..53281,2:.5328|
00000A60: 30 2C 31 30 00 85 12 F6 01 55 50 B2 30 3A 55 47 |0,10.....UP.0:UG|
00000A70: 24 B2 22 D4 45 41 43 48 45 52 20 C9 4E 53 54 22 |$.".EACHER .NST"|
00000A80: 3A 8D 38 35 30 00 B3 12 F7 01 99 22 11 11 20 20 |:.850......".. |
00000A90: 20 20 20 20 D4 4F 20 54 48 45 20 42 45 53 54 20 | .O THE BEST |
00000AA0: 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 |OF OUR KNOWLEDGE|
00000AB0: 2C 11 22 00 DC 12 F8 01 99 22 20 20 20 54 48 49 |,."......" THI|
00000AC0: 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 |S PROGRAM IS IN |
00000AD0: 54 48 45 20 50 55 42 4C 49 43 11 22 00 08 13 F9 |THE PUBLIC."....|
00000AE0: 01 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 20 C9 |.." DOMAIN. .|
00000AF0: 46 20 54 48 49 53 20 49 53 20 4E 4F 54 20 54 48 |F THIS IS NOT TH|
00000B00: 45 20 43 41 53 45 11 22 00 25 13 FA 01 99 22 20 |E CASE.".%...." |
00000B10: 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 41 43 54 | PLEASE CONTACT|
00000B20: 3A 11 11 11 22 00 4F 13 FB 01 99 22 20 20 20 20 |:...".O...." |
00000B30: 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 55 53 49 | .OMMODORE .USI|
00000B40: 4E 45 53 53 20 CD 41 43 48 49 4E 45 53 11 22 00 |NESS .ACHINES.".|
00000B50: 72 13 FC 01 99 22 20 20 20 20 20 20 20 20 20 20 |r...." |
00000B60: 33 33 37 30 20 D0 48 41 52 4D 41 43 59 20 C1 56 |3370 .HARMACY .V|
00000B70: 45 2E 00 96 13 FD 01 99 22 20 20 20 20 20 20 20 |E......." |
00000B80: 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E | .GINCOURT, .N|
00000B90: 54 41 52 49 4F 22 00 B8 13 FE 01 99 22 20 20 20 |TARIO"......" |
00000BA0: 20 20 20 20 20 20 20 C3 41 4E 41 44 41 20 20 20 | .ANADA |
00000BB0: CD 31 D7 20 32 CB 34 22 00 D8 13 FF 01 99 22 20 |.1. 2.4"......" |
00000BC0: 20 20 20 20 20 20 20 20 20 28 34 31 36 29 20 34 | (416) 4|
00000BD0: 39 39 2D 34 32 39 32 22 00 EE 13 00 02 55 50 B2 |99-4292".....UP.|
00000BE0: 31 3A 8D 20 38 33 35 3A 8D 20 38 35 30 3A 00 10 |1:. 835:. 850:..|
00000BF0: 14 01 02 99 22 20 20 20 20 20 11 D0 52 4F 47 52 |...." ..ROGR|
00000C00: 41 4D 20 CE 41 4D 45 3A 20 D2 45 41 44 45 52 11 |AM .AME: .EADER.|
00000C10: 00 4A 14 02 02 99 22 20 20 20 20 20 D7 52 49 54 |.J...." .RIT|
00000C20: 54 45 4E 20 C2 59 20 20 3A 20 CA 2E 20 D4 2E 20 |TEN .Y : .. .. |
00000C30: D0 41 52 52 22 3A 99 A3 31 39 29 22 CF 43 54 4F |.ARR":..19)".CTO|
00000C40: 42 45 52 20 31 39 37 38 11 22 00 80 14 03 02 99 |BER 1978."......|
00000C50: 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 |" .PGRADED .|
00000C60: 59 20 3A 20 D1 55 49 4E 43 59 20 CC 45 45 22 3A |Y : .UINCY .EE":|
00000C70: 99 A3 31 39 29 22 CA 55 4C 59 20 31 39 38 32 22 |..19)".ULY 1982"|
00000C80: 00 AB 14 04 02 99 22 20 20 20 20 20 11 D4 48 49 |......" ..HI|
00000C90: 53 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 |S PROGRAM WILL R|
00000CA0: 55 4E 20 4F 4E 20 41 4E 59 11 11 00 D2 14 05 02 |UN ON ANY.......|
00000CB0: 99 22 20 20 20 20 20 20 20 20 20 C2 C1 D3 C9 C3 |." .....|
00000CC0: A0 32 2E 30 20 D0 C5 D4 20 C3 CF CD D0 D5 D4 C5 |.2.0 ... .......|
00000CD0: D2 11 00 F9 14 06 02 99 22 20 20 20 20 20 20 20 |........" |
00000CE0: 20 20 C2 C1 D3 C9 C3 20 34 2E 30 20 D0 C5 D4 A0 | ..... 4.0 ....|
00000CF0: C3 CF CD D0 D5 D4 C5 D2 11 00 1B 15 07 02 99 22 |..............."|
00000D00: 20 20 20 20 20 20 20 20 20 38 30 33 32 20 C3 C2 | 8032 ..|
00000D10: CD 20 C3 CF CD D0 D5 D4 C5 D2 11 00 40 15 08 02 |. ..........@...|
00000D20: 99 22 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF |." .....|
00000D30: C4 CF D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 |.... 64 ........|
00000D40: 00 49 15 09 02 8D 38 33 35 00 5D 15 4E 02 8B 55 |.I....835.].N..U|
00000D50: 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 63 15 |Z.1..UP%:.217.c.|
00000D60: 57 02 8E 00 89 15 58 02 8F 20 2A 2A 20 50 52 4F |W.....X.. ** PRO|
00000D70: 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 54 49 4F |GRAM MODIFICATIO|
00000D80: 4E 20 49 4E 53 54 20 2A 2A 00 9A 15 59 02 99 22 |N INST **...Y.."|
00000D90: 93 22 3A 97 55 54 2C 55 4C 25 00 BA 15 5D 02 55 |.":.UT,UL%...].U|
00000DA0: 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 41 4D |P.0:UG$.".ROGRAM|
00000DB0: 20 CD 4F 44 22 3A 8D 38 35 30 00 C3 15 94 02 8D | .OD":.850......|
00000DC0: 38 33 35 00 D7 15 B2 02 8B 55 5A B2 31 A7 9E 55 |835......UZ.1..U|
00000DD0: 50 25 3A 89 32 31 37 00 DD 15 BB 02 8E 00 02 16 |P%:.217.........|
00000DE0: BC 02 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 |... ** TO USE 80|
00000DF0: 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 |32 LOAD CBM4032 |
00000E00: 2A 2A 00 38 16 C6 02 99 22 93 11 11 11 05 42 45 |**.8....".....BE|
00000E10: 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 |FORE RUNNING THI|
00000E20: 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 |S PROGRAM ON AN |
00000E30: 38 30 33 32 20 20 11 11 00 6E 16 D0 02 99 22 20 |8032 ...n...." |
00000E40: 20 20 20 20 20 4C 4F 41 44 20 54 48 45 20 27 43 | LOAD THE 'C|
00000E50: 42 4D 20 34 30 33 32 27 20 50 52 4F 47 52 41 4D |BM 4032' PROGRAM|
00000E60: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 79 |.............".y|
00000E70: 16 DA 02 9E 55 55 AA 37 31 00 7F 16 E4 02 80 00 |....UU.71.......|
00000E80: 9F 16 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 4C |.. .. ** T I T L|
00000E90: 20 45 20 20 20 50 20 41 20 47 20 45 20 2A 2A 00 | E P A G E **.|
00000EA0: D3 16 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 54 |..".."....";:.UT|
00000EB0: 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UU%:..(50003).0|
00000EC0: A7 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 |..53280,14:.5328|
00000ED0: 31 2C 36 00 E9 16 24 03 81 49 B2 31 A4 33 38 3A |1,6...$..I.1.38:|
00000EE0: 99 22 12 A6 92 22 3B 3A 82 00 01 17 26 03 81 49 |."...";:....&..I|
00000EF0: B2 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B 3A |.1.22:.".....";:|
00000F00: 82 00 19 17 28 03 81 49 B2 31 A4 33 37 3A 99 22 |....(..I.1.37:."|
00000F10: 9D 9D 12 A6 92 22 3B 3A 82 00 31 17 2A 03 81 49 |.....";:..1.*..I|
00000F20: B2 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B 3A |.1.22:.".....";:|
00000F30: 82 00 56 17 2C 03 99 22 13 11 11 11 11 11 11 1D |..V.,.."........|
00000F40: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000F50: 1D 12 A9 20 20 92 00 78 17 2E 03 99 22 1D 1D 1D |... ..x...."...|
00000F60: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |................|
00000F70: 20 92 20 20 12 20 92 A9 00 99 17 30 03 99 22 1D | . . .....0..".|
00000F80: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000F90: 1D 12 20 92 20 20 12 A3 DF 00 B7 17 32 03 99 22 |.. . ......2.."|
00000FA0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000FB0: 1D 1D DF 12 20 20 92 00 DF 17 34 03 99 22 11 11 |.... ....4.."..|
00000FC0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 |............C O |
00000FD0: 4D 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 00 |M M O D O R E...|
00000FE0: 02 18 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..6.."..........|
00000FF0: 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 4C |.....EDUCATIONAL|
00001000: 11 11 00 21 18 38 03 99 22 1D 1D 1D 1D 1D 1D 1D |...!.8..".......|
00001010: 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 |.........SOFTWAR|
00001020: 45 00 3C 18 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F |E.<.:.. ** COMMO|
00001030: 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 74 18 3B |DORE LOGO **.t.;|
00001040: 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D |...(UD$,24);"...|
00001050: 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 |.......PRESS SPA|
00001060: 43 45 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 |CE BAR OR WAIT."|
00001070: 3A 49 B2 30 00 96 18 3C 03 A1 41 24 3A 8B 41 24 |:I.0...<..A$:.A$|
00001080: B3 B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 |.." ".I.I.1:.I.2|
00001090: 35 30 A7 38 32 38 00 BA 18 3E 03 54 31 24 B2 22 |50.828...>.T1$."|
000010A0: 22 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 3A |":T2$."":T3$."":|
000010B0: 54 34 24 B2 22 22 3A 49 B2 30 00 C3 18 40 03 89 |T4$."":I.0...@..|
000010C0: 33 30 30 00 DF 18 43 03 8F 20 2A 2A 20 53 50 41 |300...C.. ** SPA|
000010D0: 43 45 20 42 41 52 20 50 52 45 53 53 20 2A 2A 00 |CE BAR PRESS **.|
000010E0: 1A 19 48 03 97 55 4F 2C 30 3A 99 C8 28 55 44 24 |..H..UO,0:..(UD$|
000010F0: 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 45 |,24);".......PRE|
00001100: 53 53 20 53 50 41 43 45 20 42 41 52 20 54 4F 20 |SS SPACE BAR TO |
00001110: 43 4F 4E 54 49 4E 55 45 92 22 00 31 19 4C 03 A1 |CONTINUE.".1.L..|
00001120: 55 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 |UI$:.UI$.." ".84|
00001130: 34 00 37 19 4E 03 8E 00 57 19 52 03 8F 20 2A 2A |4.7.N...W.R.. **|
00001140: 20 50 41 47 45 20 44 45 53 49 47 4E 20 52 4F 55 | PAGE DESIGN ROU|
00001150: 54 49 4E 45 20 2A 2A 00 63 19 54 03 55 50 B2 55 |TINE **.c.T.UP.U|
00001160: 50 AA 31 00 8D 19 57 03 99 22 93 22 C8 28 55 54 |P.1...W..".".(UT|
00001170: 24 AA 55 50 24 2C 32 31 29 3B C9 28 55 50 24 AA |$.UP$,21);.(UP$.|
00001180: 55 47 24 AA C4 28 55 50 29 2C 31 38 29 00 BC 19 |UG$..(UP),18)...|
00001190: 5C 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |\.." -----------|
000011A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 CB 19 60 |-----------"...`|
000011C0: 03 8B 55 48 B3 B1 30 A7 38 37 30 00 FF 19 61 03 |..UH..0.870...a.|
000011D0: 99 C8 28 55 44 24 2C 32 34 29 3B C8 28 55 50 24 |..(UD$,24);.(UP$|
000011E0: 2C 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 |,7);"HELP - PRES|
000011F0: 53 20 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 |S H <RETURN>".|
00001200: 0B 1A 66 03 99 22 13 11 22 3A 8E 00 2A 1A 6B 03 |..f.."..":..*.k.|
00001210: 8F 20 2A 2A 20 50 4C 45 41 53 45 20 57 41 49 54 |. ** PLEASE WAIT|
00001220: 20 52 45 4D 41 52 4B 20 2A 2A 00 60 1A 70 03 99 | REMARK **.`.p..|
00001230: C8 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 |.(UD$,24);" |
00001240: 20 20 20 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 | ONE MOMENT|
00001250: 20 50 4C 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 | PLEASE... "|
00001260: 00 66 1A 75 03 8E 00 83 1A 84 03 8F 20 2A 2A 20 |.f.u........ ** |
00001270: 53 45 54 20 55 50 20 56 41 52 49 41 42 4C 45 53 |SET UP VARIABLES|
00001280: 20 2A 2A 00 CE 1A 85 03 55 58 24 B2 22 48 22 3A | **.....UX$."H":|
00001290: 86 55 51 25 28 31 30 30 30 29 3A 55 42 B2 33 32 |.UQ%(1000):UB.32|
000012A0: 37 36 38 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 |768:U1.196:U2.19|
000012B0: 37 3A 55 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A |7:U3.198:U4.216:|
000012C0: 55 43 B2 31 36 37 3A 55 55 B2 31 30 32 34 00 0C |UC.167:UU.1024..|
000012D0: 1B 86 03 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 |...UT.59468:UU%.|
000012E0: 31 32 3A 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 |12:UL%.14:UP%.11|
000012F0: 34 36 3A 55 4D B2 33 32 37 36 38 3A 55 4F B2 31 |46:UM.32768:UO.1|
00001300: 35 38 3A 97 20 35 30 30 30 33 2C 30 00 4F 1B 87 |58:. 50003,0.O..|
00001310: 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 42 B2 |...(50003).0.UB.|
00001320: 31 30 32 34 3A 55 31 B2 32 30 39 3A 55 32 B2 32 |1024:U1.209:U2.2|
00001330: 31 30 3A 55 33 B2 32 31 31 3A 55 34 B2 32 31 34 |10:U3.211:U4.214|
00001340: 3A 55 43 B2 32 30 34 3A 55 55 B2 32 30 34 38 00 |:UC.204:UU.2048.|
00001350: 8E 1B 88 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 |......(50003).0.|
00001360: 55 54 B2 35 33 32 37 32 3A 55 55 25 B2 32 31 3A |UT.53272:UU%.21:|
00001370: 55 4C 25 B2 32 33 3A 55 50 25 B2 32 31 33 39 3A |UL%.23:UP%.2139:|
00001380: 55 4D B2 31 30 32 34 3A 55 4F B2 31 39 38 00 B2 |UM.1024:UO.198..|
00001390: 1B 89 03 55 44 24 B2 22 13 11 11 11 11 11 11 11 |...UD$."........|
000013A0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000013B0: 11 22 00 E4 1B 8A 03 55 50 24 B2 22 20 20 20 20 |.".....UP$." |
000013C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000013D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000013E0: 20 20 20 22 00 F6 1B 8B 03 55 54 24 B2 22 20 D2 | ".....UT$." .|
000013F0: C5 C1 C4 C5 D2 22 00 FC 1B 8C 03 8E 00 16 1C 8E |....."..........|
00001400: 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 41 42 |.. ** SET VARIAB|
00001410: 4C 45 53 20 2A 2A 00 1F 1C 93 03 8D 39 30 30 00 |LES **......900.|
00001420: 3A 1C 98 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 |:.... ** CHECK F|
00001430: 4F 52 20 38 30 33 32 20 2A 2A 00 58 1C 9D 03 99 |OR 8032 **.X....|
00001440: 22 93 22 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 |".":.".":. SHIFT|
00001450: 45 44 20 53 50 41 43 45 00 6F 1C A2 03 8B C2 28 |ED SPACE.o.....(|
00001460: 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 |UB.40)..96..700.|
00001470: 88 1C A3 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 |..... ** MEMORY |
00001480: 43 48 45 43 4B 20 2A 2A 00 9C 1C A4 03 8B 20 B8 |CHECK **...... .|
00001490: 28 30 29 B1 32 30 30 30 A7 39 33 37 00 CA 1C A5 |(0).2000.937....|
000014A0: 03 99 22 93 11 11 05 54 48 49 53 20 4D 41 43 48 |.."....THIS MACH|
000014B0: 49 4E 45 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 |INE DOES NOT HAV|
000014C0: 45 20 45 4E 4F 55 47 48 11 22 00 EE 1C A6 03 99 |E ENOUGH."......|
000014D0: 22 4D 45 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 |"MEMORY TO RUN T|
000014E0: 48 49 53 20 50 52 4F 47 52 41 4D 20 21 22 00 F9 |HIS PROGRAM !"..|
000014F0: 1C A7 03 9E 55 55 AA 37 31 00 FF 1C A8 03 80 00 |....UU.71.......|
00001500: 19 1D A9 03 99 22 93 05 22 3A 8B C2 28 35 30 30 |....."..":..(500|
00001510: 30 33 29 B2 30 A7 39 36 32 00 48 1D AC 03 8F 20 |03).0.962.H.... |
00001520: 2A 2A 20 42 41 53 49 43 20 32 2E 30 20 20 4F 52 |** BASIC 2.0 OR|
00001530: 20 20 34 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 | 4.0 OR C-64 |
00001540: 53 45 54 55 50 20 2A 2A 00 86 1D AD 03 97 31 30 |SETUP **......10|
00001550: 37 35 2C 31 33 33 3A 97 31 30 37 36 2C 31 34 34 |75,133:.1076,144|
00001560: 3A 97 31 30 37 37 2C 32 33 34 3A 97 31 30 37 39 |:.1077,234:.1079|
00001570: 2C 34 3A 97 31 30 38 30 2C 31 33 33 3A 97 31 30 |,4:.1080,133:.10|
00001580: 38 31 2C 31 34 35 00 BC 1D AE 03 97 31 30 39 31 |81,145......1091|
00001590: 2C 31 35 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 |,155:.1098,133:.|
000015A0: 31 30 39 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 |1099,144:.1100,2|
000015B0: 33 34 3A 97 31 31 30 33 2C 31 33 33 00 DE 1D AF |34:.1103,133....|
000015C0: 03 97 31 31 30 34 2C 31 34 35 3A 97 31 31 30 35 |..1104,145:.1105|
000015D0: 2C 32 33 34 3A 97 31 30 38 32 2C 32 33 34 00 F5 |,234:.1082,234..|
000015E0: 1D B1 03 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 |.....(50003)..16|
000015F0: 30 A7 39 35 35 00 24 1E B6 03 97 31 30 39 33 2C |0.955.$....1093,|
00001600: 38 38 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 |88:.1094,228:.10|
00001610: 39 37 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A |97,85:.1102,228:|
00001620: 89 39 36 35 00 39 1E BB 03 8B C2 28 35 30 30 30 |.965.9.....(5000|
00001630: 33 29 B3 B1 31 A7 39 39 30 00 68 1E C0 03 97 31 |3)..1.990.h....1|
00001640: 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 |093,49:.1094,230|
00001650: 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 2C |:.1097,46:.1102,|
00001660: 32 33 30 3A 89 39 36 35 00 A2 1E C2 03 97 32 30 |230:.965......20|
00001670: 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 3A |99,141:.2100,20:|
00001680: 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A |.2101,3:.2103,8:|
00001690: 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 2C |.2104,141:.2105,|
000016A0: 32 31 00 DE 1E C3 03 97 32 31 30 36 2C 33 3A 97 |21......2106,3:.|
000016B0: 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 |2115,145:.2117,5|
000016C0: 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 32 |2:.2118,234:.212|
000016D0: 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 18 |1,49:.2122,141..|
000016E0: 1F C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 32 |....2123,20:.212|
000016F0: 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 |4,3:.2126,234:.2|
00001700: 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 |127,141:.2128,21|
00001710: 3A 97 32 31 32 39 2C 33 00 36 1F C5 03 9E 55 55 |:.2129,3.6....UU|
00001720: AA 34 38 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 |.48:. DISABLE ST|
00001730: 4F 50 20 4B 45 59 00 47 1F CA 03 8D 38 30 30 3A |OP KEY.G....800:|
00001740: 8F 20 54 49 54 4C 45 00 57 1F D4 03 89 33 30 30 |. TITLE.W....300|
00001750: 3A 8F 20 4D 45 4E 55 00 88 1F DE 03 99 22 93 54 |:. MENU......".T|
00001760: 48 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 |HE PGM WILL NOT |
00001770: 57 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 |WORK ON THIS MAC|
00001780: 48 49 4E 45 21 22 3A 80 00 BD 1F E8 03 8B 55 5A |HINE!":.......UZ|
00001790: B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 |.1..UP%:.UP%:UZ.|
000017A0: 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 |0:. ** PROGRAM S|
000017B0: 54 41 52 54 53 20 48 45 52 45 20 2A 2A 00 E8 1F |TARTS HERE **...|
000017C0: E9 03 99 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 |..."..";:.:..(50|
000017D0: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A |003).0..53281,6:|
000017E0: 97 35 33 32 38 30 2C 36 00 FF 1F 4C 04 8F 3A 20 |.53280,6...L..: |
000017F0: 20 20 20 20 52 20 45 20 41 20 44 20 45 20 52 00 | R E A D E R.|
00001800: 21 20 56 04 8F 3A 20 4A 20 54 20 50 41 52 52 20 |! V..: J T PARR |
00001810: 20 20 20 20 4F 43 54 4F 42 45 52 2C 20 31 39 37 | OCTOBER, 197|
00001820: 38 00 38 20 60 04 8F 3A 20 32 31 30 39 20 50 45 |8.8 `..: 2109 PE|
00001830: 49 52 43 45 20 41 56 45 00 56 20 6A 04 8F 3A 20 |IRCE AVE.V j..: |
00001840: 42 4C 4F 4F 4D 49 4E 47 54 4F 4E 2C 20 49 4C 4C |BLOOMINGTON, ILL|
00001850: 20 36 31 37 30 31 00 5C 20 74 04 8F 00 7F 20 7E | 61701.\ t.... ~|
00001860: 04 8F 20 20 50 45 52 4D 49 53 53 49 4F 4E 20 54 |.. PERMISSION T|
00001870: 4F 20 55 53 45 2C 20 4E 4F 54 20 53 45 4C 4C 00 |O USE, NOT SELL.|
00001880: 85 20 88 04 8F 00 A2 20 92 04 42 24 B2 22 22 3A |. ..... ..B$."":|
00001890: 99 22 93 22 3A 97 20 55 54 2C 55 4C 25 3A 8D 38 |.".":. UT,UL%:.8|
000018A0: 37 35 00 B1 20 E2 04 81 20 49 B2 31 20 A4 20 33 |75.. ... I.1 . 3|
000018B0: 39 00 C2 20 EC 04 3A 88 20 42 24 B2 42 24 AA 22 |9.. ..:. B$.B$."|
000018C0: 20 22 00 D3 20 F6 04 3A 88 20 43 24 B2 43 24 AA | ".. ..:. C$.C$.|
000018D0: 22 C0 22 00 DC 20 00 05 3A 82 20 49 00 E8 20 0A |".".. ..:. I.. .|
000018E0: 05 88 20 54 32 B2 36 30 00 EE 20 14 05 8F 00 FF |.. T2.60.. .....|
000018F0: 20 1E 05 88 20 53 B2 31 3A 8D 20 32 32 33 30 00 | ... S.1:. 2230.|
00001900: 1B 21 28 05 8D 20 32 33 31 30 3A 8F 2D 2D 2D 43 |.!(.. 2310:.---C|
00001910: 48 4F 4F 53 45 20 53 50 45 45 44 00 21 21 32 05 |HOOSE SPEED.!!2.|
00001920: 8F 00 3B 21 3C 05 8F 20 20 20 50 52 49 4E 54 20 |..;!<.. PRINT |
00001930: 54 48 45 20 50 41 53 53 41 47 45 00 46 21 46 05 |THE PASSAGE.F!F.|
00001940: 99 20 22 93 22 3B 00 5A 21 50 05 88 20 54 30 B2 |. ".";.Z!P.. T0.|
00001950: 54 49 3A 88 20 54 31 B2 54 49 00 6B 21 5A 05 81 |TI:. T1.TI.k!Z..|
00001960: 20 50 B2 31 20 A4 20 31 45 31 31 00 7C 21 64 05 | P.1 . 1E11.|!d.|
00001970: 3A 99 20 22 13 22 3B 56 24 3B 42 24 00 8C 21 6E |:. ".";V$;B$..!n|
00001980: 05 3A 81 20 4C B2 31 20 A4 20 31 32 00 A5 21 78 |.:. L.1 . 12..!x|
00001990: 05 3A 20 8F 2D 2D 2D 52 45 41 44 20 41 4E 44 20 |.: .---READ AND |
000019A0: 50 52 49 4E 54 00 B0 21 82 05 3A 20 87 20 4C 24 |PRINT..!..: . L$|
000019B0: 00 CE 21 8C 05 3A 20 8B 20 4C 24 B2 22 BF 22 20 |..!..: . L$."." |
000019C0: B0 20 4C 24 B2 22 51 22 A7 20 31 35 30 30 00 DE |. L$."Q". 1500..|
000019D0: 21 96 05 3A 20 88 20 4C 39 B2 4C 39 AA 31 00 F5 |!..: . L9.L9.1..|
000019E0: 21 A0 05 3A 20 88 20 4C 24 B2 C8 28 4C 24 AA 42 |!..: . L$..(L$.B|
000019F0: 24 2C 33 39 29 00 03 22 AA 05 3A 20 99 20 56 24 |$,39).."..: . V$|
00001A00: 3B 4C 24 00 19 22 B4 05 3A 20 8B 20 4C B3 31 32 |;L$.."..: . L.12|
00001A10: 20 A7 20 8D 20 31 37 38 30 00 2F 22 BE 05 3A 20 | . . 1780./"..: |
00001A20: 8D 20 31 38 33 30 3A 8F 20 20 44 45 4C 41 59 00 |. 1830:. DELAY.|
00001A30: 39 22 C8 05 3A 20 82 20 4C 00 42 22 D2 05 3A 82 |9"..: . L.B"..:.|
00001A40: 20 50 00 52 22 DC 05 3A 88 20 54 38 B2 54 49 AB | P.R"..:. T8.TI.|
00001A50: 54 30 00 6E 22 E6 05 8F 20 2D 20 2D 20 2D 20 57 |T0.n"... - - - W|
00001A60: 49 50 45 20 4F 55 54 20 53 43 52 45 45 4E 00 A3 |IPE OUT SCREEN..|
00001A70: 22 F0 05 97 55 4F 2C 30 3A 4D 24 B2 22 1D 1D 1D |"...UO,0:M$."...|
00001A80: 1D 20 50 52 45 53 53 20 3C 52 45 54 55 52 4E 3E |. PRESS <RETURN>|
00001A90: 20 57 48 45 4E 20 59 4F 55 20 46 49 4E 49 53 48 | WHEN YOU FINISH|
00001AA0: 20 1D 22 00 B5 22 FA 05 8B 20 4C B1 31 31 20 A7 | .".."... L.11 .|
00001AB0: 20 31 35 38 30 00 C8 22 04 06 99 20 4D 24 3A 99 | 1580.."... M$:.|
00001AC0: 3A 88 20 4D 24 B2 22 22 00 D5 22 0E 06 88 20 4C |:. M$."".."... L|
00001AD0: 37 B2 4C AA 32 00 E1 22 18 06 88 20 4C 38 B2 31 |7.L.2.."... L8.1|
00001AE0: 32 00 00 23 22 06 8D 20 31 36 34 30 3A 8B 46 4C |2..#".. 1640:.FL|
00001AF0: 24 B2 22 53 54 4F 50 50 45 44 22 A7 31 37 32 30 |$."STOPPED".1720|
00001B00: 00 06 23 2C 06 3A 00 13 23 36 06 99 20 22 13 22 |..#,.:..#6.. "."|
00001B10: 3B 4D 24 00 20 23 40 06 88 20 4C 38 B2 4C AB 31 |;M$. #@.. L8.L.1|
00001B20: 00 2B 23 4A 06 88 20 4C 37 B2 31 00 4F 23 54 06 |.+#J.. L7.1.O#T.|
00001B30: 8D 20 31 36 34 30 3A 8B 46 4C 24 B2 22 53 54 4F |. 1640:.FL$."STO|
00001B40: 50 50 45 44 22 A7 31 37 32 30 9B 31 35 37 30 00 |PPED".1720.1570.|
00001B50: 5A 23 5E 06 89 20 31 37 32 30 00 72 23 68 06 46 |Z#^.. 1720.r#h.F|
00001B60: 4C 24 B2 22 22 3A 81 20 4C 31 B2 4C 37 20 A4 20 |L$."":. L1.L7 . |
00001B70: 4C 38 00 9A 23 72 06 3A A1 20 41 24 3A 8B 41 24 |L8..#r.:. A$:.A$|
00001B80: B2 C7 28 31 33 29 A7 46 4C 24 B2 22 53 54 4F 50 |..(13).FL$."STOP|
00001B90: 50 45 44 22 3A 89 31 37 30 30 00 A7 23 7C 06 3A |PED":.1700..#|.:|
00001BA0: 99 20 56 24 3B 42 24 00 B3 23 86 06 3A 8D 20 31 |. V$;B$..#..:. 1|
00001BB0: 37 38 30 00 BF 23 90 06 3A 8D 20 31 38 33 30 00 |780..#..:. 1830.|
00001BC0: C9 23 9A 06 3A 82 20 4C 31 00 CF 23 A4 06 8E 00 |.#..:. L1..#....|
00001BD0: E5 23 AE 06 8F 20 2D 20 2D 20 2D 20 43 41 4C 43 |.#... - - - CALC|
00001BE0: 20 54 49 4D 45 00 F4 23 B8 06 88 20 54 39 B2 54 | TIME..#... T9.T|
00001BF0: 49 AB 54 30 00 10 24 C2 06 88 20 4D 30 B2 B5 28 |I.T0..$... M0..(|
00001C00: 33 36 30 30 AC 4C 39 AC 37 AD 54 38 AA 2E 35 29 |3600.L9.7.T8..5)|
00001C10: 00 2C 24 CC 06 88 20 4D 31 B2 B5 28 33 36 30 30 |.,$... M1..(3600|
00001C20: AC 4C 39 AC 37 AD 54 39 AA 2E 35 29 00 5A 24 D1 |.L9.7.T9..5).Z$.|
00001C30: 06 99 22 13 20 20 20 20 20 20 20 20 20 20 20 20 |..". |
00001C40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001C50: 20 20 20 20 20 20 20 20 20 22 00 7F 24 D6 06 99 | "..$...|
00001C60: 22 20 20 20 20 D9 4F 55 20 52 45 41 44 20 54 48 |" .OU READ TH|
00001C70: 45 20 50 41 53 53 41 47 45 20 41 54 22 4D 31 00 |E PASSAGE AT"M1.|
00001C80: A7 24 E0 06 99 22 20 20 20 20 54 4F 22 4D 30 22 |.$..." TO"M0"|
00001C90: 57 4F 52 44 53 A0 50 45 52 A0 4D 49 4E 55 54 45 |WORDS.PER.MINUTE|
00001CA0: 2E 22 3A 8D 38 33 35 00 B2 24 EA 06 89 20 31 38 |.":.835..$... 18|
00001CB0: 38 30 00 D0 24 F4 06 8F 20 2D 20 2D 20 2D 20 43 |80..$... - - - C|
00001CC0: 41 4E 43 45 4C 20 53 55 42 52 4F 55 54 49 4E 45 |ANCEL SUBROUTINE|
00001CD0: 00 DC 24 FE 06 99 20 56 24 3B 42 24 00 E8 24 08 |..$... V$;B$..$.|
00001CE0: 07 99 20 56 24 3B 43 24 00 F3 24 12 07 99 20 22 |.. V$;C$..$... "|
00001CF0: 91 22 3B 00 F9 24 1C 07 8E 00 0C 25 26 07 8F 20 |.";..$.....%&.. |
00001D00: 20 20 20 44 20 45 20 4C 20 41 20 59 00 22 25 30 | D E L A Y."%0|
00001D10: 07 8B 20 54 49 B3 54 31 AA 54 32 20 A7 20 31 38 |.. TI.T1.T2 . 18|
00001D20: 34 30 00 2E 25 3A 07 88 20 54 31 B2 54 49 00 34 |40..%:.. T1.TI.4|
00001D30: 25 44 07 8E 00 4E 25 4E 07 8F 2D 2D 2D 51 20 55 |%D...N%N..---Q U|
00001D40: 20 45 20 53 20 54 20 49 20 4F 20 4E 20 53 00 6B | E S T I O N S.k|
00001D50: 25 58 07 55 50 B2 30 3A 55 47 24 B2 22 43 4F 4D |%X.UP.0:UG$."COM|
00001D60: 50 52 45 48 45 4E 53 49 4F 4E 22 00 7C 25 6C 07 |PREHENSION".|%l.|
00001D70: 81 20 49 B2 31 20 A4 20 31 45 33 30 00 94 25 6E |. I.1 . 1E30..%n|
00001D80: 07 87 4C 24 3A 8B 20 4C 24 B2 22 45 22 20 A7 20 |..L$:. L$."E" . |
00001D90: 32 30 32 30 00 BA 25 6F 07 8D 38 35 30 3A 99 22 |2020..%o..850:."|
00001DA0: 11 11 11 20 20 20 20 12 54 52 55 45 92 20 4F 52 |... .TRUE. OR|
00001DB0: 20 12 46 41 4C 53 45 92 11 22 00 E4 25 71 07 99 | .FALSE.."..%q..|
00001DC0: 22 20 20 20 20 20 20 20 20 20 C1 43 43 4F 52 44 |" .CCORD|
00001DD0: 49 4E 47 20 54 4F 20 54 48 45 20 50 41 53 53 41 |ING TO THE PASSA|
00001DE0: 47 45 2C 22 00 F6 25 76 07 3A 81 20 4A B2 31 20 |GE,"..%v.:. J.1 |
00001DF0: A4 20 31 45 33 30 00 01 26 80 07 3A 20 87 20 4C |. 1E30..&..: . L|
00001E00: 24 00 17 26 8A 07 3A 20 8B 20 4C 24 B2 22 41 22 |$..&..: . L$."A"|
00001E10: 20 A7 20 31 39 37 30 00 27 26 9E 07 3A 20 99 22 | . 1970.'&..: ."|
00001E20: 20 20 20 20 22 4C 24 00 31 26 A8 07 3A 20 82 20 | "L$.1&..: . |
00001E30: 4A 00 5A 26 B2 07 3A 99 22 11 20 20 20 20 22 3B |J.Z&..:.". ";|
00001E40: 3A 55 53 24 B2 22 48 54 46 22 3A 55 4C B2 31 3A |:US$."HTF":UL.1:|
00001E50: 8D 33 35 3A 52 24 B2 55 52 24 00 60 26 B7 07 3A |.35:R$.UR$.`&..:|
00001E60: 00 6D 26 BC 07 3A 87 20 41 24 2C 43 24 00 8D 26 |.m&..:. A$,C$..&|
00001E70: C6 07 3A 99 3A 99 22 11 20 20 20 20 12 22 3B 41 |..:.:.". .";A|
00001E80: 24 3A 99 22 11 20 20 20 20 22 3B 43 24 00 97 26 |$:.". ";C$..&|
00001E90: D0 07 3A 8D 38 33 35 00 A0 26 DA 07 3A 82 20 49 |..:.835..&..:. I|
00001EA0: 00 A8 26 E4 07 8C 3A 8E 00 C6 26 EE 07 8F 20 20 |..&...:...&... |
00001EB0: 20 43 48 4F 4F 53 45 20 42 4C 41 43 4B 20 4F 52 | CHOOSE BLACK OR|
00001EC0: 20 57 48 49 54 45 00 CE 26 34 08 57 B2 31 00 E8 | WHITE..&4.W.1..|
00001ED0: 26 3E 08 8F 20 20 20 53 45 54 20 52 45 56 45 52 |&>.. SET REVER|
00001EE0: 53 45 20 43 48 41 52 53 00 F9 26 43 08 8B 57 B3 |SE CHARS..&C..W.|
00001EF0: B1 32 A7 56 24 B2 22 92 22 00 0C 27 48 08 8B 20 |.2.V$."."..'H.. |
00001F00: 57 B2 32 20 A7 20 56 24 B2 22 12 22 00 12 27 52 |W.2 . V$."."..'R|
00001F10: 08 8E 00 2B 27 5C 08 8F 20 20 20 53 45 4C 45 43 |...+'\.. SELEC|
00001F20: 54 49 4F 4E 20 43 48 4F 49 43 45 00 31 27 66 08 |TION CHOICE.1'f.|
00001F30: 8C 00 54 27 70 08 8C 3A 99 22 93 22 3A 99 20 22 |..T'p..:.".":. "|
00001F40: C3 48 4F 4F 53 45 20 41 A0 50 41 53 53 41 47 45 |.HOOSE A.PASSAGE|
00001F50: 3A 22 3A 99 00 63 27 7A 08 81 20 49 B2 31 20 A4 |:":..c'z.. I.1 .|
00001F60: 20 31 30 00 6D 27 84 08 3A 87 20 4C 24 00 82 27 | 10.m'..:. L$..'|
00001F70: 8E 08 3A 8B 20 4C 24 B2 22 BF 22 20 A7 20 32 32 |..:. L$."." . 22|
00001F80: 32 30 00 8F 27 98 08 3A 99 3A 99 49 3B 4C 24 00 |20..'..:.:.I;L$.|
00001F90: 96 27 A2 08 3A 82 00 A0 27 AC 08 99 3A 85 20 53 |.'..:...'...:. S|
00001FA0: 00 BA 27 B6 08 8F 2D 2D 2D 53 4B 49 50 20 54 4F |..'...---SKIP TO|
00001FB0: 20 53 45 4C 45 43 54 49 4F 4E 00 C8 27 C0 08 81 | SELECTION..'...|
00001FC0: 20 49 B2 31 20 A4 20 53 00 DA 27 CA 08 3A 81 20 | I.1 . S..'..:. |
00001FD0: 4A B2 31 20 A4 20 31 30 30 30 00 E5 27 D4 08 3A |J.1 . 1000..'..:|
00001FE0: 20 87 20 4C 24 00 FB 27 DE 08 3A 20 8B 20 4C 24 | . L$..'..: . L$|
00001FF0: B2 22 BF 22 20 A7 20 32 32 39 30 00 05 28 E8 08 |."." . 2290..(..|
00002000: 3A 20 82 20 4A 00 0E 28 F2 08 3A 82 20 49 00 14 |: . J..(..:. I..|
00002010: 28 FC 08 8E 00 29 28 06 09 8F 2D 2D 2D 53 50 45 |(....)(...---SPE|
00002020: 45 44 20 43 48 4F 49 43 45 00 44 28 10 09 55 50 |ED CHOICE.D(..UP|
00002030: B2 30 3A 55 47 24 B2 22 52 45 41 44 45 52 22 3A |.0:UG$."READER":|
00002040: 8D 38 35 30 00 72 28 1A 09 99 20 22 11 11 11 11 |.850.r(... "....|
00002050: 20 20 20 20 20 20 20 31 2E 20 31 30 30 2D 31 35 | 1. 100-15|
00002060: 30 20 57 4F 52 44 53 A0 50 45 52 A0 4D 49 4E 55 |0 WORDS.PER.MINU|
00002070: 54 45 00 8F 28 24 09 99 20 22 20 20 20 20 20 20 |TE..($.. " |
00002080: 20 32 2E 20 31 35 30 2D 32 30 30 20 57 50 4D 00 | 2. 150-200 WPM.|
00002090: AC 28 2E 09 99 20 22 20 20 20 20 20 20 20 33 2E |.(... " 3.|
000020A0: 20 32 30 30 2D 32 35 30 20 57 50 4D 00 C9 28 38 | 200-250 WPM..(8|
000020B0: 09 99 20 22 20 20 20 20 20 20 20 34 2E 20 32 35 |.. " 4. 25|
000020C0: 30 2D 33 30 30 20 57 50 4D 00 E6 28 42 09 99 20 |0-300 WPM..(B.. |
000020D0: 22 20 20 20 20 20 20 20 35 2E 20 33 30 30 2D 33 |" 5. 300-3|
000020E0: 35 30 20 57 50 4D 00 03 29 4C 09 99 20 22 20 20 |50 WPM..)L.. " |
000020F0: 20 20 20 20 20 36 2E 20 33 35 30 2D 34 35 30 20 | 6. 350-450 |
00002100: 57 50 4D 00 20 29 56 09 99 20 22 20 20 20 20 20 |WPM. )V.. " |
00002110: 20 20 37 2E 20 34 30 30 2D 35 30 30 20 57 50 4D | 7. 400-500 WPM|
00002120: 00 3D 29 60 09 99 20 22 20 20 20 20 20 20 20 38 |.=)`.. " 8|
00002130: 2E 20 34 35 30 2D 35 35 30 20 57 50 4D 00 5A 29 |. 450-550 WPM.Z)|
00002140: 6A 09 99 20 22 20 20 20 20 20 20 20 39 2E 20 35 |j.. " 9. 5|
00002150: 30 30 2D 36 33 30 20 57 50 4D 00 87 29 6F 09 99 |00-630 WPM..)o..|
00002160: 22 11 11 20 20 20 20 C1 54 20 57 48 41 54 20 53 |".. .T WHAT S|
00002170: 50 45 45 44 20 57 4F 55 4C 44 20 59 4F 55 20 4C |PEED WOULD YOU L|
00002180: 49 4B 45 20 54 4F 22 00 A1 29 71 09 99 22 20 20 |IKE TO"..)q.." |
00002190: 20 20 52 45 41 44 3F 20 28 31 2D 39 29 20 20 22 | READ? (1-9) "|
000021A0: 3B 00 CA 29 74 09 55 53 24 B2 22 31 32 33 34 35 |;..)t.US$."12345|
000021B0: 35 36 37 38 39 30 48 22 3A 55 4C B2 31 3A 8D 33 |567890H":UL.1:.3|
000021C0: 35 3A 41 B2 C5 28 55 52 24 29 00 D4 29 7E 09 8D |5:A..(UR$)..)~..|
000021D0: 32 30 33 30 00 E7 29 88 09 88 20 54 32 B2 34 30 |2030..)... T2.40|
000021E0: 30 AD 28 41 AA 31 29 00 ED 29 92 09 8E 00 02 2A |0.(A.1)..).....*|
000021F0: 9C 09 8F 2D 2D 2D 2D 2D 53 45 4C 45 43 54 49 4F |...-----SELECTIO|
00002200: 4E 53 00 0B 2A A6 09 83 20 22 BF 00 37 2A B0 09 |NS..*... "..7*..|
00002210: 83 20 22 20 20 20 D4 48 49 53 20 49 53 20 41 20 |. " .HIS IS A |
00002220: 53 41 4D 50 4C 45 A0 52 45 41 44 49 4E 47 A0 50 |SAMPLE.READING.P|
00002230: 52 4F 47 52 41 4D A0 00 66 2A BA 09 83 20 22 54 |ROGRAM..f*... "T|
00002240: 4F A0 47 49 56 45 A0 59 4F 55 A0 41 A0 52 4F 55 |O.GIVE.YOU.A.ROU|
00002250: 47 48 A0 49 44 45 41 A0 4F 46 A0 53 4F 4D 45 A0 |GH.IDEA.OF.SOME.|
00002260: 4F 46 A0 54 48 45 00 92 2A C4 09 83 20 22 43 41 |OF.THE..*... "CA|
00002270: 50 41 42 49 4C 49 54 49 45 53 A0 4F 46 A0 41 A0 |PABILITIES.OF.A.|
00002280: 4D 49 43 52 4F 43 4F 4D 50 55 54 45 52 A0 4C 49 |MICROCOMPUTER.LI|
00002290: 4B 45 00 BF 2A CE 09 83 20 22 54 48 49 53 A0 4F |KE..*... "THIS.O|
000022A0: 4E 45 A0 49 4E A0 54 48 45 A0 43 4C 41 53 53 52 |NE.IN.THE.CLASSR|
000022B0: 4F 4F 4D 2E 20 20 D3 4F 4D 45 A0 43 4F 4D 2D 00 |OOM. .OME.COM-.|
000022C0: ED 2A D8 09 83 20 22 4D 45 52 43 49 41 4C 20 53 |.*... "MERCIAL S|
000022D0: 4F 46 54 57 41 52 45 A0 43 4F 4D 50 41 4E 59 A0 |OFTWARE.COMPANY.|
000022E0: 4D 41 59 A0 57 45 4C 4C A0 43 4F 4D 45 00 1A 2B |MAY.WELL.COME..+|
000022F0: E2 09 83 20 22 4F 55 54 20 57 49 54 48 A0 41 A0 |... "OUT WITH.A.|
00002300: 53 45 52 49 45 53 A0 4F 46 A0 52 45 41 44 49 4E |SERIES.OF.READIN|
00002310: 47 A0 50 52 4F 47 52 41 4D 53 00 47 2B EC 09 83 |G.PROGRAMS.G+...|
00002320: 20 22 57 49 54 48 20 4D 4F 52 45 A0 46 45 41 54 | "WITH MORE.FEAT|
00002330: 55 52 45 53 A0 54 48 41 4E A0 54 48 49 53 A0 4F |URES.THAN.THIS.O|
00002340: 4E 45 20 48 41 53 2E 00 74 2B F6 09 83 20 22 20 |NE HAS..t+... " |
00002350: 20 20 C6 4F 52 A0 43 4C 41 53 53 52 4F 4F 4D A0 | .OR.CLASSROOM.|
00002360: 55 53 45 2C A0 54 48 45 53 45 A0 50 41 53 53 41 |USE,.THESE.PASSA|
00002370: 47 45 53 A0 00 A2 2B 00 0A 83 20 22 57 4F 55 4C |GES...+... "WOUL|
00002380: 44 A0 42 45 A0 52 45 50 4C 41 43 45 44 A0 57 49 |D.BE.REPLACED.WI|
00002390: 54 48 A0 4F 4E 45 53 A0 43 48 4F 53 45 4E A0 46 |TH.ONES.CHOSEN.F|
000023A0: 4F 52 00 D0 2B 0A 0A 83 20 22 54 48 45 A0 4C 45 |OR..+... "THE.LE|
000023B0: 56 45 4C A0 4F 46 A0 54 48 45 A0 50 55 50 49 4C |VEL.OF.THE.PUPIL|
000023C0: 53 2E 20 20 D4 48 49 53 20 50 52 4F 47 52 41 4D |S. .HIS PROGRAM|
000023D0: 00 FE 2B 14 0A 83 20 22 49 53 A0 57 52 49 54 54 |..+... "IS.WRITT|
000023E0: 45 4E 20 53 4F A0 54 48 41 54 20 4E 45 57 20 C4 |EN SO.THAT NEW .|
000023F0: C1 D4 C1 20 53 54 41 54 45 4D 45 4E 54 53 00 2A |... STATEMENTS.*|
00002400: 2C 1E 0A 83 20 22 43 4F 55 4C 44 A0 42 45 A0 54 |,... "COULD.BE.T|
00002410: 59 50 45 44 A0 49 4E 2C 20 57 49 54 48 4F 55 54 |YPED.IN, WITHOUT|
00002420: 20 41 4E 59 20 4F 54 48 45 52 00 59 2C 28 0A 83 | ANY OTHER.Y,(..|
00002430: 20 22 43 48 41 4E 47 45 20 49 4E A0 54 48 45 A0 | "CHANGE IN.THE.|
00002440: 50 52 4F 47 52 41 4D 2E 20 20 CF 4E 45 A0 57 4F |PROGRAM. .NE.WO|
00002450: 55 4C 44 A0 50 52 4F 42 2D 00 88 2C 32 0A 83 20 |ULD.PROB-..,2.. |
00002460: 22 41 42 4C 59 A0 4B 45 45 50 A0 53 45 56 45 52 |"ABLY.KEEP.SEVER|
00002470: 41 4C A0 43 4F 50 49 45 53 A0 4F 46 A0 54 48 45 |AL.COPIES.OF.THE|
00002480: A0 50 52 4F 47 52 41 4D 00 B7 2C 3C 0A 83 20 22 |.PROGRAM..,<.. "|
00002490: 4F 4E A0 44 49 53 4B 45 54 54 45 53 2C 20 45 41 |ON.DISKETTES, EA|
000024A0: 43 48 A0 57 49 54 48 A0 44 49 46 46 45 52 45 4E |CH.WITH.DIFFEREN|
000024B0: 54 20 50 41 53 53 2D 00 C4 2C 46 0A 83 20 22 41 |T PASS-..,F.. "A|
000024C0: 47 45 53 2E 00 F1 2C 50 0A 83 20 22 20 20 20 D4 |GES...,P.. " .|
000024D0: 48 49 53 A0 50 52 4F 47 52 41 4D A0 55 53 45 53 |HIS.PROGRAM.USES|
000024E0: A0 54 57 4F A0 53 50 45 43 49 41 4C A0 46 45 41 |.TWO.SPECIAL.FEA|
000024F0: 2D 00 20 2D 5A 0A 83 20 22 54 55 52 45 53 A0 4F |-. -Z.. "TURES.O|
00002500: 46 A0 54 48 45 20 D0 C5 D4 20 4D 49 43 52 4F 43 |F.THE ... MICROC|
00002510: 4F 4D 50 55 54 45 52 3A 20 43 4F 4E 54 52 4F 4C |OMPUTER: CONTROL|
00002520: 00 4E 2D 64 0A 83 20 22 4F 46 A0 54 48 45 20 D4 |.N-d.. "OF.THE .|
00002530: D6 20 49 4D 41 47 45 2C 20 41 4E 44 20 54 49 4D |. IMAGE, AND TIM|
00002540: 49 4E 47 2E 20 20 CD 4F 53 54 A0 4F 46 A0 00 7B |ING. .OST.OF..{|
00002550: 2D 6E 0A 83 20 22 54 48 45 A0 4D 49 43 52 4F 43 |-n.. "THE.MICROC|
00002560: 4F 4D 50 55 54 45 52 53 A0 4F 4E 45 A0 57 4F 55 |OMPUTERS.ONE.WOU|
00002570: 4C 44 20 43 4F 4E 53 49 44 45 52 00 A9 2D 78 0A |LD CONSIDER..-x.|
00002580: 83 20 22 46 4F 52 A0 43 4C 41 53 53 52 4F 4F 4D |. "FOR.CLASSROOM|
00002590: A0 55 53 45 A0 48 41 56 45 20 54 48 45 53 45 20 |.USE.HAVE THESE |
000025A0: 46 45 41 54 55 52 45 53 2C 00 D7 2D 82 0A 83 20 |FEATURES,..-... |
000025B0: 22 54 48 4F 55 47 48 A0 4E 4F 54 A0 41 4C 4C A0 |"THOUGH.NOT.ALL.|
000025C0: 48 41 56 45 A0 4C 4F 57 45 52 2D 43 41 53 45 20 |HAVE.LOWER-CASE |
000025D0: 4C 45 54 54 45 52 53 00 06 2E 8C 0A 83 20 22 4C |LETTERS...... "L|
000025E0: 49 4B 45 A0 54 48 45 53 45 2E 20 20 D4 49 4D 45 |IKE.THESE. .IME|
000025F0: 2D 53 48 41 52 49 4E 47 20 54 45 52 4D 49 4E 41 |-SHARING TERMINA|
00002600: 4C 53 20 4D 41 59 00 34 2E 96 0A 83 20 22 55 53 |LS MAY.4.... "US|
00002610: 45 20 D4 D6 20 53 43 52 45 45 4E 53 2C 20 42 55 |E .. SCREENS, BU|
00002620: 54 A0 4F 46 54 45 4E 20 44 4F A0 4E 4F 54 20 41 |T.OFTEN DO.NOT A|
00002630: 4C 4C 4F 57 00 61 2E A0 0A 83 20 22 54 48 45 A0 |LLOW.a.... "THE.|
00002640: 4B 49 4E 44 A0 4F 46 A0 43 4F 4E 54 52 4F 4C A0 |KIND.OF.CONTROL.|
00002650: 55 53 45 44 A0 42 59 A0 54 48 49 53 20 50 52 4F |USED.BY.THIS PRO|
00002660: 2D 00 90 2E AA 0A 83 20 22 47 52 41 4D 2E 20 20 |-...... "GRAM. |
00002670: C1 20 54 49 4D 45 2D 53 48 41 52 49 4E 47 20 53 |. TIME-SHARING S|
00002680: 59 53 54 45 4D 20 47 45 4E 45 52 41 4C 4C 59 A0 |YSTEM GENERALLY.|
00002690: 00 BE 2E B4 0A 83 20 22 44 4F 45 53 20 4E 4F 54 |...... "DOES NOT|
000026A0: A0 50 52 4F 56 49 44 45 A0 50 52 45 43 49 53 45 |.PROVIDE.PRECISE|
000026B0: A0 54 49 4D 49 4E 47 2C 20 41 53 20 49 54 00 EA |.TIMING, AS IT..|
000026C0: 2E BE 0A 83 20 22 4D 41 59 A0 42 45 20 53 45 52 |.... "MAY.BE SER|
000026D0: 56 49 43 49 4E 47 A0 41 A0 44 49 46 46 45 52 45 |VICING.A.DIFFERE|
000026E0: 4E 54 A0 50 52 4F 47 52 41 4D 00 16 2F C8 0A 83 |NT.PROGRAM../...|
000026F0: 20 22 4A 55 53 54 A0 57 48 45 4E A0 49 54 A0 53 | "JUST.WHEN.IT.S|
00002700: 48 4F 55 4C 44 A0 42 45 A0 50 52 49 4E 54 49 4E |HOULD.BE.PRINTIN|
00002710: 47 A0 54 48 45 A0 00 28 2F D2 0A 83 20 22 4E 45 |G.THE..(/... "NE|
00002720: 58 54 A0 4C 49 4E 45 2E 00 54 2F DC 0A 83 20 22 |XT.LINE..T/... "|
00002730: 20 20 20 D4 48 45 A0 50 52 4F 47 52 41 4D A0 41 | .HE.PROGRAM.A|
00002740: 4E 44 A0 49 54 53 A0 54 45 58 54 A0 50 41 53 53 |ND.ITS.TEXT.PASS|
00002750: 41 47 45 53 00 7C 2F E6 0A 83 20 22 4F 43 43 55 |AGES.|/... "OCCU|
00002760: 50 59 A0 41 42 4F 55 54 20 20 38 CB 20 28 38 30 |PY.ABOUT 8. (80|
00002770: 30 30 29 20 42 59 54 45 53 A0 4F 46 00 AA 2F F0 |00) BYTES.OF../.|
00002780: 0A 83 20 22 54 48 49 53 A0 D0 C5 D4 27 53 A0 52 |.. "THIS....'S.R|
00002790: 45 41 44 2D 57 52 49 54 45 A0 4D 45 4D 4F 52 59 |EAD-WRITE.MEMORY|
000027A0: 2E 20 20 C1 20 4D 4F 52 45 A0 00 D9 2F FA 0A 83 |. . MORE.../...|
000027B0: 20 22 41 4D 42 49 54 49 4F 55 53 A0 50 52 4F 47 | "AMBITIOUS.PROG|
000027C0: 52 41 4D A0 43 4F 55 4C 44 A0 42 45 A0 41 43 43 |RAM.COULD.BE.ACC|
000027D0: 4F 4D 4D 4F 44 41 54 45 44 00 08 30 04 0B 83 20 |OMMODATED..0... |
000027E0: 22 42 59 A0 47 45 54 54 49 4E 47 A0 4D 4F 52 45 |"BY.GETTING.MORE|
000027F0: A0 4D 45 4D 4F 52 59 20 4F 52 A0 42 59 20 55 53 |.MEMORY OR.BY US|
00002800: 49 4E 47 20 4D 4F 52 45 00 35 30 0E 0B 83 20 22 |ING MORE.50... "|
00002810: 4F 46 A0 54 48 45 A0 50 52 45 53 45 4E 54 A0 38 |OF.THE.PRESENT.8|
00002820: CB 20 46 4F 52 A0 54 48 45 A0 50 52 4F 47 52 41 |. FOR.THE.PROGRA|
00002830: 4D A0 41 4E 44 00 5F 30 18 0B 83 20 22 52 45 41 |M.AND._0... "REA|
00002840: 44 49 4E 47 A0 54 48 45 A0 50 41 53 53 41 47 45 |DING.THE.PASSAGE|
00002850: 53 A0 46 52 4F 4D A0 45 58 54 45 52 4E 41 4C 00 |S.FROM.EXTERNAL.|
00002860: 7B 30 22 0B 83 20 22 46 49 4C 45 53 A0 4F 4E A0 |{0".. "FILES.ON.|
00002870: 41 A0 44 49 53 4B 45 54 54 45 2E 00 A8 30 2C 0B |A.DISKETTE...0,.|
00002880: 83 20 22 20 20 20 C1 44 44 49 54 49 4F 4E 53 20 |. " .DDITIONS |
00002890: 54 4F A0 54 48 45 A0 50 52 4F 47 52 41 4D A0 4D |TO.THE.PROGRAM.M|
000028A0: 49 47 48 54 20 49 4E 2D 00 D7 30 36 0B 83 20 22 |IGHT IN-..06.. "|
000028B0: 43 4C 55 44 45 3A 20 20 41 4C 4C 4F 57 49 4E 47 |CLUDE: ALLOWING|
000028C0: A0 54 48 45 A0 52 45 41 44 45 52 A0 54 4F A0 53 |.THE.READER.TO.S|
000028D0: 50 45 45 44 A0 55 50 00 04 31 40 0B 83 20 22 4F |PEED.UP..1@.. "O|
000028E0: 52 A0 53 4C 4F 57 A0 44 4F 57 4E A0 54 48 45 20 |R.SLOW.DOWN.THE |
000028F0: 50 41 53 53 41 47 45 20 57 48 49 4C 45 A0 49 54 |PASSAGE WHILE.IT|
00002900: A0 49 53 A0 00 33 31 4A 0B 83 20 22 42 45 49 4E |.IS..31J.. "BEIN|
00002910: 47 A0 50 52 45 53 45 4E 54 45 44 3B 20 52 45 44 |G.PRESENTED; RED|
00002920: 55 43 49 4E 47 A0 54 48 45 A0 4E 55 4D 42 45 52 |UCING.THE.NUMBER|
00002930: A0 4F 46 00 5E 31 54 0B 83 20 22 4C 49 4E 45 53 |.OF.^1T.. "LINES|
00002940: A0 4F 4E A0 54 48 45 A0 53 43 52 45 45 4E A0 41 |.ON.THE.SCREEN.A|
00002950: 54 A0 4F 4E 45 A0 54 49 4D 45 20 54 4F A0 00 8A |T.ONE.TIME TO...|
00002960: 31 5E 0B 83 20 22 46 4F 52 43 45 A0 54 48 45 A0 |1^.. "FORCE.THE.|
00002970: 52 45 41 44 45 52 A0 54 4F 20 4B 45 45 50 A0 55 |READER.TO KEEP.U|
00002980: 50 3B 20 54 45 53 54 49 4E 47 00 B3 31 68 0B 83 |P; TESTING..1h..|
00002990: 20 22 46 4F 52 A0 43 4F 4D 50 52 45 48 45 4E 53 | "FOR.COMPREHENS|
000029A0: 49 4F 4E A0 4D 4F 52 45 A0 43 41 52 45 46 55 4C |ION.MORE.CAREFUL|
000029B0: 4C 59 3B 00 E2 31 72 0B 83 20 22 43 4F 41 43 48 |LY;..1r.. "COACH|
000029C0: 49 4E 47 A0 49 4E A0 52 45 41 44 49 4E 47 A0 54 |ING.IN.READING.T|
000029D0: 45 43 48 4E 49 51 55 45 53 3B 20 41 4E 44 A0 52 |ECHNIQUES; AND.R|
000029E0: 45 2D 00 0B 32 7C 0B 83 20 22 43 4F 52 44 49 4E |E-..2|.. "CORDIN|
000029F0: 47 A0 54 48 45 A0 50 55 50 49 4C 27 53 A0 41 43 |G.THE.PUPIL'S.AC|
00002A00: 48 45 49 56 45 4D 45 4E 54 53 2E 00 13 32 86 0B |HEIVEMENTS...2..|
00002A10: 83 20 51 00 3F 32 90 0B 83 20 22 22 2C 22 52 45 |. Q.?2... "","RE|
00002A20: 41 44 49 4E 47 A0 50 52 4F 47 52 41 4D 53 A0 4C |ADING.PROGRAMS.L|
00002A30: 49 4B 45 A0 54 48 49 53 A0 43 41 4E A0 42 45 00 |IKE.THIS.CAN.BE.|
00002A40: 5B 32 9A 0B 83 20 22 42 4F 55 47 48 54 20 43 4F |[2... "BOUGHT CO|
00002A50: 4D 4D 45 52 43 49 41 4C 4C 59 2E 00 99 32 A4 0B |MMERCIALLY...2..|
00002A60: 83 20 41 2C 46 41 4C 53 45 2C 22 CE 4F 54 A0 54 |. A,FALSE,".OT.T|
00002A70: 48 41 54 A0 57 45 A0 4B 4E 4F 57 A0 4F 46 2C 20 |HAT.WE.KNOW.OF, |
00002A80: 42 55 54 A0 4D 41 59 42 45 20 20 20 20 20 20 20 |BUT.MAYBE |
00002A90: 20 20 A0 53 4F 4F 4E 2E 22 00 C2 32 AE 0B 83 20 | .SOON."..2... |
00002AA0: 22 22 2C 22 54 49 4D 45 2D 53 48 41 52 49 4E 47 |"","TIME-SHARING|
00002AB0: A0 53 59 53 54 45 4D 53 A0 41 52 45 A0 4C 45 53 |.SYSTEMS.ARE.LES|
00002AC0: 53 22 00 FC 32 B8 0B 83 20 22 4C 49 4B 45 4C 59 |S"..2... "LIKELY|
00002AD0: 20 54 4F A0 42 45 A0 41 42 4C 45 A0 54 4F A0 44 | TO.BE.ABLE.TO.D|
00002AE0: 4F A0 41 A0 50 52 4F 47 52 41 4D 20 20 20 20 20 |O.A.PROGRAM |
00002AF0: 20 20 4C 49 4B 45 20 54 48 49 53 2E 00 09 33 C2 | LIKE THIS...3.|
00002B00: 0B 83 20 41 2C 54 52 55 45 00 52 33 C7 0B 83 20 |.. A,TRUE.R3... |
00002B10: 22 D4 48 45 59 A0 44 4F 4E 27 54 A0 47 45 4E 45 |".HEY.DON'T.GENE|
00002B20: 52 41 4C 4C 59 A0 41 4C 4C 4F 57 A0 53 55 43 48 |RALLY.ALLOW.SUCH|
00002B30: A0 20 20 20 20 20 20 20 20 53 43 52 45 45 4E A0 |. SCREEN.|
00002B40: 43 4F 4E 54 52 4F 4C A0 4F 52 A0 54 49 4D 49 4E |CONTROL.OR.TIMIN|
00002B50: 47 2E 00 7C 33 CC 0B 83 20 22 22 2C 22 55 53 49 |G..|3... "","USI|
00002B60: 4E 47 A0 44 49 46 46 45 52 45 4E 54 A0 50 41 53 |NG.DIFFERENT.PAS|
00002B70: 53 41 47 45 53 A0 57 4F 55 4C 44 22 00 9F 33 D6 |SAGES.WOULD"..3.|
00002B80: 0B 83 20 22 4D 45 41 4E 20 52 45 57 52 49 54 49 |.. "MEAN REWRITI|
00002B90: 4E 47 A0 54 48 45 A0 50 52 4F 47 52 41 4D 2E 00 |NG.THE.PROGRAM..|
00002BA0: DF 33 E0 0B 83 20 41 2C 46 41 4C 53 45 2C 22 CF |.3... A,FALSE,".|
00002BB0: 4E 4C 59 A0 54 48 45 A0 4E 45 57 A0 54 45 58 54 |NLY.THE.NEW.TEXT|
00002BC0: A0 57 4F 55 4C 44 A0 48 41 56 45 A0 54 4F A0 42 |.WOULD.HAVE.TO.B|
00002BD0: 45 A0 20 20 20 20 20 45 4E 54 45 52 45 44 2E 00 |E. ENTERED..|
00002BE0: 08 34 EA 0B 83 20 22 22 2C 22 4D 4F 53 54 A0 4D |.4... "","MOST.M|
00002BF0: 49 43 52 4F 53 A0 43 4F 55 4C 44 A0 48 41 4E 44 |ICROS.COULD.HAND|
00002C00: 4C 45 20 54 48 49 53 2E 00 18 34 F4 0B 83 20 41 |LE THIS...4... A|
00002C10: 2C 54 52 55 45 2C 22 22 00 20 34 FE 0B 83 20 45 |,TRUE,"". 4... E|
00002C20: 00 00 00 |... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(..UO,0:UR$."":UI$.""...*..UL.0.UL.80
.".-..UC,0.6.2..UI$:.UI$."".50.`.7..UI$.
G(13).C(UR$)..1..UC,1:." .";:.85.S.<..UI
$.G(20).105...>.. C(UR$)..UL.50...A..120
:. CHECK FOR VALID CHARACTER...F.UR$.UR$
.UI$.F.K..UI$;.N.P..50...U.. +++ CHECK F
OR HELP REQUEST +++...Z..UR$.UX$.195:. E
XIT TO HELP ROUTINE.*._..UF.1..240.7.D.U
F.0:.:..P.F.. ++ CHECK DELETE ++.A.I..C(
UR$).1.50.Y.N.UR$.H(UR$,C(UR$).1)...S.."
. ..";:.50...X.. ++ CHECK FOR VALID CHA
RACTERS ++.D.}..C(US$).0.150.U....US.1.C
(US$)......UI$.J(US$,US,1).............U
I$."":....... ** STANDARD INPUT **.+....
F(UI$).46...<....UI$.G(32)...Y. ..F(UI$)
.48.F(UI$).57.170._.....|....F(UI$).65.F
(UI$).90.180............F(UI$).193.F(UI$
).218.UI$."":..I....B(UT).UU%.UI$.G(F(UI
$).128):..O.........UI$."":....C.UF.1:.
+++ HELP ROUTINE EXIT +++...E..250...H..
245.2.M..UQ.UB.(U2%.256.U1%.U3%.2).N.R.U
Q%(UQ.UB).B(UQ):.:.".".A.W.UZ.1:UV%.B(UT
).J.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:UP.U
J:UL.UK:.B(50003).0..53281,6:.53280,6...
..UT$.UL$:.".";:.UT,UV%:.UQ.UB.(U2%.256.
U1%.U3%.3)......UQ,UQ%(UQ.UB):.......U1,
U1%......U2,U2%......U4,U4%.)....U3,U3%.
1.1....35.C...UD%.((U2%.256.U1%.U3%).UB)
.40:.H(UD$,UD%.1):.......H(UD$,24);"
. HELP COMING . ":..J
...U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U
4).....UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.
UL.........,.. ** MENU **...-.:.>...."."
:.UT,UU%:.B(50003).0..53281,9:.53280,8.D
./.:.A.1..". MENU"...6.."
--------------------------------------"
...;..".. 1. READER BEGINS"...@.
.".. 2. STUDENT INSTRUCTIONS"...
E..".. 3. TEACHER INSTRUCTIONS".
#.O..".. 4. QUIT..".R.T.." -----
---------------------------------".}.Y..
".. PRESS A NUMBER KEY (1-4) ";...
^.UL.1:US$."1234":.35:. INPUT ROUTINE...
`.US$."".M.C..E(UR$).1000,400,500,396.V.
H..300...... ** RE-ENABLE STOP KEY AND E
ND **.,....B(50003)..1.B(50003)..160.B(5
0003)..0.399.V....UU.71:.B(50003).0..532
81,6:.53280,14.B...."..":..M....875:....
... ** STUDENT INSTRUCTIONS **......".":
.UT,UL%:.B(50003).0..53281,0:.53280,0...
..UP.0:UG$."STUDENT INST":.850......"...
. THIS PROGRAM IS DESIGNED TO".5...."
. ASSIST YOU WITH INCREASING YOUR".`.
...". READING SPEED. YOU MAY PRESET"
......". THE RATE AT WHICH THE LINES"
......". APPEAR AND YOU WILL BE GIVEN
A"......". SHORT COMPREHENSION QUIZ
AT THE"......". END."......835......U
Z.1..UP%:.217.......4.... ** TEACHER INS
TRUCTIONS **.D....".":.UT,UL%:.B(50003).
0..53281,2:.53280,10.....UP.0:UG$."TEACH
ER INST":.850......".. TO THE BEST
OF OUR KNOWLEDGE,."......" THIS PROGRA
M IS IN THE PUBLIC."......" DOMAIN. I
F THIS IS NOT THE CASE.".%...." PLEASE
CONTACT:...".O...." COMMODORE BUSI
NESS MACHINES.".R...." 3370 PHA
RMACY AVE......." AGINCOURT, ON
TARIO"......" CANADA M1W 2K4"
.X...." (416) 499-4292".....UP.
1:. 835:. 850:......" .PROGRAM NAME:
READER..J...." WRITTEN BY : J. T.
PARR":..19)"OCTOBER 1978."......" UP
GRADED BY : QUINCY LEE":..19)"JULY 1982"
......" .THIS PROGRAM WILL RUN ON AN
Y...R...." BASIC 2.0 PET COMPUTE
R......." BASIC 4.0 PET COMPUTER
......." 8032 CBM COMPUTER..@...
." COMMODORE 64 COMPUTER.I....83
5.].N..UZ.1..UP%:.217.C.W.....X.. ** PRO
GRAM MODIFICATION INST **...Y..".":.UT,U
L%...].UP.0:UG$."PROGRAM MOD":.850.C....
835.W....UZ.1..UP%:.217............ ** T
O USE 8032 LOAD CBM4032 **.8.F..".....BE
FORE RUNNING THIS PROGRAM ON AN 8032 ..
.N.P.." LOAD THE 'CBM 4032' PROGRAM
.............".Y.Z..UU.71........ .. **
T I T L E P A G E **.S.".."....";:.UT
,UU%:.B(50003).0..53280,14:.53281,6...$.
.I.1.38:."...";:....&..I.1.22:.".....";:
....(..I.1.37:.".....";:..1.*..I.1.22:."
.....";:..V.,.."........................
... ..X...."................... . . ..
...0.."................... . ......2.."
.................... ....4.."..........
....C O M M O D O R E.....6.."..........
.....EDUCATIONAL...!.8.."...............
.SOFTWARE.<.:.. ** COMMODORE LOGO **.T.;
..H(UD$,24);"..........PRESS SPACE BAR O
R WAIT.":I.0...<..A$:.A$.." ".I.I.1:.I.2
50.828...>.T1$."":T2$."":T3$."":T4$."":I
.0.C.@..300...C.. ** SPACE BAR PRESS **.
..H..UO,0:.H(UD$,24);".......PRESS SPACE
BAR TO CONTINUE.".1.L..UI$:.UI$.." ".84
4.7.N...W.R.. ** PAGE DESIGN ROUTINE **.
C.T.UP.UP.1...W.."."H(UT$.UP$,21);I(UP$.
UG$.D(UP),18)...\.." -------------------
-------------------".K.`..UH..0.870...A.
.H(UD$,24);H(UP$,7);"HELP - PRESS H <R
ETURN>"...F.."..":..*.K.. ** PLEASE WAIT
REMARK **.`.P..H(UD$,24);" ON
E MOMENT PLEASE... ".F.U........ **
SET UP VARIABLES **.N...UX$."H":.UQ%(100
0):UB.32768:U1.196:U2.197:U3.198:U4.216:
UC.167:UU.1024.....UT.59468:UU%.12:UL%.1
4:UP%.1146:UM.32768:UO.158:. 50003,0.O..
..B(50003).0.UB.1024:U1.209:U2.210:U3.21
1:U4.214:UC.204:UU.2048......B(50003).0.
UT.53272:UU%.21:UL%.23:UP%.2139:UM.1024:
UO.198.....UD$."........................
.".....UP$."
".....UT$." READER"..........
.. ** SET VARIABLES **......900.:.... **
CHECK FOR 8032 **.X....".":." ":. SHIFT
ED SPACE.O....B(UB.40)..96..700...... **
MEMORY CHECK **...... .(0).2000.937.J..
.."....THIS MACHINE DOES NOT HAVE ENOUGH
."......"MEMORY TO RUN THIS PROGRAM !"..
....UU.71............"..":.B(50003).0.96
2.H.... ** BASIC 2.0 OR 4.0 OR C-64
SETUP **......1075,133:.1076,144:.1077,2
34:.1079,4:.1080,133:.1081,145......1091
,155:.1098,133:.1099,144:.1100,234:.1103
,133......1104,145:.1105,234:.1082,234..
....B(50003)..160.955.$....1093,88:.1094
,228:.1097,85:.1102,228:.965.9....B(5000
3)..1.990.H....1093,49:.1094,230:.1097,4
6:.1102,230:.965...B..2099,141:.2100,20:
.2101,3:.2103,8:.2104,141:.2105,21...C..
2106,3:.2115,145:.2117,52:.2118,234:.212
1,49:.2122,141...D..2123,20:.2124,3:.212
6,234:.2127,141:.2128,21:.2129,3.6.E..UU
.48:. DISABLE STOP KEY.G.J..800:. TITLE.
W.T..300:. MENU......".THE PGM WILL NOT
WORK ON THIS MACHINE!":.......UZ.1..UP%:
.UP%:UZ.0:. ** PROGRAM STARTS HERE **...
..."..";:.:.B(50003).0..53281,6:.53280,6
...L..: R E A D E R.! V..: J T PARR
OCTOBER, 1978.8 `..: 2109 PEIRCE AVE
.V J..: BLOOMINGTON, ILL 61701.\ T... ~
.. PERMISSION TO USE, NOT SELL.. .....
..B$."":.".":. UT,UL%:.875.. ... I.1 . 3
9.B ..:. B$.B$." ".S ..:. C$.C$.".".. ..
:. I.. ... T2.60.. ..... ... S.1:. 2230.
.!(.. 2310:.---CHOOSE SPEED.!!2...;!<..
PRINT THE PASSAGE.F!F.. ".";.Z!P.. T0.
TI:. T1.TI.K!Z.. P.1 . 1E11.|!D.:. ".";V
$;B$..!N.:. L.1 . 12..!X.: .---READ AND
PRINT..!..: . L$.N!..: . L$."." . L$."Q"
. 1500..!..: . L9.L9.1..! .: . L$.H(L$.B
$,39).."..: . V$;L$.."..: . L.12 . . 178
0./"..: . 1830:. DELAY.9"H.: . L.B"R.:.
P.R"..:. T8.TI.T0.N"... - - - WIPE OUT
SCREEN.."...UO,0:M$.".... PRESS <RETURN>
WHEN YOU FINISH .".."... L.11 . 1580.H"
... M$:.:. M$."".U"... L7.L.2.."... L8.1
2..#".. 1640:.FL$."STOPPED".1720..#,.:..
#6.. ".";M$. #@.. L8.L.1.+#J.. L7.1.O#T.
. 1640:.FL$."STOPPED".1720.1570.Z#^.. 17
20.R#H.FL$."":. L1.L7 . L8..#R.:. A$:.A$
.G(13).FL$."STOPPED":.1700..#|.:. V$;B$.
.#..:. 1780..#..:. 1830.I#..:. L1.O#....
.#... - - - CALC TIME..#... T9.TI.T0..$B
.. M0..(3600.L9.7.T8..5).,$L.. M1..(3600
.L9.7.T9..5).Z$Q..".
".$V.." YOU READ TH
E PASSAGE AT"M1..$..." TO"M0"WORDS PE
R MINUTE.":.835..$... 1880.P$... - - - C
ANCEL SUBROUTINE..$... V$;B$..$... V$;C$
..$... ".";..$.....%&.. D E L A Y."%0
.. TI.T1.T2 . 1840..%:.. T1.TI.4%D...N%N
..---Q U E S T I O N S.K%X.UP.0:UG$."COM
PREHENSION".|%L.. I.1 . 1E30..%N..L$:. L
$."E" . 2020..%O..850:."... .TRUE. OR
.FALSE.."..%Q.." ACCORDING TO T
HE PASSAGE,"..%V.:. J.1 . 1E30..&..: . L
$..&..: . L$."A" . 1970.'&..: ." "L$.
1&..: . J.Z&..:.". ";:US$."HTF":UL.1:
.35:R$.UR$.`&..:.M&..:. A$,C$..&F.:.:.".
.";A$:.". ";C$..&P.:.835. &Z.:. I
..&...:..F&... CHOOSE BLACK OR WHITE.N
&4.W.1..&>.. SET REVERSE CHARS..&C..W.
.2.V$."."..'H.. W.2 . V$."."..'R...+'\..
SELECTION CHOICE.1'F...T'P..:.".":. "
CHOOSE A PASSAGE:":..C'Z.. I.1 . 10.M'..
:. L$..'..:. L$."." . 2220..'..:.:.I;L$.
.'..:.. '...:. S..'...---SKIP TO SELECTI
ON.H'... I.1 . S.Z'J.:. J.1 . 1000..'T.:
. L$..'..: . L$."." . 2290..(..: . J..(
..:. I..(....)(...---SPEED CHOICE.D(..UP
.0:UG$."READER":.850.R(... ".... 1
. 100-150 WORDS PER MINUTE..($.. "
2. 150-200 WPM..(... " 3. 200-250
WPM.I(8.. " 4. 250-300 WPM..(B..
" 5. 300-350 WPM..)L.. " 6.
350-450 WPM. )V.. " 7. 400-500 WPM
.=)`.. " 8. 450-550 WPM.Z)J.. "
9. 500-630 WPM..)O..".. AT WHAT S
PEED WOULD YOU LIKE TO"..)Q.." READ?
(1-9) ";.J)T.US$."12345567890H":UL.1:.3
5:A.E(UR$).T)~..2030..)... T2.400.(A.1).
.).....*...-----SELECTIONS..*... "..7*..
. " THIS IS A SAMPLE READING PROGRAM .
F*... "TO GIVE YOU A ROUGH IDEA OF SOME
OF THE..*D.. "CAPABILITIES OF A MICROCOM
PUTER LIKE..*N.. "THIS ONE IN THE CLASSR
OOM. SOME COM-..*X.. "MERCIAL SOFTWARE
COMPANY MAY WELL COME..+... "OUT WITH A
SERIES OF READING PROGRAMS.G+... "WITH M
ORE FEATURES THAN THIS ONE HAS..T+... "
FOR CLASSROOM USE, THESE PASSAGES ..+.
.. "WOULD BE REPLACED WITH ONES CHOSEN F
OR.P+... "THE LEVEL OF THE PUPILS. THIS
PROGRAM..+... "IS WRITTEN SO THAT NEW D
ATA STATEMENTS.*,... "COULD BE TYPED IN,
WITHOUT ANY OTHER.Y,(.. "CHANGE IN THE
PROGRAM. ONE WOULD PROB-..,2.. "ABLY KE
EP SEVERAL COPIES OF THE PROGRAM..,<.. "
ON DISKETTES, EACH WITH DIFFERENT PASS-.
D,F.. "AGES...,P.. " THIS PROGRAM USES
TWO SPECIAL FEA-. -Z.. "TURES OF THE PE
T MICROCOMPUTER: CONTROL.N-D.. "OF THE T
V IMAGE, AND TIMING. MOST OF .{-N.. "TH
E MICROCOMPUTERS ONE WOULD CONSIDER..-X.
. "FOR CLASSROOM USE HAVE THESE FEATURES
,.W-... "THOUGH NOT ALL HAVE LOWER-CASE
LETTERS...... "LIKE THESE. TIME-SHARING
TERMINALS MAY.4.... "USE TV SCREENS, BU
T OFTEN DO NOT ALLOW.A. .. "THE KIND OF
CONTROL USED BY THIS PRO-...... "GRAM.
A TIME-SHARING SYSTEM GENERALLY ...... "
DOES NOT PROVIDE PRECISE TIMING, AS IT..
.... "MAY BE SERVICING A DIFFERENT PROGR
AM../H.. "JUST WHEN IT SHOULD BE PRINTIN
G THE .(/R.. "NEXT LINE..T/... " THE P
ROGRAM AND ITS TEXT PASSAGES.|/... "OCCU
PY ABOUT 8K (8000) BYTES OF../... "THIS
PET'S READ-WRITE MEMORY. A MORE .Y/...
"AMBITIOUS PROGRAM COULD BE ACCOMMODATE
D..0... "BY GETTING MORE MEMORY OR BY US
ING MORE.50... "OF THE PRESENT 8K FOR TH
E PROGRAM AND._0... "READING THE PASSAGE
S FROM EXTERNAL.{0".. "FILES ON A DISKET
TE...0,.. " ADDITIONS TO THE PROGRAM M
IGHT IN-.W06.. "CLUDE: ALLOWING THE REA
DER TO SPEED UP..1@.. "OR SLOW DOWN THE
PASSAGE WHILE IT IS .31J.. "BEING PRESEN
TED; REDUCING THE NUMBER OF.^1T.. "LINES
ON THE SCREEN AT ONE TIME TO ..1^.. "FO
RCE THE READER TO KEEP UP; TESTING..1H..
"FOR COMPREHENSION MORE CAREFULLY;..1R.
. "COACHING IN READING TECHNIQUES; AND R
E-..2|.. "CORDING THE PUPIL'S ACHEIVEMEN
TS...2... Q.?2... "","READING PROGRAMS L
IKE THIS CAN BE.[2... "BOUGHT COMMERCIAL
LY...2... A,FALSE,"NOT THAT WE KNOW OF,
BUT MAYBE SOON.".B2... "","TIME
-SHARING SYSTEMS ARE LESS"..2... "LIKELY
TO BE ABLE TO DO A PROGRAM LIKE T
HIS...3B.. A,TRUE.R3G.. "THEY DON'T GENE
RALLY ALLOW SUCH SCREEN CONTROL
OR TIMING..|3L.. "","USING DIFFERENT PAS
SAGES WOULD"..3V.. "MEAN REWRITING THE P
ROGRAM...3... A,FALSE,"ONLY THE NEW TEXT
WOULD HAVE TO BE ENTERED...4... ""
,"MOST MICROS COULD HANDLE THIS...4... A
,TRUE,"". 4... E...
> CLICK IMAGE PREVIEW FOR FULL MODAL