EXPONENT MULT.C3
FILE INFORMATION
FILENAME(S): EXPONENT MULT.C3
FILE TYPE(S): PRG
FILE SIZE: 10K
FIRST SEEN: 2025-11-30 01:08:22
APPEARS ON: 2 disk(s)
FILE HASH
a80319c482b0eda86e947f1c3da783a92642b5468fd4027714d0a17a0b8bb5d4
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | EXPONENT MULT.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 32 | 0 | DOWNLOAD FILE |
| L EHRNEN | EXPONENT MULT.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 32 | 0 | 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 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 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 55 52 24 B2 22 22 3A 55 49 24 B2 |...(.UR$."":UI$.|
00000100: 22 22 3A 97 55 4F 2C 30 00 18 09 2A 00 8B 55 4C |"":.UO,0...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 2B 09 2D 00 99 22 20 |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 3F 09 32 00 | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38 35 00 7C 09 3C 00 8B 55 |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 90 09 3E |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09 46 00 55 52 24 B2 55 52 |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09 4B 00 99 55 49 24 3B 00 |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00 FC 09 55 00 8F 20 2B 2B |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54 20 2B 2B 2B 00 24 0A 5A | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F 00 8B 55 46 B2 31 A7 8D |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00 55 46 B2 30 3A 99 3A 8E |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B 2B 00 6A 0A 69 00 8B C3 |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7 35 30 00 82 0A 6E 00 55 |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99 22 9D 20 20 9D 9D 22 3B |1)...s..". ..";|
00000290: 3A 89 35 30 00 BB 0A 78 00 8F 20 2B 2B 20 43 48 |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53 20 2B 2B 00 CD 0A 7D 00 |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2 30 A7 31 35 30 00 DE 0A |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 F5 |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A 8C 00 82 00 08 0B 91 00 |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E 00 23 0B 96 00 8F 20 2A |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 |* STANDARD INPUT|
00000320: 20 2A 2A 00 34 0B 98 00 8B C6 28 55 49 24 29 B2 | **.4.....(UI$).|
00000330: 34 36 A7 8E 00 45 0B 9B 00 8B 55 49 24 B2 C7 28 |46...E....UI$..(|
00000340: 33 32 29 A7 8E 00 62 0B A0 00 8B C6 28 55 49 24 |32)...b.....(UI$|
00000350: 29 B3 34 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 |).48..(UI$).57.1|
00000360: 37 30 00 68 0B A5 00 8E 00 85 0B AA 00 8B C6 28 |70.h...........(|
00000370: 55 49 24 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 |UI$).65..(UI$).9|
00000380: 30 A7 31 38 30 00 8B 0B AF 00 8E 00 AF 0B B4 00 |0.180...........|
00000390: 8B C6 28 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 |..(UI$).193..(UI|
000003A0: 24 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 |$).218.UI$."":..|
000003B0: D2 0B B9 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 |......(UT).UU%.U|
000003C0: 49 24 B2 C7 28 C6 28 55 49 24 29 AB 31 32 38 29 |I$..(.(UI$).128)|
000003D0: 3A 8E 00 D8 0B BB 00 8E 00 E5 0B BE 00 55 49 24 |:............UI$|
000003E0: B2 22 22 3A 8E 00 0A 0C C3 00 55 46 B2 31 3A 8F |."":......UF.1:.|
000003F0: 20 2B 2B 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E | +++ HELP ROUTIN|
00000400: 45 20 45 58 49 54 20 2B 2B 2B 00 13 0C C5 00 8D |E EXIT +++......|
00000410: 32 35 30 00 1C 0C C8 00 8D 32 34 35 00 3B 0C CD |250......245.;..|
00000420: 00 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 |..UQ.UB.(U2%.256|
00000430: AA 55 31 25 AA 55 33 25 AB 32 29 00 57 0C D2 00 |.U1%.U3%.2).W...|
00000440: 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 55 51 29 |UQ%(UQ.UB)..(UQ)|
00000450: 3A 82 3A 99 22 93 22 00 6A 0C D7 00 55 5A B2 31 |:.:.".".j...UZ.1|
00000460: 3A 55 56 25 B2 C2 28 55 54 29 00 73 0C D8 00 89 |:UV%..(UT).s....|
00000470: 33 30 30 00 98 0C D9 00 55 5A B2 30 3A 55 53 24 |300.....UZ.0:US$|
00000480: B2 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 |.UJ$:UG$.UK$:UP.|
00000490: 55 4A 3A 55 4C B2 55 4B 00 CF 0C DA 00 8B C2 28 |UJ:UL.UK.......(|
000004A0: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
000004B0: 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 |1:.".";:.53281,6|
000004C0: 3A 97 35 33 32 38 30 2C 31 34 3A 89 32 32 30 00 |:.53280,14:.220.|
000004D0: D9 0C DB 00 99 22 93 22 3B 00 08 0D DC 00 55 54 |.....".";.....UT|
000004E0: 24 B2 55 4C 24 3A 97 55 54 2C 55 56 25 3A 81 55 |$.UL$:.UT,UV%:.U|
000004F0: 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 |Q.UB.(U2%.256.U1|
00000500: 25 AA 55 33 25 AB 33 29 00 1D 0D E1 00 97 55 51 |%.U3%.3)......UQ|
00000510: 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 00 29 0D |,UQ%(UQ.UB):..).|
00000520: E6 00 97 55 31 2C 55 31 25 00 35 0D E8 00 97 55 |...U1,U1%.5....U|
00000530: 32 2C 55 32 25 00 41 0D E9 00 97 55 34 2C 55 34 |2,U2%.A....U4,U4|
00000540: 25 00 4F 0D EA 00 97 55 33 2C 55 33 25 AB 31 00 |%.O....U3,U3%.1.|
00000550: 57 0D EB 00 89 33 35 00 89 0D F0 00 55 44 25 B2 |W....35.....UD%.|
00000560: 28 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 |((U2%.256.U1%.U3|
00000570: 25 29 AB 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 |%).UB).40:..(UD$|
00000580: 2C 55 44 25 AA 31 29 3A 8E 00 C4 0D F5 00 99 C8 |,UD%.1):........|
00000590: 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 |(UD$,24);" |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 12 20 48 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 |. HELP COMING . |
000005C0: 20 22 3A 8E 00 F0 0D FA 00 55 31 25 B2 C2 28 55 | ":......U1%..(U|
000005D0: 31 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 |1):U2%..(U2):U3%|
000005E0: B2 C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 |..(U3):U4%..(U4)|
000005F0: 00 18 0E FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 |.....UJ$.US$:UK$|
00000600: B2 55 47 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 |.UG$:UL$.UT$:UJ.|
00000610: 55 50 3A 55 4B B2 55 4C 00 1E 0E FF 00 8E 00 2F |UP:UK.UL......./|
00000620: 0E 2C 01 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 |.,.. ** MENU **.|
00000630: 35 0E 2D 01 3A 00 64 0E 2E 01 99 22 93 22 3A 97 |5.-.:.d....".":.|
00000640: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00000650: B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 35 33 32 |.0..53281,9:.532|
00000660: 38 30 2C 38 00 6A 0E 2F 01 3A 00 87 0E 31 01 99 |80,8.j./.:...1..|
00000670: 22 13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000680: 20 20 4D 45 4E 55 22 00 B6 0E 36 01 99 22 20 2D | MENU"...6.." -|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006B0: 2D 2D 2D 2D 2D 22 00 E2 0E 3B 01 99 22 11 11 20 |-----"...;..".. |
000006C0: 20 20 20 20 20 20 31 2E 20 20 20 45 58 50 4F 4E | 1. EXPON|
000006D0: 45 4E 54 20 4D 55 4C 54 49 50 4C 49 43 41 54 49 |ENT MULTIPLICATI|
000006E0: 4F 4E 00 0C 0F 40 01 99 22 11 11 20 20 20 20 20 |ON...@..".. |
000006F0: 20 20 32 2E 20 20 20 53 54 55 44 45 4E 54 20 49 | 2. STUDENT I|
00000700: 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 36 0F 45 |NSTRUCTIONS".6.E|
00000710: 01 99 22 11 11 20 20 20 20 20 20 20 33 2E 20 20 |..".. 3. |
00000720: 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 | TEACHER INSTRUC|
00000730: 54 49 4F 4E 53 22 00 52 0F 4F 01 99 22 11 11 20 |TIONS".R.O..".. |
00000740: 20 20 20 20 20 20 34 2E 20 20 20 51 55 49 54 11 | 4. QUIT.|
00000750: 11 22 00 81 0F 54 01 99 22 20 2D 2D 2D 2D 2D 2D |."...T.." ------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000780: 22 00 AC 0F 59 01 99 22 11 11 20 20 20 20 20 20 |"...Y..".. |
00000790: 20 50 52 45 53 53 20 41 20 4E 55 4D 42 45 52 20 | PRESS A NUMBER |
000007A0: 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 D4 0F 5E |KEY (1-4) ";...^|
000007B0: 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 33 34 22 |.UL.1:US$."1234"|
000007C0: 3A 8D 33 35 3A 8F 20 49 4E 50 55 54 20 52 4F 55 |:.35:. INPUT ROU|
000007D0: 54 49 4E 45 00 DF 0F 60 01 55 53 24 B2 22 22 00 |TINE...`.US$."".|
000007E0: FC 0F 63 01 91 C5 28 55 52 24 29 8D 31 30 30 30 |..c...(UR$).1000|
000007F0: 2C 34 30 30 2C 35 30 30 2C 33 39 36 00 05 10 68 |,400,500,396...h|
00000800: 01 89 33 30 30 00 2C 10 8B 01 8F 20 2A 2A 20 52 |..300.,.... ** R|
00000810: 45 2D 45 4E 41 42 4C 45 20 53 54 4F 50 20 4B 45 |E-ENABLE STOP KE|
00000820: 59 20 41 4E 44 20 45 4E 44 20 2A 2A 00 5B 10 8C |Y AND END **.[..|
00000830: 01 8B C2 28 35 30 30 30 33 29 B3 B1 31 AF C2 28 |...(50003)..1..(|
00000840: 35 30 30 30 33 29 B3 B1 31 36 30 AF C2 28 35 30 |50003)..160..(50|
00000850: 30 30 33 29 B3 B1 30 A7 33 39 39 00 85 10 8D 01 |003)..0.399.....|
00000860: 9E 55 55 AA 37 31 3A 8B C2 28 35 30 30 30 33 29 |.UU.71:..(50003)|
00000870: B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 32 |.0..53281,6:.532|
00000880: 38 30 2C 31 34 00 91 10 8E 01 99 22 9A 93 22 3A |80,14......"..":|
00000890: 80 00 9C 10 8F 01 8D 38 37 35 3A 8E 00 BD 10 90 |.......875:.....|
000008A0: 01 8F 20 2A 2A 20 53 54 55 44 45 4E 54 20 49 4E |.. ** STUDENT IN|
000008B0: 53 54 52 55 43 54 49 4F 4E 53 20 2A 2A 00 EC 10 |STRUCTIONS **...|
000008C0: 95 01 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B |...".":.UT,UL%:.|
000008D0: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
000008E0: 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 0D 11 9A |1,0:.53280,0....|
000008F0: 01 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 45 |.UP.0:UG$.".TUDE|
00000900: 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 3C 11 |NT .NST":.850.<.|
00000910: 9B 01 99 22 11 20 D4 48 49 53 20 50 52 4F 47 52 |...". .HIS PROGR|
00000920: 41 4D 20 57 49 4C 4C 20 47 49 56 45 20 59 4F 55 |AM WILL GIVE YOU|
00000930: 20 41 20 44 52 49 4C 4C 20 49 4E 22 00 67 11 9C | A DRILL IN".g..|
00000940: 01 99 22 11 20 4D 55 4C 54 49 50 4C 59 49 4E 47 |..". MULTIPLYING|
00000950: 20 57 49 54 48 20 45 58 50 4F 4E 45 4E 54 53 2E | WITH EXPONENTS.|
00000960: 20 C9 4E 20 54 48 45 00 97 11 9E 01 99 22 11 20 | .N THE......". |
00000970: 4D 55 4C 54 49 50 4C 49 43 41 54 49 4F 4E 20 51 |MULTIPLICATION Q|
00000980: 55 45 53 54 49 4F 4E 53 20 57 48 49 43 48 20 46 |UESTIONS WHICH F|
00000990: 4F 4C 4C 4F 57 2C 22 00 C4 11 A0 01 99 22 11 20 |OLLOW,"......". |
000009A0: 54 48 45 52 45 20 41 52 45 20 54 48 52 45 45 20 |THERE ARE THREE |
000009B0: 4C 45 56 45 4C 53 20 4F 46 20 44 49 46 46 49 43 |LEVELS OF DIFFIC|
000009C0: 55 4C 54 59 00 F3 11 A2 01 99 22 11 20 54 4F 20 |ULTY......". TO |
000009D0: 43 48 4F 4F 53 45 20 46 52 4F 4D 2E 20 D9 4F 55 |CHOOSE FROM. .OU|
000009E0: 20 43 41 4E 20 41 4C 53 4F 20 43 48 4F 4F 53 45 | CAN ALSO CHOOSE|
000009F0: 20 54 4F 00 19 12 A4 01 99 22 11 20 57 4F 52 4B | TO......". WORK|
00000A00: 20 57 49 54 48 20 4F 52 20 57 49 54 48 4F 55 54 | WITH OR WITHOUT|
00000A10: 20 4E 45 47 41 54 49 56 45 00 48 12 A6 01 99 22 | NEGATIVE.H...."|
00000A20: 11 20 45 58 50 4F 4E 45 4E 54 53 2E 20 D4 48 45 |. EXPONENTS. .HE|
00000A30: 20 51 55 45 53 54 49 4F 4E 53 20 57 49 4C 4C 20 | QUESTIONS WILL |
00000A40: 42 45 20 47 49 56 45 4E 00 70 12 A8 01 99 22 11 |BE GIVEN.p....".|
00000A50: 20 49 4E 20 54 57 4F 20 50 41 52 54 53 3A 20 54 | IN TWO PARTS: T|
00000A60: 48 45 20 41 4E 53 57 45 52 20 54 4F 20 54 48 45 |HE ANSWER TO THE|
00000A70: 00 B4 12 A9 01 99 22 11 20 43 4F 45 46 46 49 43 |......". COEFFIC|
00000A80: 49 45 4E 54 20 41 4E 44 20 54 48 45 20 41 4E 53 |IENT AND THE ANS|
00000A90: 57 45 52 20 54 4F 20 54 48 45 22 3A 99 22 11 20 |WER TO THE":.". |
00000AA0: 45 58 50 4F 4E 45 4E 54 2E 22 3A 8D 38 33 35 3A |EXPONENT.":.835:|
00000AB0: 8D 38 35 30 00 E3 12 AA 01 99 22 11 20 D9 4F 55 |.850......". .OU|
00000AC0: 20 57 49 4C 4C 20 48 41 56 45 20 54 48 52 45 45 | WILL HAVE THREE|
00000AD0: 20 43 48 41 4E 43 45 53 20 54 4F 20 41 4E 53 57 | CHANCES TO ANSW|
00000AE0: 45 52 22 00 0F 13 AB 01 99 22 11 20 43 4F 52 52 |ER"......". CORR|
00000AF0: 45 43 54 4C 59 20 42 45 46 4F 52 45 20 47 4F 49 |ECTLY BEFORE GOI|
00000B00: 4E 47 20 4F 4E 2E 20 20 C9 46 20 59 4F 55 22 00 |NG ON. .F YOU".|
00000B10: 39 13 AC 01 99 22 11 20 57 41 4E 54 20 54 4F 20 |9....". WANT TO |
00000B20: 53 4B 49 50 20 41 20 51 55 45 53 54 49 4F 4E 2C |SKIP A QUESTION,|
00000B30: 20 54 59 50 45 20 D3 20 22 00 60 13 AE 01 99 22 | TYPE . ".`...."|
00000B40: 11 20 3C D2 C5 D4 D5 D2 CE 3E 20 46 4F 52 20 54 |. <......> FOR T|
00000B50: 48 45 20 41 4E 53 57 45 52 20 54 4F 20 54 48 45 |HE ANSWER TO THE|
00000B60: 00 8C 13 B0 01 99 22 11 20 43 4F 45 46 46 49 43 |......". COEFFIC|
00000B70: 49 45 4E 54 2E 20 D4 4F 20 45 4E 44 20 54 48 45 |IENT. .O END THE|
00000B80: 20 51 55 45 53 54 49 4F 4E 53 2C 22 00 B6 13 B2 | QUESTIONS,"....|
00000B90: 01 99 22 11 20 54 59 50 45 20 12 C5 92 20 3C D2 |..". TYPE ... <.|
00000BA0: C5 D4 D5 D2 CE 3E 20 46 4F 52 20 54 48 45 20 41 |.....> FOR THE A|
00000BB0: 4E 53 57 45 52 22 00 D3 13 B4 01 99 22 11 20 54 |NSWER"......". T|
00000BC0: 4F 20 54 48 45 20 43 4F 45 46 46 49 43 49 45 4E |O THE COEFFICIEN|
00000BD0: 54 2E 22 00 E1 13 B5 01 8D 38 33 35 3A 8D 38 35 |T."......835:.85|
00000BE0: 30 00 11 14 CC 01 99 22 11 11 11 11 20 CE 4F 54 |0......".... .OT|
00000BF0: 45 3A 1D C1 4C 57 41 59 53 20 50 52 45 53 53 20 |E:..LWAYS PRESS |
00000C00: 54 48 45 20 3C D2 C5 D4 D5 D2 CE 3E 20 4B 45 59 |THE <......> KEY|
00000C10: 22 00 34 14 D6 01 99 22 11 20 41 46 54 45 52 20 |".4....". AFTER |
00000C20: 45 4E 54 45 52 49 4E 47 20 41 4E 20 41 4E 53 57 |ENTERING AN ANSW|
00000C30: 45 52 2E 22 00 5F 14 DB 01 99 22 11 20 C9 46 20 |ER."._....". .F |
00000C40: 41 54 20 41 4E 59 20 54 49 4D 45 20 59 4F 55 20 |AT ANY TIME YOU |
00000C50: 57 49 53 48 20 54 4F 20 52 45 54 55 52 4E 22 00 |WISH TO RETURN".|
00000C60: 86 14 E0 01 99 22 11 20 54 4F 20 54 48 45 20 CD |.....". TO THE .|
00000C70: C5 CE D5 20 50 52 45 53 53 20 48 20 3C D2 C5 D4 |... PRESS H <...|
00000C80: D5 D2 CE 3E 2E 22 00 8F 14 E5 01 8D 38 33 35 00 |...>."......835.|
00000C90: A3 14 EA 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 |.....UZ.1..UP%:.|
00000CA0: 32 31 37 00 A9 14 F3 01 8E 00 CA 14 F4 01 8F 20 |217............ |
00000CB0: 2A 2A 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 |** TEACHER INSTR|
00000CC0: 55 43 54 49 4F 4E 53 20 2A 2A 00 FA 14 F5 01 99 |UCTIONS **......|
00000CD0: 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 |".":.UT,UL%:..(5|
00000CE0: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 |0003).0..53281,2|
00000CF0: 3A 97 35 33 32 38 30 2C 31 30 00 1B 15 F6 01 55 |:.53280,10.....U|
00000D00: 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 48 45 52 |P.0:UG$.".EACHER|
00000D10: 20 C9 4E 53 54 22 3A 8D 38 35 30 00 49 15 F7 01 | .NST":.850.I...|
00000D20: 99 22 11 11 20 20 20 20 20 20 D4 4F 20 54 48 45 |.".. .O THE|
00000D30: 20 42 45 53 54 20 4F 46 20 4F 55 52 20 4B 4E 4F | BEST OF OUR KNO|
00000D40: 57 4C 45 44 47 45 2C 11 22 00 72 15 F8 01 99 22 |WLEDGE,.".r...."|
00000D50: 20 20 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 | THIS PROGRAM |
00000D60: 49 53 20 49 4E 20 54 48 45 20 50 55 42 4C 49 43 |IS IN THE PUBLIC|
00000D70: 11 22 00 9E 15 F9 01 99 22 20 20 20 44 4F 4D 41 |."......" DOMA|
00000D80: 49 4E 2E 20 20 C9 46 20 54 48 49 53 20 49 53 20 |IN. .F THIS IS |
00000D90: 4E 4F 54 20 54 48 45 20 43 41 53 45 11 22 00 BB |NOT THE CASE."..|
00000DA0: 15 FA 01 99 22 20 20 20 50 4C 45 41 53 45 20 43 |...." PLEASE C|
00000DB0: 4F 4E 54 41 43 54 3A 11 11 11 22 00 E5 15 FB 01 |ONTACT:...".....|
00000DC0: 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 |." .OMMODOR|
00000DD0: 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 43 48 49 |E .USINESS .ACHI|
00000DE0: 4E 45 53 11 22 00 08 16 FC 01 99 22 20 20 20 20 |NES."......" |
00000DF0: 20 20 20 20 20 20 33 33 37 30 20 D0 48 41 52 4D | 3370 .HARM|
00000E00: 41 43 59 20 C1 56 45 2E 00 2C 16 FD 01 99 22 20 |ACY .VE..,...." |
00000E10: 20 20 20 20 20 20 20 20 20 C1 47 49 4E 43 4F 55 | .GINCOU|
00000E20: 52 54 2C 20 CF 4E 54 41 52 49 4F 22 00 4E 16 FE |RT, .NTARIO".N..|
00000E30: 01 99 22 20 20 20 20 20 20 20 20 20 20 C3 41 4E |.." .AN|
00000E40: 41 44 41 20 20 20 CD 31 D7 20 32 CB 34 22 00 6E |ADA .1. 2.4".n|
00000E50: 16 FF 01 99 22 20 20 20 20 20 20 20 20 20 20 28 |...." (|
00000E60: 34 31 36 29 20 34 39 39 2D 34 32 39 32 22 00 84 |416) 499-4292"..|
00000E70: 16 00 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 |...UP.1:. 835:. |
00000E80: 38 35 30 3A 00 B0 16 01 02 99 22 20 20 20 20 20 |850:......" |
00000E90: 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 |...ROGRAM .AME: |
00000EA0: C5 58 50 4F 4E 45 4E 54 20 CD 55 4C 54 2E 11 22 |.XPONENT .ULT.."|
00000EB0: 00 DB 16 02 02 99 22 20 20 20 20 20 D7 52 49 54 |......" .RIT|
00000EC0: 54 45 4E 20 C2 59 20 20 3A 20 CA 2E 20 C2 2E 20 |TEN .Y : .. .. |
00000ED0: CE 49 43 48 4F 4C 53 4F 4E 11 22 00 F6 16 03 02 |.ICHOLSON.".....|
00000EE0: 99 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 20 |." .PGRADED |
00000EF0: C2 59 20 3A 20 11 00 21 17 04 02 99 22 20 20 20 |.Y : ..!...." |
00000F00: 20 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 | ..HIS PROGRAM |
00000F10: 57 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 |WILL RUN ON ANY.|
00000F20: 11 00 40 17 07 02 99 22 20 20 20 20 20 20 20 20 |..@...." |
00000F30: 20 D0 C5 D4 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 | ... 64 ........|
00000F40: 00 65 17 08 02 99 22 20 20 20 20 20 20 20 20 20 |.e...." |
00000F50: C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF CD |......... 64 ...|
00000F60: D0 D5 D4 C5 D2 00 73 17 09 02 8D 38 33 35 3A 8D |......s....835:.|
00000F70: 38 35 30 00 A7 17 0D 02 99 22 11 11 11 11 11 20 |850......"..... |
00000F80: D4 48 49 53 20 50 52 4F 47 52 41 4D 20 47 49 56 |.HIS PROGRAM GIV|
00000F90: 45 53 20 54 48 45 20 53 54 55 44 45 4E 54 20 41 |ES THE STUDENT A|
00000FA0: 20 44 52 49 4C 4C 22 00 D0 17 0F 02 99 22 11 20 | DRILL"......". |
00000FB0: 49 4E 20 4D 55 4C 54 49 50 4C 59 49 4E 47 20 57 |IN MULTIPLYING W|
00000FC0: 49 54 48 20 4E 45 47 41 54 49 56 45 20 41 4E 44 |ITH NEGATIVE AND|
00000FD0: 00 FC 17 11 02 99 22 11 20 50 4F 53 49 54 49 56 |......". POSITIV|
00000FE0: 45 20 45 58 50 4F 4E 45 4E 54 53 2E 20 D4 48 45 |E EXPONENTS. .HE|
00000FF0: 20 53 54 55 44 45 4E 54 20 48 41 53 00 28 18 13 | STUDENT HAS.(..|
00001000: 02 99 22 11 20 54 48 45 20 4F 50 54 49 4F 4E 20 |..". THE OPTION |
00001010: 4F 46 20 43 48 4F 4F 53 49 4E 47 20 54 48 45 20 |OF CHOOSING THE |
00001020: 4C 45 56 45 4C 20 4F 46 00 58 18 14 02 99 22 11 |LEVEL OF.X....".|
00001030: 20 44 49 46 46 49 43 55 4C 54 59 20 41 4E 44 20 | DIFFICULTY AND |
00001040: 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 51 55 |THE NUMBER OF QU|
00001050: 45 53 54 49 4F 4E 53 22 00 7E 18 15 02 99 22 11 |ESTIONS".~....".|
00001060: 20 48 45 2F 53 48 45 20 57 4F 55 4C 44 20 4C 49 | HE/SHE WOULD LI|
00001070: 4B 45 20 54 4F 20 41 4E 53 57 45 52 2E 22 00 87 |KE TO ANSWER."..|
00001080: 18 44 02 8D 38 33 35 00 9B 18 4E 02 8B 55 5A B2 |.D..835...N..UZ.|
00001090: 31 A7 9E 55 50 25 3A 89 32 31 37 00 A1 18 57 02 |1..UP%:.217...W.|
000010A0: 8E 00 C7 18 58 02 8F 20 2A 2A 20 50 52 4F 47 52 |....X.. ** PROGR|
000010B0: 41 4D 20 4D 4F 44 49 46 49 43 41 54 49 4F 4E 20 |AM MODIFICATION |
000010C0: 49 4E 53 54 20 2A 2A 00 D8 18 59 02 99 22 93 22 |INST **...Y.."."|
000010D0: 3A 97 55 54 2C 55 4C 25 00 F8 18 5D 02 55 50 B2 |:.UT,UL%...].UP.|
000010E0: 30 3A 55 47 24 B2 22 D0 52 4F 47 52 41 4D 20 CD |0:UG$.".ROGRAM .|
000010F0: 4F 44 22 3A 8D 38 35 30 00 01 19 94 02 8D 38 33 |OD":.850......83|
00001100: 35 00 15 19 B2 02 8B 55 5A B2 31 A7 9E 55 50 25 |5......UZ.1..UP%|
00001110: 3A 89 32 31 37 00 1B 19 BB 02 8E 00 40 19 BC 02 |:.217.......@...|
00001120: 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 33 32 |. ** TO USE 8032|
00001130: 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 2A 2A | LOAD CBM4032 **|
00001140: 00 76 19 C6 02 99 22 93 11 11 11 05 42 45 46 4F |.v....".....BEFO|
00001150: 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 20 |RE RUNNING THIS |
00001160: 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 30 |PROGRAM ON AN 80|
00001170: 33 32 20 20 11 11 00 AC 19 D0 02 99 22 20 20 20 |32 ........" |
00001180: 20 20 20 4C 4F 41 44 20 54 48 45 20 27 43 42 4D | LOAD THE 'CBM|
00001190: 20 34 30 33 32 27 20 50 52 4F 47 52 41 4D 11 11 | 4032' PROGRAM..|
000011A0: 11 11 11 11 11 11 11 11 11 11 11 22 00 B7 19 DA |..........."....|
000011B0: 02 9E 55 55 AA 37 31 00 BD 19 E4 02 80 00 E2 19 |..UU.71.........|
000011C0: 1D 03 8F 20 2A 2A 20 54 4F 20 55 53 45 20 38 30 |... ** TO USE 80|
000011D0: 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 20 |32 LOAD CBM4032 |
000011E0: 2A 2A 00 2D 1A 1E 03 99 22 93 11 11 11 42 45 46 |**.-...."....BEF|
000011F0: 4F 52 45 20 52 55 4E 4E 49 4E 47 20 54 48 49 53 |ORE RUNNING THIS|
00001200: 20 50 52 4F 47 52 41 4D 20 4F 4E 20 41 4E 20 38 | PROGRAM ON AN 8|
00001210: 30 33 32 20 20 11 11 4C 4F 41 44 20 43 42 4D 20 |032 ..LOAD CBM |
00001220: 34 30 33 32 20 50 52 4F 47 52 41 4D 22 00 39 1A |4032 PROGRAM".9.|
00001230: 1F 03 9E 31 30 39 33 3A 80 00 59 1A 20 03 8F 20 |...1093:..Y. .. |
00001240: 2A 2A 20 54 20 49 20 54 20 4C 20 45 20 20 20 50 |** T I T L E P|
00001250: 20 41 20 47 20 45 20 2A 2A 00 8D 1A 22 03 99 22 | A G E **...".."|
00001260: 93 11 1D 05 22 3B 3A 97 55 54 2C 55 55 25 3A 8B |....";:.UT,UU%:.|
00001270: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00001280: 30 2C 31 34 3A 97 35 33 32 38 31 2C 36 00 A3 1A |0,14:.53281,6...|
00001290: 24 03 81 49 B2 31 A4 33 38 3A 99 22 12 A6 92 22 |$..I.1.38:."..."|
000012A0: 3B 3A 82 00 BB 1A 26 03 81 49 B2 31 A4 32 32 3A |;:....&..I.1.22:|
000012B0: 99 22 11 9D 12 A6 92 22 3B 3A 82 00 D3 1A 28 03 |.".....";:....(.|
000012C0: 81 49 B2 31 A4 33 37 3A 99 22 9D 9D 12 A6 92 22 |.I.1.37:."....."|
000012D0: 3B 3A 82 00 EB 1A 2A 03 81 49 B2 31 A4 32 32 3A |;:....*..I.1.22:|
000012E0: 99 22 91 9D 12 A6 92 22 3B 3A 82 00 10 1B 2C 03 |.".....";:....,.|
000012F0: 99 22 13 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |."..............|
00001300: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 |............. .|
00001310: 00 32 1B 2E 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.2....".........|
00001320: 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 20 |.......... . . |
00001330: 92 A9 00 53 1B 30 03 99 22 1D 1D 1D 1D 1D 1D 1D |...S.0..".......|
00001340: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 |............ . |
00001350: 12 A3 DF 00 71 1B 32 03 99 22 1D 1D 1D 1D 1D 1D |....q.2.."......|
00001360: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 |.............. |
00001370: 92 00 99 1B 34 03 99 22 11 11 1D 1D 1D 1D 1D 1D |....4.."........|
00001380: 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 4D 20 4F 20 |......C O M M O |
00001390: 44 20 4F 20 52 20 45 11 11 00 BC 1B 36 03 99 22 |D O R E.....6.."|
000013A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 |...............E|
000013B0: 44 55 43 41 54 49 4F 4E 41 4C 11 11 00 DB 1B 38 |DUCATIONAL.....8|
000013C0: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
000013D0: 1D 1D 1D 53 4F 46 54 57 41 52 45 00 F6 1B 3A 03 |...SOFTWARE...:.|
000013E0: 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 4F 52 45 20 4C |. ** COMMODORE L|
000013F0: 4F 47 4F 20 2A 2A 00 2E 1C 3B 03 99 C8 28 55 44 |OGO **...;...(UD|
00001400: 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |$,24);".........|
00001410: 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 |.PRESS SPACE BAR|
00001420: 20 4F 52 20 57 41 49 54 92 22 3A 49 B2 30 00 50 | OR WAIT.":I.0.P|
00001430: 1C 3C 03 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 |.<..A$:.A$.." ".|
00001440: 49 B2 49 AA 31 3A 8B 49 B3 32 35 30 A7 38 32 38 |I.I.1:.I.250.828|
00001450: 00 74 1C 3E 03 54 31 24 B2 22 22 3A 54 32 24 B2 |.t.>.T1$."":T2$.|
00001460: 22 22 3A 54 33 24 B2 22 22 3A 54 34 24 B2 22 22 |"":T3$."":T4$.""|
00001470: 3A 49 B2 30 00 7D 1C 40 03 89 33 30 30 00 99 1C |:I.0.}.@..300...|
00001480: 43 03 8F 20 2A 2A 20 53 50 41 43 45 20 42 41 52 |C.. ** SPACE BAR|
00001490: 20 50 52 45 53 53 20 2A 2A 00 D4 1C 48 03 99 C8 | PRESS **...H...|
000014A0: 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D |(UD$,24);"......|
000014B0: 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 52 |.PRESS SPACE BAR|
000014C0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 92 22 3A 97 | TO CONTINUE.":.|
000014D0: 55 4F 2C 30 00 EB 1C 4C 03 A1 55 49 24 3A 8B 55 |UO,0...L..UI$:.U|
000014E0: 49 24 B3 B1 22 20 22 A7 38 34 34 00 F1 1C 4E 03 |I$.." ".844...N.|
000014F0: 8E 00 11 1D 52 03 8F 20 2A 2A 20 50 41 47 45 20 |....R.. ** PAGE |
00001500: 44 45 53 49 47 4E 20 52 4F 55 54 49 4E 45 20 2A |DESIGN ROUTINE *|
00001510: 2A 00 1D 1D 54 03 55 50 B2 55 50 AA 31 00 47 1D |*...T.UP.UP.1.G.|
00001520: 57 03 99 22 93 22 C8 28 55 54 24 AA 55 50 24 2C |W..".".(UT$.UP$,|
00001530: 32 31 29 3B C9 28 55 50 24 AA 55 47 24 AA C4 28 |21);.(UP$.UG$..(|
00001540: 55 50 29 2C 31 38 29 00 76 1D 5C 03 99 22 20 2D |UP),18).v.\.." -|
00001550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001560: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001570: 2D 2D 2D 2D 2D 22 00 85 1D 60 03 8B 55 48 B3 B1 |-----"...`..UH..|
00001580: 30 A7 38 37 30 00 B9 1D 61 03 99 C8 28 55 44 24 |0.870...a...(UD$|
00001590: 2C 32 34 29 3B C8 28 55 50 24 2C 37 29 3B 22 48 |,24);.(UP$,7);"H|
000015A0: 45 4C 50 20 2D 20 50 52 45 53 53 20 20 20 48 20 |ELP - PRESS H |
000015B0: 3C 52 45 54 55 52 4E 3E 22 00 CA 1D 66 03 55 48 |<RETURN>"...f.UH|
000015C0: B2 30 3A 99 22 13 11 22 3A 8E 00 E9 1D 6B 03 8F |.0:."..":....k..|
000015D0: 20 2A 2A 20 50 4C 45 41 53 45 20 57 41 49 54 20 | ** PLEASE WAIT |
000015E0: 52 45 4D 41 52 4B 20 2A 2A 00 1F 1E 70 03 99 C8 |REMARK **...p...|
000015F0: 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 |(UD$,24);" |
00001600: 20 20 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 | ONE MOMENT |
00001610: 50 4C 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 |PLEASE... ".|
00001620: 25 1E 75 03 8E 00 42 1E 84 03 8F 20 2A 2A 20 53 |%.u...B.... ** S|
00001630: 45 54 20 55 50 20 56 41 52 49 41 42 4C 45 53 20 |ET UP VARIABLES |
00001640: 2A 2A 00 8D 1E 85 03 55 58 24 B2 22 48 22 3A 86 |**.....UX$."H":.|
00001650: 55 51 25 28 31 30 30 30 29 3A 55 42 B2 33 32 37 |UQ%(1000):UB.327|
00001660: 36 38 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 |68:U1.196:U2.197|
00001670: 3A 55 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 |:U3.198:U4.216:U|
00001680: 43 B2 31 36 37 3A 55 55 B2 31 30 32 34 00 CB 1E |C.167:UU.1024...|
00001690: 86 03 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 |..UT.59468:UU%.1|
000016A0: 32 3A 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 |2:UL%.14:UP%.114|
000016B0: 36 3A 55 4D B2 33 32 37 36 38 3A 97 20 35 30 30 |6:UM.32768:. 500|
000016C0: 30 33 2C 30 3A 55 4F B2 31 35 38 00 0E 1F 87 03 |03,0:UO.158.....|
000016D0: 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 42 B2 31 |..(50003).0.UB.1|
000016E0: 30 32 34 3A 55 31 B2 32 30 39 3A 55 32 B2 32 31 |024:U1.209:U2.21|
000016F0: 30 3A 55 33 B2 32 31 31 3A 55 34 B2 32 31 34 3A |0:U3.211:U4.214:|
00001700: 55 43 B2 32 30 34 3A 55 55 B2 32 30 34 38 00 4D |UC.204:UU.2048.M|
00001710: 1F 88 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 |.....(50003).0.U|
00001720: 54 B2 35 33 32 37 32 3A 55 55 25 B2 32 31 3A 55 |T.53272:UU%.21:U|
00001730: 4C 25 B2 32 33 3A 55 50 25 B2 32 31 33 39 3A 55 |L%.23:UP%.2139:U|
00001740: 4D B2 31 30 32 34 3A 55 4F B2 31 39 38 00 71 1F |M.1024:UO.198.q.|
00001750: 89 03 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 |..UD$.".........|
00001760: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001770: 22 00 A3 1F 8A 03 55 50 24 B2 22 20 20 20 20 20 |".....UP$." |
00001780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000017A0: 20 20 22 00 F1 1F 8B 03 55 54 24 B2 22 20 C5 D8 | ".....UT$." ..|
000017B0: D0 CF CE C5 CE D4 A0 CD D5 CC D4 2E 20 20 20 20 |............ |
000017C0: 22 3A 8F 20 50 4C 41 43 45 20 50 52 4F 47 52 41 |":. PLACE PROGRA|
000017D0: 4D 20 54 49 54 4C 45 20 48 45 52 45 20 21 21 21 |M TITLE HERE !!!|
000017E0: 21 21 21 21 21 21 21 21 21 21 21 21 21 21 2A 2A |!!!!!!!!!!!!!!**|
000017F0: 2A 00 F7 1F 8C 03 8E 00 11 20 8E 03 8F 20 2A 2A |*........ ... **|
00001800: 20 53 45 54 20 56 41 52 49 41 42 4C 45 53 20 2A | SET VARIABLES *|
00001810: 2A 00 1A 20 93 03 8D 39 30 30 00 20 20 94 03 3A |*.. ...900. ..:|
00001820: 00 26 20 95 03 3A 00 41 20 98 03 8F 20 2A 2A 20 |.& ..:.A ... ** |
00001830: 43 48 45 43 4B 20 46 4F 52 20 38 30 33 32 20 2A |CHECK FOR 8032 *|
00001840: 2A 00 5F 20 9D 03 99 22 93 22 3A 99 22 A0 22 3A |*._ ...".":.".":|
00001850: 8F 20 53 48 49 46 54 45 44 20 53 50 41 43 45 00 |. SHIFTED SPACE.|
00001860: 76 20 A2 03 8B C2 28 55 42 AA 34 30 29 B3 B1 39 |v ....(UB.40)..9|
00001870: 36 A7 8D 37 30 30 00 8F 20 A3 03 8F 20 2A 2A 20 |6..700.. ... ** |
00001880: 4D 45 4D 4F 52 59 20 43 48 45 43 4B 20 2A 2A 00 |MEMORY CHECK **.|
00001890: A3 20 A4 03 8B 20 B8 28 30 29 B1 32 30 30 30 A7 |. ... .(0).2000.|
000018A0: 39 33 37 00 D1 20 A5 03 99 22 93 11 11 05 54 48 |937.. ..."....TH|
000018B0: 49 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 |IS MACHINE DOES |
000018C0: 4E 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 11 |NOT HAVE ENOUGH.|
000018D0: 22 00 F5 20 A6 03 99 22 4D 45 4D 4F 52 59 20 54 |".. ..."MEMORY T|
000018E0: 4F 20 52 55 4E 20 54 48 49 53 20 50 52 4F 47 52 |O RUN THIS PROGR|
000018F0: 41 4D 20 21 22 00 00 21 A7 03 9E 55 55 AA 37 31 |AM !"..!...UU.71|
00001900: 00 06 21 A8 03 80 00 20 21 A9 03 99 22 93 05 22 |..!.... !...".."|
00001910: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 39 36 32 |:..(50003).0.962|
00001920: 00 4F 21 AC 03 8F 20 2A 2A 20 42 41 53 49 43 20 |.O!... ** BASIC |
00001930: 32 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 |2.0 OR 4.0 OR|
00001940: 20 20 43 2D 36 34 20 53 45 54 55 50 20 2A 2A 00 | C-64 SETUP **.|
00001950: 8D 21 AD 03 97 31 30 37 35 2C 31 33 33 3A 97 31 |.!...1075,133:.1|
00001960: 30 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 |076,144:.1077,23|
00001970: 34 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 2C |4:.1079,4:.1080,|
00001980: 31 33 33 3A 97 31 30 38 31 2C 31 34 35 00 C3 21 |133:.1081,145..!|
00001990: AE 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 39 |...1091,155:.109|
000019A0: 38 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 3A |8,133:.1099,144:|
000019B0: 97 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 2C |.1100,234:.1103,|
000019C0: 31 33 33 00 E5 21 AF 03 97 31 31 30 34 2C 31 34 |133..!...1104,14|
000019D0: 35 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 30 38 |5:.1105,234:.108|
000019E0: 32 2C 32 33 34 00 FC 21 B1 03 8B C2 28 35 30 30 |2,234..!....(500|
000019F0: 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 2B 22 B6 |03)..160.955.+".|
00001A00: 03 97 31 30 39 33 2C 38 38 3A 97 31 30 39 34 2C |..1093,88:.1094,|
00001A10: 32 32 38 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 |228:.1097,85:.11|
00001A20: 30 32 2C 32 32 38 3A 89 39 36 35 00 40 22 BB 03 |02,228:.965.@"..|
00001A30: 8B C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 |..(50003)..1.990|
00001A40: 00 6F 22 C0 03 97 31 30 39 33 2C 34 39 3A 97 31 |.o"...1093,49:.1|
00001A50: 30 39 34 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 |094,230:.1097,46|
00001A60: 3A 97 31 31 30 32 2C 32 33 30 3A 89 39 36 35 00 |:.1102,230:.965.|
00001A70: A9 22 C2 03 97 32 30 39 39 2C 31 34 31 3A 97 32 |."...2099,141:.2|
00001A80: 31 30 30 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 |100,20:.2101,3:.|
00001A90: 32 31 30 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 |2103,8:.2104,141|
00001AA0: 3A 97 32 31 30 35 2C 32 31 00 E5 22 C3 03 97 32 |:.2105,21.."...2|
00001AB0: 31 30 36 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A |106,3:.2115,145:|
00001AC0: 97 32 31 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 |.2117,52:.2118,2|
00001AD0: 33 34 3A 97 32 31 32 31 2C 34 39 3A 97 32 31 32 |34:.2121,49:.212|
00001AE0: 32 2C 31 34 31 00 1F 23 C4 03 97 32 31 32 33 2C |2,141..#...2123,|
00001AF0: 32 30 3A 97 32 31 32 34 2C 33 3A 97 32 31 32 36 |20:.2124,3:.2126|
00001B00: 2C 32 33 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 |,234:.2127,141:.|
00001B10: 32 31 32 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 |2128,21:.2129,3.|
00001B20: 3D 23 C5 03 9E 55 55 AA 34 38 3A 8F 20 44 49 53 |=#...UU.48:. DIS|
00001B30: 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 4E 23 |ABLE STOP KEY.N#|
00001B40: CA 03 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 5E |...800:. TITLE.^|
00001B50: 23 D4 03 89 33 30 30 3A 8F 20 4D 45 4E 55 00 8F |#...300:. MENU..|
00001B60: 23 DE 03 99 22 93 54 48 45 20 50 47 4D 20 57 49 |#...".THE PGM WI|
00001B70: 4C 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 |LL NOT WORK ON T|
00001B80: 48 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 |HIS MACHINE!":..|
00001B90: C4 23 E8 03 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E |.#...UZ.1..UP%:.|
00001BA0: 55 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 52 |UP%:UZ.0:. ** PR|
00001BB0: 4F 47 52 41 4D 20 53 54 41 52 54 53 20 48 45 52 |OGRAM STARTS HER|
00001BC0: 45 20 2A 2A 00 F0 23 E9 03 99 22 93 05 22 3B 3A |E **..#..."..";:|
00001BD0: 8C 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 |.:..(50003).0..5|
00001BE0: 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 |3281,6:.53280,14|
00001BF0: 00 02 24 FC 03 97 55 54 2C 55 4C 25 3A 89 31 33 |..$...UT,UL%:.13|
00001C00: 33 30 00 1C 24 06 04 55 53 24 B2 22 48 31 32 33 |30..$..US$."H123|
00001C10: 22 3A 55 4C B2 31 3A 89 31 30 34 30 00 3D 24 08 |":UL.1:.1040.=$.|
00001C20: 04 55 53 24 B2 22 48 30 31 32 33 34 35 36 37 38 |.US$."H012345678|
00001C30: 39 22 3A 55 4C B2 33 3A 89 31 30 34 30 00 55 24 |9":UL.3:.1040.U$|
00001C40: 0A 04 55 53 24 B2 22 59 4E 22 3A 55 4C B2 31 3A |..US$."YN":UL.1:|
00001C50: 89 31 30 34 30 00 5E 24 10 04 99 51 24 3B 00 75 |.1040.^$...Q$;.u|
00001C60: 24 1A 04 8D 33 35 3A 59 24 B2 55 52 24 3A 59 B2 |$...35:Y$.UR$:Y.|
00001C70: C5 28 59 24 29 00 7B 24 88 04 8E 00 90 24 92 04 |.(Y$).{$.....$..|
00001C80: 4E B2 B5 28 32 36 AC BB 28 31 29 AA 36 35 20 29 |N..(26..(1).65 )|
00001C90: 00 BA 24 9C 04 8B 4E B2 20 37 33 B0 4E B2 20 37 |..$...N. 73.N. 7|
00001CA0: 36 B0 4E B2 20 37 39 B0 4E B2 20 38 38 A7 20 20 |6.N. 79.N. 88. |
00001CB0: 20 20 20 20 20 20 31 31 37 30 00 C0 24 A6 04 8E | 1170..$...|
00001CC0: 00 D7 24 B0 04 4E B2 B5 28 31 30 AC 4C AC BB 28 |..$..N..(10.L..(|
00001CD0: 31 29 AA 31 29 3A 8E 00 ED 24 BA 04 4E B2 B5 28 |1).1):...$..N..(|
00001CE0: 32 31 AC BB 28 31 29 AB 31 30 29 3A 8E 00 08 25 |21..(1).10):...%|
00001CF0: C4 04 4E B2 B5 28 28 31 AA 31 30 AC 4C 29 AC BB |..N..((1.10.L)..|
00001D00: 28 31 29 AB 35 AC 4C 29 00 1A 25 CE 04 8B 4E B2 |(1).5.L)..%...N.|
00001D10: 30 B0 4E B2 31 A7 31 32 32 30 00 20 25 D8 04 8E |0.N.1.1220. %...|
00001D20: 00 2B 25 EC 04 8D 38 35 30 3A 8E 00 64 25 ED 04 |.+%...850:..d%..|
00001D30: 8F 20 50 52 49 4E 54 22 13 22 3B 3A 46 4F 52 4E |. PRINT".";:FORN|
00001D40: 3D 31 54 4F 32 34 3A 50 52 49 4E 54 42 24 3A 4E |=1TO24:PRINTB$:N|
00001D50: 45 58 54 3A 50 52 49 4E 54 22 93 22 3A 20 52 45 |EXT:PRINT".": RE|
00001D60: 54 55 52 4E 00 6F 25 F6 04 8D 38 33 35 3A 8E 00 |TURN.o%...835:..|
00001D70: A0 25 32 05 42 24 B2 22 20 20 20 20 20 20 20 20 |.%2.B$." |
00001D80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001DA0: 00 BB 25 3C 05 44 24 B2 22 13 11 11 11 11 11 11 |..%<.D$.".......|
00001DB0: 11 11 11 11 11 11 11 11 11 1D 22 00 E3 25 46 05 |.........."..%F.|
00001DC0: 45 24 B2 22 12 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 |E$."............|
00001DD0: A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 |................|
00001DE0: A0 A6 22 00 0B 26 50 05 46 24 B2 22 12 20 20 20 |.."..&P.F$.". |
00001DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E00: 20 20 20 20 20 20 20 20 20 20 22 00 33 26 5A 05 | ".3&Z.|
00001E10: 47 24 B2 22 12 A6 20 20 20 20 20 20 20 20 20 20 |G$.".. |
00001E20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E30: 20 A6 22 00 41 26 64 05 4C 24 B2 22 C0 C0 C0 C0 | .".A&d.L$."....|
00001E40: 22 00 55 26 6E 05 99 22 93 11 11 11 1D 1D 1D 1D |".U&n.."........|
00001E50: 1D 22 3B 45 24 00 7E 26 78 05 81 49 B2 31 A4 36 |.";E$.~&x..I.1.6|
00001E60: 3A 99 A3 35 29 46 24 3A 99 A3 35 29 47 24 3A 82 |:..5)F$:..5)G$:.|
00001E70: 3A 99 A3 35 29 46 24 3A 99 A3 35 29 45 24 00 A2 |:..5)F$:..5)E$..|
00001E80: 26 82 05 99 22 13 11 11 11 11 11 11 22 3A 99 A3 |&...".......":..|
00001E90: 31 34 29 22 12 CD D5 CC D4 C9 D0 CC D9 C9 CE C7 |14)"............|
00001EA0: 11 22 00 B4 26 8C 05 99 A3 31 37 29 22 12 D7 C9 |."..&....17)"...|
00001EB0: D4 C8 11 22 00 CB 26 96 05 99 A3 31 35 29 22 12 |..."..&....15)".|
00001EC0: C5 D8 D0 CF CE C5 CE D4 D3 11 22 00 EF 26 A0 05 |.........."..&..|
00001ED0: 99 A3 31 31 29 22 12 42 59 20 CA 2E C2 2E 20 CE |..11)".BY .... .|
00001EE0: 49 43 48 4F 4C 53 4F 4E 92 22 3A 8D 38 33 35 00 |ICHOLSON.":.835.|
00001EF0: 09 27 F5 05 55 47 24 B2 22 22 3A 55 50 B2 30 3A |.'..UG$."":UP.0:|
00001F00: 55 48 B2 31 3A 8D 38 35 30 00 3B 27 FA 05 99 22 |UH.1:.850.;'..."|
00001F10: 11 11 11 11 20 D7 48 49 43 48 20 4C 45 56 45 4C |.... .HICH LEVEL|
00001F20: 20 4F 46 20 44 49 46 46 49 43 55 4C 54 59 20 44 | OF DIFFICULTY D|
00001F30: 4F 20 59 4F 55 20 57 41 4E 54 22 00 75 27 04 06 |O YOU WANT".u'..|
00001F40: 51 24 B2 22 11 20 54 4F 20 54 52 59 3F 20 28 31 |Q$.". TO TRY? (1|
00001F50: 2D 45 41 53 59 2C 32 2D 48 41 52 44 45 52 2C 33 |-EASY,2-HARDER,3|
00001F60: 2D 48 41 52 44 45 53 54 29 20 22 3A 8D 31 30 33 |-HARDEST) ":.103|
00001F70: 30 3A 4C B2 59 00 AD 27 18 06 51 24 B2 22 11 20 |0:L.Y..'..Q$.". |
00001F80: 11 C8 4F 57 20 4D 41 4E 59 20 51 55 45 53 54 49 |..OW MANY QUESTI|
00001F90: 4F 4E 53 20 44 4F 20 59 4F 55 20 57 41 4E 54 3F |ONS DO YOU WANT?|
00001FA0: 20 22 3A 8D 31 30 33 32 3A 4E 51 B2 59 00 DB 27 | ":.1032:NQ.Y..'|
00001FB0: 22 06 51 24 B2 22 11 11 20 C1 52 45 20 4E 45 47 |".Q$.".. .RE NEG|
00001FC0: 41 54 49 56 45 20 45 58 50 4F 4E 45 4E 54 53 20 |ATIVE EXPONENTS |
00001FD0: CF CB 3F 20 22 3A 8D 31 30 33 34 00 F8 27 2C 06 |..? ":.1034..',.|
00001FE0: 4E 45 47 B2 31 3A 8B C8 28 59 24 2C 31 29 B2 22 |NEG.1:..(Y$,1)."|
00001FF0: 59 22 A7 4E 45 47 B2 32 00 0E 28 5E 06 81 4E 4F |Y".NEG.2..(^..NO|
00002000: B2 31 A4 4E 51 3A 45 46 B2 30 3A 4B B2 30 00 1F |.1.NQ:EF.0:K.0..|
00002010: 28 68 06 8D 31 31 37 30 3A 42 28 31 29 B2 4E 00 |(h..1170:B(1).N.|
00002020: 30 28 72 06 8D 31 31 37 30 3A 42 28 32 29 B2 4E |0(r..1170:B(2).N|
00002030: 00 44 28 7C 06 8B 42 28 32 29 B2 42 28 31 29 A7 |.D(|..B(2).B(1).|
00002040: 31 36 35 30 00 55 28 86 06 8D 31 31 37 30 3A 42 |1650.U(...1170:B|
00002050: 28 33 29 B2 4E 00 73 28 90 06 8B 42 28 33 29 B2 |(3).N.s(...B(3).|
00002060: 42 28 32 29 B0 42 28 33 29 B2 42 28 31 29 A7 31 |B(2).B(3).B(1).1|
00002070: 36 37 30 00 83 28 9A 06 8B 4E 45 47 B2 32 A7 31 |670..(...NEG.2.1|
00002080: 37 31 30 00 A3 28 A4 06 81 49 B2 31 A4 36 3A 8D |710..(...I.1.6:.|
00002090: 31 32 30 30 3A 4E 28 49 29 B2 4E 3A 82 3A 89 31 |1200:N(I).N:.:.1|
000020A0: 37 32 30 00 BD 28 AE 06 81 49 B2 31 A4 36 3A 8D |720..(...I.1.6:.|
000020B0: 31 32 31 30 3A 4E 28 49 29 B2 4E 3A 82 00 DB 28 |1210:N(I).N:...(|
000020C0: B8 06 8D 31 32 32 30 3A 43 28 31 29 B2 4E 3A 8D |...1220:C(1).N:.|
000020D0: 31 32 32 30 3A 43 28 32 29 B2 4E 00 FE 28 BD 06 |1220:C(2).N..(..|
000020E0: 55 47 24 B2 22 51 55 45 53 54 49 4F 4E 20 23 22 |UG$."QUESTION #"|
000020F0: 3A 55 50 B2 4E 4F AB 31 3A 8D 31 32 36 30 00 19 |:UP.NO.1:.1260..|
00002100: 29 C2 06 99 22 11 1D D3 49 4D 50 4C 49 46 59 3A |)..."...IMPLIFY:|
00002110: 13 11 11 11 11 11 1D 22 3B 00 24 29 CC 06 81 49 |.......";.$)...I|
00002120: B2 31 A4 32 00 3D 29 D6 06 99 22 B0 9D 11 DD 9D |.1.2.=)...".....|
00002130: 11 DD 9D 11 AD 91 22 3B 43 28 49 29 3B 00 48 29 |......";C(I);.H)|
00002140: E0 06 81 4A B2 31 A4 4C 00 5D 29 EA 06 45 58 20 |...J.1.L.])..EX |
00002150: B2 4E 28 4A AA 33 AC 28 49 AB 31 29 29 00 72 29 |.N(J.3.(I.1)).r)|
00002160: F4 06 8B 45 58 B3 B1 30 A7 99 C7 28 42 28 4A 29 |...EX..0...(B(J)|
00002170: 29 3B 00 96 29 FE 06 8B 45 58 B3 B1 31 AF 45 58 |);..)...EX..1.EX|
00002180: B3 B1 30 A7 99 22 91 22 3B 45 58 3B 22 11 22 3B |..0..".";EX;".";|
00002190: 3A 89 31 38 31 30 00 A6 29 08 07 8B 45 58 B2 31 |:.1810..)...EX.1|
000021A0: A7 99 22 1D 22 3B 00 AD 29 12 07 82 4A 00 C6 29 |..".";..)...J..)|
000021B0: 1C 07 99 22 9D 91 91 AE 9D 11 DD 9D 11 DD 9D 11 |..."............|
000021C0: BD 91 91 91 22 3B 00 CD 29 26 07 82 49 00 E2 29 |....";..)&..I..)|
000021D0: 2B 07 8B 45 46 B2 31 A7 45 46 B2 30 3A 89 31 39 |+..EF.1.EF.0:.19|
000021E0: 38 30 00 F3 29 3A 07 43 41 B2 43 28 31 29 AC 43 |80..):.CA.C(1).C|
000021F0: 28 32 29 00 12 2A 44 07 81 49 B2 31 A4 4C 3A 4E |(2)..*D..I.1.L:N|
00002200: 41 28 49 29 B2 4E 28 49 29 AA 4E 28 49 AA 33 29 |A(I).N(I).N(I.3)|
00002210: 3A 82 00 3B 2A 4E 07 99 44 24 3B 22 D7 48 41 54 |:..;*N..D$;".HAT|
00002220: 20 49 53 20 54 48 45 20 43 4F 45 46 46 49 43 49 | IS THE COEFFICI|
00002230: 45 4E 54 20 4F 46 20 54 48 45 22 00 7D 2A 58 07 |ENT OF THE".}*X.|
00002240: 99 22 1D 50 52 4F 44 55 43 54 3F 20 22 3B 3A 55 |.".PRODUCT? ";:U|
00002250: 53 24 B2 22 48 30 31 32 33 34 35 36 37 38 39 2D |S$."H0123456789-|
00002260: 2B 53 45 22 3A 55 4C B2 34 3A 8D 33 35 3A 41 24 |+SE":UL.4:.35:A$|
00002270: B2 55 52 24 3A 43 53 B2 C5 28 41 24 29 00 8E 2A |.UR$:CS..(A$)..*|
00002280: 62 07 8B 41 24 B2 22 53 22 A7 32 34 32 30 00 A6 |b..A$."S".2420..|
00002290: 2A 6C 07 8B 41 24 B2 22 45 22 A7 4E 4F B2 4E 51 |*l..A$."E".NO.NQ|
000022A0: 3A 89 32 34 35 30 00 CA 2A 76 07 8B 43 53 B3 B1 |:.2450..*v..CS..|
000022B0: 43 41 A7 4B B2 4B AA 31 3A 91 4B 89 31 39 33 30 |CA.K.K.1:.K.1930|
000022C0: 2C 31 39 33 30 2C 31 39 35 30 00 D4 2A 80 07 89 |,1930,1950..*...|
000022D0: 31 39 36 30 00 18 2B 8A 07 99 22 1D 11 CE 4F 2C |1960..+..."...O,|
000022E0: 20 28 22 3B 43 28 31 29 3B 22 9D 29 28 22 3B 43 | (";C(1);".)(";C|
000022F0: 28 32 29 3B 22 9D 29 20 49 53 4E 27 54 20 22 3B |(2);".) ISN'T ";|
00002300: 43 53 3B 22 9D 2E 20 D4 52 59 20 41 47 41 49 4E |CS;".. .RY AGAIN|
00002310: 21 22 3A 8D 31 32 37 30 00 22 2B 94 07 89 31 37 |!":.1270."+...17|
00002320: 32 35 00 51 2B 9E 07 99 22 1D 11 CE 4F 2C 20 28 |25.Q+..."...O, (|
00002330: 22 43 28 31 29 3B 22 9D 29 28 22 3B 43 28 32 29 |"C(1);".)(";C(2)|
00002340: 3B 22 9D 29 20 3D 20 22 3B 43 41 3A 8D 31 32 37 |;".) = ";CA:.127|
00002350: 30 00 6C 2B A8 07 81 49 31 B2 31 A4 4C 3A 4B B2 |0.l+...I1.1.L:K.|
00002360: 30 3A 45 46 B2 31 3A 89 31 37 32 35 00 9E 2B BC |0:EF.1:.1725..+.|
00002370: 07 99 44 24 3B 22 D7 48 41 54 20 49 53 20 54 48 |..D$;".HAT IS TH|
00002380: 45 20 45 58 50 4F 4E 45 4E 54 20 4F 46 20 22 3B |E EXPONENT OF ";|
00002390: C7 28 42 28 49 31 29 29 3B 22 3F 20 22 3B 00 CF |.(B(I1));"? ";..|
000023A0: 2B C6 07 55 53 24 B2 22 48 30 31 32 33 34 35 36 |+..US$."H0123456|
000023B0: 37 38 39 2D 2B 22 3A 55 4C B2 34 3A 8D 33 35 3A |789-+":UL.4:.35:|
000023C0: 41 24 B2 55 52 24 3A 4E 53 B2 C5 28 41 24 29 00 |A$.UR$:NS..(A$).|
000023D0: FC 2B D0 07 8B 4E 53 B3 B1 4E 41 28 49 31 29 A7 |.+...NS..NA(I1).|
000023E0: 4B B2 4B AA 31 3A 45 46 B2 31 3A 91 4B 89 32 30 |K.K.1:EF.1:.K.20|
000023F0: 32 30 2C 32 30 32 30 2C 32 30 35 30 00 06 2C DA |20,2020,2050..,.|
00002400: 07 89 32 30 36 30 00 4B 2C E4 07 99 22 1D 11 CE |..2060.K,..."...|
00002410: 4F 2C 20 28 22 3B 4E 28 49 31 29 3B 22 9D 29 20 |O, (";N(I1);".) |
00002420: 2B 20 28 22 3B 4E 28 49 31 AA 33 29 3B 22 9D 29 |+ (";N(I1.3);".)|
00002430: 20 49 53 4E 27 54 20 22 3B 4E 53 3B 22 9D 2E 20 | ISN'T ";NS;".. |
00002440: D4 52 59 20 41 47 41 49 4E 21 22 00 5B 2C EE 07 |.RY AGAIN!".[,..|
00002450: 8D 31 32 37 30 3A 89 31 37 32 35 00 96 2C 02 08 |.1270:.1725..,..|
00002460: 99 22 1D 11 CE 4F 2C 20 28 22 3B 4E 28 49 31 29 |."...O, (";N(I1)|
00002470: 3B 22 9D 29 20 2B 20 28 22 3B 4E 28 49 31 AA 33 |;".) + (";N(I1.3|
00002480: 29 3B 22 9D 29 20 3D 20 22 3B 4E 41 28 49 31 29 |);".) = ";NA(I1)|
00002490: 3A 8D 31 32 37 30 00 9E 2C 0C 08 82 49 31 00 B8 |:.1270..,...I1..|
000024A0: 2C 16 08 99 44 24 3B 22 9D 91 22 3A 81 4E B2 31 |,...D$;"..":.N.1|
000024B0: A4 38 3A 99 42 24 3A 82 00 D3 2C 20 08 99 22 13 |.8:.B$:..., ..".|
000024C0: 11 11 11 11 11 11 11 11 11 11 11 1D 3D 20 22 3B |............= ";|
000024D0: 43 41 3B 00 E8 2C 2A 08 81 49 B2 31 A4 4C 3A 99 |CA;..,*..I.1.L:.|
000024E0: C7 28 42 28 49 29 29 3B 00 0D 2D 34 08 8B 4E 41 |.(B(I));..-4..NA|
000024F0: 28 49 29 B3 B1 31 A7 99 22 91 1D 22 3B 4E 41 28 |(I)..1.."..";NA(|
00002500: 49 29 3B 22 11 22 3B 3A 89 32 31 32 30 00 17 2D |I);".";:.2120..-|
00002510: 3E 08 99 22 1D 22 3B 00 1F 2D 48 08 82 3A 99 00 |>..".";..-H..:..|
00002520: 38 2D 52 08 81 4E B2 31 A4 4C 3A 8B 4E 41 28 4E |8-R..N.1.L:.NA(N|
00002530: 29 B2 30 A7 32 31 36 30 00 3E 2D 5C 08 82 00 48 |).0.2160.>-\...H|
00002540: 2D 66 08 89 32 32 32 30 00 5F 2D 70 08 8D 31 32 |-f..2220._-p..12|
00002550: 37 30 3A 99 22 11 11 1D 3D 20 22 3B 43 41 3B 00 |70:."...= ";CA;.|
00002560: 6A 2D 7A 08 81 49 B2 31 A4 4C 00 82 2D 84 08 8B |j-z..I.1.L..-...|
00002570: 4E 41 28 49 29 B3 B1 30 A7 99 C7 28 42 28 49 29 |NA(I)..0...(B(I)|
00002580: 29 3B 00 AF 2D 8E 08 8B 4E 41 28 49 29 B3 B1 30 |);..-...NA(I)..0|
00002590: AF 4E 41 28 49 29 B3 B1 31 A7 99 22 91 22 3B 4E |.NA(I)..1..".";N|
000025A0: 41 28 49 29 3B 22 11 22 3B 3A 89 32 32 31 30 00 |A(I);".";:.2210.|
000025B0: C2 2D 98 08 8B 4E 41 28 49 29 B2 31 A7 99 22 1D |.-...NA(I).1..".|
000025C0: 22 3B 00 CA 2D A2 08 82 3A 99 00 E3 2D AC 08 81 |";..-...:...-...|
000025D0: 4E B2 31 A4 4C 3A 8B 4E 41 28 4E 29 B3 30 A7 32 |N.1.L:.NA(N).0.2|
000025E0: 32 35 30 00 E9 2D B6 08 82 00 F9 2D C0 08 8D 31 |250..-.....-...1|
000025F0: 32 37 30 3A 89 32 34 32 30 00 1C 2E CA 08 8D 31 |270:.2420......1|
00002600: 32 37 30 3A 99 22 13 11 11 11 11 11 11 11 11 11 |270:."..........|
00002610: 11 22 3A 4E 4E B2 31 3A 44 44 B2 30 00 27 2E D4 |.":NN.1:DD.0.'..|
00002620: 08 81 49 B2 31 A4 4C 00 3C 2E DE 08 8B 4E 41 28 |..I.1.L.<....NA(|
00002630: 49 29 B1 30 A7 4E 4E B2 4E 4E AA 31 00 51 2E E8 |I).0.NN.NN.1.Q..|
00002640: 08 8B 4E 41 28 49 29 B3 30 A7 44 44 B2 44 44 AA |..NA(I).0.DD.DD.|
00002650: 31 00 57 2E F2 08 82 00 6E 2E FC 08 4C 4C B2 4E |1.W.....n...LL.N|
00002660: 4E 3A 8B 44 44 B1 4E 4E A7 4C 4C B2 44 44 00 99 |N:.DD.NN.LL.DD..|
00002670: 2E 06 09 99 22 11 11 11 11 11 11 1D 3D 20 22 3B |....".......= ";|
00002680: 3A 81 4E B2 31 A4 4C 4C 3A 99 4C 24 3B 3A 82 3A |:.N.1.LL:.L$;:.:|
00002690: 99 3A 99 22 91 91 1D 22 3B 00 BA 2E 10 09 50 B2 |.:."...";.....P.|
000026A0: 44 44 AB 4E 4E 3A 81 53 B2 30 A4 50 3A 99 22 1D |DD.NN:.S.0.P:.".|
000026B0: 1D 22 3B 3A 82 3A 99 43 41 3B 00 D8 2E 1A 09 81 |.";:.:.CA;......|
000026C0: 53 B2 31 A4 4C 3A 8B 4E 41 28 53 29 B1 30 A7 99 |S.1.L:.NA(S).0..|
000026D0: C7 28 42 28 53 29 29 3B 00 F5 2E 24 09 8B 4E 41 |.(B(S));...$..NA|
000026E0: 28 53 29 B1 31 A7 99 22 91 22 3B 4E 41 28 53 29 |(S).1..".";NA(S)|
000026F0: 3B 22 11 22 3B 00 08 2F 2E 09 8B 4E 41 28 53 29 |;".";../...NA(S)|
00002700: B2 31 A7 99 22 1D 22 3B 00 17 2F 38 09 82 3A 99 |.1..".";../8..:.|
00002710: 3A 99 22 11 11 22 3B 00 33 2F 42 09 51 B2 4E 4E |:."..";.3/B.Q.NN|
00002720: AB 44 44 3A 81 53 B2 30 A4 51 3A 99 22 1D 1D 22 |.DD:.S.0.Q:.".."|
00002730: 3B 3A 82 00 58 2F 4C 09 81 53 B2 31 A4 4C 3A 4D |;:..X/L..S.1.L:M|
00002740: 4E B2 AB 4E 41 28 53 29 3A 8B 4D 4E B1 30 A7 99 |N..NA(S):.MN.0..|
00002750: C7 28 42 28 53 29 29 3B 00 6F 2F 56 09 8B 4D 4E |.(B(S));.o/V..MN|
00002760: B1 31 A7 99 22 91 22 3B 4D 4E 3B 22 11 22 3B 00 |.1..".";MN;".";.|
00002770: 7F 2F 60 09 8B 4D 4E B2 31 A7 99 22 1D 22 3B 00 |./`..MN.1..".";.|
00002780: 8D 2F 6A 09 82 3A 99 3A 8D 31 32 37 30 00 B2 2F |./j..:.:.1270../|
00002790: 74 09 82 4E 4F 3A 55 47 24 B2 22 45 4E 44 20 4F |t..NO:UG$."END O|
000027A0: 46 20 44 52 49 4C 4C 22 3A 55 50 B2 30 3A 8D 38 |F DRILL":UP.0:.8|
000027B0: 35 30 00 DF 2F 7E 09 8B 4E 51 B2 31 A7 99 22 11 |50../~..NQ.1..".|
000027C0: 11 11 11 11 11 20 D4 48 41 54 27 53 20 31 20 51 |..... .HAT'S 1 Q|
000027D0: 55 45 53 54 49 4F 4E 2E 22 3A 89 32 34 35 30 00 |UESTION.":.2450.|
000027E0: 04 30 88 09 99 22 11 11 11 11 11 11 20 D4 48 41 |.0..."...... .HA|
000027F0: 54 27 53 22 3B 4E 51 3B 22 51 55 45 53 54 49 4F |T'S";NQ;"QUESTIO|
00002800: 4E 53 2E 22 00 0F 30 92 09 8D 38 33 35 3A 8E 00 |NS."..0...835:..|
00002810: 00 00 |.. |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(.UR$."":UI$."":.UO,0...*..UL.0.UL.80
.+.-.." ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..". ..";:.50...X.. ++ CHECK FOR
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
**.4....F(UI$).46...E....UI$.G(32)...B.
..F(UI$).48.F(UI$).57.170.H..........F(
UI$).65.F(UI$).90.180............F(UI$).
193.F(UI$).218.UI$."":..R....B(UT).UU%.U
I$.G(F(UI$).128):..X.........UI$."":....
C.UF.1:. +++ HELP ROUTINE EXIT +++...E..
250...H..245.;.M..UQ.UB.(U2%.256.U1%.U3%
.2).W.R.UQ%(UQ.UB).B(UQ):.:.".".J.W.UZ.1
:UV%.B(UT).S.X..300...Y.UZ.0:US$.UJ$:UG$
.UK$:UP.UJ:UL.UK.O.Z..B(50003).0..53281,
1:.".";:.53281,6:.53280,14:.220.Y...."."
;.....UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1
%.U3%.3)......UQ,UQ%(UQ.UB):..)....U1,U1
%.5....U2,U2%.A....U4,U4%.O....U3,U3%.1.
W....35.....UD%.((U2%.256.U1%.U3%).UB).4
0:.H(UD$,UD%.1):..D....H(UD$,24);"
. HELP COMING . ":.....
.U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4)
.....UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL
......./.,.. ** MENU **.5.-.:.D....".":.
UT,UU%:.B(50003).0..53281,9:.53280,8.J./
.:...1..". MENU"...6.." -
-------------------------------------"..
.;..".. 1. EXPONENT MULTIPLICATI
ON...@..".. 2. STUDENT INSTRUCTI
ONS".6.E..".. 3. TEACHER INSTRUC
TIONS".R.O..".. 4. QUIT.."...T..
" --------------------------------------
"...Y..".. PRESS A NUMBER KEY (1-4
) ";.T.^.UL.1:US$."1234":.35:. INPUT ROU
TINE...`.US$.""...C..E(UR$).1000,400,500
,396...H..300.,.... ** RE-ENABLE STOP KE
Y AND END **.[....B(50003)..1.B(50003)..
160.B(50003)..0.399......UU.71:.B(50003)
.0..53281,6:.53280,14......"..":.......8
75:....... ** STUDENT INSTRUCTIONS **...
...".":.UT,UL%:.B(50003).0..53281,0:.532
80,0.....UP.0:UG$."STUDENT INST":.850.<.
...". THIS PROGRAM WILL GIVE YOU A DRILL
IN".G....". MULTIPLYING WITH EXPONENTS.
IN THE......". MULTIPLICATION QUESTIONS
WHICH FOLLOW,".D. ..". THERE ARE THREE
LEVELS OF DIFFICULTY......". TO CHOOSE F
ROM. YOU CAN ALSO CHOOSE TO......". WORK
WITH OR WITHOUT NEGATIVE.H....". EXPONE
NTS. THE QUESTIONS WILL BE GIVEN.P....".
IN TWO PARTS: THE ANSWER TO THE......".
COEFFICIENT AND THE ANSWER TO THE":.".
EXPONENT.":.835:.850......". YOU WILL HA
VE THREE CHANCES TO ANSWER"......". CORR
ECTLY BEFORE GOING ON. IF YOU".9....".
WANT TO SKIP A QUESTION, TYPE S ".`...."
. <RETURN> FOR THE ANSWER TO THE......".
COEFFICIENT. TO END THE QUESTIONS,"....
..". TYPE .E. <RETURN> FOR THE ANSWER".S
....". TO THE COEFFICIENT."......835:.85
0...L..".... NOTE:.ALWAYS PRESS THE <RET
URN> KEY".4.V..". AFTER ENTERING AN ANSW
ER."._....". IF AT ANY TIME YOU WISH TO
RETURN"......". TO THE MENU PRESS H <RET
URN>."......835......UZ.1..UP%:.217.....
..J.... ** TEACHER INSTRUCTIONS **......
".":.UT,UL%:.B(50003).0..53281,2:.53280,
10.....UP.0:UG$."TEACHER INST":.850.I...
.".. TO THE BEST OF OUR KNOWLEDGE,.
".R...." THIS PROGRAM IS IN THE PUBLIC
."......" DOMAIN. IF THIS IS NOT THE
CASE."......" PLEASE CONTACT:...".....
." COMMODORE BUSINESS MACHINES."...
..." 3370 PHARMACY AVE..,...."
AGINCOURT, ONTARIO".N...."
CANADA M1W 2K4".N...." (
416) 499-4292".....UP.1:. 835:. 850:....
.." ..PROGRAM NAME: EXPONENT MULT.."
......" WRITTEN BY : J. B. NICHOLSO
N."......" UPGRADED BY : ..!...."
.THIS PROGRAM WILL RUN ON ANY...@...."
PET 64 COMPUTER.E...."
COMMODORE 64 COMPUTER.S....835:.850.....
."..... THIS PROGRAM GIVES THE STUDENT A
DRILL".P....". IN MULTIPLYING WITH NEGA
TIVE AND......". POSITIVE EXPONENTS. THE
STUDENT HAS.(....". THE OPTION OF CHOOS
ING THE LEVEL OF.X....". DIFFICULTY AND
THE NUMBER OF QUESTIONS".~....". HE/SHE
WOULD LIKE TO ANSWER."...D..835...N..UZ.
1..UP%:.217...W...G.X.. ** PROGRAM MODIF
ICATION INST **.X.Y..".":.UT,UL%...].UP.
0:UG$."PROGRAM MOD":.850......835......U
Z.1..UP%:.217.......@.... ** TO USE 8032
LOAD CBM4032 **.V.F..".....BEFORE RUNNI
NG THIS PROGRAM ON AN 8032 .....P.."
LOAD THE 'CBM 4032' PROGRAM..........
..."...Z..UU.71............ ** TO USE 80
32 LOAD CBM4032 **.-...."....BEFORE RUNN
ING THIS PROGRAM ON AN 8032 ..LOAD CBM
4032 PROGRAM".9....1093:..Y. .. ** T I T
L E P A G E **...".."....";:.UT,UU%:.
B(50003).0..53280,14:.53281,6...$..I.1.3
8:."...";:....&..I.1.22:.".....";:..S.(.
.I.1.37:.".....";:....*..I.1.22:."....."
;:....,.."........................... .
.2...."................... . . ...S.0..
"................... . ....Q.2.."......
.............. ....4.."..............C
O M M O D O R E.....6.."...............E
DUCATIONAL.....8.."................SOFTW
ARE...:.. ** COMMODORE LOGO **...;..H(UD
$,24);"..........PRESS SPACE BAR OR WAIT
.":I.0.P.<..A$:.A$.." ".I.I.1:.I.250.828
.T.>.T1$."":T2$."":T3$."":T4$."":I.0.}.@
..300...C.. ** SPACE BAR PRESS **.T.H..H
(UD$,24);".......PRESS SPACE BAR TO CONT
INUE.":.UO,0...L..UI$:.UI$.." ".844...N.
....R.. ** PAGE DESIGN ROUTINE **...T.UP
.UP.1.G.W.."."H(UT$.UP$,21);I(UP$.UG$.D(
UP),18).V.\.." -------------------------
-------------"...`..UH..0.870...A..H(UD$
,24);H(UP$,7);"HELP - PRESS H <RETURN>
".J.F.UH.0:."..":....K.. ** PLEASE WAIT
REMARK **...P..H(UD$,24);" ONE
MOMENT PLEASE... ".%.U...B.... ** S
ET UP VARIABLES **.....UX$."H":.UQ%(1000
):UB.32768:U1.196:U2.197:U3.198:U4.216:U
C.167:UU.1024.K...UT.59468:UU%.12:UL%.14
:UP%.1146:UM.32768:. 50003,0:UO.158.....
.B(50003).0.UB.1024:U1.209:U2.210:U3.211
:U4.214:UC.204:UU.2048.M....B(50003).0.U
T.53272:UU%.21:UL%.23:UP%.2139:UM.1024:U
O.198.Q...UD$.".........................
".....UP$."
".....UT$." EXPONENT MULT.
":. PLACE PROGRAM TITLE HERE !!!!!!!!!!!
!!!!!!***........ ... ** SET VARIABLES *
*.. ...900. ..:.& ..:.A ... ** CHECK FO
R 8032 **._ ...".":." ":. SHIFTED SPACE.
V ...B(UB.40)..96..700.. ... ** MEMORY C
HECK **.. ... .(0).2000.937.Q ..."....TH
IS MACHINE DOES NOT HAVE ENOUGH.".. ..."
MEMORY TO RUN THIS PROGRAM !"..!...UU.71
..!.... !..."..":.B(50003).0.962.O!... *
* BASIC 2.0 OR 4.0 OR C-64 SETUP **.
.!...1075,133:.1076,144:.1077,234:.1079,
4:.1080,133:.1081,145.C!...1091,155:.109
8,133:.1099,144:.1100,234:.1103,133..!..
.1104,145:.1105,234:.1082,234..!...B(500
03)..160.955.+"...1093,88:.1094,228:.109
7,85:.1102,228:.965.@"...B(50003)..1.990
.O"...1093,49:.1094,230:.1097,46:.1102,2
30:.965.."B..2099,141:.2100,20:.2101,3:.
2103,8:.2104,141:.2105,21.."C..2106,3:.2
115,145:.2117,52:.2118,234:.2121,49:.212
2,141..#D..2123,20:.2124,3:.2126,234:.21
27,141:.2128,21:.2129,3.=#E..UU.48:. DIS
ABLE STOP KEY.N#J..800:. TITLE.^#T..300:
. MENU..#...".THE PGM WILL NOT WORK ON T
HIS MACHINE!":..D#...UZ.1..UP%:.UP%:UZ.0
:. ** PROGRAM STARTS HERE **..#..."..";:
.:.B(50003).0..53281,6:.53280,14..$...UT
,UL%:.1330..$..US$."H123":UL.1:.1040.=$.
.US$."H0123456789":UL.3:.1040.U$..US$."Y
N":UL.1:.1040.^$...Q$;.U$...35:Y$.UR$:Y.
E(Y$).{$.....$..N..(26..(1).65 )..$...N.
73.N. 76.N. 79.N. 88. 1170..$...
.W$..N..(10.L..(1).1):...$..N..(21..(1).
10):...%D.N..((1.10.L)..(1).5.L)..%N..N.
0.N.1.1220. %X...+%...850:..D%... PRINT"
.";:FORN=1TO24:PRINTB$:NEXT:PRINT".": RE
TURN.O%...835:.. %2.B$."
"..%<.D$.".......
.........."..%F.E$.".. . . . . . . . . .
. . . . ."..&P.F$.".
".3&Z.G$."..
.".A&D.L$."....".U&N.."........
.";E$.~&X..I.1.6:..5)F$:..5)G$:.:..5)F$:
..5)E$..&...".......":..14)".MULTIPLYING
."..&....17)".WITH.".K&....15)".EXPONENT
S."..& ...11)".BY J.B. NICHOLSON.":.835.
.'..UG$."":UP.0:UH.1:.850.;'...".... WHI
CH LEVEL OF DIFFICULTY DO YOU WANT".U'..
Q$.". TO TRY? (1-EASY,2-HARDER,3-HARDEST
) ":.1030:L.Y..'..Q$.". .HOW MANY QUESTI
ONS DO YOU WANT? ":.1032:NQ.Y..'".Q$."..
ARE NEGATIVE EXPONENTS OK? ":.1034..',.
NEG.1:.H(Y$,1)."Y".NEG.2..(^..NO.1.NQ:EF
.0:K.0..(H..1170:B(1).N.0(R..1170:B(2).N
.D(|..B(2).B(1).1650.U(...1170:B(3).N.S(
...B(3).B(2).B(3).B(1).1670..(...NEG.2.1
710..(...I.1.6:.1200:N(I).N:.:.1720..(..
.I.1.6:.1210:N(I).N:...(...1220:C(1).N:.
1220:C(2).N..(..UG$."QUESTION #":UP.NO.1
:.1260..)B.."..SIMPLIFY:.......";.$)L..I
.1.2.=)V.."...........";C(I);.H)...J.1.L
.])..EX .N(J.3.(I.1)).R)...EX..0..G(B(J)
);..)...EX..1.EX..0..".";EX;".";:.1810..
)...EX.1..".";..)...J.F)..."............
....";.M)&..I..)+..EF.1.EF.0:.1980..):.C
A.C(1).C(2)..*D..I.1.L:NA(I).N(I).N(I.3)
:..;*N..D$;"WHAT IS THE COEFFICIENT OF T
HE".}*X..".PRODUCT? ";:US$."H0123456789-
+SE":UL.4:.35:A$.UR$:CS.E(A$)..*B..A$."S
".2420..*L..A$."E".NO.NQ:.2450.J*V..CS..
CA.K.K.1:.K.1930,1930,1950.T*...1960..+.
.."..NO, (";C(1);".)(";C(2);".) ISN'T ";
CS;".. TRY AGAIN!":.1270."+...1725.Q+...
"..NO, ("C(1);".)(";C(2);".) = ";CA:.127
0.L+...I1.1.L:K.0:EF.1:.1725..+...D$;"WH
AT IS THE EXPONENT OF ";G(B(I1));"? ";.O
+F.US$."H0123456789-+":UL.4:.35:A$.UR$:N
S.E(A$)..+P..NS..NA(I1).K.K.1:EF.1:.K.20
20,2020,2050..,Z..2060.K,..."..NO, (";N(
I1);".) + (";N(I1.3);".) ISN'T ";NS;"..
TRY AGAIN!".[,...1270:.1725..,..."..NO,
(";N(I1);".) + (";N(I1.3);".) = ";NA(I1)
:.1270..,...I1..,...D$;"..":.N.1.8:.B$:.
.S, ..".............= ";CA;..,*..I.1.L:.
G(B(I));..-4..NA(I)..1.."..";NA(I);".";:
.2120..->..".";..-H..:..8-R..N.1.L:.NA(N
).0.2160.>-\...H-F..2220._-P..1270:."...
= ";CA;.J-Z..I.1.L..-...NA(I)..0..G(B(I)
);..-...NA(I)..0.NA(I)..1..".";NA(I);"."
;:.2210.B-...NA(I).1..".";.J-...:...-...
N.1.L:.NA(N).0.2250..-.....-...1270:.242
0...J..1270:."...........":NN.1:DD.0.'.T
..I.1.L.<....NA(I).0.NN.NN.1.Q....NA(I).
0.DD.DD.1.W.....N...LL.NN:.DD.NN.LL.DD..
....".......= ";:.N.1.LL:.L$;:.:.:."..."
;.....P.DD.NN:.S.0.P:."..";:.:.CA;.X....
S.1.L:.NA(S).0..G(B(S));...$..NA(S).1.."
.";NA(S);".";../...NA(S).1..".";../8..:.
:."..";.3/B.Q.NN.DD:.S.0.Q:."..";:..X/L.
.S.1.L:MN..NA(S):.MN.0..G(B(S));.O/V..MN
.1..".";MN;".";./`..MN.1..".";../J..:.:
.1270../T..NO:UG$."END OF DRILL":UP.0:.8
50../~..NQ.1.."...... THAT'S 1 QUESTION.
":.2450..0..."...... THAT'S";NQ;"QUESTIO
NS."..0...835:....
> CLICK IMAGE PREVIEW FOR FULL MODAL