DECOMPOSITION.C3
FILE INFORMATION
FILENAME(S): DECOMPOSITION.C3
FILE TYPE(S): PRG
FILE SIZE: 13.6K
FIRST SEEN: 2025-11-30 01:07:53
APPEARS ON: 2 disk(s)
FILE HASH
b960d7c1db029e6463418987be0a0fe45ff57df44bb0abc766180abb6875ff89
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | DECOMPOSITION.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 3 | 2 | DOWNLOAD FILE |
| L EHRNEN | DECOMPOSITION.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 3 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 85 90 EA A9 04 85 91 EA 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 9B 4C 58 E4 78 A9 55 85 90 EA A9 E4 |.....LX.x.U.....|
00000050: 85 91 EA 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23 00 8F 20 2B 2B 2B 20 49 |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B |NPUT SECTION +++|
000000F0: 00 08 09 28 00 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 E5 0E 3B 01 99 22 11 11 20 |-----"...;..".. |
000006C0: 20 20 20 20 20 20 31 2E 20 20 20 46 41 43 54 4F | 1. FACTO|
000006D0: 52 49 4E 47 20 42 59 20 44 45 43 4F 4D 50 4F 53 |RING BY DECOMPOS|
000006E0: 49 54 49 4F 4E 00 0F 0F 40 01 99 22 11 11 20 20 |ITION...@..".. |
000006F0: 20 20 20 20 20 32 2E 20 20 20 53 54 55 44 45 4E | 2. STUDEN|
00000700: 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 |T INSTRUCTIONS".|
00000710: 39 0F 45 01 99 22 11 11 20 20 20 20 20 20 20 33 |9.E..".. 3|
00000720: 2E 20 20 20 54 45 41 43 48 45 52 20 49 4E 53 54 |. TEACHER INST|
00000730: 52 55 43 54 49 4F 4E 53 22 00 55 0F 4F 01 99 22 |RUCTIONS".U.O.."|
00000740: 11 11 20 20 20 20 20 20 20 34 2E 20 20 20 51 55 |.. 4. QU|
00000750: 49 54 11 11 22 00 84 0F 54 01 99 22 20 2D 2D 2D |IT.."...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: 2D 2D 2D 22 00 AF 0F 59 01 99 22 11 11 20 20 20 |---"...Y..".. |
00000790: 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 4D 42 | PRESS A NUMB|
000007A0: 45 52 20 4B 45 59 20 28 31 2D 34 29 20 22 3B 00 |ER KEY (1-4) ";.|
000007B0: D7 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 22 31 32 |..^.UL.1:US$."12|
000007C0: 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 55 54 20 |34":.35:. INPUT |
000007D0: 52 4F 55 54 49 4E 45 00 E9 0F 5F 01 8B C3 28 55 |ROUTINE..._...(U|
000007E0: 52 24 29 B1 31 A7 33 30 30 00 F4 0F 60 01 55 53 |R$).1.300...`.US|
000007F0: 24 B2 22 22 00 11 10 63 01 91 C5 28 55 52 24 29 |$.""...c...(UR$)|
00000800: 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 39 |.1000,400,500,39|
00000810: 36 00 1A 10 68 01 89 33 30 30 00 41 10 8B 01 8F |6...h..300.A....|
00000820: 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 54 | ** RE-ENABLE ST|
00000830: 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 2A |OP KEY AND END *|
00000840: 2A 00 70 10 8C 01 8B C2 28 35 30 30 30 33 29 B3 |*.p.....(50003).|
00000850: B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 30 |.1..(50003)..160|
00000860: AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 39 |..(50003)..0.399|
00000870: 00 9A 10 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 35 |......UU.71:..(5|
00000880: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 |0003).0..53281,6|
00000890: 3A 97 35 33 32 38 30 2C 31 34 00 A6 10 8E 01 99 |:.53280,14......|
000008A0: 22 9A 93 22 3A 80 00 B1 10 8F 01 8D 38 37 35 3A |"..":.......875:|
000008B0: 8E 00 D2 10 90 01 8F 20 2A 2A 20 53 54 55 44 45 |....... ** STUDE|
000008C0: 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 20 |NT INSTRUCTIONS |
000008D0: 2A 2A 00 01 11 95 01 99 22 93 22 3A 97 55 54 2C |**......".":.UT,|
000008E0: 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UL%:..(50003).0.|
000008F0: 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C |.53281,0:.53280,|
00000900: 30 00 27 11 9A 01 55 50 B2 30 3A 55 47 24 B2 22 |0.'...UP.0:UG$."|
00000910: D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 3A 55 48 |.TUDENT .NST":UH|
00000920: B2 31 3A 8D 38 35 30 00 52 11 9C 01 99 22 11 1D |.1:.850.R...."..|
00000930: D7 48 45 4E 20 59 4F 55 20 4E 45 45 44 20 48 45 |.HEN YOU NEED HE|
00000940: 4C 50 20 49 4E 20 54 48 49 53 20 50 52 4F 47 52 |LP IN THIS PROGR|
00000950: 41 4D 00 78 11 9E 01 99 22 11 1D 54 48 45 52 45 |AM.x...."..THERE|
00000960: 20 41 52 45 20 54 57 4F 20 57 41 59 53 20 54 4F | ARE TWO WAYS TO|
00000970: 20 47 45 54 20 49 54 3A 00 A2 11 9F 01 99 22 11 | GET IT:......".|
00000980: 1D C9 46 20 59 4F 55 20 41 4E 53 57 45 52 20 27 |..F YOU ANSWER '|
00000990: 59 27 20 54 4F 20 54 48 45 20 51 55 45 53 54 49 |Y' TO THE QUESTI|
000009A0: 4F 4E 00 CF 11 A0 01 99 22 11 1D 27 4E 45 45 44 |ON......"..'NEED|
000009B0: 20 48 45 4C 50 3F 27 20 41 20 54 41 42 4C 45 20 | HELP?' A TABLE |
000009C0: 4F 46 20 46 41 43 54 4F 52 53 20 57 49 4C 4C 00 |OF FACTORS WILL.|
000009D0: F1 11 A2 01 99 22 11 1D 42 45 20 44 49 53 50 4C |....."..BE DISPL|
000009E0: 41 59 45 44 20 54 4F 20 48 45 4C 50 20 59 4F 55 |AYED TO HELP YOU|
000009F0: 2E 00 20 12 A4 01 99 22 11 1D CF 54 48 45 52 57 |.. ...."...THERW|
00000A00: 49 53 45 20 27 48 27 20 3C D2 45 54 55 52 4E 3E |ISE 'H' <.ETURN>|
00000A10: 20 57 49 4C 4C 20 52 45 54 55 52 4E 20 59 4F 55 | WILL RETURN YOU|
00000A20: 00 3A 12 A6 01 99 22 11 1D 54 4F 20 54 48 45 20 |.:...."..TO THE |
00000A30: 4D 41 49 4E 20 4D 45 4E 55 2E 00 69 12 A8 01 99 |MAIN MENU..i....|
00000A40: 22 11 1D C4 4F 20 59 4F 55 20 57 49 53 48 20 54 |"...O YOU WISH T|
00000A50: 4F 20 53 45 45 20 54 48 45 20 49 4E 53 54 52 55 |O SEE THE INSTRU|
00000A60: 43 54 49 4F 4E 53 20 4F 4E 00 91 12 AE 01 99 22 |CTIONS ON......"|
00000A70: 11 1D 48 4F 57 20 54 4F 20 46 41 43 54 4F 52 20 |..HOW TO FACTOR |
00000A80: 42 59 20 44 45 43 4F 4D 50 4F 53 49 54 49 4F 4E |BY DECOMPOSITION|
00000A90: 3F 00 A3 12 B3 01 99 22 11 1D 28 59 2F 4E 29 20 |?......"..(Y/N) |
00000AA0: 22 3B 3A 00 B9 12 B8 01 55 53 24 B2 22 59 4E 22 |";:.....US$."YN"|
00000AB0: 3A 55 4C B2 31 3A 8D 33 35 00 D1 12 C2 01 8B 55 |:UL.1:.35......U|
00000AC0: 52 24 B2 22 59 22 A7 57 57 B2 31 3A 8D 31 35 30 |R$."Y".WW.1:.150|
00000AD0: 30 00 E4 12 C7 01 8D 38 33 35 3A 55 50 B2 31 3A |0......835:UP.1:|
00000AE0: 8D 38 35 30 00 13 13 CC 01 99 22 11 11 1D CE 4F |.850......"....O|
00000AF0: 54 45 3A 11 11 11 D4 4F 20 41 44 56 41 4E 43 45 |TE:....O ADVANCE|
00000B00: 20 46 52 4F 4D 20 4F 4E 45 20 51 55 45 53 54 49 | FROM ONE QUESTI|
00000B10: 4F 4E 22 00 3F 13 D6 01 99 22 11 1D 54 4F 20 54 |ON".?...."..TO T|
00000B20: 48 45 20 4E 45 58 54 20 50 52 45 53 53 20 54 48 |HE NEXT PRESS TH|
00000B30: 45 20 3C D3 D0 C1 C3 C5 20 C2 C1 D2 3E 2E 22 00 |E <..... ...>.".|
00000B40: 6F 13 DB 01 99 22 11 11 1D 1D 1D 1D 1D C9 46 20 |o...."........F |
00000B50: 41 54 20 41 4E 59 20 54 49 4D 45 20 59 4F 55 20 |AT ANY TIME YOU |
00000B60: 57 49 53 48 20 54 4F 20 52 45 54 55 52 4E 22 00 |WISH TO RETURN".|
00000B70: 96 13 E0 01 99 22 11 1D 54 4F 20 54 48 45 20 CD |....."..TO THE .|
00000B80: C5 CE D5 20 50 52 45 53 53 20 48 20 3C D2 C5 D4 |... PRESS H <...|
00000B90: D5 D2 CE 3E 2E 22 00 9F 13 E5 01 8D 38 33 35 00 |...>."......835.|
00000BA0: B3 13 EA 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 |.....UZ.1..UP%:.|
00000BB0: 32 31 37 00 B9 13 F3 01 8E 00 DA 13 F4 01 8F 20 |217............ |
00000BC0: 2A 2A 20 54 45 41 43 48 45 52 20 49 4E 53 54 52 |** TEACHER INSTR|
00000BD0: 55 43 54 49 4F 4E 53 20 2A 2A 00 0A 14 F5 01 99 |UCTIONS **......|
00000BE0: 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 |".":.UT,UL%:..(5|
00000BF0: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 |0003).0..53281,2|
00000C00: 3A 97 35 33 32 38 30 2C 31 30 00 2B 14 F6 01 55 |:.53280,10.+...U|
00000C10: 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 48 45 52 |P.0:UG$.".EACHER|
00000C20: 20 C9 4E 53 54 22 3A 8D 38 35 30 00 59 14 F7 01 | .NST":.850.Y...|
00000C30: 99 22 11 11 20 20 20 20 20 20 D4 4F 20 54 48 45 |.".. .O THE|
00000C40: 20 42 45 53 54 20 4F 46 20 4F 55 52 20 4B 4E 4F | BEST OF OUR KNO|
00000C50: 57 4C 45 44 47 45 2C 11 22 00 82 14 F8 01 99 22 |WLEDGE,."......"|
00000C60: 20 20 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 | THIS PROGRAM |
00000C70: 49 53 20 49 4E 20 54 48 45 20 50 55 42 4C 49 43 |IS IN THE PUBLIC|
00000C80: 11 22 00 AE 14 F9 01 99 22 20 20 20 44 4F 4D 41 |."......" DOMA|
00000C90: 49 4E 2E 20 20 C9 46 20 54 48 49 53 20 49 53 20 |IN. .F THIS IS |
00000CA0: 4E 4F 54 20 54 48 45 20 43 41 53 45 11 22 00 CB |NOT THE CASE."..|
00000CB0: 14 FA 01 99 22 20 20 20 50 4C 45 41 53 45 20 43 |...." PLEASE C|
00000CC0: 4F 4E 54 41 43 54 3A 11 11 11 22 00 F5 14 FB 01 |ONTACT:...".....|
00000CD0: 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 |." .OMMODOR|
00000CE0: 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 43 48 49 |E .USINESS .ACHI|
00000CF0: 4E 45 53 11 22 00 18 15 FC 01 99 22 20 20 20 20 |NES."......" |
00000D00: 20 20 20 20 20 20 33 33 37 30 20 D0 48 41 52 4D | 3370 .HARM|
00000D10: 41 43 59 20 C1 56 45 2E 00 3C 15 FD 01 99 22 20 |ACY .VE..<...." |
00000D20: 20 20 20 20 20 20 20 20 20 C1 47 49 4E 43 4F 55 | .GINCOU|
00000D30: 52 54 2C 20 CF 4E 54 41 52 49 4F 22 00 5E 15 FE |RT, .NTARIO".^..|
00000D40: 01 99 22 20 20 20 20 20 20 20 20 20 20 C3 41 4E |.." .AN|
00000D50: 41 44 41 20 20 20 CD 31 D7 20 32 CB 34 22 00 7E |ADA .1. 2.4".~|
00000D60: 15 FF 01 99 22 20 20 20 20 20 20 20 20 20 20 28 |...." (|
00000D70: 34 31 36 29 20 34 39 39 2D 34 32 39 32 22 00 94 |416) 499-4292"..|
00000D80: 15 00 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 |...UP.1:. 835:. |
00000D90: 38 35 30 3A 00 BE 15 01 02 99 22 20 20 20 20 20 |850:......" |
00000DA0: 11 11 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 |...ROGRAM .AME: |
00000DB0: C4 45 43 4F 4E 50 4F 53 49 54 49 4F 4E 11 00 E8 |.ECONPOSITION...|
00000DC0: 15 02 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 |...." .RITTE|
00000DD0: 4E 20 C2 59 20 20 3A 20 CA 2E 20 C2 2E 20 CE 49 |N .Y : .. .. .I|
00000DE0: 43 48 4F 4C 53 4F 4E 11 00 03 16 03 02 99 22 20 |CHOLSON......." |
00000DF0: 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 59 20 | .PGRADED .Y |
00000E00: 3A 20 11 00 2E 16 04 02 99 22 20 20 20 20 20 11 |: ......." .|
00000E10: D4 48 49 53 20 50 52 4F 47 52 41 4D 20 57 49 4C |.HIS PROGRAM WIL|
00000E20: 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 11 00 4E |L RUN ON ANY...N|
00000E30: 16 07 02 99 22 20 20 20 20 20 20 20 20 20 D0 C5 |...." ..|
00000E40: D4 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 11 00 73 |. 64 ..........s|
00000E50: 16 08 02 99 22 20 20 20 20 20 20 20 20 20 C3 CF |...." ..|
00000E60: CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF CD D0 D5 |....... 64 .....|
00000E70: D4 C5 D2 00 7C 16 49 02 8D 38 33 35 00 90 16 4E |....|.I..835...N|
00000E80: 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 |..UZ.1..UP%:.217|
00000E90: 00 96 16 57 02 8E 00 BC 16 58 02 8F 20 2A 2A 20 |...W.....X.. ** |
00000EA0: 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 |PROGRAM MODIFICA|
00000EB0: 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 CD 16 59 |TION INST **...Y|
00000EC0: 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 ED 16 |..".":.UT,UL%...|
00000ED0: 5D 02 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 |].UP.0:UG$.".ROG|
00000EE0: 52 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 F6 16 |RAM .OD":.850...|
00000EF0: 94 02 8D 38 33 35 00 0A 17 B2 02 8B 55 5A B2 31 |...835......UZ.1|
00000F00: A7 9E 55 50 25 3A 89 32 31 37 00 10 17 BB 02 8E |..UP%:.217......|
00000F10: 00 35 17 BC 02 8F 20 2A 2A 20 54 4F 20 55 53 45 |.5.... ** TO USE|
00000F20: 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 | 8032 LOAD CBM40|
00000F30: 33 32 20 2A 2A 00 6B 17 C6 02 99 22 93 11 11 11 |32 **.k...."....|
00000F40: 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 |.BEFORE RUNNING |
00000F50: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 |THIS PROGRAM ON |
00000F60: 41 4E 20 38 30 33 32 20 20 11 11 00 A1 17 D0 02 |AN 8032 .......|
00000F70: 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 48 45 |." LOAD THE|
00000F80: 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 4F 47 | 'CBM 4032' PROG|
00000F90: 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 11 11 |RAM.............|
00000FA0: 22 00 AC 17 DA 02 9E 55 55 AA 37 31 00 B2 17 E4 |"......UU.71....|
00000FB0: 02 80 00 D7 17 1D 03 8F 20 2A 2A 20 54 4F 20 55 |........ ** TO U|
00000FC0: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
00000FD0: 34 30 33 32 20 2A 2A 00 22 18 1E 03 99 22 93 11 |4032 **."...."..|
00000FE0: 11 11 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 |..BEFORE RUNNING|
00000FF0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E | THIS PROGRAM ON|
00001000: 20 41 4E 20 38 30 33 32 20 20 11 11 4C 4F 41 44 | AN 8032 ..LOAD|
00001010: 20 43 42 4D 20 34 30 33 32 20 50 52 4F 47 52 41 | CBM 4032 PROGRA|
00001020: 4D 22 00 2E 18 1F 03 9E 31 30 39 33 3A 80 00 4E |M"......1093:..N|
00001030: 18 20 03 8F 20 2A 2A 20 54 20 49 20 54 20 4C 20 |. .. ** T I T L |
00001040: 45 20 20 20 50 20 41 20 47 20 45 20 2A 2A 00 82 |E P A G E **..|
00001050: 18 22 03 99 22 93 11 1D 05 22 3B 3A 97 55 54 2C |.".."....";:.UT,|
00001060: 55 55 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 |UU%:..(50003).0.|
00001070: 97 35 33 32 38 30 2C 31 34 3A 97 35 33 32 38 31 |.53280,14:.53281|
00001080: 2C 36 00 98 18 24 03 81 49 B2 31 A4 33 38 3A 99 |,6...$..I.1.38:.|
00001090: 22 12 A6 92 22 3B 3A 82 00 B0 18 26 03 81 49 B2 |"...";:....&..I.|
000010A0: 31 A4 32 32 3A 99 22 11 9D 12 A6 92 22 3B 3A 82 |1.22:.".....";:.|
000010B0: 00 C8 18 28 03 81 49 B2 31 A4 33 37 3A 99 22 9D |...(..I.1.37:.".|
000010C0: 9D 12 A6 92 22 3B 3A 82 00 E0 18 2A 03 81 49 B2 |....";:....*..I.|
000010D0: 31 A4 32 32 3A 99 22 91 9D 12 A6 92 22 3B 3A 82 |1.22:.".....";:.|
000010E0: 00 05 19 2C 03 99 22 13 11 11 11 11 11 11 1D 1D |...,..".........|
000010F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001100: 12 A9 20 20 92 00 27 19 2E 03 99 22 1D 1D 1D 1D |.. ..'...."....|
00001110: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 |............... |
00001120: 92 20 20 12 20 92 A9 00 48 19 30 03 99 22 1D 1D |. . ...H.0.."..|
00001130: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001140: 12 20 92 20 20 12 A3 DF 00 66 19 32 03 99 22 1D |. . ....f.2..".|
00001150: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001160: 1D DF 12 20 20 92 00 8E 19 34 03 99 22 11 11 1D |... ....4.."...|
00001170: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D |...........C O M|
00001180: 20 4D 20 4F 20 44 20 4F 20 52 20 45 11 11 00 B1 | M O D O R E....|
00001190: 19 36 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.6.."...........|
000011A0: 1D 1D 1D 1D 45 44 55 43 41 54 49 4F 4E 41 4C 11 |....EDUCATIONAL.|
000011B0: 11 00 D0 19 38 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |....8.."........|
000011C0: 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 54 57 41 52 45 |........SOFTWARE|
000011D0: 00 EB 19 3A 03 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 |...:.. ** COMMOD|
000011E0: 4F 52 45 20 4C 4F 47 4F 20 2A 2A 00 23 1A 3B 03 |ORE LOGO **.#.;.|
000011F0: 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D |..(UD$,24);"....|
00001200: 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 |......PRESS SPAC|
00001210: 45 20 42 41 52 20 4F 52 20 57 41 49 54 92 22 3A |E BAR OR WAIT.":|
00001220: 49 B2 30 00 45 1A 3C 03 A1 41 24 3A 8B 41 24 B3 |I.0.E.<..A$:.A$.|
00001230: B1 22 20 22 A7 49 B2 49 AA 31 3A 8B 49 B3 32 35 |." ".I.I.1:.I.25|
00001240: 30 A7 38 32 38 00 69 1A 3E 03 54 31 24 B2 22 22 |0.828.i.>.T1$.""|
00001250: 3A 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 3A 54 |:T2$."":T3$."":T|
00001260: 34 24 B2 22 22 3A 49 B2 30 00 72 1A 40 03 89 33 |4$."":I.0.r.@..3|
00001270: 30 30 00 8E 1A 43 03 8F 20 2A 2A 20 53 50 41 43 |00...C.. ** SPAC|
00001280: 45 20 42 41 52 20 50 52 45 53 53 20 2A 2A 00 C9 |E BAR PRESS **..|
00001290: 1A 48 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 1D |.H...(UD$,24);".|
000012A0: 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 43 |......PRESS SPAC|
000012B0: 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E 55 |E BAR TO CONTINU|
000012C0: 45 92 22 3A 97 55 4F 2C 30 00 E0 1A 4C 03 A1 55 |E.":.UO,0...L..U|
000012D0: 49 24 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 34 |I$:.UI$.." ".844|
000012E0: 00 E6 1A 4E 03 8E 00 06 1B 52 03 8F 20 2A 2A 20 |...N.....R.. ** |
000012F0: 50 41 47 45 20 44 45 53 49 47 4E 20 52 4F 55 54 |PAGE DESIGN ROUT|
00001300: 49 4E 45 20 2A 2A 00 12 1B 54 03 55 50 B2 55 50 |INE **...T.UP.UP|
00001310: AA 31 00 3C 1B 57 03 99 22 93 22 C8 28 55 54 24 |.1.<.W..".".(UT$|
00001320: AA 55 50 24 2C 32 31 29 3B C9 28 55 50 24 AA 55 |.UP$,21);.(UP$.U|
00001330: 47 24 AA C4 28 55 50 29 2C 31 38 29 00 6B 1B 5C |G$..(UP),18).k.\|
00001340: 03 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.." ------------|
00001350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001360: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 7A 1B 60 03 |----------".z.`.|
00001370: 8B 55 48 B3 B1 30 A7 38 37 30 00 AE 1B 61 03 99 |.UH..0.870...a..|
00001380: C8 28 55 44 24 2C 32 34 29 3B C8 28 55 50 24 2C |.(UD$,24);.(UP$,|
00001390: 37 29 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 53 |7);"HELP - PRESS|
000013A0: 20 20 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 BF | H <RETURN>"..|
000013B0: 1B 66 03 55 48 B2 30 3A 99 22 13 11 22 3A 8E 00 |.f.UH.0:."..":..|
000013C0: DE 1B 6B 03 8F 20 2A 2A 20 50 4C 45 41 53 45 20 |..k.. ** PLEASE |
000013D0: 57 41 49 54 20 52 45 4D 41 52 4B 20 2A 2A 00 14 |WAIT REMARK **..|
000013E0: 1C 70 03 99 C8 28 55 44 24 2C 32 34 29 3B 22 20 |.p...(UD$,24);" |
000013F0: 20 20 20 20 20 20 20 20 20 20 4F 4E 45 20 4D 4F | ONE MO|
00001400: 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E 2E 20 20 |MENT PLEASE... |
00001410: 20 20 20 22 00 1A 1C 75 03 8E 00 37 1C 84 03 8F | "...u...7....|
00001420: 20 2A 2A 20 53 45 54 20 55 50 20 56 41 52 49 41 | ** SET UP VARIA|
00001430: 42 4C 45 53 20 2A 2A 00 82 1C 85 03 55 58 24 B2 |BLES **.....UX$.|
00001440: 22 48 22 3A 86 55 51 25 28 31 30 30 30 29 3A 55 |"H":.UQ%(1000):U|
00001450: 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 36 3A 55 |B.32768:U1.196:U|
00001460: 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A 55 34 B2 |2.197:U3.198:U4.|
00001470: 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 B2 31 30 |216:UC.167:UU.10|
00001480: 32 34 00 C0 1C 86 03 55 54 B2 35 39 34 36 38 3A |24.....UT.59468:|
00001490: 55 55 25 B2 31 32 3A 55 4C 25 B2 31 34 3A 55 50 |UU%.12:UL%.14:UP|
000014A0: 25 B2 31 31 34 36 3A 55 4D B2 33 32 37 36 38 3A |%.1146:UM.32768:|
000014B0: 97 20 35 30 30 30 33 2C 30 3A 55 4F B2 31 35 38 |. 50003,0:UO.158|
000014C0: 00 03 1D 87 03 8B C2 28 35 30 30 30 33 29 B2 30 |.......(50003).0|
000014D0: A7 55 42 B2 31 30 32 34 3A 55 31 B2 32 30 39 3A |.UB.1024:U1.209:|
000014E0: 55 32 B2 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 |U2.210:U3.211:U4|
000014F0: B2 32 31 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 |.214:UC.204:UU.2|
00001500: 30 34 38 00 42 1D 88 03 8B C2 28 35 30 30 30 33 |048.B.....(50003|
00001510: 29 B2 30 A7 55 54 B2 35 33 32 37 32 3A 55 55 25 |).0.UT.53272:UU%|
00001520: B2 32 31 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 |.21:UL%.23:UP%.2|
00001530: 31 33 39 3A 55 4D B2 31 30 32 34 3A 55 4F B2 31 |139:UM.1024:UO.1|
00001540: 39 38 00 66 1D 89 03 55 44 24 B2 22 13 11 11 11 |98.f...UD$."....|
00001550: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001560: 11 11 11 11 11 22 00 98 1D 8A 03 55 50 24 B2 22 |.....".....UP$."|
00001570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001590: 20 20 20 20 20 20 20 22 00 E6 1D 8B 03 55 54 24 | ".....UT$|
000015A0: B2 22 20 C4 C5 C3 CF CD D0 CF D3 C9 D4 C9 CF CE |." .............|
000015B0: A0 A0 A0 A0 A0 22 3A 8F 20 50 4C 41 43 45 20 50 |.....":. PLACE P|
000015C0: 52 4F 47 52 41 4D 20 54 49 54 4C 45 20 48 45 52 |ROGRAM TITLE HER|
000015D0: 45 20 21 21 21 21 21 21 21 21 21 21 21 21 21 21 |E !!!!!!!!!!!!!!|
000015E0: 21 21 21 2A 2A 2A 00 EC 1D 8C 03 8E 00 06 1E 8E |!!!***..........|
000015F0: 03 8F 20 2A 2A 20 53 45 54 20 56 41 52 49 41 42 |.. ** SET VARIAB|
00001600: 4C 45 53 20 2A 2A 00 0F 1E 93 03 8D 39 30 30 00 |LES **......900.|
00001610: 15 1E 95 03 3A 00 30 1E 98 03 8F 20 2A 2A 20 43 |....:.0.... ** C|
00001620: 48 45 43 4B 20 46 4F 52 20 38 30 33 32 20 2A 2A |HECK FOR 8032 **|
00001630: 00 4E 1E 9D 03 99 22 93 22 3A 99 22 A0 22 3A 8F |.N....".":.".":.|
00001640: 20 53 48 49 46 54 45 44 20 53 50 41 43 45 00 65 | SHIFTED SPACE.e|
00001650: 1E A2 03 8B C2 28 55 42 AA 34 30 29 B3 B1 39 36 |.....(UB.40)..96|
00001660: A7 8D 37 30 30 00 7E 1E A3 03 8F 20 2A 2A 20 4D |..700.~.... ** M|
00001670: 45 4D 4F 52 59 20 43 48 45 43 4B 20 2A 2A 00 92 |EMORY CHECK **..|
00001680: 1E A4 03 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 |.... .(0).2000.9|
00001690: 33 37 00 C0 1E A5 03 99 22 93 11 11 05 54 48 49 |37......"....THI|
000016A0: 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 4E |S MACHINE DOES N|
000016B0: 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 11 22 |OT HAVE ENOUGH."|
000016C0: 00 E4 1E A6 03 99 22 4D 45 4D 4F 52 59 20 54 4F |......"MEMORY TO|
000016D0: 20 52 55 4E 20 54 48 49 53 20 50 52 4F 47 52 41 | RUN THIS PROGRA|
000016E0: 4D 20 21 22 00 EF 1E A7 03 9E 55 55 AA 37 31 00 |M !"......UU.71.|
000016F0: F5 1E A8 03 80 00 0F 1F A9 03 99 22 93 05 22 3A |..........."..":|
00001700: 8B C2 28 35 30 30 30 33 29 B2 30 A7 39 36 32 00 |..(50003).0.962.|
00001710: 3E 1F AC 03 8F 20 2A 2A 20 42 41 53 49 43 20 32 |>.... ** BASIC 2|
00001720: 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 |.0 OR 4.0 OR |
00001730: 20 43 2D 36 34 20 53 45 54 55 50 20 2A 2A 00 7C | C-64 SETUP **.||
00001740: 1F AD 03 97 31 30 37 35 2C 31 33 33 3A 97 31 30 |....1075,133:.10|
00001750: 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 34 |76,144:.1077,234|
00001760: 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 |:.1079,4:.1080,1|
00001770: 33 33 3A 97 31 30 38 31 2C 31 34 35 00 B2 1F AE |33:.1081,145....|
00001780: 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 39 38 |..1091,155:.1098|
00001790: 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 |,133:.1099,144:.|
000017A0: 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 |1100,234:.1103,1|
000017B0: 33 33 00 D4 1F AF 03 97 31 31 30 34 2C 31 34 35 |33......1104,145|
000017C0: 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 30 38 32 |:.1105,234:.1082|
000017D0: 2C 32 33 34 00 EB 1F B1 03 8B C2 28 35 30 30 30 |,234.......(5000|
000017E0: 33 29 B3 B1 31 36 30 A7 39 35 35 00 1A 20 B6 03 |3)..160.955.. ..|
000017F0: 97 31 30 39 33 2C 38 38 3A 97 31 30 39 34 2C 32 |.1093,88:.1094,2|
00001800: 32 38 3A 97 31 30 39 37 2C 38 35 3A 97 31 31 30 |28:.1097,85:.110|
00001810: 32 2C 32 32 38 3A 89 39 36 35 00 2F 20 BB 03 8B |2,228:.965./ ...|
00001820: C2 28 35 30 30 30 33 29 B3 B1 31 A7 39 39 30 00 |.(50003)..1.990.|
00001830: 5E 20 C0 03 97 31 30 39 33 2C 34 39 3A 97 31 30 |^ ...1093,49:.10|
00001840: 39 34 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 3A |94,230:.1097,46:|
00001850: 97 31 31 30 32 2C 32 33 30 3A 89 39 36 35 00 98 |.1102,230:.965..|
00001860: 20 C2 03 97 32 30 39 39 2C 31 34 31 3A 97 32 31 | ...2099,141:.21|
00001870: 30 30 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 32 |00,20:.2101,3:.2|
00001880: 31 30 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 3A |103,8:.2104,141:|
00001890: 97 32 31 30 35 2C 32 31 00 D4 20 C3 03 97 32 31 |.2105,21.. ...21|
000018A0: 30 36 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A 97 |06,3:.2115,145:.|
000018B0: 32 31 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 33 |2117,52:.2118,23|
000018C0: 34 3A 97 32 31 32 31 2C 34 39 3A 97 32 31 32 32 |4:.2121,49:.2122|
000018D0: 2C 31 34 31 00 0E 21 C4 03 97 32 31 32 33 2C 32 |,141..!...2123,2|
000018E0: 30 3A 97 32 31 32 34 2C 33 3A 97 32 31 32 36 2C |0:.2124,3:.2126,|
000018F0: 32 33 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 32 |234:.2127,141:.2|
00001900: 31 32 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 2C |128,21:.2129,3.,|
00001910: 21 C5 03 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 |!...UU.48:. DISA|
00001920: 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 3D 21 CA |BLE STOP KEY.=!.|
00001930: 03 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 4D 21 |..800:. TITLE.M!|
00001940: D4 03 89 33 30 30 3A 8F 20 4D 45 4E 55 00 7E 21 |...300:. MENU.~!|
00001950: DE 03 99 22 93 54 48 45 20 50 47 4D 20 57 49 4C |...".THE PGM WIL|
00001960: 4C 20 4E 4F 54 20 57 4F 52 4B 20 4F 4E 20 54 48 |L NOT WORK ON TH|
00001970: 49 53 20 4D 41 43 48 49 4E 45 21 22 3A 80 00 B3 |IS MACHINE!":...|
00001980: 21 E8 03 8B 55 5A B2 31 A7 9E 55 50 25 3A 9E 55 |!...UZ.1..UP%:.U|
00001990: 50 25 3A 55 5A B2 30 3A 8F 20 2A 2A 20 50 52 4F |P%:UZ.0:. ** PRO|
000019A0: 47 52 41 4D 20 53 54 41 52 54 53 20 48 45 52 45 |GRAM STARTS HERE|
000019B0: 20 2A 2A 00 DE 21 E9 03 99 22 93 05 22 3B 3A 8C | **..!..."..";:.|
000019C0: 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 |:..(50003).0..53|
000019D0: 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 36 00 0E |281,6:.53280,6..|
000019E0: 22 56 04 97 55 54 2C 55 4C 25 3A 42 31 24 B2 22 |"V..UT,UL%:B1$."|
000019F0: 12 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 |................|
00001A00: A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 A0 A6 92 22 00 36 |.............".6|
00001A10: 22 60 04 42 32 24 B2 22 12 20 20 20 20 20 20 20 |"`.B2$.". |
00001A20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001A30: 20 20 20 20 92 22 00 5E 22 6A 04 42 33 24 B2 22 | .".^"j.B3$."|
00001A40: 12 A6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00001A50: 20 20 20 20 20 20 20 20 20 20 20 A6 92 22 00 79 | ..".y|
00001A60: 22 74 04 44 31 24 B2 22 13 11 11 11 11 11 11 11 |"t.D1$."........|
00001A70: 11 11 11 11 11 11 11 11 22 00 83 22 7E 04 89 31 |........".."~..1|
00001A80: 33 34 30 00 95 22 88 04 81 49 B2 31 A4 31 35 30 |340.."...I.1.150|
00001A90: 30 3A 82 3A 8E 00 A6 22 92 04 81 49 B2 31 A4 35 |0:.:..."...I.1.5|
00001AA0: 30 30 3A 82 3A 8E 00 D7 22 9C 04 99 22 93 C1 46 |00:.:..."..."..F|
00001AB0: 54 45 52 20 45 41 43 48 20 53 54 45 50 20 49 4E |TER EACH STEP IN|
00001AC0: 20 54 48 45 20 45 58 50 4C 41 4E 41 54 49 4F 4E | THE EXPLANATION|
00001AD0: 20 57 48 49 43 48 22 00 0A 23 A6 04 99 22 11 46 | WHICH"..#...".F|
00001AE0: 4F 4C 4C 4F 57 53 2C 20 54 48 45 20 57 4F 52 44 |OLLOWS, THE WORD|
00001AF0: 20 12 5B 53 50 41 43 45 5D 92 20 57 49 4C 4C 20 | .[SPACE]. WILL |
00001B00: 41 50 50 45 41 52 20 41 54 22 00 2C 23 B0 04 99 |APPEAR AT".,#...|
00001B10: 22 11 54 48 45 20 42 4F 54 54 4F 4D 20 4F 46 20 |".THE BOTTOM OF |
00001B20: 54 48 45 20 53 43 52 45 45 4E 2E 22 00 58 23 BA |THE SCREEN.".X#.|
00001B30: 04 99 22 11 11 11 11 D0 52 45 53 53 20 54 48 45 |..".....RESS THE|
00001B40: 20 D3 50 41 43 45 A0 C2 41 52 20 57 48 45 4E 20 | .PACE..AR WHEN |
00001B50: 59 4F 55 20 41 52 45 22 00 73 23 C4 04 99 22 11 |YOU ARE".s#...".|
00001B60: 52 45 41 44 59 20 54 4F 20 43 4F 4E 54 49 4E 55 |READY TO CONTINU|
00001B70: 45 2E 22 00 79 23 CE 04 8E 00 8E 23 D8 04 A1 41 |E.".y#.....#...A|
00001B80: 24 3A 8B 41 24 B3 B1 22 22 A7 31 32 34 30 00 CE |$:.A$.."".1240..|
00001B90: 23 E2 04 97 55 4D AA 39 39 33 2C 31 35 35 3A 97 |#...UM.993,155:.|
00001BA0: 55 4D AA 39 39 34 2C 31 34 37 3A 97 55 4D AA 39 |UM.994,147:.UM.9|
00001BB0: 39 35 2C 31 34 34 3A 97 55 4D AA 39 39 36 2C 31 |95,144:.UM.996,1|
00001BC0: 32 39 3A 97 55 4D AA 39 39 37 2C 31 33 31 00 EA |29:.UM.997,131..|
00001BD0: 23 EC 04 97 55 4D AA 39 39 38 2C 31 33 33 3A 97 |#...UM.998,133:.|
00001BE0: 55 4D AA 39 39 39 2C 31 35 37 00 00 24 F6 04 A1 |UM.999,157..$...|
00001BF0: 41 24 3A 8B 41 24 B3 B1 22 20 22 A7 31 32 37 30 |A$:.A$.." ".1270|
00001C00: 00 3B 24 00 05 97 55 4D AA 39 39 33 2C 33 32 3A |.;$...UM.993,32:|
00001C10: 97 55 4D AA 39 39 34 2C 33 32 3A 97 55 4D AA 39 |.UM.994,32:.UM.9|
00001C20: 39 35 2C 33 32 3A 97 55 4D AA 39 39 36 2C 33 32 |95,32:.UM.996,32|
00001C30: 3A 97 55 4D AA 39 39 37 2C 33 32 00 55 24 0A 05 |:.UM.997,32.U$..|
00001C40: 97 55 4D AA 39 39 38 2C 33 32 3A 97 55 4D AA 39 |.UM.998,32:.UM.9|
00001C50: 39 39 2C 33 32 00 5B 24 14 05 8E 00 6E 24 1E 05 |99,32.[$....n$..|
00001C60: 54 B2 B5 28 31 31 AC BB 28 31 29 AB 35 29 00 7C |T..(11..(1).5).||
00001C70: 24 28 05 8B 54 B2 30 A7 31 33 31 30 00 82 24 32 |$(..T.0.1310..$2|
00001C80: 05 8E 00 8E 24 3C 05 99 22 93 11 11 11 22 00 9A |....$<.."...."..|
00001C90: 24 46 05 99 A3 35 29 42 31 24 00 C7 24 50 05 81 |$F...5)B1$..$P..|
00001CA0: 49 B2 31 A4 35 3A 99 A3 35 29 42 32 24 3A 99 A3 |I.1.5:..5)B2$:..|
00001CB0: 35 29 42 33 24 3A 82 3A 99 A3 35 29 42 32 24 3A |5)B3$:.:..5)B2$:|
00001CC0: 99 A3 35 29 42 31 24 00 D6 24 5A 05 99 22 13 11 |..5)B1$..$Z.."..|
00001CD0: 11 11 11 11 11 22 00 EE 24 64 05 99 A3 31 34 29 |....."..$d...14)|
00001CE0: 22 12 C6 C1 C3 D4 CF D2 C9 CE C7 92 11 22 00 FF |"............"..|
00001CF0: 24 6E 05 99 A3 31 37 29 22 12 C2 D9 92 11 22 00 |$n...17)".....".|
00001D00: 1C 25 78 05 99 A3 31 32 29 22 12 C4 C5 C3 CF CD |.%x...12)"......|
00001D10: D0 CF D3 C9 D4 C9 CF CE 92 11 11 22 00 3B 25 82 |...........".;%.|
00001D20: 05 99 A3 31 30 29 22 12 42 59 20 CA 2E C2 2E 20 |...10)".BY .... |
00001D30: CE 49 43 48 4F 4C 53 4F 4E 92 22 00 45 25 8C 05 |.ICHOLSON.".E%..|
00001D40: 8D 31 31 36 30 00 8D 25 96 05 55 47 24 B2 22 44 |.1160..%..UG$."D|
00001D50: 45 43 4F 4D 50 4F 53 49 54 49 4F 4E 22 3A 55 50 |ECOMPOSITION":UP|
00001D60: B2 30 3A 8D 38 35 30 3A 99 22 11 11 11 1D D4 48 |.0:.850:.".....H|
00001D70: 49 53 20 50 52 4F 47 52 41 4D 20 45 58 50 4C 41 |IS PROGRAM EXPLA|
00001D80: 49 4E 53 20 41 4E 44 20 47 49 56 45 53 00 C0 25 |INS AND GIVES..%|
00001D90: A0 05 99 22 11 1D 50 52 41 43 54 49 43 45 20 49 |..."..PRACTICE I|
00001DA0: 4E 20 46 41 43 54 4F 52 49 4E 47 20 42 59 20 44 |N FACTORING BY D|
00001DB0: 45 43 4F 4D 50 4F 53 49 54 49 4F 4E 2E 11 11 22 |ECOMPOSITION..."|
00001DC0: 00 EA 25 AA 05 99 22 1D D4 4F 20 41 4E 53 57 45 |..%..."..O ANSWE|
00001DD0: 52 20 41 4E 59 20 51 55 45 53 54 49 4F 4E 2C 20 |R ANY QUESTION, |
00001DE0: 54 59 50 45 20 59 4F 55 52 22 00 0F 26 B4 05 99 |TYPE YOUR"..&...|
00001DF0: 22 11 1D 52 45 50 4C 59 20 41 4E 44 20 50 52 45 |"..REPLY AND PRE|
00001E00: 53 53 20 3C D2 C5 D4 D5 D2 CE 3E 2E 11 11 22 00 |SS <......>...".|
00001E10: 3A 26 BE 05 99 22 1D C4 4F 20 59 4F 55 20 4E 4F |:&..."..O YOU NO|
00001E20: 57 20 55 4E 44 45 52 53 54 41 4E 44 20 54 48 49 |W UNDERSTAND THI|
00001E30: 53 20 4D 45 54 48 4F 44 11 22 00 6C 26 C8 05 99 |S METHOD.".l&...|
00001E40: 22 1D 4F 46 20 46 41 43 54 4F 52 49 4E 47 3F 20 |".OF FACTORING? |
00001E50: 22 3B 3A 55 53 24 B2 22 59 4E 48 22 3A 55 4C B2 |";:US$."YNH":UL.|
00001E60: 31 3A 8D 33 35 3A 59 24 B2 55 52 24 00 83 26 D2 |1:.35:Y$.UR$..&.|
00001E70: 05 8B 59 24 B2 22 59 22 A7 99 22 93 22 3A 89 32 |..Y$."Y"..".":.2|
00001E80: 33 33 30 00 9F 26 DC 05 8D 31 31 37 30 3A 8D 31 |330..&...1170:.1|
00001E90: 31 38 30 3A 8D 31 31 37 30 3A 8D 31 32 34 30 00 |180:.1170:.1240.|
00001EA0: C5 26 E6 05 97 55 54 2C 55 4C 25 3A 99 22 93 C9 |.&...UT,UL%:."..|
00001EB0: CE D4 D2 CF C4 D5 C3 D4 CF D2 D9 A0 C5 D8 C1 CD |................|
00001EC0: D0 CC C5 3A 22 00 ED 26 F0 05 99 22 11 1D 1D C2 |...:"..&..."....|
00001ED0: 59 20 55 53 49 4E 47 20 27 C6 CF C9 CC 27 20 57 |Y USING '....' W|
00001EE0: 45 20 4B 4E 4F 57 20 54 48 41 54 11 22 00 0E 27 |E KNOW THAT."..'|
00001EF0: FA 05 99 22 1D 1D 1D 28 32 58 20 2B 20 33 29 28 |..."...(2X + 3)(|
00001F00: 34 58 20 2B 20 35 29 22 3A 8D 31 32 34 30 00 36 |4X + 5)":.1240.6|
00001F10: 27 04 06 99 22 11 3D 20 20 38 58 91 32 11 20 2B |'...".= 8X.2. +|
00001F20: 20 31 30 58 20 2B 20 31 32 58 20 2B 20 31 35 22 | 10X + 12X + 15"|
00001F30: 3A 8D 31 32 34 30 00 5F 27 0E 06 99 22 11 3D 20 |:.1240._'...".= |
00001F40: 20 38 58 91 32 11 20 2B 20 28 31 30 20 2B 20 31 | 8X.2. + (10 + 1|
00001F50: 32 29 58 20 2B 20 31 35 22 3A 8D 31 32 34 30 00 |2)X + 15":.1240.|
00001F60: 81 27 18 06 99 22 11 3D 20 20 38 58 91 32 11 20 |.'...".= 8X.2. |
00001F70: 2B 20 32 32 58 20 2B 20 31 35 22 3A 8D 31 32 34 |+ 22X + 15":.124|
00001F80: 30 00 B3 27 22 06 99 22 11 1D 1D D7 45 20 4E 4F |0..'".."....E NO|
00001F90: 57 20 57 41 4E 54 20 54 4F 20 52 45 56 45 52 53 |W WANT TO REVERS|
00001FA0: 45 20 54 48 45 20 53 54 45 50 53 3A 22 3A 8D 31 |E THE STEPS:":.1|
00001FB0: 32 34 30 00 D5 27 2C 06 99 22 11 20 20 20 38 58 |240..',..". 8X|
00001FC0: 91 32 11 20 2B 20 32 32 58 20 2B 20 31 35 22 3A |.2. + 22X + 15":|
00001FD0: 8D 31 32 34 30 00 FE 27 36 06 99 22 11 3D 20 20 |.1240..'6..".= |
00001FE0: 38 58 91 32 11 20 2B 20 28 31 30 20 2B 20 31 32 |8X.2. + (10 + 12|
00001FF0: 29 58 20 2B 20 31 35 22 3A 8D 31 32 34 30 00 26 |)X + 15":.1240.&|
00002000: 28 40 06 99 22 11 3D 20 20 38 58 91 32 11 20 2B |(@..".= 8X.2. +|
00002010: 20 31 30 58 20 2B 20 31 32 58 20 2B 20 31 35 22 | 10X + 12X + 15"|
00002020: 3A 8D 31 32 34 30 00 42 28 4A 06 99 22 11 3D 20 |:.1240.B(J..".= |
00002030: 20 28 32 58 20 2B 20 33 29 28 34 58 20 2B 20 35 | (2X + 3)(4X + 5|
00002040: 29 22 00 4C 28 54 06 8D 31 32 34 30 00 83 28 5E |)".L(T..1240..(^|
00002050: 06 81 49 B2 31 A4 31 36 3A 99 3A 81 4A B2 31 A4 |..I.1.16:.:.J.1.|
00002060: 31 30 30 3A 82 3A 82 3A 99 22 91 91 91 91 91 91 |100:.:.:."......|
00002070: 91 91 91 91 91 91 91 91 91 91 91 11 22 3A 8D 31 |............":.1|
00002080: 32 34 30 00 CF 28 68 06 99 22 C9 4E 20 54 48 45 |240..(h..".N THE|
00002090: 20 53 45 43 4F 4E 44 20 4C 49 4E 45 2C 20 48 4F | SECOND LINE, HO|
000020A0: 57 20 44 4F 20 57 45 20 4B 4E 4F 57 20 49 54 27 |W DO WE KNOW IT'|
000020B0: 53 20 31 30 20 2B 20 31 32 2C 20 4E 4F 54 20 53 |S 10 + 12, NOT S|
000020C0: 4F 4D 45 54 48 49 4E 47 20 45 4C 53 45 3F 22 00 |OMETHING ELSE?".|
000020D0: D9 28 72 06 8D 31 32 34 30 00 F2 28 7C 06 99 22 |.(r..1240..(|.."|
000020E0: 11 C8 45 52 45 27 53 20 54 48 45 20 43 4C 55 45 |..ERE'S THE CLUE|
000020F0: 3A 22 00 3D 29 86 06 99 22 11 CE 4F 54 49 43 45 |:".=)..."..OTICE|
00002100: 20 54 48 41 54 20 28 20 38 29 28 31 35 29 20 3D | THAT ( 8)(15) =|
00002110: 20 31 32 30 20 20 20 20 20 20 20 20 20 20 20 20 | 120 |
00002120: 20 20 20 20 20 41 4E 44 20 54 48 41 54 20 28 31 | AND THAT (1|
00002130: 30 29 28 31 32 29 20 3D 20 31 32 30 22 00 47 29 |0)(12) = 120".G)|
00002140: 90 06 8D 31 32 34 30 00 91 29 9A 06 99 22 11 D7 |...1240..)..."..|
00002150: 45 20 4D 55 53 54 20 53 50 4C 49 54 20 32 32 20 |E MUST SPLIT 22 |
00002160: 49 4E 54 4F 20 54 57 4F 20 49 4E 54 45 47 45 52 |INTO TWO INTEGER|
00002170: 53 20 57 48 4F 53 45 50 52 4F 44 55 43 54 20 49 |S WHOSEPRODUCT I|
00002180: 53 20 28 38 29 28 31 35 29 20 4F 52 20 31 32 30 |S (8)(15) OR 120|
00002190: 2E 00 9B 29 A4 06 8D 31 32 34 30 00 CF 29 AE 06 |...)...1240..)..|
000021A0: 99 22 11 D4 48 45 20 4F 4E 4C 59 20 57 41 59 20 |."..HE ONLY WAY |
000021B0: 54 4F 20 44 4F 20 54 48 41 54 20 49 53 20 54 4F |TO DO THAT IS TO|
000021C0: 20 55 53 45 20 31 30 20 41 4E 44 31 32 2E 22 00 | USE 10 AND12.".|
000021D0: D9 29 B8 06 8D 31 32 34 30 00 1E 2A C2 06 99 22 |.)...1240..*..."|
000021E0: 93 11 C6 49 52 53 54 20 53 54 45 50 20 49 4E 20 |...IRST STEP IN |
000021F0: 46 41 43 54 4F 52 49 4E 47 20 C1 58 91 32 11 20 |FACTORING .X.2. |
00002200: 2B 20 C2 58 20 2B 20 C3 20 20 20 20 42 59 20 44 |+ .X + . BY D|
00002210: 45 43 4F 4D 50 4F 53 49 54 49 4F 4E 3A 22 00 28 |ECOMPOSITION:".(|
00002220: 2A CC 06 8D 31 32 34 30 00 74 2A D6 06 99 22 11 |*...1240.t*...".|
00002230: D3 50 4C 49 54 20 43 4F 45 46 46 49 43 49 45 4E |.PLIT COEFFICIEN|
00002240: 54 20 C2 20 49 4E 54 4F 20 54 57 4F 20 49 4E 54 |T . INTO TWO INT|
00002250: 45 47 45 52 53 20 20 20 57 48 4F 53 45 20 50 52 |EGERS WHOSE PR|
00002260: 4F 44 55 43 54 20 49 53 20 C1 20 54 49 4D 45 53 |ODUCT IS . TIMES|
00002270: 20 C3 2E 22 00 B1 2A E0 06 8D 31 32 34 30 3A 99 | .."..*...1240:.|
00002280: 22 11 CE 4F 57 2C 20 54 48 52 45 45 20 45 58 41 |"..OW, THREE EXA|
00002290: 4D 50 4C 45 53 20 4F 46 20 54 48 49 53 20 46 49 |MPLES OF THIS FI|
000022A0: 52 53 54 20 53 54 45 50 3A 22 20 3A 8D 31 32 34 |RST STEP:" :.124|
000022B0: 30 00 D0 2A EA 06 99 22 11 11 36 58 91 32 11 20 |0..*..."..6X.2. |
000022C0: 2B 20 31 37 58 20 2B 20 35 22 3A 8D 31 32 34 30 |+ 17X + 5":.1240|
000022D0: 00 0E 2B F4 06 99 22 11 D3 50 4C 49 54 20 31 37 |..+..."..PLIT 17|
000022E0: 20 49 4E 54 4F 20 54 57 4F 20 49 4E 54 45 47 45 | INTO TWO INTEGE|
000022F0: 52 53 20 57 48 4F 53 45 20 50 52 4F 44 55 43 54 |RS WHOSE PRODUCT|
00002300: 49 53 20 33 30 2E 22 3B 3A 8D 31 32 34 30 00 2B |IS 30.";:.1240.+|
00002310: 2B FE 06 99 22 20 20 D5 53 45 20 31 35 20 41 4E |+..." .SE 15 AN|
00002320: 44 20 32 2E 22 3A 8D 31 32 34 30 00 4A 2B 08 07 |D 2.":.1240.J+..|
00002330: 99 22 11 11 33 58 91 32 11 20 2D 20 31 34 58 20 |."..3X.2. - 14X |
00002340: 2B 20 38 22 3A 8D 31 32 34 30 00 8F 2B 12 07 99 |+ 8":.1240..+...|
00002350: 22 D3 50 4C 49 54 20 2D 31 34 20 49 4E 54 4F 20 |".PLIT -14 INTO |
00002360: 54 57 4F 20 49 4E 54 45 47 45 52 53 20 57 48 4F |TWO INTEGERS WHO|
00002370: 53 45 20 20 20 20 20 20 20 50 52 4F 44 55 43 54 |SE PRODUCT|
00002380: 20 49 53 20 32 34 2E 22 3B 3A 8D 31 32 34 30 00 | IS 24.";:.1240.|
00002390: AE 2B 1C 07 99 22 20 20 D5 53 45 20 2D 31 32 20 |.+..." .SE -12 |
000023A0: 41 4E 44 20 2D 32 2E 22 3A 8D 31 32 34 30 00 CD |AND -2.":.1240..|
000023B0: 2B 26 07 99 22 11 11 34 58 91 32 11 20 2B 20 38 |+&.."..4X.2. + 8|
000023C0: 58 20 2D 20 31 32 22 3A 8D 31 32 34 30 00 0B 2C |X - 12":.1240..,|
000023D0: 30 07 99 22 D3 50 4C 49 54 20 38 20 49 4E 54 4F |0..".PLIT 8 INTO|
000023E0: 20 54 57 4F 20 49 4E 54 45 47 45 52 53 20 57 48 | TWO INTEGERS WH|
000023F0: 4F 53 45 20 50 52 4F 44 55 43 54 20 49 53 20 2D |OSE PRODUCT IS -|
00002400: 34 38 2E 22 3B 3A 8D 31 32 34 30 00 2C 2C 3A 07 |48.";:.1240.,,:.|
00002410: 99 22 20 20 D5 53 45 20 31 32 20 41 4E 44 20 2D |." .SE 12 AND -|
00002420: 34 2E 91 91 91 22 3A 8D 31 32 34 30 00 57 2C 44 |4....":.1240.W,D|
00002430: 07 99 22 93 D2 45 54 55 52 4E 49 4E 47 20 54 4F |.."..ETURNING TO|
00002440: 20 54 48 45 20 4F 52 49 47 49 4E 41 4C 20 45 58 | THE ORIGINAL EX|
00002450: 41 4D 50 4C 45 3A 22 00 73 2C 4E 07 99 22 11 20 |AMPLE:".s,N..". |
00002460: 20 20 38 58 91 32 11 20 2B 20 32 32 58 20 2B 20 | 8X.2. + 22X + |
00002470: 31 35 22 00 96 2C 58 07 99 22 11 3D 20 20 38 58 |15"..,X..".= 8X|
00002480: 91 32 11 20 2B 20 28 31 30 20 2B 20 31 32 29 58 |.2. + (10 + 12)X|
00002490: 20 2B 20 31 35 22 00 B8 2C 62 07 99 22 11 3D 20 | + 15"..,b..".= |
000024A0: 20 38 58 91 32 11 20 2B 20 31 30 58 20 2B 20 31 | 8X.2. + 10X + 1|
000024B0: 32 58 20 2B 20 31 35 22 00 D8 2C 6C 07 99 22 11 |2X + 15"..,l..".|
000024C0: 11 11 11 11 3D 20 20 28 32 58 20 2B 20 33 29 28 |....= (2X + 3)(|
000024D0: 34 58 20 2B 20 35 29 22 00 21 2D 76 07 99 22 11 |4X + 5)".!-v..".|
000024E0: D7 45 20 43 41 4E 27 54 20 47 4F 20 46 52 4F 4D |.E CAN'T GO FROM|
000024F0: 20 54 48 45 20 54 48 49 52 44 20 4C 49 4E 45 20 | THE THIRD LINE |
00002500: 54 4F 20 54 48 45 20 20 46 4F 55 52 54 48 20 49 |TO THE FOURTH I|
00002510: 4E 20 4A 55 53 54 20 4F 4E 45 20 53 54 45 50 2E |N JUST ONE STEP.|
00002520: 22 00 2B 2D 80 07 8D 31 32 34 30 00 75 2D 8A 07 |".+-...1240.u-..|
00002530: 99 22 D7 45 20 57 49 4C 4C 20 47 52 4F 55 50 20 |.".E WILL GROUP |
00002540: 54 48 45 20 54 45 52 4D 53 20 4F 46 20 54 48 45 |THE TERMS OF THE|
00002550: 20 54 48 49 52 44 20 20 20 20 4C 49 4E 45 20 49 | THIRD LINE I|
00002560: 4E 54 4F 20 54 57 4F 20 50 41 49 52 53 2E 22 3A |NTO TWO PAIRS.":|
00002570: 8D 31 32 34 30 00 A9 2D 94 07 99 22 13 11 11 11 |.1240..-..."....|
00002580: 11 11 11 11 11 3D 20 20 28 38 58 91 32 11 20 2B |.....= (8X.2. +|
00002590: 20 31 30 58 29 20 2B 20 28 31 32 58 20 2B 20 31 | 10X) + (12X + 1|
000025A0: 35 29 22 3A 8D 31 32 34 30 00 E8 2D 9E 07 99 22 |5)":.1240..-..."|
000025B0: 11 11 11 11 11 11 11 11 11 CE 4F 57 20 57 45 27 |..........OW WE'|
000025C0: 4C 4C 20 46 41 43 54 4F 52 20 4F 55 54 20 41 4E |LL FACTOR OUT AN|
000025D0: 59 20 43 4F 4D 4D 4F 4E 20 46 41 43 54 4F 52 53 |Y COMMON FACTORS|
000025E0: 2E 22 3A 8D 31 32 34 30 00 19 2E A8 07 99 22 91 |.":.1240......".|
000025F0: 91 91 91 91 91 91 91 91 91 3D 20 20 32 58 28 34 |.........= 2X(4|
00002600: 58 20 2B 20 35 29 20 2B 20 33 28 34 58 20 2B 20 |X + 5) + 3(4X + |
00002610: 35 29 22 3A 8D 31 32 34 30 00 4C 2E B2 07 99 22 |5)":.1240.L...."|
00002620: 11 11 11 11 11 11 11 11 D7 45 20 43 41 4E 20 4E |.........E CAN N|
00002630: 4F 57 20 53 45 45 20 28 34 58 20 2B 20 35 29 20 |OW SEE (4X + 5) |
00002640: 49 53 20 41 20 43 4F 4D 4D 4F 4E 22 00 71 2E BC |IS A COMMON".q..|
00002650: 07 99 22 46 41 43 54 4F 52 2C 20 41 4E 44 20 57 |.."FACTOR, AND W|
00002660: 45 20 48 41 56 45 20 49 54 21 22 3A 8D 31 32 34 |E HAVE IT!":.124|
00002670: 30 00 B9 2E C6 07 99 22 CE 4F 57 20 48 45 52 45 |0......".OW HERE|
00002680: 20 41 52 45 20 54 48 45 20 54 48 52 45 45 20 4F | ARE THE THREE O|
00002690: 54 48 45 52 20 45 58 41 4D 50 4C 45 53 2C 20 20 |THER EXAMPLES, |
000026A0: 57 4F 52 4B 45 44 20 4F 55 54 20 53 54 45 50 20 |WORKED OUT STEP |
000026B0: 42 59 20 53 54 45 50 3A 22 00 F3 2E D0 07 8D 31 |BY STEP:"......1|
000026C0: 32 34 30 3A 99 22 93 11 1D 1D 36 58 91 32 11 20 |240:."....6X.2. |
000026D0: 2B 20 31 37 58 20 2B 20 35 20 28 D0 52 4F 44 55 |+ 17X + 5 (.RODU|
000026E0: 43 54 20 3D 20 33 30 2E 20 D3 55 4D 20 3D 20 31 |CT = 30. .UM = 1|
000026F0: 37 29 22 00 FD 2E DA 07 8D 31 32 34 30 00 36 2F |7)"......1240.6/|
00002700: E4 07 99 22 11 3D 20 36 58 91 32 11 20 2B 20 28 |...".= 6X.2. + (|
00002710: 31 35 20 2B 20 32 29 58 20 2B 20 35 20 20 20 20 |15 + 2)X + 5 |
00002720: 20 28 D5 53 45 20 31 35 20 41 4E 44 20 32 29 22 | (.SE 15 AND 2)"|
00002730: 3A 8D 31 32 34 30 00 5B 2F EE 07 99 22 11 3D 20 |:.1240.[/...".= |
00002740: 36 58 91 32 11 20 2B 20 31 35 58 20 2B 20 32 58 |6X.2. + 15X + 2X|
00002750: 20 2B 20 35 22 3A 8D 31 32 34 30 00 85 2F F8 07 | + 5":.1240../..|
00002760: 99 22 11 11 3D 20 28 36 58 91 32 11 20 2B 20 31 |."..= (6X.2. + 1|
00002770: 35 58 29 20 2B 20 28 32 58 20 2B 20 35 29 22 3A |5X) + (2X + 5)":|
00002780: 8D 31 32 34 30 00 AD 2F 02 08 99 22 11 11 3D 20 |.1240../..."..= |
00002790: 33 58 28 32 58 20 2B 20 35 29 20 2B 20 31 28 32 |3X(2X + 5) + 1(2|
000027A0: 58 20 2B 20 35 29 22 3A 8D 31 32 34 30 00 C9 2F |X + 5)":.1240../|
000027B0: 0C 08 99 22 11 11 3D 20 28 32 58 20 2B 20 35 29 |..."..= (2X + 5)|
000027C0: 28 33 58 20 2B 20 31 29 22 00 03 30 16 08 8D 31 |(3X + 1)"..0...1|
000027D0: 32 34 30 3A 99 22 93 11 1D 1D 33 58 91 32 11 20 |240:."....3X.2. |
000027E0: 2D 20 31 34 58 20 2B 20 38 20 28 D0 52 4F 44 55 |- 14X + 8 (.RODU|
000027F0: 43 54 20 3D 20 32 34 2E 20 D3 55 4D 20 3D 2D 31 |CT = 24. .UM =-1|
00002800: 34 29 22 00 0D 30 20 08 8D 31 32 34 30 00 46 30 |4)"..0 ..1240.F0|
00002810: 2A 08 99 22 11 3D 20 33 58 91 32 11 20 2B 20 28 |*..".= 3X.2. + (|
00002820: 2D 31 32 20 2D 20 32 29 58 20 2B 20 38 20 20 28 |-12 - 2)X + 8 (|
00002830: D5 53 45 20 2D 31 32 20 41 4E 44 20 2D 32 29 22 |.SE -12 AND -2)"|
00002840: 3A 8D 31 32 34 30 00 6B 30 34 08 99 22 11 3D 20 |:.1240.k04..".= |
00002850: 33 58 91 32 11 20 2D 20 31 32 58 20 2D 20 32 58 |3X.2. - 12X - 2X|
00002860: 20 2B 20 38 22 3A 8D 31 32 34 30 00 96 30 3E 08 | + 8":.1240..0>.|
00002870: 99 22 11 11 3D 20 28 33 58 91 32 11 20 2D 20 31 |."..= (3X.2. - 1|
00002880: 32 58 29 20 2B 20 28 2D 32 58 20 2B 20 38 29 22 |2X) + (-2X + 8)"|
00002890: 3A 8D 31 32 34 30 00 BC 30 48 08 99 22 11 11 3D |:.1240..0H.."..=|
000028A0: 20 33 58 28 58 20 2D 20 34 29 20 2D 20 32 28 58 | 3X(X - 4) - 2(X|
000028B0: 20 2D 20 34 29 22 3A 8D 31 32 34 30 00 D7 30 52 | - 4)":.1240..0R|
000028C0: 08 99 22 11 11 3D 20 28 58 20 2D 20 34 29 28 33 |.."..= (X - 4)(3|
000028D0: 58 20 2D 20 32 29 22 00 10 31 5C 08 8D 31 32 34 |X - 2)"..1\..124|
000028E0: 30 3A 99 22 93 11 1D 1D 34 58 91 32 11 20 2B 20 |0:."....4X.2. + |
000028F0: 38 58 20 2D 20 31 32 20 28 D0 52 4F 44 55 43 54 |8X - 12 (.RODUCT|
00002900: 20 3D 2D 34 38 2E 20 D3 55 4D 20 3D 20 38 29 22 | =-48. .UM = 8)"|
00002910: 00 1A 31 66 08 8D 31 32 34 30 00 52 31 70 08 99 |..1f..1240.R1p..|
00002920: 22 11 3D 20 34 58 91 32 11 20 2B 20 28 31 32 20 |".= 4X.2. + (12 |
00002930: 2D 20 34 29 58 20 2D 20 31 32 20 20 28 D5 53 45 |- 4)X - 12 (.SE|
00002940: 20 31 32 20 41 4E 44 20 2D 34 29 22 3A 8D 31 32 | 12 AND -4)":.12|
00002950: 34 30 00 78 31 7A 08 99 22 11 3D 20 34 58 91 32 |40.x1z..".= 4X.2|
00002960: 11 20 2B 20 31 32 58 20 2D 20 34 58 20 2D 20 31 |. + 12X - 4X - 1|
00002970: 32 22 3A 8D 31 32 34 30 00 A3 31 84 08 99 22 11 |2":.1240..1...".|
00002980: 3D 20 28 34 58 91 32 11 20 2B 20 31 32 58 29 20 |= (4X.2. + 12X) |
00002990: 2B 20 28 2D 34 58 20 2D 20 31 32 29 22 3A 8D 31 |+ (-4X - 12)":.1|
000029A0: 32 34 30 00 C8 31 8E 08 99 22 11 3D 20 34 58 28 |240..1...".= 4X(|
000029B0: 58 20 2B 20 33 29 20 2D 20 34 28 58 20 2B 20 33 |X + 3) - 4(X + 3|
000029C0: 29 22 3A 8D 31 32 34 30 00 E8 31 98 08 99 22 11 |)":.1240..1...".|
000029D0: 3D 20 28 58 20 2B 20 33 29 28 34 58 20 2D 20 34 |= (X + 3)(4X - 4|
000029E0: 29 22 3A 8D 31 32 34 30 00 34 32 A2 08 99 22 11 |)":.1240.42...".|
000029F0: 11 11 11 11 D4 48 49 53 20 4F 4E 45 20 49 53 4E |.....HIS ONE ISN|
00002A00: 27 54 20 46 49 4E 49 53 48 45 44 2E 20 1D D4 48 |'T FINISHED. ..H|
00002A10: 45 52 45 27 53 20 41 20 20 20 20 20 43 4F 4D 4D |ERE'S A COMM|
00002A20: 4F 4E 20 46 41 43 54 4F 52 20 34 20 49 4E 20 54 |ON FACTOR 4 IN T|
00002A30: 48 45 22 3B 00 52 32 AC 08 99 22 20 53 45 43 4F |HE";.R2..." SECO|
00002A40: 4E 44 20 42 52 41 43 4B 45 54 2E 22 3A 8D 31 32 |ND BRACKET.":.12|
00002A50: 34 30 00 78 32 B6 08 99 22 91 91 91 91 91 91 3D |40.x2..."......=|
00002A60: 20 28 58 20 2B 20 33 29 28 34 29 28 58 20 2D 31 | (X + 3)(4)(X -1|
00002A70: 29 22 3A 8D 31 32 34 30 00 98 32 C0 08 99 22 11 |)":.1240..2...".|
00002A80: 3D 20 34 28 58 20 2B 20 33 29 28 58 20 2D 20 31 |= 4(X + 3)(X - 1|
00002A90: 29 22 3A 8D 31 32 34 30 00 D9 32 CA 08 99 22 11 |)":.1240..2...".|
00002AA0: 11 11 11 D7 45 27 4C 4C 20 52 45 44 4F 20 54 48 |....E'LL REDO TH|
00002AB0: 49 53 20 4F 4E 45 2C 20 52 45 4D 4F 56 49 4E 47 |IS ONE, REMOVING|
00002AC0: 20 54 48 45 20 43 4F 4D 4D 4F 4E 46 41 43 54 4F | THE COMMONFACTO|
00002AD0: 52 20 46 49 52 53 54 2E 22 00 19 33 D4 08 8D 31 |R FIRST."..3...1|
00002AE0: 32 34 30 3A 99 22 93 11 1D 1D 34 58 91 32 11 20 |240:."....4X.2. |
00002AF0: 2B 20 38 58 20 2D 20 31 32 20 20 20 28 CE 4F 54 |+ 8X - 12 (.OT|
00002B00: 45 20 43 4F 4D 4D 4F 4E 20 46 41 43 54 4F 52 20 |E COMMON FACTOR |
00002B10: 34 29 22 3A 8D 31 32 34 30 00 4C 33 DE 08 99 22 |4)":.1240.L3..."|
00002B20: 3D 20 34 28 58 91 32 11 20 2B 20 32 58 20 2D 20 |= 4(X.2. + 2X - |
00002B30: 33 29 20 28 CE 4F 57 20 49 54 27 53 20 41 4E 20 |3) (.OW IT'S AN |
00002B40: 45 41 53 59 20 4F 4E 45 21 29 91 22 00 76 33 E8 |EASY ONE!).".v3.|
00002B50: 08 99 A3 31 36 29 22 28 C6 49 52 53 54 20 43 4F |...16)"(.IRST CO|
00002B60: 45 46 46 49 43 49 45 4E 54 20 49 53 20 31 29 22 |EFFICIENT IS 1)"|
00002B70: 3A 8D 31 32 34 30 00 A6 33 F2 08 99 22 3D 20 34 |:.1240..3..."= 4|
00002B80: 28 58 20 2B 20 33 29 28 58 20 2D 20 31 29 28 D0 |(X + 3)(X - 1)(.|
00002B90: 52 4F 44 55 43 54 20 3D 20 2D 33 2E 20 D3 55 4D |RODUCT = -3. .UM|
00002BA0: 20 3D 20 32 29 22 00 D5 33 FC 08 99 A3 31 31 29 | = 2)"..3....11)|
00002BB0: 22 28 CC 41 53 54 20 54 45 52 4D 53 20 4D 55 53 |"(.AST TERMS MUS|
00002BC0: 54 20 42 45 20 33 20 41 4E 44 20 2D 31 29 22 3A |T BE 3 AND -1)":|
00002BD0: 8D 31 32 34 30 00 E1 33 01 09 8B 57 57 B2 31 A7 |.1240..3...WW.1.|
00002BE0: 8E 00 11 34 06 09 99 22 11 11 1D C9 54 27 53 20 |...4..."....T'S |
00002BF0: 59 4F 55 52 20 54 55 52 4E 20 54 4F 20 54 52 59 |YOUR TURN TO TRY|
00002C00: 20 53 4F 4D 45 20 51 55 45 53 54 49 4F 4E 53 2E | SOME QUESTIONS.|
00002C10: 22 00 3C 34 10 09 99 22 11 1D D4 4F 20 41 4E 53 |".<4..."...O ANS|
00002C20: 57 45 52 20 54 48 45 20 46 4F 4C 4C 4F 57 49 4E |WER THE FOLLOWIN|
00002C30: 47 20 51 55 45 53 54 49 4F 4E 53 2C 00 6A 34 15 |G QUESTIONS,.j4.|
00002C40: 09 99 22 11 1D 54 59 50 45 20 59 4F 55 52 20 52 |.."..TYPE YOUR R|
00002C50: 45 53 50 4F 4E 53 45 20 41 4E 44 20 50 52 45 53 |ESPONSE AND PRES|
00002C60: 53 20 3C D2 C5 D4 D5 D2 CE 3E 00 B2 34 1A 09 99 |S <......>..4...|
00002C70: 22 11 1D C8 4F 57 20 4D 41 4E 59 20 51 55 45 53 |"...OW MANY QUES|
00002C80: 54 49 4F 4E 53 20 44 4F 20 59 4F 55 20 57 41 4E |TIONS DO YOU WAN|
00002C90: 54 3F 20 20 20 20 9D 9D 9D 22 3B 3A 55 53 24 B2 |T? ...";:US$.|
00002CA0: 22 48 30 31 32 33 34 35 36 37 38 39 22 3A 55 4C |"H0123456789":UL|
00002CB0: B2 32 00 D7 34 24 09 8D 33 35 3A 4E 4F B2 C5 28 |.2..4$..35:NO..(|
00002CC0: 55 52 24 29 3A 8B 4E 4F B2 30 A7 99 22 91 91 22 |UR$):.NO.0..".."|
00002CD0: 3B 3A 89 32 33 33 30 00 E4 34 2E 09 81 5A 51 B2 |;:.2330..4...ZQ.|
00002CE0: 31 A4 4E 4F 00 01 35 38 09 8D 31 33 31 30 3A 4E |1.NO..58..1310:N|
00002CF0: 31 B2 B6 28 54 29 3A 8D 31 33 31 30 3A 4E 32 B2 |1..(T):.1310:N2.|
00002D00: 54 00 1E 35 42 09 8D 31 33 31 30 3A 4E 33 B2 B6 |T..5B..1310:N3..|
00002D10: 28 54 29 3A 8D 31 33 31 30 3A 4E 34 B2 54 00 40 |(T):.1310:N4.T.@|
00002D20: 35 4C 09 41 B2 4E 31 AC 4E 33 3A 42 B2 4E 31 AC |5L.A.N1.N3:B.N1.|
00002D30: 4E 34 AA 4E 32 AC 4E 33 3A 43 B2 4E 32 AC 4E 34 |N4.N2.N3:C.N2.N4|
00002D40: 00 52 35 56 09 8B 41 B2 31 B0 42 B2 30 A7 32 33 |.R5V..A.1.B.0.23|
00002D50: 36 30 00 5E 35 60 09 81 49 B2 32 A4 4E 31 00 70 |60.^5`..I.2.N1.p|
00002D60: 35 6A 09 51 31 B2 42 AD 49 3A 51 32 B2 43 AD 49 |5j.Q1.B.I:Q2.C.I|
00002D70: 00 8C 35 74 09 8B 51 31 B2 B5 28 51 31 29 AF 51 |..5t..Q1..(Q1).Q|
00002D80: 32 B2 B5 28 51 32 29 A7 32 33 36 30 00 92 35 7E |2..(Q2).2360..5~|
00002D90: 09 82 00 9E 35 88 09 81 49 B2 32 A4 4E 33 00 B0 |....5...I.2.N3..|
00002DA0: 35 92 09 51 31 B2 42 AD 49 3A 51 32 B2 43 AD 49 |5..Q1.B.I:Q2.C.I|
00002DB0: 00 CC 35 9C 09 8B 51 31 B2 B5 28 51 31 29 AF 51 |..5...Q1..(Q1).Q|
00002DC0: 32 B2 B5 28 51 32 29 A7 32 33 36 30 00 D2 35 A6 |2..(Q2).2360..5.|
00002DD0: 09 82 00 08 36 B0 09 42 4C 24 B2 22 20 20 20 20 |....6..BL$." |
00002DE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002DF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002E00: 20 20 20 22 3A 54 B2 30 00 29 36 BA 09 99 22 93 | ":T.0.)6...".|
00002E10: C6 41 43 54 4F 52 20 42 59 20 44 45 43 4F 4D 50 |.ACTOR BY DECOMP|
00002E20: 4F 53 49 54 49 4F 4E 3A 22 00 40 36 C4 09 99 22 |OSITION:".@6..."|
00002E30: 11 20 20 22 3B 41 3B 22 9D 58 91 32 11 20 22 3B |. ";A;".X.2. ";|
00002E40: 00 4F 36 CE 09 8B 42 B1 30 A7 99 22 2B 22 3B 00 |.O6...B.0.."+";.|
00002E50: 5D 36 D8 09 99 42 3B 22 9D 58 20 22 3B 00 6C 36 |]6...B;".X ";.l6|
00002E60: E2 09 8B 43 B1 30 A7 99 22 2B 22 3B 00 73 36 EC |...C.0.."+";.s6.|
00002E70: 09 99 43 00 A1 36 F6 09 99 22 11 CE 45 45 44 20 |..C..6..."..EED |
00002E80: 48 45 4C 50 3F 20 22 3B 3A 55 53 24 B2 22 59 4E |HELP? ";:US$."YN|
00002E90: 22 3A 55 4C B2 31 3A 8D 33 35 3A 59 24 B2 55 52 |":UL.1:.35:Y$.UR|
00002EA0: 24 00 BD 36 00 0A 8B 59 24 B3 B1 22 59 22 A7 99 |$..6...Y$.."Y"..|
00002EB0: 22 11 11 11 11 11 22 3A 89 32 36 37 30 00 ED 36 |".....":.2670..6|
00002EC0: 0A 0A 99 22 11 CC 4F 4F 4B 20 46 4F 52 20 54 57 |..."..OOK FOR TW|
00002ED0: 4F 20 49 4E 54 45 47 45 52 53 20 57 49 54 48 20 |O INTEGERS WITH |
00002EE0: 50 52 4F 44 55 43 54 20 22 3B 41 AC 43 00 03 37 |PRODUCT ";A.C..7|
00002EF0: 14 0A 99 22 41 4E 44 20 53 55 4D 20 22 3B 42 3B |..."AND SUM ";B;|
00002F00: 22 2E 22 00 14 37 1E 0A 44 B2 B6 28 41 AC 43 29 |"."..7..D..(A.C)|
00002F10: 3A 4B B2 30 00 36 37 28 0A 99 22 C8 45 52 45 20 |:K.0.67(..".ERE |
00002F20: 41 52 45 20 46 41 43 54 4F 52 53 20 4F 46 20 22 |ARE FACTORS OF "|
00002F30: 3B 44 3B 22 3A 22 00 47 37 32 0A 81 49 B2 31 A4 |;D;":".G72..I.1.|
00002F40: BA 28 44 AA 2E 35 29 00 52 37 3C 0A 51 31 B2 44 |.(D..5).R7<.Q1.D|
00002F50: AD 49 00 76 37 46 0A 8B 51 31 B2 B5 28 51 31 29 |.I.v7F..Q1..(Q1)|
00002F60: A7 99 49 3B 22 D8 22 3B 51 31 3B 22 2C 22 20 3B |..I;".";Q1;"," ;|
00002F70: 3A 4B B2 4B AA 31 00 84 37 50 0A 8B 4B B3 34 A7 |:K.K.1..7P..K.4.|
00002F80: 32 36 36 30 00 8E 37 5A 0A 99 3A 4B B2 30 00 96 |2660..7Z..:K.0..|
00002F90: 37 64 0A 82 3A 99 00 C9 37 6E 0A 99 44 31 24 3A |7d..:...7n..D1$:|
00002FA0: 99 22 D4 4F 20 44 45 43 4F 4D 50 4F 53 45 20 22 |.".O DECOMPOSE "|
00002FB0: 3B 42 3B 22 2C 20 57 48 41 54 20 49 53 20 59 4F |;B;", WHAT IS YO|
00002FC0: 55 52 20 46 49 52 53 54 22 00 E2 37 78 0A 51 24 |UR FIRST"..7x.Q$|
00002FD0: B2 22 49 4E 54 45 47 45 52 3F 20 22 3A 8D 33 33 |."INTEGER? ":.33|
00002FE0: 34 30 00 EB 37 82 0A 49 31 B2 59 00 1A 38 8C 0A |40..7..I1.Y..8..|
00002FF0: 51 24 B2 22 41 4E 44 20 57 48 41 54 20 49 53 20 |Q$."AND WHAT IS |
00003000: 54 48 45 20 4F 54 48 45 52 20 49 4E 54 45 47 45 |THE OTHER INTEGE|
00003010: 52 3F 20 22 3A 8D 33 33 34 30 00 35 38 96 0A 49 |R? ":.3340.58..I|
00003020: 32 B2 59 3A 53 53 B2 49 31 AA 49 32 3A 53 50 B2 |2.Y:SS.I1.I2:SP.|
00003030: 49 31 AC 49 32 00 5A 38 A0 0A 8B 53 53 B2 42 AF |I1.I2.Z8...SS.B.|
00003040: 53 50 B2 41 AC 43 A7 8D 33 34 39 30 3A 99 22 13 |SP.A.C..3490:.".|
00003050: 11 11 11 22 3A 89 32 38 31 30 00 89 38 AA 0A 8B |...":.2810..8...|
00003060: 53 53 B3 B1 42 A7 99 22 28 22 3B 49 31 3B 22 29 |SS..B.."(";I1;")|
00003070: 2B 28 22 3B 49 32 3B 22 29 20 49 53 4E 27 54 20 |+(";I2;") ISN'T |
00003080: 22 3B 42 3A 8D 31 31 36 30 00 BB 38 B4 0A 8B 53 |";B:.1160..8...S|
00003090: 50 B3 B1 41 AC 43 A7 99 22 28 22 3B 49 31 3B 22 |P..A.C.."(";I1;"|
000030A0: 29 58 28 22 49 32 3B 22 29 20 49 53 4E 27 54 20 |)X("I2;") ISN'T |
000030B0: 22 3B 41 AC 43 3A 8D 31 31 36 30 00 E0 38 BE 0A |";A.C:.1160..8..|
000030C0: 8D 31 31 36 30 3A 8B 54 B3 32 A7 99 22 20 20 D4 |.1160:.T.2.." .|
000030D0: 52 59 20 41 47 41 49 4E 21 22 3A 8D 31 32 34 30 |RY AGAIN!":.1240|
000030E0: 00 F4 38 C8 0A 54 B2 54 AA 31 3A 8B 54 B1 32 A7 |..8..T.T.1:.T.2.|
000030F0: 32 37 38 30 00 09 39 D2 0A 8D 33 34 38 30 3A 99 |2780..9...3480:.|
00003100: 44 31 24 3A 89 32 36 37 30 00 1F 39 DC 0A 49 31 |D1$:.2670..9..I1|
00003110: B2 4E 31 AC 4E 34 3A 49 32 B2 4E 32 AC 4E 33 00 |.N1.N4:I2.N2.N3.|
00003120: 29 39 E6 0A 8D 33 34 39 30 00 55 39 F0 0A 99 22 |)9...3490.U9..."|
00003130: 13 11 11 11 D4 48 41 54 27 53 20 45 4E 4F 55 47 |.....HAT'S ENOUG|
00003140: 48 20 54 52 49 45 53 2E 20 C8 45 52 45 20 49 54 |H TRIES. .ERE IT|
00003150: 20 49 53 3A 22 00 6F 39 FA 0A 99 22 11 3D 20 22 | IS:".o9...".= "|
00003160: 3B 41 3B 22 9D 58 91 32 11 20 22 3B 49 31 3B 00 |;A;".X.2. ";I1;.|
00003170: 86 39 04 0B 8B 49 31 B1 39 A7 99 22 9D 9D 9D 9D |.9...I1.9.."....|
00003180: 2B 1D 1D 1D 22 3B 00 A1 39 0E 0B 8B 49 31 B1 30 |+...";..9...I1.0|
00003190: AF 49 31 B3 31 30 A7 99 22 9D 9D 9D 2B 1D 1D 22 |.I1.10.."...+.."|
000031A0: 3B 00 B0 39 18 0B 99 22 9D 58 A0 22 3B 49 32 3B |;..9...".X.";I2;|
000031B0: 00 C7 39 22 0B 8B 49 32 B1 39 A7 99 22 9D 9D 9D |..9"..I2.9.."...|
000031C0: 9D 2B 1D 1D 1D 22 3B 00 E2 39 2C 0B 8B 49 32 B1 |.+...";..9,..I2.|
000031D0: 30 AF 49 32 B3 31 30 A7 99 22 9D 9D 9D 2B 1D 1D |0.I2.10.."...+..|
000031E0: 22 3B 00 F0 39 36 0B 99 22 9D 58 A0 22 3B 43 3B |";..96..".X.";C;|
000031F0: 00 03 3A 40 0B 8B 43 B1 39 A7 99 22 9D 9D 9D 9D |..:@..C.9.."....|
00003200: 2B 22 3B 00 1A 3A 4A 0B 8B 43 B1 30 AF 43 B3 31 |+";..:J..C.0.C.1|
00003210: 30 A7 99 22 9D 9D 9D 2B 22 3B 00 28 3A 54 0B 99 |0.."...+";.(:T..|
00003220: 3A 99 3A 8D 31 31 36 30 00 43 3A 5E 0B 99 22 11 |:.:.1160.C:^..".|
00003230: 3D 20 28 22 3B 41 3B 22 9D 58 91 32 11 20 22 3B |= (";A;".X.2. ";|
00003240: 49 31 3B 00 5A 3A 68 0B 8B 49 31 B1 39 A7 99 22 |I1;.Z:h..I1.9.."|
00003250: 9D 9D 9D 9D 2B 1D 1D 1D 22 3B 00 75 3A 72 0B 8B |....+...";.u:r..|
00003260: 49 31 B1 30 AF 49 31 B3 31 30 A7 99 22 9D 9D 9D |I1.0.I1.10.."...|
00003270: 2B 1D 1D 22 3B 00 95 3A 7C 0B 99 22 9D 58 29 20 |+..";..:|..".X) |
00003280: 2B 20 28 22 3B 49 32 3B 22 9D 58 20 22 3B 43 3B |+ (";I2;".X ";C;|
00003290: 22 9D 29 22 3B 00 A8 3A 86 0B 8B 43 B1 39 A7 99 |".)";..:...C.9..|
000032A0: 22 9D 9D 9D 9D 2B 22 3B 00 BF 3A 90 0B 8B 43 B1 |"....+";..:...C.|
000032B0: 30 AF 43 B3 31 30 A7 99 22 9D 9D 9D 2B 22 3B 00 |0.C.10.."...+";.|
000032C0: CD 3A 9A 0B 99 3A 99 3A 8D 31 31 36 30 00 00 3B |.:...:.:.1160..;|
000032D0: A4 0B 99 44 31 24 3A 99 22 C2 45 53 49 44 45 53 |...D1$:.".ESIDES|
000032E0: 20 58 2C 20 57 48 41 54 27 53 20 54 48 45 20 43 | X, WHAT'S THE C|
000032F0: 4F 4D 4D 4F 4E 20 46 41 43 54 4F 52 20 49 4E 22 |OMMON FACTOR IN"|
00003300: 00 23 3B AE 0B 51 24 B2 22 54 48 45 20 46 49 52 |.#;..Q$."THE FIR|
00003310: 53 54 20 42 52 41 43 4B 45 54 3F 20 22 3A 8D 33 |ST BRACKET? ":.3|
00003320: 33 34 30 00 31 3B B8 0B 81 49 B2 41 A4 31 A9 AB |340.1;...I.A.1..|
00003330: 31 00 44 3B C2 0B 51 31 B2 41 AD 49 3A 51 32 B2 |1.D;..Q1.A.I:Q2.|
00003340: 49 31 AD 49 00 65 3B CC 0B 8B 51 31 B2 B5 28 51 |I1.I.e;...Q1..(Q|
00003350: 31 29 AF 51 32 B2 B5 28 51 32 29 A7 54 B2 49 3A |1).Q2..(Q2).T.I:|
00003360: 89 33 30 34 30 00 6B 3B D6 0B 82 00 86 3B E0 0B |.3040.k;.....;..|
00003370: 8B 59 B3 B1 54 A7 99 22 C9 54 27 53 20 22 3B 54 |.Y..T..".T'S ";T|
00003380: 3A 8D 31 31 36 30 00 B5 3B EA 0B 99 22 11 D7 48 |:.1160..;..."..H|
00003390: 41 54 20 46 41 43 54 4F 52 20 53 48 4F 55 4C 44 |AT FACTOR SHOULD|
000033A0: 20 42 45 20 52 45 4D 4F 56 45 44 20 46 52 4F 4D | BE REMOVED FROM|
000033B0: 20 54 48 45 22 00 D5 3B F4 0B 51 24 B2 22 53 45 | THE"..;..Q$."SE|
000033C0: 43 4F 4E 44 20 42 52 41 43 4B 45 54 3F 20 22 3A |COND BRACKET? ":|
000033D0: 8D 33 33 34 30 00 E7 3B FE 0B 81 49 B2 B6 28 49 |.3340..;...I..(I|
000033E0: 32 29 A4 31 A9 AB 31 00 FA 3B 08 0C 51 31 B2 49 |2).1..1..;..Q1.I|
000033F0: 32 AD 49 3A 51 32 B2 43 AD 49 00 22 3C 12 0C 8B |2.I:Q2.C.I."<...|
00003400: 51 31 B2 B5 28 51 31 29 AF 51 32 B2 B5 28 51 32 |Q1..(Q1).Q2..(Q2|
00003410: 29 A7 54 31 B2 49 AC B4 28 49 32 29 3A 89 33 31 |).T1.I..(I2):.31|
00003420: 31 30 00 28 3C 1C 0C 82 00 45 3C 26 0C 8B 59 B3 |10.(<....E<&..Y.|
00003430: B1 54 31 A7 99 22 C9 54 27 53 20 22 3B 54 31 3A |.T1..".T'S ";T1:|
00003440: 8D 31 31 36 30 00 56 3C 30 0C 99 22 13 11 11 11 |.1160.V<0.."....|
00003450: 11 11 11 11 11 22 00 69 3C 3A 0C 81 49 B2 31 A4 |.....".i<:..I.1.|
00003460: 31 34 3A 99 42 4C 24 3A 82 00 96 3C 44 0C 99 22 |14:.BL$:...<D.."|
00003470: 13 11 11 11 11 11 11 11 11 11 11 3D 20 22 3B 54 |...........= ";T|
00003480: 3B 22 9D 58 28 22 3B 41 AD 54 3B 22 9D 58 20 22 |;".X(";A.T;".X "|
00003490: 3B 49 31 AD 54 3B 00 AB 3C 4E 0C 8B 49 31 B1 30 |;I1.T;..<N..I1.0|
000034A0: A7 99 22 9D 9D 9D 2B 1D 1D 22 3B 00 BA 3C 58 0C |.."...+..";..<X.|
000034B0: 99 22 9D 29 20 22 3B 54 31 3B 00 CF 3C 62 0C 8B |.".) ";T1;..<b..|
000034C0: 54 31 B1 30 A7 99 22 9D 9D 9D 2B 1D 1D 22 3B 00 |T1.0.."...+..";.|
000034D0: EB 3C 6C 0C 99 22 9D 28 22 3B 49 32 AD 54 31 3B |.<l..".(";I2.T1;|
000034E0: 22 9D 58 20 22 3B 43 AD 54 31 3B 00 02 3D 76 0C |".X ";C.T1;..=v.|
000034F0: 8B 43 AD 54 31 B1 30 A7 99 22 9D 9D 9D 2B 1D 1D |.C.T1.0.."...+..|
00003500: 22 3B 00 12 3D 80 0C 99 22 9D 29 22 3A 8D 31 31 |";..=...".)":.11|
00003510: 36 30 00 2B 3D 8A 0C 99 22 11 3D 20 28 22 3B 4E |60.+=...".= (";N|
00003520: 31 3B 22 9D 58 20 22 3B 4E 32 3B 00 40 3D 94 0C |1;".X ";N2;.@=..|
00003530: 8B 4E 32 B1 30 A7 99 22 9D 9D 9D 2B 1D 1D 22 3B |.N2.0.."...+..";|
00003540: 00 58 3D 9E 0C 99 22 9D 29 28 22 3B 4E 33 3B 22 |.X=...".)(";N3;"|
00003550: 9D 58 20 22 3B 4E 34 3B 00 6D 3D A8 0C 8B 4E 34 |.X ";N4;.m=...N4|
00003560: B1 30 A7 99 22 9D 9D 9D 2B 1D 1D 22 3B 00 7D 3D |.0.."...+..";.}=|
00003570: B2 0C 99 22 9D 29 22 3A 8D 31 32 34 30 00 85 3D |...".)":.1240..=|
00003580: BC 0C 82 5A 51 00 99 3D C6 0C 99 22 11 11 D4 48 |...ZQ..=..."...H|
00003590: 41 54 27 53 22 3B 4E 4F 3B 00 B6 3D D0 0C 8B 4E |AT'S";NO;..=...N|
000035A0: 4F B2 31 A7 99 22 51 55 45 53 54 49 4F 4E 2E 22 |O.1.."QUESTION."|
000035B0: 3A 89 33 33 30 30 00 C8 3D DA 0C 99 22 51 55 45 |:.3300..=..."QUE|
000035C0: 53 54 49 4F 4E 53 2E 22 00 D7 3D E4 0C 8D 31 31 |STIONS."..=...11|
000035D0: 36 30 3A 89 33 30 30 00 14 3E 0C 0D 59 24 B2 22 |60:.300..>..Y$."|
000035E0: 22 3A 99 51 24 3B 3A 55 53 24 B2 22 48 30 31 32 |":.Q$;:US$."H012|
000035F0: 33 34 35 36 37 38 39 2B 2D 22 3A 55 4C B2 33 3A |3456789+-":UL.3:|
00003600: 8D 33 35 3A 59 24 B2 55 52 24 3A 59 B2 C5 28 59 |.35:Y$.UR$:Y..(Y|
00003610: 24 29 3A 8E 00 3A 3E 98 0D 99 22 13 11 11 11 11 |$):..:>...".....|
00003620: 11 11 11 11 11 11 11 11 11 22 3A 81 49 B2 31 A4 |.........":.I.1.|
00003630: 39 3A 99 42 4C 24 3A 82 3A 8E 00 57 3E A2 0D 99 |9:.BL$:.:..W>...|
00003640: 22 13 11 11 11 22 3A 81 49 B2 31 A4 31 39 3A 99 |"....":.I.1.19:.|
00003650: 42 4C 24 3A 82 3A 8E 00 00 00 |BL$:.:.... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......LX.X.U.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(.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. FACTORING BY DECOMPOS
ITION...@..".. 2. STUDENT INSTRU
CTIONS".9.E..".. 3. TEACHER INST
RUCTIONS".U.O..".. 4. QUIT.."...
T.." -----------------------------------
---"...Y..".. PRESS A NUMBER KEY (
1-4) ";.W.^.UL.1:US$."1234":.35:. INPUT
ROUTINE..._..C(UR$).1.300...`.US$.""...C
..E(UR$).1000,400,500,396...H..300.A....
** RE-ENABLE STOP KEY AND END **.P....B
(50003)..1.B(50003)..160.B(50003)..0.399
......UU.71:.B(50003).0..53281,6:.53280,
14......"..":.......875:..R.... ** STUDE
NT INSTRUCTIONS **......".":.UT,UL%:.B(5
0003).0..53281,0:.53280,0.'...UP.0:UG$."
STUDENT INST":UH.1:.850.R...."..WHEN YOU
NEED HELP IN THIS PROGRAM.X...."..THERE
ARE TWO WAYS TO GET IT:......"..IF YOU
ANSWER 'Y' TO THE QUESTION.O. .."..'NEED
HELP?' A TABLE OF FACTORS WILL......"..
BE DISPLAYED TO HELP YOU.. ...."..OTHERW
ISE 'H' <RETURN> WILL RETURN YOU.:....".
.TO THE MAIN MENU..I...."..DO YOU WISH T
O SEE THE INSTRUCTIONS ON......"..HOW TO
FACTOR BY DECOMPOSITION?......"..(Y/N)
";:.....US$."YN":UL.1:.35.Q.B..UR$."Y".W
W.1:.1500...G..835:UP.1:.850...L.."...NO
TE:...TO ADVANCE FROM ONE QUESTION".?.V.
."..TO THE NEXT PRESS THE <SPACE BAR>.".
O....".......IF AT ANY TIME YOU WISH TO
RETURN"......"..TO THE MENU PRESS H <RET
URN>."......835......UZ.1..UP%:.217.....
..Z.... ** TEACHER INSTRUCTIONS **......
".":.UT,UL%:.B(50003).0..53281,2:.53280,
10.+...UP.0:UG$."TEACHER INST":.850.Y...
.".. TO THE BEST OF OUR KNOWLEDGE,.
"......" THIS PROGRAM IS IN THE PUBLIC
."......" DOMAIN. IF THIS IS NOT THE
CASE.".K...." PLEASE CONTACT:...".....
." COMMODORE BUSINESS MACHINES."...
..." 3370 PHARMACY AVE..<...."
AGINCOURT, ONTARIO".^...."
CANADA M1W 2K4".~...." (
416) 499-4292".....UP.1:. 835:. 850:....
.." ..PROGRAM NAME: DECONPOSITION...
...." WRITTEN BY : J. B. NICHOLSON.
......" UPGRADED BY : ......." .
THIS PROGRAM WILL RUN ON ANY...N...."
PET 64 COMPUTER..S...." CO
MMODORE 64 COMPUTER.|.I..835...N..UZ.1..
UP%:.217...W.....X.. ** PROGRAM MODIFICA
TION INST **.M.Y..".":.UT,UL%...].UP.0:U
G$."PROGRAM MOD":.850......835......UZ.1
..UP%:.217.......5.... ** TO USE 8032 LO
AD CBM4032 **.K.F..".....BEFORE RUNNING
THIS PROGRAM ON AN 8032 .....P.."
LOAD THE 'CBM 4032' PROGRAM.............
"...Z..UU.71.......W.... ** TO USE 8032
LOAD CBM4032 **."...."....BEFORE RUNNING
THIS PROGRAM ON AN 8032 ..LOAD CBM 403
2 PROGRAM"......1093:..N. .. ** T I T L
E P A G E **...".."....";:.UT,UU%:.B(5
0003).0..53280,14:.53281,6...$..I.1.38:.
"...";:....&..I.1.22:.".....";:..H.(..I.
1.37:.".....";:....*..I.1.22:.".....";:.
...,.."........................... ..'.
..."................... . . ...H.0.."..
................. . ....F.2..".........
........... ....4.."..............C O M
M O D O R E.....6.."...............EDUC
ATIONAL...P.8.."................SOFTWARE
...:.. ** COMMODORE LOGO **.#.;..H(UD$,2
4);"..........PRESS SPACE BAR OR WAIT.":
I.0.E.<..A$:.A$.." ".I.I.1:.I.250.828.I.
>.T1$."":T2$."":T3$."":T4$."":I.0.R.@..3
00...C.. ** SPACE BAR PRESS **.I.H..H(UD
$,24);".......PRESS SPACE BAR TO CONTINU
E.":.UO,0...L..UI$:.UI$.." ".844...N....
.R.. ** PAGE DESIGN ROUTINE **...T.UP.UP
.1.<.W.."."H(UT$.UP$,21);I(UP$.UG$.D(UP)
,18).K.\.." ----------------------------
----------".Z.`..UH..0.870...A..H(UD$,24
);H(UP$,7);"HELP - PRESS H <RETURN>"..
.F.UH.0:."..":....K.. ** PLEASE WAIT REM
ARK **...P..H(UD$,24);" ONE MO
MENT PLEASE... "...U...7.... ** SET
UP VARIABLES **.....UX$."H":.UQ%(1000):U
B.32768:U1.196:U2.197:U3.198:U4.216:UC.1
67:UU.1024.....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.B....B(50003).0.UT.5
3272:UU%.21:UL%.23:UP%.2139:UM.1024:UO.1
98.F...UD$."........................."..
...UP$."
".....UT$." DECOMPOSITION ":.
PLACE PROGRAM TITLE HERE !!!!!!!!!!!!!!
!!!***............ ** SET VARIABLES **..
....900.....:.0.... ** CHECK FOR 8032 **
.N....".":." ":. SHIFTED SPACE.E....B(UB
.40)..96..700.~.... ** MEMORY CHECK **..
.... .(0).2000.937......"....THIS MACHIN
E DOES NOT HAVE ENOUGH."......"MEMORY TO
RUN THIS PROGRAM !"......UU.71.........
..."..":.B(50003).0.962.>.... ** BASIC 2
.0 OR 4.0 OR C-64 SETUP **.|....1075
,133:.1076,144:.1077,234:.1079,4:.1080,1
33:.1081,145......1091,155:.1098,133:.10
99,144:.1100,234:.1103,133.T....1104,145
:.1105,234:.1082,234......B(50003)..160.
955.. ...1093,88:.1094,228:.1097,85:.110
2,228:.965./ ...B(50003)..1.990.^ ...109
3,49:.1094,230:.1097,46:.1102,230:.965..
B..2099,141:.2100,20:.2101,3:.2103,8:.2
104,141:.2105,21.T C..2106,3:.2115,145:.
2117,52:.2118,234:.2121,49:.2122,141..!D
..2123,20:.2124,3:.2126,234:.2127,141:.2
128,21:.2129,3.,!E..UU.48:. DISABLE STOP
KEY.=!J..800:. TITLE.M!T..300:. MENU.~!
...".THE PGM WILL NOT WORK ON THIS MACHI
NE!":...!...UZ.1..UP%:.UP%:UZ.0:. ** PRO
GRAM STARTS HERE **..!..."..";:.:.B(5000
3).0..53281,6:.53280,6.."V..UT,UL%:B1$."
.. . . . . . . . . . . . . ..".6"`.B2$."
. .".^"J.B3$."
.. ..".Y"T.D1$."
................".."~..1340.."...I.1.150
0:.:..."...I.1.500:.:..W"...".AFTER EACH
STEP IN THE EXPLANATION WHICH"..#...".F
OLLOWS, THE WORD .[SPACE]. WILL APPEAR A
T".,#...".THE BOTTOM OF THE SCREEN.".X#.
.."....PRESS THE SPACE BAR WHEN YOU ARE"
.S#D..".READY TO CONTINUE.".Y#N....#X..A
$:.A$.."".1240.N#...UM.993,155:.UM.994,1
47:.UM.995,144:.UM.996,129:.UM.997,131..
#...UM.998,133:.UM.999,157..$...A$:.A$..
" ".1270.;$...UM.993,32:.UM.994,32:.UM.9
95,32:.UM.996,32:.UM.997,32.U$...UM.998,
32:.UM.999,32.[$....N$..T..(11..(1).5).|
$(..T.0.1310..$2....$<.."...."..$F...5)B
1$.G$P..I.1.5:..5)B2$:..5)B3$:.:..5)B2$:
..5)B1$.V$Z.."......."..$D...14)".FACTOR
ING.."..$N...17)".BY.."..%X...12)".DECOM
POSITION...".;%....10)".BY J.B. NICHOLSO
N.".E%...1160..%..UG$."DECOMPOSITION":UP
.0:.850:."....THIS PROGRAM EXPLAINS AND
GIVES..% .."..PRACTICE IN FACTORING BY D
ECOMPOSITION..."..%...".TO ANSWER ANY QU
ESTION, TYPE YOUR"..&..."..REPLY AND PRE
SS <RETURN>...".:&...".DO YOU NOW UNDERS
TAND THIS METHOD.".L&H..".OF FACTORING?
";:US$."YNH":UL.1:.35:Y$.UR$..&R..Y$."Y"
..".":.2330..&...1170:.1180:.1170:.1240.
E&...UT,UL%:.".INTRODUCTORY EXAMPLE:"..&
..."...BY USING 'FOIL' WE KNOW THAT."..'
..."...(2X + 3)(4X + 5)":.1240.6'...".=
8X.2. + 10X + 12X + 15":.1240._'...".=
8X.2. + (10 + 12)X + 15":.1240..'...".=
8X.2. + 22X + 15":.1240..'".."...WE NO
W WANT TO REVERSE THE STEPS:":.1240.U',.
.". 8X.2. + 22X + 15":.1240..'6..".=
8X.2. + (10 + 12)X + 15":.1240.&(@..".=
8X.2. + 10X + 12X + 15":.1240.B(J..".=
(2X + 3)(4X + 5)".L(T..1240..(^..I.1.16
:.:.J.1.100:.:.:."..................":.1
240.O(H.."IN THE SECOND LINE, HOW DO WE
KNOW IT'S 10 + 12, NOT SOMETHING ELSE?".
Y(R..1240..(|..".HERE'S THE CLUE:".=)...
".NOTICE THAT ( 8)(15) = 120
AND THAT (10)(12) = 120".G)...1240.
.)...".WE MUST SPLIT 22 INTO TWO INTEGER
S WHOSEPRODUCT IS (8)(15) OR 120...)...1
240.O)...".THE ONLY WAY TO DO THAT IS TO
USE 10 AND12.".Y)...1240..*B.."..FIRST
STEP IN FACTORING AX.2. + BX + C BY D
ECOMPOSITION:".(*L..1240.T*V..".SPLIT CO
EFFICIENT B INTO TWO INTEGERS WHOSE PR
ODUCT IS A TIMES C."..*...1240:.".NOW, T
HREE EXAMPLES OF THIS FIRST STEP:" :.124
0.P*..."..6X.2. + 17X + 5":.1240..+...".
SPLIT 17 INTO TWO INTEGERS WHOSE PRODUCT
IS 30.";:.1240.++..." USE 15 AND 2.":.1
240.J+..."..3X.2. - 14X + 8":.1240..+...
"SPLIT -14 INTO TWO INTEGERS WHOSE
PRODUCT IS 24.";:.1240..+..." USE -12
AND -2.":.1240.M+&.."..4X.2. + 8X - 12":
.1240..,0.."SPLIT 8 INTO TWO INTEGERS WH
OSE PRODUCT IS -48.";:.1240.,,:.." USE
12 AND -4....":.1240.W,D..".RETURNING TO
THE ORIGINAL EXAMPLE:".S,N..". 8X.2.
+ 22X + 15"..,X..".= 8X.2. + (10 + 12)X
+ 15"..,B..".= 8X.2. + 10X + 12X + 15"
.X,L..".....= (2X + 3)(4X + 5)".!-V..".
WE CAN'T GO FROM THE THIRD LINE TO THE
FOURTH IN JUST ONE STEP.".+-...1240.U-..
."WE WILL GROUP THE TERMS OF THE THIRD
LINE INTO TWO PAIRS.":.1240..-..."....
.....= (8X.2. + 10X) + (12X + 15)":.124
0..-...".........NOW WE'LL FACTOR OUT AN
Y COMMON FACTORS.":.1240......".........
.= 2X(4X + 5) + 3(4X + 5)":.1240.L...."
........WE CAN NOW SEE (4X + 5) IS A COM
MON".Q...."FACTOR, AND WE HAVE IT!":.124
0...F.."NOW HERE ARE THE THREE OTHER EXA
MPLES, WORKED OUT STEP BY STEP:"...P..1
240:."....6X.2. + 17X + 5 (PRODUCT = 30.
SUM = 17)"...Z..1240.6/...".= 6X.2. + (
15 + 2)X + 5 (USE 15 AND 2)":.1240.[
/...".= 6X.2. + 15X + 2X + 5":.1240../..
."..= (6X.2. + 15X) + (2X + 5)":.1240../
..."..= 3X(2X + 5) + 1(2X + 5)":.1240.I/
..."..= (2X + 5)(3X + 1)"..0...1240:."..
..3X.2. - 14X + 8 (PRODUCT = 24. SUM =-1
4)"..0 ..1240.F0*..".= 3X.2. + (-12 - 2)
X + 8 (USE -12 AND -2)":.1240.K04..".=
3X.2. - 12X - 2X + 8":.1240..0>.."..= (3
X.2. - 12X) + (-2X + 8)":.1240..0H.."..=
3X(X - 4) - 2(X - 4)":.1240.W0R.."..= (
X - 4)(3X - 2)"..1\..1240:."....4X.2. +
8X - 12 (PRODUCT =-48. SUM = 8)"..1F..12
40.R1P..".= 4X.2. + (12 - 4)X - 12 (USE
12 AND -4)":.1240.X1Z..".= 4X.2. + 12X
- 4X - 12":.1240..1...".= (4X.2. + 12X)
+ (-4X - 12)":.1240.H1...".= 4X(X + 3) -
4(X + 3)":.1240..1...".= (X + 3)(4X - 4
)":.1240.42...".....THIS ONE ISN'T FINIS
HED. .THERE'S A COMMON FACTOR 4 IN T
HE";.R2..." SECOND BRACKET.":.1240.X2...
"......= (X + 3)(4)(X -1)":.1240..2...".
= 4(X + 3)(X - 1)":.1240.Y2J.."....WE'LL
REDO THIS ONE, REMOVING THE COMMONFACTO
R FIRST."..3T..1240:."....4X.2. + 8X - 1
2 (NOTE COMMON FACTOR 4)":.1240.L3..."
= 4(X.2. + 2X - 3) (NOW IT'S AN EASY ONE
!).".V3....16)"(FIRST COEFFICIENT IS 1)"
:.1240..3..."= 4(X + 3)(X - 1)(PRODUCT =
-3. SUM = 2)".U3....11)"(LAST TERMS MUS
T BE 3 AND -1)":.1240..3...WW.1....4..."
...IT'S YOUR TURN TO TRY SOME QUESTIONS.
".<4..."..TO ANSWER THE FOLLOWING QUESTI
ONS,.J4..."..TYPE YOUR RESPONSE AND PRES
S <RETURN>..4..."..HOW MANY QUESTIONS DO
YOU WANT? ...";:US$."H0123456789":UL
.2.W4$..35:NO.E(UR$):.NO.0.."..";:.2330.
.4...ZQ.1.NO..58..1310:N1..(T):.1310:N2.
T..5B..1310:N3..(T):.1310:N4.T.@5L.A.N1.
N3:B.N1.N4.N2.N3:C.N2.N4.R5V..A.1.B.0.23
60.^5`..I.2.N1.P5J.Q1.B.I:Q2.C.I..5T..Q1
..(Q1).Q2..(Q2).2360..5~....5...I.2.N3..
5..Q1.B.I:Q2.C.I.L5...Q1..(Q1).Q2..(Q2).
2360.R5.....6..BL$."
":T.0.)6...".FACTOR B
Y DECOMPOSITION:".@6D..". ";A;".X.2. ";
.O6N..B.0.."+";.]6X..B;".X ";.L6...C.0..
"+";.S6...C..6...".NEED HELP? ";:US$."YN
":UL.1:.35:Y$.UR$..6...Y$.."Y"..".....":
.2670..6...".LOOK FOR TWO INTEGERS WITH
PRODUCT ";A.C..7..."AND SUM ";B;"."..7..
D..(A.C):K.0.67(.."HERE ARE FACTORS OF "
;D;":".G72..I.1..(D..5).R7<.Q1.D.I.V7F..
Q1..(Q1)..I;"X";Q1;"," ;:K.K.1..7P..K.4.
2660..7Z..:K.0..7D..:..I7N..D1$:."TO DEC
OMPOSE ";B;", WHAT IS YOUR FIRST"..7X.Q$
."INTEGER? ":.3340..7..I1.Y..8..Q$."AND
WHAT IS THE OTHER INTEGER? ":.3340.58..I
2.Y:SS.I1.I2:SP.I1.I2.Z8 ..SS.B.SP.A.C..
3490:."....":.2810..8...SS..B.."(";I1;")
+(";I2;") ISN'T ";B:.1160..8...SP..A.C..
"(";I1;")X("I2;") ISN'T ";A.C:.1160..8..
.1160:.T.2.." TRY AGAIN!":.1240..8H.T.T
.1:.T.2.2780..9R..3480:.D1$:.2670..9..I1
.N1.N4:I2.N2.N3.)9...3490.U9..."....THAT
'S ENOUGH TRIES. HERE IT IS:".O9...".= "
;A;".X.2. ";I1;..9...I1.9.."....+...";..
9...I1.0.I1.10.."...+..";..9...".X ";I2;
.G9"..I2.9.."....+...";..9,..I2.0.I2.10.
."...+..";..96..".X ";C;..:@..C.9.."....
+";..:J..C.0.C.10.."...+";.(:T..:.:.1160
.C:^..".= (";A;".X.2. ";I1;.Z:H..I1.9.."
....+...";.U:R..I1.0.I1.10.."...+..";..:
|..".X) + (";I2;".X ";C;".)";..:...C.9..
"....+";..:...C.0.C.10.."...+";.M:...:.:
.1160..;...D1$:."BESIDES X, WHAT'S THE C
OMMON FACTOR IN".#;..Q$."THE FIRST BRACK
ET? ":.3340.1;...I.A.1..1.D;B.Q1.A.I:Q2.
I1.I.E;L..Q1..(Q1).Q2..(Q2).T.I:.3040.K;
V....;...Y..T.."IT'S ";T:.1160..;...".WH
AT FACTOR SHOULD BE REMOVED FROM THE".U;
..Q$."SECOND BRACKET? ":.3340..;...I..(I
2).1..1..;..Q1.I2.I:Q2.C.I."<...Q1..(Q1)
.Q2..(Q2).T1.I..(I2):.3110.(<....E<&..Y.
.T1.."IT'S ";T1:.1160.V<0..".........".I
<:..I.1.14:.BL$:...<D.."...........= ";T
;".X(";A.T;".X ";I1.T;..<N..I1.0.."...+.
.";..<X..".) ";T1;.O<B..T1.0.."...+..";.
.<L..".(";I2.T1;".X ";C.T1;..=V..C.T1.0.
."...+..";..=...".)":.1160.+=...".= (";N
1;".X ";N2;.@=...N2.0.."...+..";.X=...".
)(";N3;".X ";N4;.M=...N4.0.."...+..";.}=
...".)":.1240..=...ZQ..=F.."..THAT'S";NO
;..=P..NO.1.."QUESTION.":.3300.H=Z.."QUE
STIONS.".W=...1160:.300..>..Y$."":.Q$;:U
S$."H0123456789+-":UL.3:.35:Y$.UR$:Y.E(Y
$):..:>..."..............":.I.1.9:.BL$:.
:..W>..."....":.I.1.19:.BL$:.:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL