ROOTS QUIZ.C3
FILE INFORMATION
FILENAME(S): ROOTS QUIZ.C3
FILE TYPE(S): PRG
FILE SIZE: 10.1K
FIRST SEEN: 2025-11-30 01:07:55
APPEARS ON: 2 disk(s)
FILE HASH
316a3dcef0195d739b3fb62130d9b7e4ed51b5af63a8f5cdc154398a2d3841a1
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | ROOTS QUIZ.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 28 | 3 | DOWNLOAD FILE |
| L EHRNEN | ROOTS QUIZ.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 28 | 3 | 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 EA |UTINE **.....:..|
000000D0: 08 23 00 8F 20 2B 2B 2B 20 49 4E 50 55 54 20 53 |.#.. +++ INPUT S|
000000E0: 45 43 54 49 4F 4E 20 2B 2B 2B 00 02 09 28 00 97 |ECTION +++...(..|
000000F0: 55 4F 2C 30 3A 55 52 24 B2 22 22 3A 55 49 24 B2 |UO,0:UR$."":UI$.|
00000100: 22 22 00 14 09 29 00 55 52 24 B2 22 22 3A 55 49 |""...).UR$."":UI|
00000110: 24 B2 22 22 00 24 09 2A 00 8B 55 4C B2 30 A7 55 |$."".$.*..UL.0.U|
00000120: 4C B2 38 30 00 37 09 2D 00 99 22 20 20 9D 9D 22 |L.80.7.-.." .."|
00000130: 3B 3A 97 55 43 2C 30 00 4B 09 32 00 A1 55 49 24 |;:.UC,0.K.2..UI$|
00000140: 3A 8B 55 49 24 B2 22 22 A7 35 30 00 75 09 37 00 |:.UI$."".50.u.7.|
00000150: 8B 55 49 24 B2 C7 28 31 33 29 AF C3 28 55 52 24 |.UI$..(13)..(UR$|
00000160: 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 22 20 9D 22 |)..1..UC,1:." ."|
00000170: 3B 3A 89 38 35 00 88 09 3C 00 8B 55 49 24 B2 C7 |;:.85...<..UI$..|
00000180: 28 32 30 29 A7 31 30 35 00 9C 09 3E 00 8B 20 C3 |(20).105...>.. .|
00000190: 28 55 52 24 29 B2 B1 55 4C A7 35 30 00 C1 09 41 |(UR$)..UL.50...A|
000001A0: 00 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F |..120:. CHECK FO|
000001B0: 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 |R VALID CHARACTE|
000001C0: 52 00 D1 09 46 00 55 52 24 B2 55 52 24 AA 55 49 |R...F.UR$.UR$.UI|
000001D0: 24 00 DB 09 4B 00 99 55 49 24 3B 00 E3 09 50 00 |$...K..UI$;...P.|
000001E0: 89 35 30 00 08 0A 55 00 8F 40 2B 2B 2B 20 43 48 |.50...U..@+++ CH|
000001F0: 45 43 4B 20 46 4F 52 20 48 45 4C 50 20 52 45 51 |ECK FOR HELP REQ|
00000200: 55 45 53 54 20 2B 2B 2B 00 30 0A 5A 00 8B 55 52 |UEST +++.0.Z..UR|
00000210: 24 B2 55 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 |$.UX$.195:. EXIT|
00000220: 20 54 4F 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 | TO HELP ROUTINE|
00000230: 00 3F 0A 5F 00 8B 55 46 B2 31 A7 8D 32 34 30 00 |.?._..UF.1..240.|
00000240: 4C 0A 64 00 55 46 B2 30 3A 99 3A 8E 00 65 0A 66 |L.d.UF.0:.:..e.f|
00000250: 00 8F 20 2B 2B 20 43 48 45 43 4B 20 44 45 4C 45 |.. ++ CHECK DELE|
00000260: 54 45 20 2B 2B 00 76 0A 69 00 8B C3 28 55 52 24 |TE ++.v.i...(UR$|
00000270: 29 B3 31 A7 35 30 00 8E 0A 6E 00 55 52 24 B2 C8 |).1.50...n.UR$..|
00000280: 28 55 52 24 2C C3 28 55 52 24 29 AB 31 29 00 A0 |(UR$,.(UR$).1)..|
00000290: 0A 73 00 99 22 9D 20 20 9D 9D 22 3B 3A 89 35 30 |.s..". ..";:.50|
000002A0: 00 C7 0A 78 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |...x.. ++ CHECK |
000002B0: 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 |FOR VALID CHARAC|
000002C0: 54 45 52 53 20 2B 2B 00 D9 0A 7D 00 8B C3 28 55 |TERS ++...}...(U|
000002D0: 53 24 29 B2 30 A7 31 35 30 00 E9 0A 7F 00 55 53 |S$).0.150.....US|
000002E0: 24 B2 55 53 24 AA 55 58 24 00 FA 0A 82 00 81 55 |$.US$.UX$......U|
000002F0: 53 B2 31 A4 C3 28 55 53 24 29 00 11 0B 87 00 8B |S.1..(US$)......|
00000300: 55 49 24 B2 CA 28 55 53 24 2C 55 53 2C 31 29 A7 |UI$..(US$,US,1).|
00000310: 8E 00 17 0B 8C 00 82 00 24 0B 91 00 55 49 24 B2 |........$...UI$.|
00000320: 22 22 3A 8E 00 3F 0B 96 00 8F 20 2A 2A 20 53 54 |"":..?.... ** ST|
00000330: 41 4E 44 41 52 44 20 49 4E 50 55 54 20 2A 2A 00 |ANDARD INPUT **.|
00000340: 50 0B 98 00 8B C6 28 55 49 24 29 B2 34 36 A7 8E |P.....(UI$).46..|
00000350: 00 61 0B 9B 00 8B 55 49 24 B2 C7 28 33 32 29 A7 |.a....UI$..(32).|
00000360: 8E 00 7E 0B A0 00 8B C6 28 55 49 24 29 B3 34 38 |..~.....(UI$).48|
00000370: B0 C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 84 |..(UI$).57.170..|
00000380: 0B A5 00 8E 00 A1 0B AA 00 8B C6 28 55 49 24 29 |...........(UI$)|
00000390: B3 36 35 B0 C6 28 55 49 24 29 B1 39 30 A7 31 38 |.65..(UI$).90.18|
000003A0: 30 00 A7 0B AF 00 8E 00 CB 0B B4 00 8B C6 28 55 |0.............(U|
000003B0: 49 24 29 B3 31 39 33 B0 C6 28 55 49 24 29 B1 32 |I$).193..(UI$).2|
000003C0: 31 38 A7 55 49 24 B2 22 22 3A 8E 00 EE 0B B9 00 |18.UI$."":......|
000003D0: 8B C2 28 55 54 29 B2 55 55 25 A7 55 49 24 B2 C7 |..(UT).UU%.UI$..|
000003E0: 28 C6 28 55 49 24 29 AB 31 32 38 29 3A 8E 00 F4 |(.(UI$).128):...|
000003F0: 0B BB 00 8E 00 01 0C BE 00 55 49 24 B2 22 22 3A |.........UI$."":|
00000400: 8E 00 26 0C C3 00 55 46 B2 31 3A 8F 20 2B 2B 2B |..&...UF.1:. +++|
00000410: 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 58 | HELP ROUTINE EX|
00000420: 49 54 20 2B 2B 2B 00 2F 0C C5 00 8D 32 35 30 00 |IT +++./....250.|
00000430: 38 0C C8 00 8D 32 34 35 00 57 0C CD 00 81 55 51 |8....245.W....UQ|
00000440: B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 |.UB.(U2%.256.U1%|
00000450: AA 55 33 25 AB 32 29 00 73 0C D2 00 55 51 25 28 |.U3%.2).s...UQ%(|
00000460: 55 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 |UQ.UB)..(UQ):.:.|
00000470: 22 93 22 00 86 0C D7 00 55 5A B2 31 3A 55 56 25 |".".....UZ.1:UV%|
00000480: B2 C2 28 55 54 29 00 8F 0C D8 00 89 33 30 30 00 |..(UT)......300.|
00000490: B4 0C D9 00 55 5A B2 30 3A 55 53 24 B2 55 4A 24 |....UZ.0:US$.UJ$|
000004A0: 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 |:UG$.UK$:UP.UJ:U|
000004B0: 4C B2 55 4B 00 EB 0C DA 00 8B C2 28 35 30 30 30 |L.UK.......(5000|
000004C0: 33 29 B2 30 A7 97 35 33 32 38 31 2C 31 3A 99 22 |3).0..53281,1:."|
000004D0: 93 22 3B 3A 97 35 33 32 38 31 2C 36 3A 97 35 33 |.";:.53281,6:.53|
000004E0: 32 38 30 2C 31 34 3A 89 32 32 30 00 F5 0C DB 00 |280,14:.220.....|
000004F0: 99 22 93 22 3B 00 24 0D DC 00 55 54 24 B2 55 4C |.".";.$...UT$.UL|
00000500: 24 3A 97 55 54 2C 55 56 25 3A 81 55 51 B2 55 42 |$:.UT,UV%:.UQ.UB|
00000510: A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 |.(U2%.256.U1%.U3|
00000520: 25 AB 33 29 00 39 0D E1 00 97 55 51 2C 55 51 25 |%.3).9....UQ,UQ%|
00000530: 28 55 51 AB 55 42 29 3A 82 00 45 0D E6 00 97 55 |(UQ.UB):..E....U|
00000540: 31 2C 55 31 25 00 51 0D E8 00 97 55 32 2C 55 32 |1,U1%.Q....U2,U2|
00000550: 25 00 5D 0D E9 00 97 55 34 2C 55 34 25 00 6B 0D |%.]....U4,U4%.k.|
00000560: EA 00 97 55 33 2C 55 33 25 AB 31 00 73 0D EB 00 |...U3,U3%.1.s...|
00000570: 89 33 35 00 A5 0D F0 00 55 44 25 B2 28 28 55 32 |.35.....UD%.((U2|
00000580: 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 29 AB 55 |%.256.U1%.U3%).U|
00000590: 42 29 AD 34 30 3A 99 C8 28 55 44 24 2C 55 44 25 |B).40:..(UD$,UD%|
000005A0: AA 31 29 3A 8E 00 E0 0D F5 00 99 C8 28 55 44 24 |.1):........(UD$|
000005B0: 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 |,24);" |
000005C0: 20 20 20 20 20 20 20 20 20 20 20 20 12 20 48 45 | . HE|
000005D0: 4C 50 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E |LP COMING . ":.|
000005E0: 00 0C 0E FA 00 55 31 25 B2 C2 28 55 31 29 3A 55 |.....U1%..(U1):U|
000005F0: 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 |2%..(U2):U3%..(U|
00000600: 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 34 0E FB |3):U4%..(U4).4..|
00000610: 00 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 55 47 24 |.UJ$.US$:UK$.UG$|
00000620: 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 55 50 3A 55 |:UL$.UT$:UJ.UP:U|
00000630: 4B B2 55 4C 00 3A 0E FF 00 8E 00 4B 0E 2C 01 8F |K.UL.:.....K.,..|
00000640: 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 51 0E 2D 01 | ** MENU **.Q.-.|
00000650: 3A 00 80 0E 2E 01 99 22 93 22 3A 97 55 54 2C 55 |:......".":.UT,U|
00000660: 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 |U%:..(50003).0..|
00000670: 35 33 32 38 31 2C 39 3A 97 35 33 32 38 30 2C 38 |53281,9:.53280,8|
00000680: 00 86 0E 2F 01 3A 00 A3 0E 31 01 99 22 13 20 20 |.../.:...1..". |
00000690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4D 45 | ME|
000006A0: 4E 55 22 00 D2 0E 36 01 99 22 20 2D 2D 2D 2D 2D |NU"...6.." -----|
000006B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006D0: 2D 22 00 FB 0E 3B 01 99 22 11 11 20 20 20 20 20 |-"...;..".. |
000006E0: 20 20 31 2E 20 20 20 42 45 47 49 4E 20 52 4F 4F | 1. BEGIN ROO|
000006F0: 54 53 20 51 55 49 5A 20 20 20 22 00 25 0F 40 01 |TS QUIZ ".%.@.|
00000700: 99 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 |.".. 2. |
00000710: 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 |STUDENT INSTRUCT|
00000720: 49 4F 4E 53 22 00 4F 0F 45 01 99 22 11 11 20 20 |IONS".O.E..".. |
00000730: 20 20 20 20 20 33 2E 20 20 20 54 45 41 43 48 45 | 3. TEACHE|
00000740: 52 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 |R INSTRUCTIONS".|
00000750: 7C 0F 4A 01 99 22 11 11 20 20 20 20 20 20 20 34 ||.J..".. 4|
00000760: 2E 20 20 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E |. MODIFICATION|
00000770: 20 4F 46 20 50 52 4F 47 52 41 4D 22 00 98 0F 4F | OF PROGRAM"...O|
00000780: 01 99 22 11 11 20 20 20 20 20 20 20 35 2E 20 20 |..".. 5. |
00000790: 20 51 55 49 54 11 11 22 00 C7 0F 54 01 99 22 20 | QUIT.."...T.." |
000007A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007C0: 2D 2D 2D 2D 2D 2D 22 00 F2 0F 59 01 99 22 11 11 |------"...Y.."..|
000007D0: 20 20 20 20 20 20 20 50 52 45 53 53 20 41 20 4E | PRESS A N|
000007E0: 55 4D 42 45 52 20 4B 45 59 20 28 31 2D 35 29 20 |UMBER KEY (1-5) |
000007F0: 22 3B 00 1B 10 5E 01 55 4C B2 31 3A 55 53 24 B2 |";...^.UL.1:US$.|
00000800: 22 31 32 33 34 35 22 3A 8D 33 35 3A 8F 20 49 4E |"12345":.35:. IN|
00000810: 50 55 54 20 52 4F 55 54 49 4E 45 00 32 10 5F 01 |PUT ROUTINE.2._.|
00000820: 55 41 B2 30 3A 8B C3 28 55 52 24 29 B1 31 A7 33 |UA.0:..(UR$).1.3|
00000830: 30 30 00 3D 10 60 01 55 53 24 B2 22 22 00 5E 10 |00.=.`.US$."".^.|
00000840: 63 01 91 C5 28 55 52 24 29 8D 31 30 30 30 2C 34 |c...(UR$).1000,4|
00000850: 30 30 2C 35 30 30 2C 36 30 30 2C 33 39 36 00 67 |00,500,600,396.g|
00000860: 10 68 01 89 33 30 30 00 8E 10 8B 01 8F 20 2A 2A |.h..300...... **|
00000870: 20 52 45 2D 45 4E 41 42 4C 45 20 53 54 4F 50 20 | RE-ENABLE STOP |
00000880: 4B 45 59 20 41 4E 44 20 45 4E 44 20 2A 2A 00 BD |KEY AND END **..|
00000890: 10 8C 01 8B C2 28 35 30 30 30 33 29 B3 B1 31 AF |.....(50003)..1.|
000008A0: C2 28 35 30 30 30 33 29 B3 B1 31 36 30 AF C2 28 |.(50003)..160..(|
000008B0: 35 30 30 30 33 29 B3 B1 30 A7 33 39 39 00 E7 10 |50003)..0.399...|
000008C0: 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 35 30 30 30 |...UU.71:..(5000|
000008D0: 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 |3).0..53281,6:.5|
000008E0: 33 32 38 30 2C 31 34 00 F3 10 8E 01 99 22 9A 93 |3280,14......"..|
000008F0: 22 3A 80 00 FE 10 8F 01 8D 38 37 35 3A 8E 00 1F |":.......875:...|
00000900: 11 90 01 8F 20 2A 2A 20 53 54 55 44 45 4E 54 20 |.... ** STUDENT |
00000910: 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 |INSTRUCTIONS **.|
00000920: 4E 11 95 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 |N....".":.UT,UL%|
00000930: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
00000940: 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 6F |281,0:.53280,0.o|
00000950: 11 9A 01 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 |...UP.0:UG$.".TU|
00000960: 44 45 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 |DENT .NST":.850.|
00000970: A0 11 9B 01 99 22 11 20 D4 48 49 53 20 50 52 4F |.....". .HIS PRO|
00000980: 47 52 41 4D 20 57 41 53 20 44 45 53 49 47 4E 45 |GRAM WAS DESIGNE|
00000990: 44 20 54 4F 20 48 45 4C 50 20 59 4F 55 22 3A 99 |D TO HELP YOU":.|
000009A0: 00 D0 11 9C 01 99 22 20 44 45 56 45 4C 4F 50 20 |......" DEVELOP |
000009B0: 59 4F 55 52 20 53 4B 49 4C 4C 20 49 4E 20 46 49 |YOUR SKILL IN FI|
000009C0: 4E 44 49 4E 47 20 54 48 45 20 52 4F 4F 54 53 22 |NDING THE ROOTS"|
000009D0: 00 FD 11 9E 01 99 22 20 4F 46 20 41 20 54 52 49 |......" OF A TRI|
000009E0: 4E 4F 4D 49 41 4C 2E 20 20 C9 20 57 49 4C 4C 20 |NOMIAL. . WILL |
000009F0: 47 49 56 45 20 59 4F 55 20 32 22 3A 99 00 2E 12 |GIVE YOU 2":....|
00000A00: A0 01 99 22 20 43 48 41 4E 43 45 53 20 54 4F 20 |..." CHANCES TO |
00000A10: 47 45 54 20 54 48 45 20 41 4E 53 57 45 52 20 43 |GET THE ANSWER C|
00000A20: 4F 52 52 45 43 54 2E 20 D9 4F 55 22 3A 99 00 5B |ORRECT. .OU":..[|
00000A30: 12 A2 01 99 22 20 57 49 4C 4C 20 48 41 56 45 20 |...." WILL HAVE |
00000A40: 54 4F 20 47 49 56 45 20 32 20 52 4F 4F 54 53 20 |TO GIVE 2 ROOTS |
00000A50: 46 4F 52 20 45 41 43 48 22 3A 99 00 8C 12 A4 01 |FOR EACH":......|
00000A60: 99 22 20 54 52 49 4E 4F 4D 49 41 4C 2E 20 20 D9 |." TRINOMIAL. .|
00000A70: 4F 55 20 57 49 4C 4C 20 52 45 43 45 49 56 45 20 |OU WILL RECEIVE |
00000A80: 4F 4E 45 20 50 4F 49 4E 54 22 3A 99 00 B9 12 A6 |ONE POINT":.....|
00000A90: 01 99 22 20 46 4F 52 20 45 41 43 48 20 43 4F 52 |.." FOR EACH COR|
00000AA0: 52 45 43 54 20 41 4E 53 57 45 52 2C 20 41 4E 44 |RECT ANSWER, AND|
00000AB0: 20 41 46 54 45 52 22 3A 99 00 EA 12 A8 01 99 22 | AFTER":......."|
00000AC0: 20 59 4F 55 20 48 41 56 45 20 41 51 55 49 52 45 | YOU HAVE AQUIRE|
00000AD0: 44 20 32 30 20 50 4F 49 4E 54 53 2C 20 59 4F 55 |D 20 POINTS, YOU|
00000AE0: 52 20 46 49 4E 41 4C 22 3A 99 00 06 13 AA 01 99 |R FINAL":.......|
00000AF0: 22 20 4D 41 52 4B 20 57 49 4C 4C 20 42 45 20 53 |" MARK WILL BE S|
00000B00: 48 4F 57 4E 2E 22 00 1E 13 AB 01 8D 38 33 35 3A |HOWN."......835:|
00000B10: 55 50 B2 31 3A 8D 38 35 30 3A 55 50 B2 30 00 50 |UP.1:.850:UP.0.P|
00000B20: 13 AC 01 99 22 11 11 11 11 11 20 20 D0 52 45 53 |...."..... .RES|
00000B30: 53 20 D2 C5 D4 D5 D2 CE 20 41 46 54 45 52 20 45 |S ...... AFTER E|
00000B40: 41 43 48 20 49 4E 50 55 54 20 41 4E 44 22 3A 99 |ACH INPUT AND":.|
00000B50: 00 7F 13 AE 01 99 22 20 50 52 45 53 53 20 C8 20 |......" PRESS . |
00000B60: 41 4E 44 20 D2 C5 D4 D5 D2 CE 20 49 46 20 59 4F |AND ...... IF YO|
00000B70: 55 20 57 41 4E 54 20 54 4F 20 47 4F 22 3A 99 00 |U WANT TO GO":..|
00000B80: 99 13 B0 01 99 22 20 42 41 43 4B 20 54 4F 20 54 |....." BACK TO T|
00000B90: 48 45 20 4D 45 4E 55 2E 22 00 A2 13 E5 01 8D 38 |HE MENU."......8|
00000BA0: 33 35 00 B6 13 EA 01 8B 55 5A B2 31 A7 9E 55 50 |35......UZ.1..UP|
00000BB0: 25 3A 89 32 31 37 00 BC 13 F3 01 8E 00 DD 13 F4 |%:.217..........|
00000BC0: 01 8F 20 2A 2A 20 54 45 41 43 48 45 52 20 49 4E |.. ** TEACHER IN|
00000BD0: 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 0D 14 |STRUCTIONS **...|
00000BE0: F5 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B |...".":.UT,UL%:.|
00000BF0: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000C00: 31 2C 32 3A 97 35 33 32 38 30 2C 31 30 00 2E 14 |1,2:.53280,10...|
00000C10: F6 01 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 |..UP.0:UG$.".EAC|
00000C20: 48 45 52 20 C9 4E 53 54 22 3A 8D 38 35 30 00 5C |HER .NST":.850.\|
00000C30: 14 F7 01 99 22 11 11 20 20 20 20 20 20 D4 4F 20 |....".. .O |
00000C40: 54 48 45 20 42 45 53 54 20 4F 46 20 4F 55 52 20 |THE BEST OF OUR |
00000C50: 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 85 14 F8 |KNOWLEDGE,."....|
00000C60: 01 99 22 20 20 20 54 48 49 53 20 50 52 4F 47 52 |.." THIS PROGR|
00000C70: 41 4D 20 49 53 20 49 4E 20 54 48 45 20 50 55 42 |AM IS IN THE PUB|
00000C80: 4C 49 43 11 22 00 B1 14 F9 01 99 22 20 20 20 44 |LIC."......" D|
00000C90: 4F 4D 41 49 4E 2E 20 20 C9 46 20 54 48 49 53 20 |OMAIN. .F THIS |
00000CA0: 49 53 20 4E 4F 54 20 54 48 45 20 43 41 53 45 11 |IS NOT THE CASE.|
00000CB0: 22 00 CE 14 FA 01 99 22 20 20 20 50 4C 45 41 53 |"......" PLEAS|
00000CC0: 45 20 43 4F 4E 54 41 43 54 3A 11 11 11 22 00 F8 |E CONTACT:..."..|
00000CD0: 14 FB 01 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F |...." .OMMO|
00000CE0: 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 |DORE .USINESS .A|
00000CF0: 43 48 49 4E 45 53 11 22 00 1B 15 FC 01 99 22 20 |CHINES."......" |
00000D00: 20 20 20 20 20 20 20 20 20 33 33 37 30 20 D0 48 | 3370 .H|
00000D10: 41 52 4D 41 43 59 20 C1 56 45 2E 00 3F 15 FD 01 |ARMACY .VE..?...|
00000D20: 99 22 20 20 20 20 20 20 20 20 20 20 C1 47 49 4E |." .GIN|
00000D30: 43 4F 55 52 54 2C 20 CF 4E 54 41 52 49 4F 22 00 |COURT, .NTARIO".|
00000D40: 61 15 FE 01 99 22 20 20 20 20 20 20 20 20 20 20 |a...." |
00000D50: C3 41 4E 41 44 41 20 20 20 CD 31 D7 20 32 CB 34 |.ANADA .1. 2.4|
00000D60: 22 00 81 15 FF 01 99 22 20 20 20 20 20 20 20 20 |"......" |
00000D70: 20 20 28 34 31 36 29 20 34 39 39 2D 34 32 39 32 | (416) 499-4292|
00000D80: 22 00 97 15 00 02 55 50 B2 31 3A 8D 20 38 33 35 |".....UP.1:. 835|
00000D90: 3A 8D 20 38 35 30 3A 00 C1 15 01 02 99 22 20 20 |:. 850:......" |
00000DA0: 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D | ...ROGRAM .AM|
00000DB0: 45 3A 20 D2 4F 4F 54 53 20 D1 55 49 5A 20 20 20 |E: .OOTS .UIZ |
00000DC0: 11 00 EB 15 02 02 99 22 20 20 20 20 20 D7 52 49 |......." .RI|
00000DD0: 54 54 45 4E 20 C2 59 20 20 3A 20 D2 2E 20 CD 41 |TTEN .Y : .. .A|
00000DE0: 43 CE 41 55 47 48 54 4F 4E 11 22 00 0F 16 03 02 |C.AUGHTON.".....|
00000DF0: 99 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 20 |." .PGRADED |
00000E00: C2 59 20 3A 20 C1 2E 20 CC 45 45 20 20 20 11 00 |.Y : .. .EE ..|
00000E10: 3A 16 04 02 99 22 20 20 20 20 20 11 D4 48 49 53 |:...." ..HIS|
00000E20: 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 | PROGRAM WILL RU|
00000E30: 4E 20 4F 4E 20 41 4E 59 11 11 00 5A 16 07 02 99 |N ON ANY...Z....|
00000E40: 22 20 20 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 |" ... 64|
00000E50: 20 C3 CF CD D0 D5 D4 C5 D2 11 00 7F 16 08 02 99 | ...............|
00000E60: 22 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF C4 |" ......|
00000E70: CF D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 |... 64 .........|
00000E80: 88 16 09 02 8D 38 33 35 00 91 16 0C 02 8D 38 35 |.....835......85|
00000E90: 30 00 C1 16 0E 02 99 22 11 11 20 20 D4 48 49 53 |0......".. .HIS|
00000EA0: 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 48 45 | PROGRAM WILL HE|
00000EB0: 4C 50 20 54 48 45 20 53 54 55 44 45 4E 54 22 3A |LP THE STUDENT":|
00000EC0: 99 00 F2 16 10 02 99 22 20 54 4F 20 44 45 56 45 |......." TO DEVE|
00000ED0: 4C 4F 50 20 54 48 45 49 52 20 53 4B 49 4C 4C 53 |LOP THEIR SKILLS|
00000EE0: 20 49 4E 20 43 41 4C 43 55 4C 41 54 49 4E 47 22 | IN CALCULATING"|
00000EF0: 3A 99 00 20 17 12 02 99 22 20 54 48 45 20 52 4F |:.. ...." THE RO|
00000F00: 4F 54 53 20 4F 46 20 41 20 54 52 49 4E 4F 4D 49 |OTS OF A TRINOMI|
00000F10: 41 4C 2E 20 20 D4 48 49 53 20 43 41 4E 22 3A 99 |AL. .HIS CAN":.|
00000F20: 00 51 17 14 02 99 22 20 41 4C 53 4F 20 42 45 20 |.Q...." ALSO BE |
00000F30: 55 53 45 44 20 54 4F 20 4D 41 4B 45 20 55 50 20 |USED TO MAKE UP |
00000F40: 41 20 51 55 49 5A 20 46 4F 52 20 54 48 45 22 3A |A QUIZ FOR THE":|
00000F50: 99 00 62 17 16 02 99 22 20 43 4C 41 53 53 2E 22 |..b...." CLASS."|
00000F60: 3A 99 00 8F 17 17 02 99 22 20 20 D4 48 45 20 53 |:......." .HE S|
00000F70: 54 55 44 45 4E 54 20 49 53 20 47 49 56 45 4E 20 |TUDENT IS GIVEN |
00000F80: 31 30 20 44 49 46 46 45 52 45 4E 54 22 3A 99 00 |10 DIFFERENT":..|
00000F90: C0 17 18 02 99 22 20 54 52 49 4E 4F 4D 49 41 4C |....." TRINOMIAL|
00000FA0: 53 2C 20 41 4E 44 20 32 20 50 4F 49 4E 54 53 20 |S, AND 2 POINTS |
00000FB0: 41 52 45 20 47 49 56 45 4E 20 46 4F 52 22 3A 99 |ARE GIVEN FOR":.|
00000FC0: 00 E3 17 1A 02 99 22 20 45 41 43 48 20 52 49 47 |......" EACH RIG|
00000FD0: 48 54 20 54 52 49 4E 4F 4D 49 41 4C 2E 22 3A 8D |HT TRINOMIAL.":.|
00000FE0: 38 33 35 00 F7 17 4E 02 8B 55 5A B2 31 A7 9E 55 |835...N..UZ.1..U|
00000FF0: 50 25 3A 89 32 31 37 00 FD 17 57 02 8E 00 23 18 |P%:.217...W...#.|
00001000: 58 02 8F 20 2A 2A 20 50 52 4F 47 52 41 4D 20 4D |X.. ** PROGRAM M|
00001010: 4F 44 49 46 49 43 41 54 49 4F 4E 20 49 4E 53 54 |ODIFICATION INST|
00001020: 20 2A 2A 00 34 18 59 02 99 22 93 22 3A 97 55 54 | **.4.Y..".":.UT|
00001030: 2C 55 4C 25 00 54 18 5D 02 55 50 B2 30 3A 55 47 |,UL%.T.].UP.0:UG|
00001040: 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 3A |$.".ROGRAM .OD":|
00001050: 8D 38 35 30 00 83 18 63 02 99 22 11 20 20 20 D4 |.850...c..". .|
00001060: 48 45 20 20 4E 55 4D 42 45 52 20 4F 46 20 20 47 |HE NUMBER OF G|
00001070: 55 45 53 53 45 53 20 20 54 48 41 54 20 59 4F 55 |UESSES THAT YOU|
00001080: 22 3A 99 00 B4 18 64 02 99 22 20 43 41 4E 20 48 |":....d.." CAN H|
00001090: 41 56 45 20 41 54 20 41 20 51 55 45 53 54 49 4F |AVE AT A QUESTIO|
000010A0: 4E 20 43 41 4E 20 42 45 20 41 4C 54 45 52 45 44 |N CAN BE ALTERED|
000010B0: 2E 22 3A 99 00 E4 18 66 02 99 22 20 CF 4E 20 4C |.":....f.." .N L|
000010C0: 49 4E 45 20 31 35 34 30 20 54 48 45 20 4E 55 4D |INE 1540 THE NUM|
000010D0: 42 45 52 20 32 28 2E 2E C9 C6 20 D4 D2 3C 12 32 |BER 2(.... ..<.2|
000010E0: 92 2E 29 22 00 12 19 68 02 99 22 11 20 43 41 4E |..)"...h..". CAN|
000010F0: 20 42 45 20 43 48 41 4E 47 45 44 20 54 4F 20 41 | BE CHANGED TO A|
00001100: 20 44 45 53 49 52 45 44 20 56 41 4C 55 45 2E 22 | DESIRED VALUE."|
00001110: 3A 99 00 42 19 6A 02 99 22 20 20 D4 48 45 20 52 |:..B.j.." .HE R|
00001120: 41 4E 47 45 20 4F 46 20 4E 55 4D 42 45 52 53 20 |ANGE OF NUMBERS |
00001130: 54 48 41 54 20 53 48 4F 57 20 55 50 20 49 4E 22 |THAT SHOW UP IN"|
00001140: 3A 99 00 71 19 6C 02 99 22 20 51 55 45 53 54 49 |:..q.l.." QUESTI|
00001150: 4F 4E 53 20 43 41 4E 20 42 45 20 53 45 54 20 42 |ONS CAN BE SET B|
00001160: 59 20 41 4C 54 45 52 49 4E 47 20 54 48 45 22 3A |Y ALTERING THE":|
00001170: 99 00 A0 19 6E 02 99 22 20 43 4F 4E 54 45 4E 54 |....n.." CONTENT|
00001180: 20 4F 46 20 54 48 45 20 56 41 52 49 41 42 4C 45 | OF THE VARIABLE|
00001190: 20 12 CD C1 92 20 4F 4E 20 4C 49 4E 45 22 3A 99 | .... ON LINE":.|
000011A0: 00 D0 19 70 02 99 22 20 31 30 36 30 2E 20 20 C9 |...p.." 1060. .|
000011B0: 54 20 49 53 20 49 4E 49 54 49 41 4C 4C 59 20 53 |T IS INITIALLY S|
000011C0: 45 54 20 54 4F 20 39 20 42 55 54 20 54 48 45 22 |ET TO 9 BUT THE"|
000011D0: 00 01 1A 72 02 99 22 20 56 41 4C 55 45 20 43 41 |...r.." VALUE CA|
000011E0: 4E 20 42 45 20 43 48 41 4E 47 45 44 20 53 4F 20 |N BE CHANGED SO |
000011F0: 54 48 41 54 20 54 48 45 20 52 41 4E 47 45 22 3A |THAT THE RANGE":|
00001200: 99 00 18 1A 74 02 99 22 20 49 53 20 2B CD C1 20 |....t.." IS +.. |
00001210: 54 4F 20 2D CD C1 2E 22 00 21 1A 94 02 8D 38 33 |TO -...".!....83|
00001220: 35 00 35 1A B2 02 8B 55 5A B2 31 A7 9E 55 50 25 |5.5....UZ.1..UP%|
00001230: 3A 89 32 31 37 00 3B 1A BB 02 8E 00 60 1A BC 02 |:.217.;.....`...|
00001240: 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 32 |. ** TO USE 8032|
00001250: 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 2A 2A | LOAD CBM4032 **|
00001260: 00 96 1A C6 02 99 22 93 11 11 11 05 42 45 46 4F |......".....BEFO|
00001270: 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 |RE RUNNING THIS |
00001280: 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 |PROGRAM ON AN 80|
00001290: 33 32 20 20 11 11 00 CC 1A D0 02 99 22 20 20 20 |32 ........" |
000012A0: 20 20 20 4C 4F 41 44 20 54 48 45 20 27 43 42 4D | LOAD THE 'CBM|
000012B0: 20 34 30 33 32 27 20 50 52 4F 47 52 41 4D 11 11 | 4032' PROGRAM..|
000012C0: 11 11 11 11 11 11 11 11 11 11 11 22 00 D7 1A DA |..........."....|
000012D0: 02 9E 55 55 AA 37 31 00 DD 1A E4 02 80 00 02 1B |..UU.71.........|
000012E0: 1D 03 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 |... ** TO USE 80|
000012F0: 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 |32 LOAD CBM4032 |
00001300: 2A 2A 00 4D 1B 1E 03 99 22 93 11 11 11 42 45 46 |**.M...."....BEF|
00001310: 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 |ORE RUNNING THIS|
00001320: 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 | PROGRAM ON AN 8|
00001330: 30 33 32 20 20 11 11 4C 4F 41 44 20 43 42 4D 20 |032 ..LOAD CBM |
00001340: 34 30 33 32 20 50 52 4F 47 52 41 4D 22 00 59 1B |4032 PROGRAM".Y.|
00001350: 1F 03 9E 31 30 39 33 3A 80 00 79 1B 20 03 8F 20 |...1093:..y. .. |
00001360: 2A 2A 20 54 20 49 20 54 20 4C 20 45 20 20 20 50 |** T I T L E P|
00001370: 20 41 20 47 20 45 20 2A 2A 00 AD 1B 22 03 99 22 | A G E **...".."|
00001380: 93 11 1D 05 22 3B 3A 97 55 54 2C 55 55 25 3A 8B |....";:.UT,UU%:.|
00001390: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
000013A0: 30 2C 31 34 3A 97 35 33 32 38 31 2C 36 00 BA 1B |0,14:.53281,6...|
000013B0: 23 03 99 C7 28 31 34 32 29 3B 00 D0 1B 24 03 81 |#...(142);...$..|
000013C0: 49 B2 31 A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 |I.1.38:."...";:.|
000013D0: 00 E8 1B 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 |...&..I.1.22:.".|
000013E0: 9D 12 A6 92 22 3B 3A 82 00 00 1C 28 03 81 49 B2 |....";:....(..I.|
000013F0: 31 A4 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 |1.37:.".....";:.|
00001400: 00 18 1C 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 |...*..I.1.22:.".|
00001410: 9D 12 A6 92 22 3B 3A 82 00 3D 1C 2C 03 99 22 13 |....";:..=.,..".|
00001420: 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001430: 1D 1D 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 5F 1C |.......... .._.|
00001440: 2E 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00001450: 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 |....... . . ...|
00001460: 80 1C 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..0.."..........|
00001470: 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF |......... . ...|
00001480: 00 9E 1C 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |...2..".........|
00001490: 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 C6 |........... ...|
000014A0: 1C 34 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |.4.."...........|
000014B0: 1D 1D 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F |...C O M M O D O|
000014C0: 20 52 20 45 11 11 00 E9 1C 36 03 99 22 1D 1D 1D | R E.....6.."...|
000014D0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 |............EDUC|
000014E0: 41 54 49 4F 4E 41 4C 11 11 00 08 1D 38 03 99 22 |ATIONAL.....8.."|
000014F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001500: 53 4F 46 54 57 41 52 45 00 23 1D 3A 03 8F 20 2A |SOFTWARE.#.:.. *|
00001510: 2A 20 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F |* COMMODORE LOGO|
00001520: 20 2A 2A 00 5B 1D 3B 03 99 C8 28 55 44 24 2C 32 | **.[.;...(UD$,2|
00001530: 34 29 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 |4);"..........PR|
00001540: 45 53 53 20 53 50 41 43 45 20 42 41 52 20 4F 52 |ESS SPACE BAR OR|
00001550: 20 57 41 49 54 92 22 3A 49 B2 30 00 7D 1D 3C 03 | WAIT.":I.0.}.<.|
00001560: A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 |.A$:.A$.." ".I.I|
00001570: AA 31 3A 8B 49 B3 32 35 30 A7 38 32 38 00 A1 1D |.1:.I.250.828...|
00001580: 3E 03 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A |>.T1$."":T2$."":|
00001590: 54 33 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 |T3$."":T4$."":I.|
000015A0: 30 00 AA 1D 40 03 89 33 30 30 00 C6 1D 43 03 8F |0...@..300...C..|
000015B0: 20 2A 2A 20 53 50 41 43 45 20 42 41 52 20 50 52 | ** SPACE BAR PR|
000015C0: 45 53 53 20 2A 2A 00 01 1E 48 03 97 55 4F 2C 30 |ESS **...H..UO,0|
000015D0: 3A 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D |:..(UD$,24);"...|
000015E0: 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 |....PRESS SPACE |
000015F0: 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 |BAR TO CONTINUE.|
00001600: 22 00 18 1E 4C 03 A1 55 49 24 3A 8B 55 49 24 B3 |"...L..UI$:.UI$.|
00001610: B1 22 20 22 A7 38 34 34 00 1E 1E 4E 03 8E 00 3E |." ".844...N...>|
00001620: 1E 52 03 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 |.R.. ** PAGE DES|
00001630: 49 47 4E 20 52 4F 55 54 49 4E 45 20 2A 2A 00 4A |IGN ROUTINE **.J|
00001640: 1E 54 03 55 50 B2 55 50 AA 31 00 74 1E 57 03 99 |.T.UP.UP.1.t.W..|
00001650: 22 93 22 C8 28 55 54 24 AA 55 50 24 2C 32 31 29 |".".(UT$.UP$,21)|
00001660: 3B C9 28 55 50 24 AA 55 47 24 AA C4 28 55 50 29 |;.(UP$.UG$..(UP)|
00001670: 2C 31 38 29 00 A3 1E 5C 03 99 22 20 2D 2D 2D 2D |,18)...\.." ----|
00001680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000016A0: 2D 2D 22 00 B2 1E 60 03 8B 55 48 B3 B1 30 A7 38 |--"...`..UH..0.8|
000016B0: 37 30 00 E6 1E 61 03 99 C8 28 55 44 24 2C 32 34 |70...a...(UD$,24|
000016C0: 29 3B C8 28 55 50 24 2C 37 29 3B 22 48 45 4C 50 |);.(UP$,7);"HELP|
000016D0: 20 2D 20 50 52 45 53 53 20 20 20 48 20 3C 52 45 | - PRESS H <RE|
000016E0: 54 55 52 4E 3E 22 00 F7 1E 66 03 55 48 B2 30 3A |TURN>"...f.UH.0:|
000016F0: 99 22 13 11 22 3A 8E 00 16 1F 6B 03 8F 20 2A 2A |."..":....k.. **|
00001700: 20 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 4D | PLEASE WAIT REM|
00001710: 41 52 4B 20 2A 2A 00 4C 1F 70 03 99 C8 28 55 44 |ARK **.L.p...(UD|
00001720: 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 20 |$,24);" |
00001730: 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C 45 | ONE MOMENT PLE|
00001740: 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 52 1F 75 |ASE... ".R.u|
00001750: 03 8E 00 6F 1F 84 03 8F 20 2A 2A 20 53 45 54 20 |...o.... ** SET |
00001760: 55 50 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 |UP VARIABLES **.|
00001770: BA 1F 85 03 55 58 24 B2 22 48 22 3A 86 55 51 25 |....UX$."H":.UQ%|
00001780: 28 31 30 30 30 29 3A 55 42 B2 33 32 37 36 38 3A |(1000):UB.32768:|
00001790: 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 33 |U1.196:U2.197:U3|
000017A0: B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 31 |.198:U4.216:UC.1|
000017B0: 36 37 3A 55 55 B2 31 30 32 34 00 F8 1F 86 03 55 |67:UU.1024.....U|
000017C0: 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 |T.59468:UU%.12:U|
000017D0: 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 |L%.14:UP%.1146:U|
000017E0: 4D B2 33 32 37 36 38 3A 55 4F B2 31 35 38 3A 97 |M.32768:UO.158:.|
000017F0: 20 35 30 30 30 33 2C 30 00 3B 20 87 03 8B C2 28 | 50003,0.; ....(|
00001800: 35 30 30 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 |50003).0.UB.1024|
00001810: 3A 55 31 B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 |:U1.209:U2.210:U|
00001820: 33 B2 32 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 |3.211:U4.214:UC.|
00001830: 32 30 34 3A 55 55 B2 32 30 34 38 00 7A 20 88 03 |204:UU.2048.z ..|
00001840: 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 |..(50003).0.UT.5|
00001850: 33 32 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 |3272:UU%.21:UL%.|
00001860: 32 33 3A 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 |23:UP%.2139:UM.1|
00001870: 30 32 34 3A 55 4F B2 31 39 38 00 9E 20 89 03 55 |024:UO.198.. ..U|
00001880: 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 11 |D$."............|
00001890: 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 D0 |............."..|
000018A0: 20 8A 03 55 50 24 B2 22 20 20 20 20 20 20 20 20 | ..UP$." |
000018B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000018D0: 00 1E 21 8B 03 55 54 24 B2 22 20 D2 CF CF D4 D3 |..!..UT$." .....|
000018E0: 20 D1 D5 C9 DA 20 20 20 A0 A0 A0 A0 A0 22 3A 8F | .... .....":.|
000018F0: 20 50 4C 41 43 45 20 50 52 4F 47 52 41 4D 20 54 | PLACE PROGRAM T|
00001900: 49 54 4C 45 20 48 45 52 45 20 21 21 21 21 21 21 |ITLE HERE !!!!!!|
00001910: 21 21 21 21 21 21 21 21 21 21 21 2A 2A 2A 00 24 |!!!!!!!!!!!***.$|
00001920: 21 8C 03 8E 00 3E 21 8E 03 8F 20 2A 2A 20 53 45 |!....>!... ** SE|
00001930: 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 47 |T VARIABLES **.G|
00001940: 21 93 03 8D 39 30 30 00 4D 21 94 03 3A 00 53 21 |!...900.M!..:.S!|
00001950: 95 03 3A 00 6E 21 98 03 8F 20 2A 2A 20 43 48 45 |..:.n!... ** CHE|
00001960: 43 4B 20 46 4F 52 20 38 30 33 32 20 2A 2A 00 8C |CK FOR 8032 **..|
00001970: 21 9D 03 99 22 93 22 3A 99 22 A0 22 3A 8F 20 53 |!...".":.".":. S|
00001980: 48 49 46 54 45 44 20 53 50 41 43 45 00 A3 21 A2 |HIFTED SPACE..!.|
00001990: 03 8B C2 28 55 42 AA 34 30 29 B3 B1 39 36 A7 8D |...(UB.40)..96..|
000019A0: 37 30 30 00 BC 21 A3 03 8F 20 2A 2A 20 4D 45 4D |700..!... ** MEM|
000019B0: 4F 52 59 20 43 48 45 43 4B 20 2A 2A 00 D0 21 A4 |ORY CHECK **..!.|
000019C0: 03 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 |.. .(0).2000.937|
000019D0: 00 FE 21 A5 03 99 22 93 11 11 05 54 48 49 53 20 |..!..."....THIS |
000019E0: 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 4E 4F 54 |MACHINE DOES NOT|
000019F0: 20 48 41 56 45 20 45 4E 4F 55 47 48 11 22 00 22 | HAVE ENOUGH."."|
00001A00: 22 A6 03 99 22 4D 45 4D 4F 52 59 20 54 4F 20 52 |"..."MEMORY TO R|
00001A10: 55 4E 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 |UN THIS PROGRAM |
00001A20: 21 22 00 2D 22 A7 03 9E 55 55 AA 37 31 00 33 22 |!".-"...UU.71.3"|
00001A30: A8 03 80 00 4D 22 A9 03 99 22 93 05 22 3A 8B C2 |....M"..."..":..|
00001A40: 28 35 30 30 30 33 29 B2 30 A7 39 36 32 00 7C 22 |(50003).0.962.|"|
00001A50: AC 03 8F 20 2A 2A 20 42 41 53 49 43 20 32 2E 30 |... ** BASIC 2.0|
00001A60: 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 | OR 4.0 OR C|
00001A70: 2D 36 34 20 53 45 54 55 50 20 2A 2A 00 BA 22 AD |-64 SETUP **..".|
00001A80: 03 97 31 30 37 35 2C 31 33 33 3A 97 31 30 37 36 |..1075,133:.1076|
00001A90: 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 34 3A 97 |,144:.1077,234:.|
00001AA0: 31 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 33 |1079,4:.1080,133|
00001AB0: 3A 97 31 30 38 31 2C 31 34 35 00 F0 22 AE 03 97 |:.1081,145.."...|
00001AC0: 31 30 39 31 2C 31 35 35 3A 97 31 30 39 38 2C 31 |1091,155:.1098,1|
00001AD0: 33 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 31 |33:.1099,144:.11|
00001AE0: 30 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 33 |00,234:.1103,133|
00001AF0: 00 12 23 AF 03 97 31 31 30 34 2C 31 34 35 3A 97 |..#...1104,145:.|
00001B00: 31 31 30 35 2C 32 33 34 3A 97 31 30 38 32 2C 32 |1105,234:.1082,2|
00001B10: 33 34 00 29 23 B1 03 8B C2 28 35 30 30 30 33 29 |34.)#....(50003)|
00001B20: B3 B1 31 36 30 A7 39 35 35 00 58 23 B6 03 97 31 |..160.955.X#...1|
00001B30: 30 39 33 2C 38 38 3A 97 31 30 39 34 2C 32 32 38 |093,88:.1094,228|
00001B40: 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 30 32 2C |:.1097,85:.1102,|
00001B50: 32 32 38 3A 89 39 36 35 00 6D 23 BB 03 8B C2 28 |228:.965.m#....(|
00001B60: 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 00 9C 23 |50003)..1.990..#|
00001B70: C0 03 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 |...1093,49:.1094|
00001B80: 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 |,230:.1097,46:.1|
00001B90: 31 30 32 2C 32 33 30 3A 89 39 36 35 00 D6 23 C2 |102,230:.965..#.|
00001BA0: 03 97 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 |..2099,141:.2100|
00001BB0: 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 |,20:.2101,3:.210|
00001BC0: 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 |3,8:.2104,141:.2|
00001BD0: 31 30 35 2C 32 31 00 12 24 C3 03 97 32 31 30 36 |105,21..$...2106|
00001BE0: 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 |,3:.2115,145:.21|
00001BF0: 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A |17,52:.2118,234:|
00001C00: 97 32 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 |.2121,49:.2122,1|
00001C10: 34 31 00 4C 24 C4 03 97 32 31 32 33 2C 32 30 3A |41.L$...2123,20:|
00001C20: 97 32 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 |.2124,3:.2126,23|
00001C30: 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 |4:.2127,141:.212|
00001C40: 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 6A 24 C5 |8,21:.2129,3.j$.|
00001C50: 03 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C |..UU.48:. DISABL|
00001C60: 45 20 53 54 4F 50 20 4B 45 59 00 7B 24 CA 03 8D |E STOP KEY.{$...|
00001C70: 38 30 30 3A 8F 20 54 49 54 4C 45 00 8B 24 D4 03 |800:. TITLE..$..|
00001C80: 89 33 30 30 3A 8F 20 4D 45 4E 55 00 BC 24 DE 03 |.300:. MENU..$..|
00001C90: 99 22 93 54 48 45 20 50 47 4D 20 57 49 4C 4C 20 |.".THE PGM WILL |
00001CA0: 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 49 53 |NOT WORK ON THIS|
00001CB0: 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 F1 24 E8 | MACHINE!":...$.|
00001CC0: 03 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 25 |..UZ.1..UP%:.UP%|
00001CD0: 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 52 4F 47 52 |:UZ.0:. ** PROGR|
00001CE0: 41 4D 20 53 54 41 52 54 53 20 48 45 52 45 20 2A |AM STARTS HERE *|
00001CF0: 2A 00 1D 25 E9 03 99 22 93 05 22 3B 3A 8C 3A 8B |*..%..."..";:.:.|
00001D00: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00001D10: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 23 25 |1,6:.53280,14.#%|
00001D20: F2 03 8C 00 38 25 FC 03 8F 20 51 55 49 5A 20 45 |....8%... QUIZ E|
00001D30: 51 55 20 52 4F 4F 54 53 00 4C 25 06 04 8F 20 52 |QU ROOTS.L%... R|
00001D40: 20 4D 41 43 4E 41 55 47 48 54 4F 4E 00 5B 25 10 | MACNAUGHTON.[%.|
00001D50: 04 8F 20 46 45 42 20 31 39 38 32 00 65 25 1A 04 |.. FEB 1982.e%..|
00001D60: 99 22 93 A0 22 00 7E 25 24 04 51 4E B2 31 30 3A |."..".~%$.QN.10:|
00001D70: 4E 41 B2 31 3A 4D 41 B2 39 3A 50 54 B2 30 00 B0 |NA.1:MA.9:PT.0..|
00001D80: 25 2E 04 8B C2 28 55 4D 29 B3 B1 39 36 A7 58 58 |%....(UM)..96.XX|
00001D90: B2 32 32 3A 4C 4D B2 30 3A 52 4D B2 32 31 3A 53 |.22:LM.0:RM.21:S|
00001DA0: 4C B2 31 3A 99 C7 28 31 34 29 3A 89 31 31 32 30 |L.1:..(14):.1120|
00001DB0: 00 B6 25 38 04 3A 00 D5 25 42 04 58 58 B2 34 30 |..%8.:..%B.XX.40|
00001DC0: 3A 8B C2 28 55 4D AA 31 30 32 34 29 B2 39 36 A7 |:..(UM.1024).96.|
00001DD0: 58 58 B2 34 30 00 FC 25 4C 04 4C 4D B2 35 3A 52 |XX.40..%L.LM.5:R|
00001DE0: 4D B2 33 35 3A 53 4C B2 33 3A 8B 58 58 B2 38 30 |M.35:SL.3:.XX.80|
00001DF0: A7 4C 4D B2 32 35 3A 52 4D B2 35 35 00 0E 26 56 |.LM.25:RM.55..&V|
00001E00: 04 97 55 54 2C 55 4C 25 3A 89 31 31 34 30 00 3D |..UT,UL%:.1140.=|
00001E10: 26 60 04 52 45 44 24 B2 C7 28 32 38 29 3A 47 52 |&`.RED$..(28):GR|
00001E20: 4E 24 B2 C7 28 33 30 29 3A 42 4C 55 24 B2 C7 28 |N$..(30):BLU$..(|
00001E30: 33 31 29 3A 57 48 54 24 B2 C7 28 35 29 00 6E 26 |31):WHT$..(5).n&|
00001E40: 6A 04 43 59 4E 24 B2 C7 28 31 35 39 29 3A 50 55 |j.CYN$..(159):PU|
00001E50: 52 24 B2 C7 28 31 35 36 29 3A 59 45 4C 24 B2 C7 |R$..(156):YEL$..|
00001E60: 28 31 35 38 29 3A 42 43 4B 24 B2 22 9D 22 00 87 |(158):BCK$."."..|
00001E70: 26 74 04 8F 20 51 4E 20 51 55 45 53 54 49 4F 4E |&t.. QN QUESTION|
00001E80: 20 4E 55 4D 42 45 52 00 AB 26 7E 04 8F 20 4E 41 | NUMBER..&~.. NA|
00001E90: 20 4E 55 4D 42 45 52 20 4F 46 20 41 4E 53 57 45 | NUMBER OF ANSWE|
00001EA0: 52 53 20 46 4F 52 20 45 41 43 48 00 C2 26 88 04 |RS FOR EACH..&..|
00001EB0: 8F 20 50 54 20 50 4F 49 4E 54 53 20 45 41 52 4E |. PT POINTS EARN|
00001EC0: 45 44 00 E0 26 92 04 8F 20 4C 4D 2F 52 4D 20 4C |ED..&... LM/RM L|
00001ED0: 45 46 54 2F 52 49 47 48 54 20 4D 41 52 47 49 4E |EFT/RIGHT MARGIN|
00001EE0: 00 F7 26 9C 04 8F 20 4C 4E 20 57 48 45 52 45 20 |..&... LN WHERE |
00001EF0: 50 52 49 4E 54 45 44 00 19 27 A6 04 8F 20 53 4C |PRINTED..'... SL|
00001F00: 20 53 54 41 52 54 49 4E 47 20 4C 49 4E 45 20 46 | STARTING LINE F|
00001F10: 4F 52 20 53 43 52 45 45 4E 00 36 27 B0 04 8F 20 |OR SCREEN.6'... |
00001F20: 58 58 20 43 48 41 52 41 43 54 45 52 53 20 50 45 |XX CHARACTERS PE|
00001F30: 52 20 4C 49 4E 45 00 56 27 BA 04 8F 20 51 24 20 |R LINE.V'... Q$ |
00001F40: 51 55 45 53 54 49 4F 4E 20 41 24 28 4E 29 20 41 |QUESTION A$(N) A|
00001F50: 4E 53 57 45 52 53 00 77 27 C4 04 8F 20 54 52 20 |NSWERS.w'... TR |
00001F60: 54 52 49 45 53 20 41 54 20 47 45 54 54 49 4E 47 |TRIES AT GETTING|
00001F70: 20 41 4E 53 57 45 52 00 97 27 CE 04 8F 20 43 41 | ANSWER..'... CA|
00001F80: 20 4E 55 4D 42 45 52 20 4F 46 20 52 49 47 48 54 | NUMBER OF RIGHT|
00001F90: 20 41 4E 53 57 45 52 00 B5 27 D8 04 8F 20 53 24 | ANSWER..'... S$|
00001FA0: 20 53 54 52 49 4E 47 20 54 4F 20 42 45 20 50 52 | STRING TO BE PR|
00001FB0: 49 4E 54 45 44 00 D1 27 E2 04 8F 20 59 41 20 59 |INTED..'... YA Y|
00001FC0: 4F 55 52 20 41 4E 53 57 45 52 20 4E 55 4D 42 45 |OUR ANSWER NUMBE|
00001FD0: 52 00 F3 27 EC 04 8F 20 4D 41 20 52 4F 4F 54 53 |R..'... MA ROOTS|
00001FE0: 20 41 52 45 20 46 52 4F 4D 20 2D 4D 41 20 54 4F | ARE FROM -MA TO|
00001FF0: 20 4D 41 00 FC 27 F6 04 87 20 51 24 00 08 28 00 | MA..'... Q$..(.|
00002000: 05 81 4E B2 31 A4 51 4E 00 13 28 0A 05 81 49 B2 |..N.1.QN..(...I.|
00002010: 31 A4 32 00 2F 28 14 05 41 28 49 29 B2 B5 28 2E |1.2./(..A(I)..(.|
00002020: 35 AA BB 28 31 29 AC 32 AC 4D 41 29 AB 4D 41 00 |5..(1).2.MA).MA.|
00002030: 5B 28 1E 05 8B 41 28 49 29 B2 30 20 B0 20 B6 28 |[(...A(I).0 . .(|
00002040: 41 28 49 29 29 B2 31 20 B0 20 28 41 28 31 29 B2 |A(I)).1 . (A(1).|
00002050: AB 41 28 32 29 29 A7 31 33 30 30 00 62 28 28 05 |.A(2)).1300.b((.|
00002060: 82 49 00 7B 28 32 05 55 47 24 B2 22 20 D1 55 45 |.I.{(2.UG$." .UE|
00002070: 53 54 49 4F 4E 22 3A 8D 38 35 30 00 B5 28 37 05 |STION":.850..(7.|
00002080: 53 24 B2 42 4C 55 24 AA 22 D1 D5 C9 DA A0 D3 C3 |S$.BLU$.".......|
00002090: CF D2 C5 3A 22 AA C4 28 50 54 29 AA 22 20 50 4F |...:"..(PT)." PO|
000020A0: 49 4E 54 22 3A 8B 50 54 B3 B1 31 A7 53 24 B2 53 |INT":.PT..1.S$.S|
000020B0: 24 AA 22 53 22 00 CA 28 3C 05 4C 4E B2 53 4C 3A |$."S"..(<.LN.SL:|
000020C0: 8D 31 38 39 30 3A 54 52 B2 30 00 E6 28 46 05 51 |.1890:TR.0..(F.Q|
000020D0: 4E 24 B2 C9 28 22 20 20 22 AA C4 28 4E 29 2C 32 |N$..(" "..(N),2|
000020E0: 29 AA 22 2E 20 22 00 07 29 50 05 53 24 B2 42 43 |).". "..)P.S$.BC|
000020F0: 4B 24 AA 51 4E 24 AA 51 24 3A 4C 4E B2 53 4C AA |K$.QN$.Q$:LN.SL.|
00002100: 32 3A 8D 31 38 39 30 00 1D 29 5A 05 43 28 31 29 |2:.1890..)Z.C(1)|
00002110: B2 AB 28 41 28 31 29 AA 41 28 32 29 29 00 36 29 |..(A(1).A(2)).6)|
00002120: 64 05 43 28 32 29 B2 28 AB 41 28 31 29 29 AC 28 |d.C(2).(.A(1)).(|
00002130: AB 41 28 32 29 29 00 56 29 6E 05 81 49 B2 31 A4 |.A(2)).V)n..I.1.|
00002140: 32 3A 43 24 28 49 29 B2 CA 28 C4 28 43 28 49 29 |2:C$(I)..(.(C(I)|
00002150: 29 2C 32 29 3A 82 00 7B 29 78 05 53 24 B2 22 20 |),2):..{)x.S$." |
00002160: 20 20 20 58 91 32 11 22 3A 8B 43 28 31 29 B1 30 | X.2.":.C(1).0|
00002170: A7 53 24 B2 53 24 AA 22 2B 20 22 00 92 29 82 05 |.S$.S$."+ "..)..|
00002180: 8B 43 28 31 29 B3 30 A7 53 24 B2 53 24 AA 22 2D |.C(1).0.S$.S$."-|
00002190: 20 22 00 A7 29 8C 05 53 24 B2 53 24 AA 43 24 28 | "..)..S$.S$.C$(|
000021A0: 31 29 AA 22 58 20 22 00 BE 29 96 05 8B 43 28 32 |1)."X "..)...C(2|
000021B0: 29 B1 30 A7 53 24 B2 53 24 AA 22 2B 20 22 00 D5 |).0.S$.S$."+ "..|
000021C0: 29 A0 05 8B 43 28 32 29 B3 30 A7 53 24 B2 53 24 |)...C(2).0.S$.S$|
000021D0: AA 22 2D 20 22 00 E5 29 AA 05 53 24 B2 53 24 AA |."- "..)..S$.S$.|
000021E0: 43 24 28 32 29 00 F6 29 B4 05 53 24 B2 53 24 AA |C$(2)..)..S$.S$.|
000021F0: 22 20 3D 20 30 22 00 08 2A BE 05 4C 4E B2 4C 4E |" = 0"..*..LN.LN|
00002200: AA 33 3A 8D 31 38 39 30 00 43 2A C8 05 4C 4E B2 |.3:.1890.C*..LN.|
00002210: 4C 4E AA 33 3A 53 24 B2 42 43 4B 24 AA 22 20 C6 |LN.3:S$.BCK$." .|
00002220: 49 52 53 54 20 D2 4F 4F 54 20 3A 20 20 20 20 20 |IRST .OOT : |
00002230: 20 9D 9D 9D 9D 9D 22 3A 8D 31 38 39 30 3A 8D 31 | .....":.1890:.1|
00002240: 37 35 30 00 60 2A D2 05 81 20 49 B2 31 A4 32 3A |750.`*... I.1.2:|
00002250: 8B 20 41 28 49 29 B2 49 4E 20 A7 20 31 35 31 30 |. A(I).IN . 1510|
00002260: 00 6C 2A DC 05 82 3A 89 31 35 33 30 00 A7 2A E6 |.l*...:.1530..*.|
00002270: 05 4C 4E B2 4C 4E AA 32 3A 53 24 B2 42 43 4B 24 |.LN.LN.2:S$.BCK$|
00002280: AA 22 20 D3 45 43 4F 4E 44 20 D2 4F 4F 54 3A 20 |." .ECOND .OOT: |
00002290: 20 20 20 20 20 9D 9D 9D 9D 9D 22 3A 8D 31 38 39 | .....":.189|
000022A0: 30 3A 8D 31 37 35 30 00 C6 2A F0 05 4C 4E B2 4C |0:.1750..*..LN.L|
000022B0: 4E AA 32 3A 8B 20 41 28 33 AB 49 29 B2 49 4E 20 |N.2:. A(3.I).IN |
000022C0: A7 20 31 36 30 30 00 D2 2A FA 05 54 52 B2 54 52 |. 1600..*..TR.TR|
000022D0: AA 31 00 E1 2A 04 06 8B 54 52 B3 32 A7 31 35 36 |.1..*...TR.2.156|
000022E0: 30 00 EB 2A 0E 06 89 31 35 37 30 00 27 2B 18 06 |0..*...1570.'+..|
000022F0: 53 24 B2 52 45 44 24 AA 22 D9 4F 55 20 41 52 45 |S$.RED$.".OU ARE|
00002300: 20 57 52 4F 4E 47 21 A0 D4 52 59 20 41 47 41 49 | WRONG!..RY AGAI|
00002310: 4E 21 22 3A 8D 31 38 39 30 3A 99 3A 81 58 B2 31 |N!":.1890:.:.X.1|
00002320: A4 35 30 30 3A 82 58 00 5D 2B 1D 06 99 22 91 20 |.500:.X.]+...". |
00002330: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002350: 20 20 20 20 20 20 22 3A 89 31 33 36 30 00 A0 2B | ":.1360..+|
00002360: 22 06 53 24 B2 52 45 44 24 AA 22 11 11 20 D3 4F |".S$.RED$.".. .O|
00002370: 52 52 59 2C 20 43 4F 52 52 45 43 54 20 52 4F 4F |RRY, CORRECT ROO|
00002380: 54 53 20 41 52 45 3A 20 22 AA C4 28 41 28 31 29 |TS ARE: "..(A(1)|
00002390: 29 AA 22 20 41 4E 44 22 AA C4 28 41 28 32 29 29 |)." AND"..(A(2))|
000023A0: 00 C0 2B 2C 06 50 54 B2 50 54 AA 33 AB 54 52 AB |..+,.PT.PT.3.TR.|
000023B0: 31 3A 99 53 24 3A 8D 38 33 35 3A 89 31 35 39 30 |1:.S$:.835:.1590|
000023C0: 00 CE 2B 36 06 82 20 4E 3A 89 31 36 32 30 00 03 |..+6.. N:.1620..|
000023D0: 2C 40 06 53 24 B2 52 45 44 24 AA 22 D4 48 41 54 |,@.S$.RED$.".HAT|
000023E0: 27 53 20 C3 CF D2 D2 C5 C3 D4 21 20 C7 4F 4F 44 |'S .......! .OOD|
000023F0: 20 D7 4F 52 4B 21 22 3A 8D 31 38 39 30 3A 8D 32 | .ORK!":.1890:.2|
00002400: 30 33 30 00 1A 2C 4A 06 50 54 B2 50 54 AA 33 AB |030..,J.PT.PT.3.|
00002410: 54 52 AB 31 3A 89 31 35 39 30 00 5D 2C 54 06 55 |TR.1:.1590.],T.U|
00002420: 50 B2 55 50 AB 31 3A 8D 38 35 30 3A 4C 4E B2 34 |P.UP.1:.850:LN.4|
00002430: 3A 53 24 B2 42 4C 55 24 AA 22 D4 48 41 54 27 53 |:S$.BLU$.".HAT'S|
00002440: 20 54 48 45 20 45 4E 44 20 4F 46 20 54 48 49 53 | THE END OF THIS|
00002450: 20 51 55 49 5A 2E 22 3A 8D 31 38 39 30 00 8D 2C | QUIZ.":.1890..,|
00002460: 5E 06 4C 4E B2 4C 4E AA 32 3A 53 24 B2 22 D9 4F |^.LN.LN.2:S$.".O|
00002470: 55 20 47 4F 54 22 AA C4 28 50 54 29 AA 22 20 50 |U GOT"..(PT)." P|
00002480: 4F 49 4E 54 53 2E 22 3A 8D 31 38 39 30 00 99 2C |OINTS.":.1890..,|
00002490: 68 06 4D 58 B2 51 4E AC 32 00 DC 2C 72 06 4C 4E |h.MX.QN.2..,r.LN|
000024A0: B2 4C 4E AA 34 3A 53 24 B2 22 D4 48 45 20 4D 4F |.LN.4:S$.".HE MO|
000024B0: 53 54 20 59 4F 55 20 43 4F 55 4C 44 20 47 45 54 |ST YOU COULD GET|
000024C0: 20 57 41 53 22 AA C4 28 4D 58 29 AA 22 20 50 4F | WAS"..(MX)." PO|
000024D0: 49 4E 54 53 2E 22 3A 8D 31 38 39 30 00 11 2D 7C |INTS.":.1890..-||
000024E0: 06 53 43 B2 50 54 AD 4D 58 3A 8B 53 43 B1 2E 38 |.SC.PT.MX:.SC..8|
000024F0: 35 A7 53 24 B2 52 45 44 24 AA 22 C5 58 43 45 4C |5.S$.RED$.".XCEL|
00002500: 4C 45 4E 54 20 57 4F 52 4B 21 22 3A 89 31 37 30 |LENT WORK!":.170|
00002510: 30 00 33 2D 86 06 8B 53 43 B1 2E 37 30 A7 53 24 |0.3-...SC..70.S$|
00002520: B2 22 C7 4F 4F 44 20 57 4F 52 4B 21 22 3A 89 31 |.".OOD WORK!":.1|
00002530: 37 30 30 00 56 2D 90 06 8B 53 43 B1 B2 2E 35 30 |700.V-...SC...50|
00002540: A7 53 24 B2 22 CE 45 45 44 53 20 4D 4F 52 45 20 |.S$.".EEDS MORE |
00002550: 57 4F 52 4B 21 22 00 84 2D 9A 06 8B 53 43 B3 2E |WORK!"..-...SC..|
00002560: 35 30 A7 53 24 B2 52 45 44 24 AA 22 D0 4C 45 41 |50.S$.RED$.".LEA|
00002570: 53 45 20 53 45 45 20 54 48 45 20 54 45 41 43 48 |SE SEE THE TEACH|
00002580: 45 52 21 22 00 9A 2D A4 06 8D 38 33 35 3A 55 50 |ER!"..-...835:UP|
00002590: B2 55 50 AB 31 3A 8D 38 35 30 00 C3 2D AE 06 99 |.UP.1:.850..-...|
000025A0: 22 11 11 11 20 20 C4 4F 20 59 4F 55 20 57 41 4E |"... .O YOU WAN|
000025B0: 54 20 54 4F 20 50 4C 41 59 20 41 47 41 49 4E 3F |T TO PLAY AGAIN?|
000025C0: 20 22 3B 00 D9 2D B8 06 55 4C B2 31 3A 55 53 24 | ";..-..UL.1:US$|
000025D0: B2 22 59 4E 22 3A 8D 33 35 00 F3 2D C2 06 8B 20 |."YN":.35..-... |
000025E0: 55 52 24 B2 22 59 22 20 A7 55 50 B2 30 3A 89 31 |UR$."Y" .UP.0:.1|
000025F0: 30 30 30 00 FD 2D CC 06 89 20 33 30 30 00 11 2E |000..-... 300...|
00002600: D6 06 8F 20 49 4E 50 55 54 20 52 4F 55 54 49 4E |... INPUT ROUTIN|
00002610: 45 00 33 2E E0 06 49 4E 24 B2 22 22 3A 55 4C B2 |E.3...IN$."":UL.|
00002620: 35 3A 55 53 24 B2 22 2D 30 31 32 33 34 35 36 37 |5:US$."-01234567|
00002630: 38 39 22 00 57 2E EA 06 8D 33 35 3A 49 4E 24 B2 |89".W....35:IN$.|
00002640: 55 52 24 3A 49 4E B2 C5 28 55 52 24 29 3A 4C 45 |UR$:IN..(UR$):LE|
00002650: B2 C3 28 49 4E 24 29 00 5D 2E 3A 07 8E 00 71 2E |..(IN$).].:...q.|
00002660: 44 07 43 24 B2 C7 28 C6 28 43 24 29 AF 31 32 37 |D.C$..(.(C$).127|
00002670: 29 00 96 2E 4E 07 8B 43 24 B1 B2 22 41 22 AF 43 |)...N..C$.."A".C|
00002680: 24 B3 B2 22 5A 22 A7 43 24 B2 C7 28 C6 28 43 24 |$.."Z".C$..(.(C$|
00002690: 29 AA 31 32 38 29 00 B4 2E 58 07 49 4E 24 B2 49 |).128)...X.IN$.I|
000026A0: 4E 24 AA 43 24 3A 99 43 24 22 A6 9D 22 3B 3A 89 |N$.C$:.C$"..";:.|
000026B0: 31 37 37 30 00 C4 2E 62 07 8F 20 46 4F 52 4D 41 |1770...b.. FORMA|
000026C0: 54 20 53 24 00 E9 2E 6C 07 44 4E 24 B2 22 13 11 |T S$...l.DN$."..|
000026D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000026E0: 11 11 11 11 11 11 11 11 22 00 FB 2E 76 07 99 C8 |........"...v...|
000026F0: 28 44 4E 24 2C 4C 4E AA 32 29 3B 00 0A 2F 80 07 |(DN$,LN.2);../..|
00002700: 4C 4C B2 52 4D AB 4C 4D AA 31 00 29 2F 8A 07 46 |LL.RM.LM.1.)/..F|
00002710: 58 B2 30 3A 4C 45 B2 C3 28 53 24 29 3A 8B 4C 45 |X.0:LE..(S$):.LE|
00002720: B3 B2 4C 4C A7 32 30 31 30 00 5C 2F 94 07 81 4C |..LL.2010.\/...L|
00002730: B2 31 A4 4C 4C 3A 8B 28 C6 28 CA 28 53 24 2C 4C |.1.LL:.(.(.(S$,L|
00002740: 2C 31 29 29 AF 31 32 37 29 B3 33 32 A7 46 58 B2 |,1)).127).32.FX.|
00002750: 46 58 AA 31 3A 4C 4C B2 4C 4C AA 31 00 63 2F 9E |FX.1:LL.LL.1.c/.|
00002760: 07 82 4C 00 74 2F A8 07 81 4C B2 4C 4C AA 31 A4 |..L.t/...L.LL.1.|
00002770: 31 A9 AB 31 00 8C 2F B2 07 8B CA 28 53 24 2C 4C |1..1../....(S$,L|
00002780: 2C 31 29 B2 22 20 22 A7 31 39 39 30 00 9F 2F BC |,1)." ".1990../.|
00002790: 07 82 4C 3A 4C B2 4C 4C AA 31 3A 4C 46 B2 31 00 |..L:L.LL.1:LF.1.|
000027A0: C3 2F C6 07 99 A3 4C 4D 29 C8 28 53 24 2C 4C AB |./....LM).(S$,L.|
000027B0: 31 29 3B 3A 99 3A 8B 4C 4D AA 4C AB 31 B2 B3 58 |1);:.:.LM.L.1..X|
000027C0: 58 A7 99 00 EB 2F D0 07 53 24 B2 C9 28 53 24 2C |X..../..S$..(S$,|
000027D0: 4C 45 AB 4C AA 4C 46 29 3A 4C 46 B2 30 3A 4C 4E |LE.L.LF):LF.0:LN|
000027E0: B2 4C 4E AA 32 3A 89 31 39 32 30 00 F8 2F DA 07 |.LN.2:.1920../..|
000027F0: 99 A3 4C 4D 29 53 24 3B 00 FE 2F E4 07 8E 00 07 |..LM)S$;../.....|
00002800: 30 EE 07 8D 38 33 35 00 0D 30 F8 07 3A 00 13 30 |0...835..0..:..0|
00002810: 02 08 8E 00 27 30 0C 08 8F 20 20 2A 2A 2A 2A 44 |....'0... ****D|
00002820: 41 54 41 2A 2A 2A 2A 00 64 30 16 08 83 20 22 D7 |ATA****.d0... ".|
00002830: 48 41 54 20 41 52 45 20 54 48 45 20 52 4F 4F 54 |HAT ARE THE ROOT|
00002840: 53 20 4F 46 20 54 48 45 20 20 20 20 20 20 20 46 |S OF THE F|
00002850: 4F 4C 4C 4F 57 49 4E 47 20 45 51 55 41 54 49 4F |OLLOWING EQUATIO|
00002860: 4E 3F 20 22 00 72 30 20 08 83 20 45 4E 44 2C 45 |N? ".r0 .. END,E|
00002870: 4E 44 00 00 00 |ND... |
.......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...:...#.. +++ INPUT SECTION +++...(..
UO,0:UR$."":UI$.""...).UR$."":UI$."".$.*
..UL.0.UL.80.7.-.." ..";:.UC,0.K.2..UI$
:.UI$."".50.U.7..UI$.G(13).C(UR$)..1..UC
,1:." .";:.85...<..UI$.G(20).105...>.. C
(UR$)..UL.50.A.A..120:. CHECK FOR VALID
CHARACTER.Q.F.UR$.UR$.UI$...K..UI$;...P.
.50...U..@+++ CHECK FOR HELP REQUEST +++
.0.Z..UR$.UX$.195:. EXIT TO HELP ROUTINE
.?._..UF.1..240.L.D.UF.0:.:..E.F.. ++ CH
ECK DELETE ++.V.I..C(UR$).1.50...N.UR$.H
(UR$,C(UR$).1). .S..". ..";:.50.G.X.. +
+ CHECK FOR VALID CHARACTERS ++.Y.}..C(U
S$).0.150....US$.US$.UX$......US.1.C(US
$)......UI$.J(US$,US,1).........$...UI$.
"":..?.... ** STANDARD INPUT **.P....F(U
I$).46...A....UI$.G(32)...~. ..F(UI$).48
.F(UI$).57.170............F(UI$).65.F(UI
$).90.180.......K....F(UI$).193.F(UI$).2
18.UI$."":.......B(UT).UU%.UI$.G(F(UI$).
128):............UI$."":..&.C.UF.1:. +++
HELP ROUTINE EXIT +++./.E..250.8.H..245
.W.M..UQ.UB.(U2%.256.U1%.U3%.2).S.R.UQ%(
UQ.UB).B(UQ):.:."."...W.UZ.1:UV%.B(UT)..
.X..300...Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:U
L.UK...Z..B(50003).0..53281,1:.".";:.532
81,6:.53280,14:.220......".";.$...UT$.UL
$:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%.3).9..
..UQ,UQ%(UQ.UB):..E....U1,U1%.Q....U2,U2
%.]....U4,U4%.K....U3,U3%.1.S....35.....
UD%.((U2%.256.U1%.U3%).UB).40:.H(UD$,UD%
.1):.......H(UD$,24);"
. HELP COMING . ":......U1%.B(U1):U
2%.B(U2):U3%.B(U3):U4%.B(U4).4...UJ$.US$
:UK$.UG$:UL$.UT$:UJ.UP:UK.UL.:.....K.,..
** MENU **.Q.-.:......".":.UT,UU%:.B(50
003).0..53281,9:.53280,8.../.:...1..".
MENU".R.6.." -------------
-------------------------"...;.."..
1. BEGIN ROOTS QUIZ ".%.@.."..
2. STUDENT INSTRUCTIONS".O.E.."..
3. TEACHER INSTRUCTIONS".|.J.."..
4. MODIFICATION OF PROGRAM"...O
..".. 5. QUIT..".G.T.." --------
------------------------------"...Y.."..
PRESS A NUMBER KEY (1-5) ";...^.U
L.1:US$."12345":.35:. INPUT ROUTINE.2._.
UA.0:.C(UR$).1.300.=.`.US$."".^.C..E(UR$
).1000,400,500,600,396.G.H..300...... **
RE-ENABLE STOP KEY AND END **......B(50
003)..1.B(50003)..160.B(50003)..0.399...
...UU.71:.B(50003).0..53281,6:.53280,14.
....."..":.......875:....... ** STUDENT
INSTRUCTIONS **.N....".":.UT,UL%:.B(5000
3).0..53281,0:.53280,0.O...UP.0:UG$."STU
DENT INST":.850. ....". THIS PROGRAM WAS
DESIGNED TO HELP YOU":..P...." DEVELOP
YOUR SKILL IN FINDING THE ROOTS"......"
OF A TRINOMIAL. I WILL GIVE YOU 2":....
.." CHANCES TO GET THE ANSWER CORRECT.
YOU":..[...." WILL HAVE TO GIVE 2 ROOTS
FOR EACH":......." TRINOMIAL. YOU WILL
RECEIVE ONE POINT":......." FOR EACH COR
RECT ANSWER, AND AFTER":......." YOU HAV
E AQUIRED 20 POINTS, YOUR FINAL":.......
" MARK WILL BE SHOWN."......835:UP.1:.85
0:UP.0.P...."..... PRESS RETURN AFTER E
ACH INPUT AND":......" PRESS H AND RETU
RN IF YOU WANT TO GO":......." BACK TO T
HE MENU."......835......UZ.1..UP%:.217..
.......... ** TEACHER INSTRUCTIONS **...
...".":.UT,UL%:.B(50003).0..53281,2:.532
80,10.....UP.0:UG$."TEACHER INST":.850.\
....".. TO THE BEST OF OUR KNOWLEDG
E,."......" THIS PROGRAM IS IN THE PUB
LIC."......" DOMAIN. IF THIS IS NOT T
HE CASE.".N...." PLEASE CONTACT:..."..
...." COMMODORE BUSINESS MACHINES."
......" 3370 PHARMACY AVE..?...
." AGINCOURT, ONTARIO".A...."
CANADA M1W 2K4"......"
(416) 499-4292".....UP.1:. 835:. 850:.
A...." ..PROGRAM NAME: ROOTS QUIZ
......." WRITTEN BY : R. MACNAUGHTO
N."......" UPGRADED BY : A. LEE ..
:...." .THIS PROGRAM WILL RUN ON ANY
...Z...." PET 64 COMPUTER......
" COMMODORE 64 COMPUTER......835
......850.A....".. THIS PROGRAM WILL HE
LP THE STUDENT":......." TO DEVELOP THEI
R SKILLS IN CALCULATING":.. ...." THE RO
OTS OF A TRINOMIAL. THIS CAN":..Q...."
ALSO BE USED TO MAKE UP A QUIZ FOR THE":
..B...." CLASS.":......." THE STUDENT I
S GIVEN 10 DIFFERENT":......." TRINOMIAL
S, AND 2 POINTS ARE GIVEN FOR":......."
EACH RIGHT TRINOMIAL.":.835...N..UZ.1..U
P%:.217...W...#.X.. ** PROGRAM MODIFICAT
ION INST **.4.Y..".":.UT,UL%.T.].UP.0:UG
$."PROGRAM MOD":.850...C..". THE NUMB
ER OF GUESSES THAT YOU":....D.." CAN H
AVE AT A QUESTION CAN BE ALTERED.":....F
.." ON LINE 1540 THE NUMBER 2(..IF TR<.2
..)"...H..". CAN BE CHANGED TO A DESIRED
VALUE.":..B.J.." THE RANGE OF NUMBERS
THAT SHOW UP IN":..Q.L.." QUESTIONS CAN
BE SET BY ALTERING THE":.. .N.." CONTENT
OF THE VARIABLE .MA. ON LINE":..P.P.."
1060. IT IS INITIALLY SET TO 9 BUT THE"
...R.." VALUE CAN BE CHANGED SO THAT THE
RANGE":....T.." IS +MA TO -MA.".!....83
5.5....UZ.1..UP%:.217.;.....`.... ** TO
USE 8032 LOAD CBM4032 **...F..".....BEFO
RE RUNNING THIS PROGRAM ON AN 8032 ...L
.P.." LOAD THE 'CBM 4032' PROGRAM..
...........".W.Z..UU.71............ ** T
O USE 8032 LOAD CBM4032 **.M...."....BEF
ORE RUNNING THIS PROGRAM ON AN 8032 ..L
OAD CBM 4032 PROGRAM".Y....1093:..Y. ..
** T I T L E P A G E **...".."....";:.
UT,UU%:.B(50003).0..53280,14:.53281,6...
#..G(142);.P.$..I.1.38:."...";:....&..I.
1.22:.".....";:....(..I.1.37:.".....";:.
...*..I.1.22:.".....";:..=.,..".........
.................. .._...."............
....... . . .....0.."..................
. . ......2..".................... ..F
.4.."..............C O M M O D O R E....
.6.."...............EDUCATIONAL.....8.."
................SOFTWARE.#.:.. ** COMMOD
ORE LOGO **.[.;..H(UD$,24);"..........PR
ESS SPACE BAR OR WAIT.":I.0.}.<..A$:.A$.
." ".I.I.1:.I.250.828...>.T1$."":T2$."":
T3$."":T4$."":I.0...@..300.F.C.. ** SPAC
E BAR PRESS **...H..UO,0:.H(UD$,24);"...
....PRESS SPACE BAR TO CONTINUE."...L..U
I$:.UI$.." ".844...N...>.R.. ** PAGE DES
IGN ROUTINE **.J.T.UP.UP.1.T.W.."."H(UT$
.UP$,21);I(UP$.UG$.D(UP),18)...\.." ----
----------------------------------"...`.
.UH..0.870...A..H(UD$,24);H(UP$,7);"HELP
- PRESS H <RETURN>"...F.UH.0:."..":..
..K.. ** PLEASE WAIT REMARK **.L.P..H(UD
$,24);" ONE MOMENT PLEASE...
".R.U...O.... ** SET UP VARIABLES **.
....UX$."H":.UQ%(1000):UB.32768:U1.196:U
2.197:U3.198:U4.216:UC.167:UU.1024.....U
T.59468:UU%.12:UL%.14:UP%.1146:UM.32768:
UO.158:. 50003,0.; ...B(50003).0.UB.1024
:U1.209:U2.210:U3.211:U4.214:UC.204:UU.2
048.Z ...B(50003).0.UT.53272:UU%.21:UL%.
23:UP%.2139:UM.1024:UO.198.. ..UD$."....
.....................".P ..UP$."
"..!..UT$
." ROOTS QUIZ ":. PLACE PROGRAM T
ITLE HERE !!!!!!!!!!!!!!!!!***.$!....>!.
.. ** SET VARIABLES **.G!...900.M!..:.S!
..:.N!... ** CHECK FOR 8032 **..!...".":
." ":. SHIFTED SPACE..!...B(UB.40)..96..
700..!... ** MEMORY CHECK **.P!... .(0).
2000.937..!..."....THIS MACHINE DOES NOT
HAVE ENOUGH.".""..."MEMORY TO RUN THIS
PROGRAM !".-"...UU.71.3"....M"..."..":.B
(50003).0.962.|"... ** BASIC 2.0 OR 4.
0 OR C-64 SETUP **.."...1075,133:.1076
,144:.1077,234:.1079,4:.1080,133:.1081,1
45.."...1091,155:.1098,133:.1099,144:.11
00,234:.1103,133..#...1104,145:.1105,234
:.1082,234.)#...B(50003)..160.955.X#...1
093,88:.1094,228:.1097,85:.1102,228:.965
.M#...B(50003)..1.990..#...1093,49:.1094
,230:.1097,46:.1102,230:.965.V#B..2099,1
41:.2100,20:.2101,3:.2103,8:.2104,141:.2
105,21..$C..2106,3:.2115,145:.2117,52:.2
118,234:.2121,49:.2122,141.L$D..2123,20:
.2124,3:.2126,234:.2127,141:.2128,21:.21
29,3.J$E..UU.48:. DISABLE STOP KEY.{$J..
800:. TITLE..$T..300:. MENU..$...".THE P
GM WILL NOT WORK ON THIS MACHINE!":...$.
..UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM START
S HERE **..%..."..";:.:.B(50003).0..5328
1,6:.53280,14.#%....8%... QUIZ EQU ROOTS
.L%... R MACNAUGHTON.[%... FEB 1982.E%..
.". ".~%$.QN.10:NA.1:MA.9:PT.0..%...B(UM
)..96.XX.22:LM.0:RM.21:SL.1:.G(14):.1120
..%8.:.U%B.XX.40:.B(UM.1024).96.XX.40..%
L.LM.5:RM.35:SL.3:.XX.80.LM.25:RM.55..&V
..UT,UL%:.1140.=&`.RED$.G(28):GRN$.G(30)
:BLU$.G(31):WHT$.G(5).N&J.CYN$.G(159):PU
R$.G(156):YEL$.G(158):BCK$."."..&T.. QN
QUESTION NUMBER..&~.. NA NUMBER OF ANSWE
RS FOR EACH.B&... PT POINTS EARNED..&...
LM/RM LEFT/RIGHT MARGIN..&... LN WHERE
PRINTED..'... SL STARTING LINE FOR SCREE
N.6'... XX CHARACTERS PER LINE.V'... Q$
QUESTION A$(N) ANSWERS.W'D.. TR TRIES AT
GETTING ANSWER..'N.. CA NUMBER OF RIGHT
ANSWER..'X.. S$ STRING TO BE PRINTED.Q'
... YA YOUR ANSWER NUMBER..'... MA ROOTS
ARE FROM -MA TO MA..'... Q$..(...N.1.QN
..(...I.1.2./(..A(I)..(.5..(1).2.MA).MA.
[(...A(I).0 . .(A(I)).1 . (A(1)..A(2)).1
300.B((..I.{(2.UG$." QUESTION":.850..(7.
S$.BLU$."QUIZ SCORE:".D(PT)." POINT":.PT
..1.S$.S$."S".J(<.LN.SL:.1890:TR.0..(F.Q
N$.I(" ".D(N),2).". "..)P.S$.BCK$.QN$.Q
$:LN.SL.2:.1890..)Z.C(1)..(A(1).A(2)).6)
D.C(2).(.A(1)).(.A(2)).V)N..I.1.2:C$(I).
J(D(C(I)),2):..{)X.S$." X.2.":.C(1).0
.S$.S$."+ "..)...C(1).0.S$.S$."- "..)..S
$.S$.C$(1)."X "..)...C(2).0.S$.S$."+ ".U
) ..C(2).0.S$.S$."- "..)..S$.S$.C$(2)..)
..S$.S$." = 0"..*..LN.LN.3:.1890.C*H.LN.
LN.3:S$.BCK$." FIRST ROOT : .....":
.1890:.1750.`*R.. I.1.2:. A(I).IN . 1510
.L*...:.1530..*..LN.LN.2:S$.BCK$." SECON
D ROOT: .....":.1890:.1750.F*..LN.L
N.2:. A(3.I).IN . 1600.R*..TR.TR.1..*...
TR.2.1560..*...1570.'+..S$.RED$."YOU ARE
WRONG! TRY AGAIN!":.1890:.:.X.1.500:.X.
]+...".
":.1360. +".S$.RED$.".. SORRY, COR
RECT ROOTS ARE: ".D(A(1))." AND".D(A(2))
..+,.PT.PT.3.TR.1:.S$:.835:.1590.N+6.. N
:.1620..,@.S$.RED$."THAT'S CORRECT! GOOD
WORK!":.1890:.2030..,J.PT.PT.3.TR.1:.15
90.],T.UP.UP.1:.850:LN.4:S$.BLU$."THAT'S
THE END OF THIS QUIZ.":.1890..,^.LN.LN.
2:S$."YOU GOT".D(PT)." POINTS.":.1890..,
H.MX.QN.2..,R.LN.LN.4:S$."THE MOST YOU C
OULD GET WAS".D(MX)." POINTS.":.1890..-|
.SC.PT.MX:.SC..85.S$.RED$."EXCELLENT WOR
K!":.1700.3-...SC..70.S$."GOOD WORK!":.1
700.V-...SC...50.S$."NEEDS MORE WORK!"..
-...SC..50.S$.RED$."PLEASE SEE THE TEACH
ER!"..-...835:UP.UP.1:.850.C-..."... DO
YOU WANT TO PLAY AGAIN? ";.Y-..UL.1:US$
."YN":.35..-B.. UR$."Y" .UP.0:.1000..-L.
. 300...V.. INPUT ROUTINE.3...IN$."":UL.
5:US$."-0123456789".W....35:IN$.UR$:IN.E
(UR$):LE.C(IN$).].:...Q.D.C$.G(F(C$).127
)...N..C$.."A".C$.."Z".C$.G(F(C$).128)..
.X.IN$.IN$.C$:.C$"..";:.1770.D.B.. FORMA
T S$...L.DN$."..........................
"...V..H(DN$,LN.2);../..LL.RM.LM.1.)/..F
X.0:LE.C(S$):.LE..LL.2010.\/...L.1.LL:.(
F(J(S$,L,1)).127).32.FX.FX.1:LL.LL.1.C/.
..L.T/...L.LL.1.1..1../...J(S$,L,1)." ".
1990../...L:L.LL.1:LF.1.C/F...LM)H(S$,L.
1);:.:.LM.L.1..XX..../P.S$.I(S$,LE.L.LF)
:LF.0:LN.LN.2:.1920../Z...LM)S$;../.....
0...835..0..:..0....'0... ****DATA****.
D0... "WHAT ARE THE ROOTS OF THE F
OLLOWING EQUATION? ".R0 .. END,END...
> CLICK IMAGE PREVIEW FOR FULL MODAL