Multiple names: FACTOR RACE40/80, FACTOR RACE
FILE INFORMATION
FILENAME(S):
• FACTOR RACE40/80<br>• FACTOR RACE
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-10-20 14:32:02
APPEARS ON: 3 disk(s)
FILE HASH
f0a79c387c29ffe7e94d8fe939629d33ca0efeddfb2211b541bbd1843154baa3
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| STONYSOFT 128 PD | FACTOR RACE40/80 | PRG | Treasure Chest - Klaus Der Suhler | 24 | 0 | DOWNLOAD FILE |
| 4 | FACTOR RACE40/80 | PRG | Treasure Chest - Plattfuss | 30 | 5 | DOWNLOAD FILE |
| VCGN C 128 D0013 | FACTOR RACE | PRG | DuncanTwain | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 07 1C 00 00 8F 00 46 1C 01 00 E7 30 2C 31 |........F....0,1|
00000010: 34 3A E7 31 2C 31 34 3A E7 36 2C 32 3A 45 B2 33 |4:.1,14:.6,2:E.3|
00000020: 31 37 34 34 3A 99 22 98 22 C7 28 31 34 32 29 3A |1744:.".".(142):|
00000030: 8F 20 43 31 32 38 20 4D 4F 44 53 20 42 59 20 4A |. C128 MODS BY J|
00000040: 4F 4B 20 27 38 36 00 4C 1C 02 00 8F 00 58 1C 0A |OK '86.L.....X..|
00000050: 00 86 41 41 28 31 33 29 00 86 1C 64 00 99 22 93 |..AA(13)...d..".|
00000060: 54 48 49 53 20 49 53 20 41 20 47 41 4D 45 20 46 |THIS IS A GAME F|
00000070: 4F 52 20 54 57 4F 2C 20 54 48 52 45 45 20 4F 52 |OR TWO, THREE OR|
00000080: 20 46 4F 55 52 22 00 B2 1C 69 00 99 22 50 4C 41 | FOUR"...i.."PLA|
00000090: 59 45 52 53 2E 20 54 4F 20 57 49 4E 2C 20 59 4F |YERS. TO WIN, YO|
000000A0: 55 20 4D 55 53 54 20 42 45 20 41 42 4C 45 20 54 |U MUST BE ABLE T|
000000B0: 4F 22 00 DC 1C 6E 00 99 22 46 41 43 54 4F 52 20 |O"...n.."FACTOR |
000000C0: 53 4F 4D 45 20 41 4C 47 45 42 52 41 49 43 20 45 |SOME ALGEBRAIC E|
000000D0: 58 50 52 45 53 53 49 4F 4E 53 2E 22 00 E2 1C 73 |XPRESSIONS."...s|
000000E0: 00 99 00 0D 1D 78 00 99 22 59 4F 55 20 57 49 4C |.....x.."YOU WIL|
000000F0: 4C 20 42 45 20 41 53 4B 45 44 20 54 4F 20 4D 41 |L BE ASKED TO MA|
00000100: 4B 45 20 41 20 42 45 54 2E 20 49 46 22 00 3C 1D |KE A BET. IF".<.|
00000110: 7D 00 99 22 59 4F 55 20 42 45 54 20 41 20 48 49 |}.."YOU BET A HI|
00000120: 47 48 20 4E 55 4D 42 45 52 2C 20 59 4F 55 20 4D |GH NUMBER, YOU M|
00000130: 41 59 20 42 45 20 41 53 4B 45 44 22 00 69 1D 82 |AY BE ASKED".i..|
00000140: 00 99 22 54 4F 20 46 41 43 54 4F 52 20 41 20 44 |.."TO FACTOR A D|
00000150: 49 46 46 49 43 55 4C 54 20 45 58 50 52 45 53 53 |IFFICULT EXPRESS|
00000160: 49 4F 4E 2C 20 42 55 54 22 00 95 1D 87 00 99 22 |ION, BUT"......"|
00000170: 49 46 20 59 4F 55 20 47 45 54 20 49 54 20 52 49 |IF YOU GET IT RI|
00000180: 47 48 54 20 59 4F 55 20 57 49 4C 4C 20 41 44 56 |GHT YOU WILL ADV|
00000190: 41 4E 43 45 22 00 BF 1D 8C 00 99 22 41 20 4C 4F |ANCE"......"A LO|
000001A0: 4E 47 20 57 41 59 20 44 4F 57 4E 20 54 48 45 20 |NG WAY DOWN THE |
000001B0: 52 41 43 45 20 54 52 41 43 4B 2E 20 49 46 22 00 |RACE TRACK. IF".|
000001C0: ED 1D 91 00 99 22 59 4F 55 20 47 45 54 20 54 48 |....."YOU GET TH|
000001D0: 45 20 46 41 43 54 4F 52 53 20 57 52 4F 4E 47 2C |E FACTORS WRONG,|
000001E0: 20 54 48 4F 55 47 48 2C 20 59 4F 55 22 00 12 1E | THOUGH, YOU"...|
000001F0: 96 00 99 22 57 49 4C 4C 20 4C 4F 53 45 20 47 52 |..."WILL LOSE GR|
00000200: 4F 55 4E 44 20 49 4E 20 54 48 45 20 52 41 43 45 |OUND IN THE RACE|
00000210: 2E 22 00 18 1E 9B 00 99 00 44 1E A0 00 99 22 59 |.".......D...."Y|
00000220: 4F 55 20 48 41 56 45 20 54 4F 20 42 45 20 41 42 |OU HAVE TO BE AB|
00000230: 4C 45 20 54 4F 20 57 52 49 54 45 20 46 41 43 54 |LE TO WRITE FACT|
00000240: 4F 52 53 22 00 6F 1E A5 00 99 22 49 4E 20 47 4F |ORS".o...."IN GO|
00000250: 4F 44 20 4D 41 54 48 45 4D 41 54 49 43 41 4C 20 |OD MATHEMATICAL |
00000260: 46 4F 52 4D 2E 20 48 45 52 45 20 41 52 45 22 00 |FORM. HERE ARE".|
00000270: 9B 1E AA 00 99 22 52 45 4D 49 4E 44 45 52 53 2E |....."REMINDERS.|
00000280: 20 4E 45 56 45 52 20 57 52 49 54 45 20 41 20 43 | NEVER WRITE A C|
00000290: 4F 45 46 46 49 43 49 45 4E 54 22 00 C6 1E AF 00 |OEFFICIENT".....|
000002A0: 99 22 4F 46 20 4F 4E 45 2E 20 41 4C 57 41 59 53 |."OF ONE. ALWAYS|
000002B0: 20 57 52 49 54 45 20 43 4F 4D 4D 4F 4E 20 46 41 | WRITE COMMON FA|
000002C0: 43 54 4F 52 53 22 00 EF 1E B4 00 99 22 46 49 52 |CTORS"......"FIR|
000002D0: 53 54 2E 20 49 46 20 54 57 4F 20 4F 52 20 4D 4F |ST. IF TWO OR MO|
000002E0: 52 45 20 46 41 43 54 4F 52 53 20 41 52 45 22 00 |RE FACTORS ARE".|
000002F0: 18 1F B9 00 99 22 49 44 45 4E 54 49 43 41 4C 2C |....."IDENTICAL,|
00000300: 20 55 53 45 20 45 58 50 4F 4E 45 4E 54 53 2E 20 | USE EXPONENTS. |
00000310: 4F 4E 20 54 48 49 53 22 00 45 1F BE 00 99 22 43 |ON THIS".E...."C|
00000320: 4F 4D 50 55 54 45 52 20 59 4F 55 20 45 4E 54 45 |OMPUTER YOU ENTE|
00000330: 52 20 45 58 50 4F 4E 45 4E 54 53 20 42 59 20 55 |R EXPONENTS BY U|
00000340: 53 49 4E 47 22 00 72 1F C3 00 99 22 54 48 45 20 |SING".r...."THE |
00000350: 27 5E 27 20 4B 45 59 2E 20 54 48 55 53 20 27 58 |'^' KEY. THUS 'X|
00000360: 20 53 51 55 41 52 45 44 27 20 42 45 43 4F 4D 45 | SQUARED' BECOME|
00000370: 53 22 00 80 1F C8 00 99 22 27 58 5E 32 27 2E 22 |S"......"'X^2'."|
00000380: 00 86 1F D2 00 99 00 AB 1F DC 00 99 22 20 20 50 |............" P|
00000390: 52 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 |RESS SPACE BAR T|
000003A0: 4F 20 43 4F 4E 54 49 4E 55 45 22 00 C1 1F E6 00 |O CONTINUE".....|
000003B0: A1 59 42 24 3A 8B 59 42 24 B3 B1 22 22 A7 32 33 |.YB$:.YB$.."".23|
000003C0: 30 00 D8 1F F0 00 A1 59 42 24 3A 8B 59 42 24 B3 |0......YB$:.YB$.|
000003D0: B1 22 20 22 A7 32 34 30 00 11 20 90 01 99 22 93 |." ".240.. ...".|
000003E0: 11 11 11 11 11 11 11 11 11 11 11 48 4F 57 20 4D |...........HOW M|
000003F0: 41 4E 59 20 50 4C 41 59 45 52 53 20 57 49 4C 4C |ANY PLAYERS WILL|
00000400: 20 54 48 45 52 45 20 42 45 3F 20 28 32 2D 34 29 | THERE BE? (2-4)|
00000410: 22 00 19 20 9A 01 85 4E 50 00 3F 20 A4 01 8B B6 |".. ...NP.? ....|
00000420: 28 33 AB 4E 50 29 B1 31 A7 99 22 49 4C 4C 45 47 |(3.NP).1.."ILLEG|
00000430: 41 4C 20 4E 55 4D 42 45 52 22 3A 89 34 30 30 00 |AL NUMBER":.400.|
00000440: 50 20 F4 01 8F 20 44 52 41 57 20 54 52 41 43 4B |P ... DRAW TRACK|
00000450: 00 59 20 F9 01 99 22 93 22 00 68 20 FE 01 81 44 |.Y ...".".h ...D|
00000460: 56 B2 31 A4 4E 50 AA 31 00 7D 20 08 02 81 56 31 |V.1.NP.1.} ...V1|
00000470: B2 31 A4 34 30 3A 99 22 2D 22 3B 3A 82 00 83 20 |.1.40:."-";:... |
00000480: 12 02 99 00 89 20 1C 02 82 00 BA 20 26 02 99 22 |..... ..... &.."|
00000490: 91 53 54 41 52 54 20 20 20 20 20 20 20 20 20 20 |.START |
000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000004B0: 20 20 20 46 49 4E 49 53 48 22 00 C7 20 58 02 81 | FINISH".. X..|
000004C0: 50 4E B2 31 A4 4E 50 00 D2 20 62 02 8D 31 31 30 |PN.1.NP.. b..110|
000004D0: 30 30 00 D8 20 6C 02 82 00 E1 20 8A 02 50 4E B2 |00.. l.... ..PN.|
000004E0: 31 00 EA 20 BC 02 57 41 B2 30 00 FF 20 C6 02 99 |1.. ..WA.0.. ...|
000004F0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |".............".|
00000500: 2D 21 D0 02 99 22 50 4C 41 59 45 52 22 50 4E 22 |-!..."PLAYER"PN"|
00000510: 2C 20 48 4F 57 20 4D 55 43 48 20 44 4F 20 59 4F |, HOW MUCH DO YO|
00000520: 55 20 42 45 54 3F 20 28 31 2D 36 29 22 00 35 21 |U BET? (1-6)".5!|
00000530: D5 02 85 44 49 00 41 21 D7 02 44 49 B2 44 49 AB |...DI.A!..DI.DI.|
00000540: 31 00 58 21 DA 02 8B B6 28 32 2E 35 AB 44 49 29 |1.X!....(2.5.DI)|
00000550: B1 32 2E 35 A7 37 31 30 00 68 21 DF 02 8D 36 30 |.2.5.710.h!...60|
00000560: 30 30 3A 8D 37 30 30 30 00 7C 21 E4 02 99 22 11 |00:.7000.|!...".|
00000570: 46 41 43 54 4F 52 20 20 91 22 50 24 00 85 21 EE |FACTOR ."P$..!.|
00000580: 02 85 49 4E 24 00 96 21 F3 02 8D 39 30 30 30 3A |..IN$..!...9000:|
00000590: 8D 31 30 30 30 30 00 A4 21 F8 02 8B 57 41 B2 31 |.10000..!...WA.1|
000005A0: 89 38 30 30 00 D1 21 02 03 99 22 11 57 45 4C 4C |.800..!...".WELL|
000005B0: 20 44 4F 4E 45 21 22 3A 53 43 28 50 4E 29 B2 53 | DONE!":SC(PN).S|
000005C0: 43 28 50 4E 29 AA 44 49 AA 31 3A 8D 31 31 30 30 |C(PN).DI.1:.1100|
000005D0: 30 00 E5 21 07 03 8B 53 43 28 50 4E 29 B1 33 35 |0..!...SC(PN).35|
000005E0: 89 31 31 30 30 00 FD 21 0C 03 50 4E B2 50 4E AA |.1100..!..PN.PN.|
000005F0: 31 3A 8B 50 4E B1 4E 50 A7 50 4E B2 31 00 06 22 |1:.PN.NP.PN.1.."|
00000600: 16 03 89 38 39 30 00 22 22 20 03 99 22 11 4E 4F |...890."" ..".NO|
00000610: 2C 20 54 48 45 20 46 41 43 54 4F 52 53 20 41 52 |, THE FACTORS AR|
00000620: 45 22 00 33 22 2A 03 99 46 31 24 3B 46 32 24 3B |E".3"*..F1$;F2$;|
00000630: 46 33 24 00 4A 22 34 03 53 43 28 50 4E 29 B2 53 |F3$.J"4.SC(PN).S|
00000640: 43 28 50 4E 29 AB 44 49 AB 31 00 61 22 3E 03 8B |C(PN).DI.1.a">..|
00000650: 53 43 28 50 4E 29 B3 30 A7 53 43 28 50 4E 29 B2 |SC(PN).0.SC(PN).|
00000660: 30 00 6C 22 48 03 8D 31 31 30 30 30 00 84 22 70 |0.l"H..11000.."p|
00000670: 03 50 4E B2 50 4E AA 31 3A 8B 50 4E B1 4E 50 A7 |.PN.PN.1:.PN.NP.|
00000680: 50 4E B2 31 00 8E 22 7A 03 54 4B B2 54 49 00 A1 |PN.1.."z.TK.TI..|
00000690: 22 84 03 8B 54 49 AB 54 4B B3 32 30 30 A7 39 30 |"...TI.TK.200.90|
000006A0: 30 00 AF 22 86 03 8B 57 41 B2 30 89 39 31 30 00 |0.."...WA.0.910.|
000006B0: C2 22 89 03 8B 54 49 AB 54 4B B3 37 30 30 A7 39 |."...TI.TK.700.9|
000006C0: 30 35 00 D6 22 8E 03 99 22 13 11 11 11 11 11 11 |05.."...".......|
000006D0: 11 11 11 11 11 22 00 E3 22 98 03 81 44 56 B2 31 |.....".."...DV.1|
000006E0: A4 31 32 00 11 23 A2 03 99 22 20 20 20 20 20 20 |.12..#..." |
000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000700: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000710: 22 00 17 23 AC 03 82 00 20 23 B6 03 89 37 30 30 |"..#.... #...700|
00000720: 00 40 23 4C 04 99 22 93 11 11 11 11 11 11 11 1D |.@#L..".........|
00000730: 1D 1D 50 4C 41 59 45 52 22 50 4E 22 57 49 4E 53 |..PLAYER"PN"WINS|
00000740: 00 6D 23 56 04 99 22 11 11 44 4F 20 59 4F 55 20 |.m#V.."..DO YOU |
00000750: 57 49 53 48 20 54 4F 20 50 4C 41 59 20 41 47 41 |WISH TO PLAY AGA|
00000760: 49 4E 3F 20 28 59 20 4F 52 20 4E 29 22 00 83 23 |IN? (Y OR N)"..#|
00000770: 60 04 A1 59 41 24 3A 8B 59 41 24 B2 22 22 A7 31 |`..YA$:.YA$."".1|
00000780: 31 32 30 00 95 23 6A 04 8B 59 41 24 B2 22 59 22 |120..#j..YA$."Y"|
00000790: A7 9C 3A 89 30 00 B0 23 74 04 8B 59 41 24 B2 22 |..:.0..#t..YA$."|
000007A0: 4E 22 A7 99 22 47 4F 4F 44 42 59 45 21 22 3A 80 |N".."GOODBYE!":.|
000007B0: 00 BA 23 7E 04 89 31 31 32 30 00 C0 23 87 13 80 |..#~..1120..#...|
000007C0: 00 F7 23 88 13 8F 20 47 45 4E 45 52 41 54 45 20 |..#... GENERATE |
000007D0: 50 41 49 52 53 20 4F 46 20 4E 55 4D 42 45 52 53 |PAIRS OF NUMBERS|
000007E0: 20 57 49 54 48 4F 55 54 20 43 4F 4D 4D 4F 4E 20 | WITHOUT COMMON |
000007F0: 46 41 43 54 4F 52 53 00 00 24 CE 13 41 58 B2 30 |FACTORS..$..AX.0|
00000800: 00 18 24 EC 13 81 44 56 B2 31 A4 31 33 3A 41 41 |..$...DV.1.13:AA|
00000810: 28 44 56 29 B2 30 3A 82 00 26 24 4A 15 41 44 B2 |(DV).0:..&$J.AD.|
00000820: 31 3A 41 45 B2 31 00 37 24 68 15 81 44 56 B2 31 |1:AE.1.7$h..DV.1|
00000830: A4 44 49 AD 33 AA 31 00 5A 24 7C 15 41 42 B2 28 |.DI.3.1.Z$|.AB.(|
00000840: 31 30 AA 44 49 29 AC 28 BB 28 31 29 29 AE 28 31 |10.DI).(.(1)).(1|
00000850: 30 AD 28 44 49 AA 31 30 29 29 00 6F 24 86 15 8B |0.(DI.10)).o$...|
00000860: 41 42 B3 32 A7 41 43 B2 31 3A 89 35 35 35 30 00 |AB.2.AC.1:.5550.|
00000870: 8C 24 88 15 8B 41 42 B3 36 A7 41 43 B2 32 3A 41 |.$...AB.6.AC.2:A|
00000880: 41 28 32 29 B2 31 3A 89 35 35 35 30 00 AA 24 8A |A(2).1:.5550..$.|
00000890: 15 8B 41 42 B3 31 30 A7 41 43 B2 33 3A 41 41 28 |..AB.10.AC.3:AA(|
000008A0: 33 29 B2 31 3A 89 35 35 35 30 00 C8 24 8C 15 8B |3).1:.5550..$...|
000008B0: 41 42 B3 31 32 A7 41 43 B2 35 3A 41 41 28 35 29 |AB.12.AC.5:AA(5)|
000008C0: B2 31 3A 89 35 35 35 30 00 E6 24 8E 15 8B 41 42 |.1:.5550..$...AB|
000008D0: B3 31 33 A7 41 43 B2 37 3A 41 41 28 37 29 B2 31 |.13.AC.7:AA(7).1|
000008E0: 3A 89 35 35 35 30 00 06 25 90 15 8B 41 42 B3 31 |:.5550..%...AB.1|
000008F0: 34 A7 41 43 B2 31 31 3A 41 41 28 31 31 29 B2 31 |4.AC.11:AA(11).1|
00000900: 3A 89 35 35 35 30 00 26 25 92 15 8B 41 42 B3 31 |:.5550.&%...AB.1|
00000910: 35 A7 41 43 B2 31 33 3A 41 41 28 31 33 29 B2 31 |5.AC.13:AA(13).1|
00000920: 3A 89 35 35 35 30 00 33 25 AE 15 41 44 B2 41 44 |:.5550.3%..AD.AD|
00000930: AC 41 43 00 48 25 B3 15 8B 41 44 B1 B2 35 AA 33 |.AC.H%...AD..5.3|
00000940: AC 44 49 89 35 30 30 30 00 4E 25 B8 15 82 00 60 |.DI.5000.N%....`|
00000950: 25 D6 15 41 46 B2 B5 28 31 30 AC BB 28 31 29 29 |%..AF..(10..(1))|
00000960: 00 75 25 DB 15 8B 41 46 B1 34 A7 41 46 B2 31 3A |.u%...AF.4.AF.1:|
00000970: 89 35 36 30 30 00 7F 25 DD 15 41 46 B2 AB 31 00 |.5600..%..AF..1.|
00000980: 8C 25 E0 15 41 44 B2 41 44 AC 41 46 00 9D 25 30 |.%..AD.AD.AF..%0|
00000990: 16 81 44 56 B2 31 A4 44 49 AD 33 AA 31 00 C3 25 |..DV.1.DI.3.1..%|
000009A0: 44 16 41 42 B2 28 32 AA 32 2E 36 AC 44 49 29 AC |D.AB.(2.2.6.DI).|
000009B0: 28 BB 28 31 29 29 AE 28 31 30 AD 28 44 49 AA 31 |(.(1)).(10.(DI.1|
000009C0: 30 29 29 00 D8 25 4E 16 8B 41 42 B3 32 A7 41 43 |0))..%N..AB.2.AC|
000009D0: B2 31 3A 89 35 37 33 30 00 ED 25 50 16 8B 41 42 |.1:.5730..%P..AB|
000009E0: B3 36 A7 41 43 B2 32 3A 89 35 37 33 30 00 03 26 |.6.AC.2:.5730..&|
000009F0: 52 16 8B 41 42 B3 31 30 A7 41 43 B2 33 3A 89 35 |R..AB.10.AC.3:.5|
00000A00: 37 33 30 00 19 26 54 16 8B 41 42 B3 31 32 A7 41 |730..&T..AB.12.A|
00000A10: 43 B2 35 3A 89 35 37 33 30 00 2F 26 56 16 8B 41 |C.5:.5730./&V..A|
00000A20: 42 B3 31 33 A7 41 43 B2 37 3A 89 35 37 33 30 00 |B.13.AC.7:.5730.|
00000A30: 46 26 58 16 8B 41 42 B3 31 34 A7 41 43 B2 31 31 |F&X..AB.14.AC.11|
00000A40: 3A 89 35 37 33 30 00 5D 26 5A 16 8B 41 42 B3 31 |:.5730.]&Z..AB.1|
00000A50: 35 A7 41 43 B2 31 33 3A 89 35 37 33 30 00 70 26 |5.AC.13:.5730.p&|
00000A60: 62 16 8B 41 41 28 41 43 29 B2 31 89 35 37 30 30 |b..AA(AC).1.5700|
00000A70: 00 7D 26 76 16 41 45 B2 41 45 AC 41 43 00 99 26 |.}&v.AE.AE.AC..&|
00000A80: 7B 16 8B 41 45 B1 B2 31 30 AA 32 AC 44 49 A7 41 |{..AE..10.2.DI.A|
00000A90: 45 B2 31 3A 89 35 36 38 30 00 9F 26 80 16 82 00 |E.1:.5680..&....|
00000AA0: A5 26 0C 17 8E 00 C7 26 70 17 8F 20 47 45 4E 45 |.&.....&p.. GENE|
00000AB0: 52 41 54 45 20 50 4F 4C 59 4E 4F 4D 49 41 4C 20 |RATE POLYNOMIAL |
00000AC0: 53 54 52 49 4E 47 53 00 DD 26 7A 17 8D 35 30 30 |STRINGS..&z..500|
00000AD0: 30 3A 41 4D B2 41 45 3A 41 4E B2 41 44 00 F3 26 |0:AM.AE:AN.AD..&|
00000AE0: 84 17 8D 35 30 30 30 3A 41 4F B2 41 45 3A 41 50 |...5000:AO.AE:AP|
00000AF0: B2 41 44 00 0D 27 8E 17 8B 44 49 B3 32 A7 41 51 |.AD..'...DI.2.AQ|
00000B00: B2 31 3A 41 52 B2 30 3A 89 36 31 30 30 00 27 27 |.1:AR.0:.6100.''|
00000B10: 98 17 8B 44 49 B2 33 A7 41 51 B2 31 3A 41 52 B2 |...DI.3.AQ.1:AR.|
00000B20: 30 3A 89 36 31 30 30 00 3F 27 A2 17 8D 35 30 30 |0:.6100.?'...500|
00000B30: 30 3A 41 51 B2 41 44 3A 41 52 B2 41 45 AB 31 00 |0:AQ.AD:AR.AE.1.|
00000B40: 59 27 D4 17 43 31 B2 41 51 AC 41 4D AC 41 4F 3A |Y'..C1.AQ.AM.AO:|
00000B50: 43 31 24 B2 C4 28 43 31 29 00 7B 27 DE 17 43 32 |C1$..(C1).{'..C2|
00000B60: B2 41 51 AC 28 41 4D AC 41 50 AA 41 4E AC 41 4F |.AQ.(AM.AP.AN.AO|
00000B70: 29 3A 43 32 24 B2 C4 28 43 32 29 00 95 27 E8 17 |):C2$..(C2)..'..|
00000B80: 43 33 B2 41 51 AC 41 4E AC 41 50 3A 43 33 24 B2 |C3.AQ.AN.AP:C3$.|
00000B90: C4 28 43 33 29 00 B1 27 F2 17 56 31 24 B2 22 58 |.(C3)..'..V1$."X|
00000BA0: 22 3A 56 32 24 B2 22 58 22 3A 56 33 24 B2 22 58 |":V2$."X":V3$."X|
00000BB0: 22 00 C7 27 FC 17 45 31 B2 32 AA 41 52 3A 45 31 |"..'..E1.2.AR:E1|
00000BC0: 24 B2 C4 28 45 31 29 00 DD 27 06 18 45 32 B2 31 |$..(E1)..'..E2.1|
00000BD0: AA 41 52 3A 45 32 24 B2 C4 28 45 32 29 00 F1 27 |.AR:E2$..(E2)..'|
00000BE0: 10 18 45 33 B2 41 52 3A 45 33 24 B2 C4 28 45 33 |..E3.AR:E3$..(E3|
00000BF0: 29 00 02 28 1A 18 8B 45 32 B2 31 A7 45 32 24 B2 |)..(...E2.1.E2$.|
00000C00: 22 22 00 13 28 24 18 8B 45 33 B2 31 A7 45 33 24 |""..($..E3.1.E3$|
00000C10: B2 22 22 00 2B 28 2E 18 8B 45 33 B2 30 A7 45 33 |."".+(...E3.0.E3|
00000C20: 24 B2 22 22 3A 56 33 24 B2 22 22 00 44 28 38 18 |$."":V3$."".D(8.|
00000C30: 53 31 24 B2 22 2B 22 3A 8B 43 32 B3 30 A7 53 31 |S1$."+":.C2.0.S1|
00000C40: 24 B2 22 22 00 5D 28 42 18 53 32 24 B2 22 2B 22 |$."".](B.S2$."+"|
00000C50: 3A 8B 43 33 B3 30 A7 53 32 24 B2 22 22 00 7C 28 |:.C3.0.S2$."".|(|
00000C60: 4C 18 8B 43 33 B2 30 A7 43 33 24 B2 22 22 3A 53 |L..C3.0.C3$."":S|
00000C70: 32 24 B2 22 22 3A 56 33 24 B2 22 22 00 A2 28 56 |2$."":V3$.""..(V|
00000C80: 18 8B 43 32 B2 30 A7 53 31 24 B2 22 22 3A 43 32 |..C2.0.S1$."":C2|
00000C90: 24 B2 22 22 3A 56 32 24 B2 22 22 3A 45 32 24 B2 |$."":V2$."":E2$.|
00000CA0: 22 22 00 B3 28 60 18 8B 43 31 B2 30 A7 43 49 24 |""..(`..C1.0.CI$|
00000CB0: B2 22 22 00 C5 28 6A 18 8B 43 31 B2 31 A7 43 31 |.""..(j..C1.1.C1|
00000CC0: 24 B2 22 20 22 00 D6 28 74 18 8B 43 32 B2 31 A7 |$." "..(t..C2.1.|
00000CD0: 43 32 24 B2 22 22 00 E6 28 7E 18 8B 43 33 B3 B1 |C2$.""..(~..C3..|
00000CE0: 31 89 36 32 38 30 00 FA 28 83 18 8B 56 33 24 B3 |1.6280..(...V3$.|
00000CF0: B1 22 22 A7 43 33 24 B2 22 22 00 0D 29 88 18 8B |."".C3$.""..)...|
00000D00: 43 31 B2 AB 31 A7 43 31 24 B2 22 2D 22 00 20 29 |C1..1.C1$."-". )|
00000D10: 92 18 8B 43 32 B2 AB 31 A7 43 32 24 B2 22 2D 22 |...C2..1.C2$."-"|
00000D20: 00 31 29 9C 18 8B 43 33 B3 B1 AB 31 89 36 35 30 |.1)...C3...1.650|
00000D30: 30 00 46 29 A6 18 8B 56 33 24 B3 B1 22 22 A7 43 |0.F)...V3$.."".C|
00000D40: 33 24 B2 22 2D 22 00 94 29 64 19 50 24 B2 22 11 |3$."-"..)d.P$.".|
00000D50: 22 AA 43 31 24 AA 56 31 24 AA 22 91 22 AA 45 31 |".C1$.V1$.".".E1|
00000D60: 24 AA 22 11 22 AA 53 31 24 AA 43 32 24 AA 56 32 |$.".".S1$.C2$.V2|
00000D70: 24 AA 22 91 22 AA 45 32 24 AA 22 11 22 AA 53 32 |$.".".E2$.".".S2|
00000D80: 24 AA 43 33 24 AA 56 33 24 AA 22 91 22 AA 45 33 |$.C3$.V3$.".".E3|
00000D90: 24 AA 22 11 00 AC 29 C8 19 42 52 24 B2 50 24 3A |$."...)..BR$.P$:|
00000DA0: 8D 38 30 30 30 3A 50 24 B2 42 52 24 00 B2 29 57 |.8000:P$.BR$..)W|
00000DB0: 1B 8E 00 C9 29 58 1B 8F 20 47 45 4E 45 52 41 54 |....)X.. GENERAT|
00000DC0: 45 20 46 41 43 54 4F 52 53 00 D7 29 BC 1B 46 41 |E FACTORS..)..FA|
00000DD0: 24 B2 C4 28 41 51 29 00 E8 29 C6 1B 8B 41 51 B2 |$..(AQ)..)...AQ.|
00000DE0: 31 A7 46 41 24 B2 22 22 00 FB 29 CB 1B 8B 41 51 |1.FA$.""..)...AQ|
00000DF0: B2 AB 31 A7 46 41 24 B2 22 2D 22 00 14 2A D0 1B |..1.FA$."-"..*..|
00000E00: 46 42 24 B2 22 58 22 3A 8B 41 52 B2 30 A7 46 42 |FB$."X":.AR.0.FB|
00000E10: 24 B2 22 22 00 33 2A DA 1B 46 43 24 B2 22 5E 22 |$."".3*..FC$."^"|
00000E20: AA C4 28 41 52 29 3A 8B 41 52 B2 30 A7 46 43 24 |..(AR):.AR.0.FC$|
00000E30: B2 22 22 00 44 2A DF 1B 8B 41 52 B2 31 A7 46 43 |."".D*...AR.1.FC|
00000E40: 24 B2 22 22 00 58 2A E4 1B 46 31 24 B2 46 41 24 |$."".X*..F1$.FA$|
00000E50: AA 46 42 24 AA 46 43 24 00 66 2A EE 1B 46 44 24 |.FB$.FC$.f*..FD$|
00000E60: B2 C4 28 41 4D 29 00 77 2A F3 1B 8B 41 4D B2 31 |..(AM).w*...AM.1|
00000E70: A7 46 44 24 B2 22 22 00 83 2A F8 1B 46 45 24 B2 |.FD$.""..*..FE$.|
00000E80: 22 58 22 00 9D 2A 02 1C 46 46 24 B2 22 2B 22 3A |"X"..*..FF$."+":|
00000E90: 8B 41 4E B3 B2 30 A7 46 46 24 B2 22 22 00 BC 2A |.AN..0.FF$.""..*|
00000EA0: 0C 1C 8B 41 4D B2 30 A7 46 44 24 B2 22 22 3A 46 |...AM.0.FD$."":F|
00000EB0: 45 24 B2 22 22 3A 46 46 24 B2 22 22 00 DE 2A 16 |E$."":FF$.""..*.|
00000EC0: 1C 46 47 24 B2 C4 28 41 4E 29 3A 8B 41 4E B2 30 |.FG$..(AN):.AN.0|
00000ED0: A7 46 47 24 B2 22 22 3A 46 46 24 B2 22 22 00 FE |.FG$."":FF$.""..|
00000EE0: 2A 20 1C 46 32 24 B2 22 28 22 AA 46 44 24 AA 46 |* .F2$."(".FD$.F|
00000EF0: 45 24 AA 46 46 24 AA 46 47 24 AA 22 29 22 00 0C |E$.FF$.FG$.")"..|
00000F00: 2B 52 1C 46 48 24 B2 C4 28 41 4F 29 00 1D 2B 57 |+R.FH$..(AO)..+W|
00000F10: 1C 8B 41 4F B2 31 A7 46 48 24 B2 22 22 00 29 2B |..AO.1.FH$."".)+|
00000F20: 5C 1C 46 49 24 B2 22 58 22 00 43 2B 66 1C 46 4A |\.FI$."X".C+f.FJ|
00000F30: 24 B2 22 2B 22 3A 8B 41 50 B3 B2 30 A7 46 4A 24 |$."+":.AP..0.FJ$|
00000F40: B2 22 22 00 62 2B 70 1C 8B 41 4F B2 30 A7 46 48 |."".b+p..AO.0.FH|
00000F50: 24 B2 22 22 3A 46 49 24 B2 22 22 3A 46 4A 24 B2 |$."":FI$."":FJ$.|
00000F60: 22 22 00 84 2B 7A 1C 46 4B 24 B2 C4 28 41 50 29 |""..+z.FK$..(AP)|
00000F70: 3A 8B 41 50 B2 30 A7 46 4B 24 B2 22 22 3A 46 4A |:.AP.0.FK$."":FJ|
00000F80: 24 B2 22 22 00 A4 2B 84 1C 46 33 24 B2 22 28 22 |$.""..+..F3$."("|
00000F90: AA 46 48 24 AA 46 49 24 AA 46 4A 24 AA 46 4B 24 |.FH$.FI$.FJ$.FK$|
00000FA0: AA 22 29 22 00 BA 2B 4C 1D 8B 46 32 24 B2 46 33 |.")"..+L..F2$.F3|
00000FB0: 24 A7 46 33 24 B2 22 5E 32 22 00 CF 2B B0 1D 8B |$.F3$."^2"..+...|
00000FC0: 46 31 24 B2 22 91 11 22 A7 46 31 24 B2 22 22 00 |F1$."..".F1$."".|
00000FD0: E9 2B 14 1E 42 52 24 B2 46 31 24 3A 8D 38 30 30 |.+..BR$.F1$:.800|
00000FE0: 30 3A 46 31 24 B2 42 52 24 00 03 2C 1E 1E 42 52 |0:F1$.BR$..,..BR|
00000FF0: 24 B2 46 32 24 3A 8D 38 30 30 30 3A 46 32 24 B2 |$.F2$:.8000:F2$.|
00001000: 42 52 24 00 1D 2C 28 1E 42 52 24 B2 46 33 24 3A |BR$..,(.BR$.F3$:|
00001010: 8D 38 30 30 30 3A 46 33 24 B2 42 52 24 00 23 2C |.8000:F3$.BR$.#,|
00001020: 3F 1F 8E 00 45 2C 40 1F 8F 20 42 4C 41 4E 4B 20 |?...E,@.. BLANK |
00001030: 52 45 4D 4F 56 41 4C 2C 20 53 54 52 49 4E 47 20 |REMOVAL, STRING |
00001040: 3D 20 42 52 24 00 50 2C 4A 1F 42 50 24 B2 22 22 |= BR$.P,J.BP$.""|
00001050: 00 61 2C 54 1F 81 44 56 B2 31 A4 C3 28 42 52 24 |.a,T..DV.1..(BR$|
00001060: 29 00 7B 2C 5E 1F 8B CA 28 42 52 24 2C 44 56 2C |).{,^...(BR$,DV,|
00001070: 31 29 B2 22 20 22 A7 38 30 35 30 00 A2 2C 61 1F |1)." ".8050..,a.|
00001080: 8B CA 28 42 52 24 2C 44 56 2C 31 29 B2 22 5B 22 |..(BR$,DV,1)."["|
00001090: A7 42 50 24 B2 42 50 24 AA 22 28 22 3A 89 38 30 |.BP$.BP$."(":.80|
000010A0: 35 30 00 C9 2C 63 1F 8B CA 28 42 52 24 2C 44 56 |50..,c...(BR$,DV|
000010B0: 2C 31 29 B2 22 5D 22 A7 42 50 24 B2 42 50 24 AA |,1)."]".BP$.BP$.|
000010C0: 22 29 22 3A 89 38 30 35 30 00 E1 2C 68 1F 42 50 |")":.8050..,h.BP|
000010D0: 24 B2 42 50 24 AA CA 28 42 52 24 2C 44 56 2C 31 |$.BP$..(BR$,DV,1|
000010E0: 29 00 E7 2C 72 1F 82 00 F3 2C 7C 1F 42 52 24 B2 |)..,r....,|.BR$.|
000010F0: 42 50 24 00 F9 2C A4 1F 8E 00 19 2D 28 23 8F 20 |BP$..,.....-(#. |
00001100: 46 49 4E 44 49 4E 47 20 46 41 43 54 4F 52 53 20 |FINDING FACTORS |
00001110: 49 4E 20 41 4E 53 57 45 52 00 33 2D 3C 23 42 52 |IN ANSWER.3-<#BR|
00001120: 24 B2 49 4E 24 3A 8D 38 30 30 30 3A 49 4E 24 B2 |$.IN$:.8000:IN$.|
00001130: 42 52 24 00 59 2D 41 23 8B C8 28 49 4E 24 2C 31 |BR$.Y-A#..(IN$,1|
00001140: 29 B2 22 3F 22 A7 49 4E 24 B2 C9 28 49 4E 24 2C |)."?".IN$..(IN$,|
00001150: C3 28 49 4E 24 29 AB 31 29 00 64 2D 46 23 47 31 |.(IN$).1).d-F#G1|
00001160: 24 B2 22 22 00 75 2D 50 23 81 44 56 B2 31 A4 C3 |$."".u-P#.DV.1..|
00001170: 28 49 4E 24 29 00 8F 2D 5A 23 8B CA 28 49 4E 24 |(IN$)..-Z#..(IN$|
00001180: 2C 44 56 2C 31 29 B2 22 28 22 A7 39 31 30 30 00 |,DV,1)."(".9100.|
00001190: A7 2D 64 23 47 31 24 B2 47 31 24 AA CA 28 49 4E |.-d#G1$.G1$..(IN|
000011A0: 24 2C 44 56 2C 31 29 00 AD 2D 6E 23 82 00 B8 2D |$,DV,1)..-n#...-|
000011B0: 78 23 57 41 B2 31 3A 8E 00 D7 2D 8C 23 49 4F 24 |x#WA.1:...-.#IO$|
000011C0: B2 C9 28 49 4E 24 2C 28 C3 28 49 4E 24 29 AB C3 |..(IN$,(.(IN$)..|
000011D0: 28 47 31 24 29 29 29 00 E2 2D 96 23 47 32 24 B2 |(G1$)))..-.#G2$.|
000011E0: 22 22 00 F3 2D A0 23 81 44 56 B2 31 A4 C3 28 49 |""..-.#.DV.1..(I|
000011F0: 4F 24 29 00 0D 2E AA 23 8B CA 28 49 4F 24 2C 44 |O$)....#..(IO$,D|
00001200: 56 2C 31 29 B2 22 29 22 A7 39 32 30 30 00 25 2E |V,1).")".9200.%.|
00001210: B4 23 47 32 24 B2 47 32 24 AA CA 28 49 4F 24 2C |.#G2$.G2$..(IO$,|
00001220: 44 56 2C 31 29 00 2B 2E BE 23 82 00 36 2E DC 23 |DV,1).+..#..6..#|
00001230: 57 41 B2 31 3A 8E 00 4E 2E F0 23 47 32 24 B2 47 |WA.1:..N..#G2$.G|
00001240: 32 24 AA CA 28 49 4F 24 2C 44 56 2C 31 29 00 6D |2$..(IO$,DV,1).m|
00001250: 2E FA 23 47 33 24 B2 C9 28 49 4F 24 2C 28 C3 28 |..#G3$..(IO$,(.(|
00001260: 49 4F 24 29 AB C3 28 47 32 24 29 29 29 00 73 2E |IO$)..(G2$))).s.|
00001270: AC 26 8E 00 9B 2E 10 27 8F 20 43 4F 4D 50 41 52 |.&.....'. COMPAR|
00001280: 49 4E 47 20 54 52 55 45 20 46 41 43 54 4F 52 53 |ING TRUE FACTORS|
00001290: 20 41 4E 44 20 41 4E 53 57 45 52 00 B0 2E 1A 27 | AND ANSWER....'|
000012A0: 8B 47 31 24 B3 B1 46 31 24 A7 57 41 B2 31 3A 8E |.G1$..F1$.WA.1:.|
000012B0: 00 C4 2E 24 27 8B 47 32 24 B3 B1 46 32 24 89 31 |...$'.G2$..F2$.1|
000012C0: 30 31 30 30 00 D9 2E 2E 27 8B 47 33 24 B3 B1 46 |0100....'.G3$..F|
000012D0: 33 24 A7 57 41 B2 31 3A 8E 00 DF 2E 42 27 8E 00 |3$.WA.1:....B'..|
000012E0: F4 2E 74 27 8B 47 32 24 B3 B1 46 33 24 A7 57 41 |..t'.G2$..F3$.WA|
000012F0: B2 31 3A 8E 00 09 2F 7E 27 8B 47 33 24 B3 B1 46 |.1:.../~'.G3$..F|
00001300: 32 24 A7 57 41 B2 31 3A 8E 00 0F 2F D8 27 8E 00 |2$.WA.1:.../.'..|
00001310: 23 2F F8 2A 8F 20 50 4C 41 43 45 20 4D 41 52 4B |#/.*. PLACE MARK|
00001320: 45 52 53 00 2C 2F 02 2B 99 22 13 22 00 39 2F 0C |ERS.,/.+.".".9/.|
00001330: 2B 81 44 56 B2 31 A4 50 4E 00 3F 2F 16 2B 99 00 |+.DV.1.PN.?/.+..|
00001340: 45 2F 18 2B 82 00 4F 2F 1B 2B 99 22 91 91 22 00 |E/.+..O/.+."..".|
00001350: 65 2F 20 2B 42 52 24 B2 22 12 22 AA C4 28 50 4E |e/ +BR$."."..(PN|
00001360: 29 AA 22 92 22 00 77 2F 2A 2B 8D 38 30 30 30 3A |).".".w/*+.8000:|
00001370: 50 4D 24 B2 42 52 24 00 82 2F 34 2B 53 41 24 B2 |PM$.BR$../4+SA$.|
00001380: 22 22 00 A1 2F 3E 2B 81 44 56 B2 30 A4 53 43 28 |""../>+.DV.0.SC(|
00001390: 50 4E 29 3A 53 41 24 B2 53 41 24 AA 22 20 22 3A |PN):SA$.SA$." ":|
000013A0: 82 00 AC 2F 48 2B 53 42 24 B2 22 22 00 CE 2F 52 |.../H+SB$.""../R|
000013B0: 2B 81 44 56 B2 30 A4 33 36 AB 53 43 28 50 4E 29 |+.DV.0.36.SC(PN)|
000013C0: 3A 53 42 24 B2 53 42 24 AA 22 20 22 3A 82 00 E8 |:SB$.SB$." ":...|
000013D0: 2F 5C 2B 99 22 91 22 3B 53 41 24 3B 50 4D 24 3B |/\+.".";SA$;PM$;|
000013E0: 53 42 24 3B 22 9D A5 22 00 EE 2F C0 2B 8E 00 00 |SB$;".."../.+...|
000013F0: 00 |. |
........F....0,14:.1,14:.6,2:E.31744:.".
"G(142):. C128 MODS BY JOK '86.L.....X..
..AA(13)...D..".THIS IS A GAME FOR TWO,
THREE OR FOUR"...I.."PLAYERS. TO WIN, YO
U MUST BE ABLE TO"...N.."FACTOR SOME ALG
EBRAIC EXPRESSIONS."...S.....X.."YOU WIL
L BE ASKED TO MAKE A BET. IF".<.}.."YOU
BET A HIGH NUMBER, YOU MAY BE ASKED".I..
.."TO FACTOR A DIFFICULT EXPRESSION, BUT
"......"IF YOU GET IT RIGHT YOU WILL ADV
ANCE"......"A LONG WAY DOWN THE RACE TRA
CK. IF"......"YOU GET THE FACTORS WRONG,
THOUGH, YOU"......"WILL LOSE GROUND IN
THE RACE.".......D. .."YOU HAVE TO BE AB
LE TO WRITE FACTORS".O...."IN GOOD MATHE
MATICAL FORM. HERE ARE"......"REMINDERS.
NEVER WRITE A COEFFICIENT".F...."OF ONE
. ALWAYS WRITE COMMON FACTORS"......"FIR
ST. IF TWO OR MORE FACTORS ARE"......"ID
ENTICAL, USE EXPONENTS. ON THIS".E...."C
OMPUTER YOU ENTER EXPONENTS BY USING".R.
C.."THE '^' KEY. THUS 'X SQUARED' BECOME
S"...H.."'X^2'."...R........" PRESS SPA
CE BAR TO CONTINUE".A....YB$:.YB$.."".23
0.X....YB$:.YB$.." ".240.. ...".........
...HOW MANY PLAYERS WILL THERE BE? (2-4)
".. ...NP.? ....(3.NP).1.."ILLEGAL NUMBE
R":.400.P ... DRAW TRACK.Y ...".".H ...D
V.1.NP.1.} ...V1.1.40:."-";:... ..... ..
... &..".START
FINISH".G X..PN.1.NP.R B..11000.X L..
.. ..PN.1.. ..WA.0.. F..".............".
-!P.."PLAYER"PN", HOW MUCH DO YOU BET? (
1-6)".5!U..DI.A!W.DI.DI.1.X!Z...(2.5.DI)
.2.5.710.H!...6000:.7000.|!...".FACTOR
."P$..!...IN$..!...9000:.10000..!...WA.1
.800.Q!...".WELL DONE!":SC(PN).SC(PN).DI
.1:.11000..!...SC(PN).35.1100..!..PN.PN.
1:.PN.NP.PN.1.."...890."" ..".NO, THE FA
CTORS ARE".3"*..F1$;F2$;F3$.J"4.SC(PN).S
C(PN).DI.1.A">..SC(PN).0.SC(PN).0.L"H..1
1000.."P.PN.PN.1:.PN.NP.PN.1.."Z.TK.TI..
"...TI.TK.200.900.."...WA.0.910.B"...TI.
TK.700.905.V"..."............".."...DV.1
.12..#..."
"..#.... #...700.@#L..".........
..PLAYER"PN"WINS.M#V.."..DO YOU WISH TO
PLAY AGAIN? (Y OR N)"..#`..YA$:.YA$."".1
120..#J..YA$."Y"..:.0..#T..YA$."N".."GOO
DBYE!":...#~..1120..#.....#... GENERATE
PAIRS OF NUMBERS WITHOUT COMMON FACTORS.
.$N.AX.0..$...DV.1.13:AA(DV).0:..&$J.AD.
1:AE.1.7$H..DV.1.DI.3.1.Z$|.AB.(10.DI).(
.(1)).(10.(DI.10)).O$...AB.2.AC.1:.5550.
.$...AB.6.AC.2:AA(2).1:.5550..$...AB.10.
AC.3:AA(3).1:.5550.H$...AB.12.AC.5:AA(5)
.1:.5550..$...AB.13.AC.7:AA(7).1:.5550..
%...AB.14.AC.11:AA(11).1:.5550.&%...AB.1
5.AC.13:AA(13).1:.5550.3%..AD.AD.AC.H%..
.AD..5.3.DI.5000.N%....`%V.AF..(10..(1))
.U%...AF.4.AF.1:.5600.%..AF..1..%..AD.A
D.AF..%0..DV.1.DI.3.1.C%D.AB.(2.2.6.DI).
(.(1)).(10.(DI.10)).X%N..AB.2.AC.1:.5730
..%P..AB.6.AC.2:.5730..&R..AB.10.AC.3:.5
730..&T..AB.12.AC.5:.5730./&V..AB.13.AC.
7:.5730.F&X..AB.14.AC.11:.5730.]&Z..AB.1
5.AC.13:.5730.P&B..AA(AC).1.5700.}&V.AE.
AE.AC..&{..AE..10.2.DI.AE.1:.5680..&....
.&....G&P.. GENERATE POLYNOMIAL STRINGS.
.&Z..5000:AM.AE:AN.AD..&...5000:AO.AE:AP
.AD..'...DI.2.AQ.1:AR.0:.6100.''...DI.3.
AQ.1:AR.0:.6100.?'...5000:AQ.AD:AR.AE.1.
Y'T.C1.AQ.AM.AO:C1$.D(C1).{'..C2.AQ.(AM.
AP.AN.AO):C2$.D(C2)..'..C3.AQ.AN.AP:C3$.
D(C3)..'..V1$."X":V2$."X":V3$."X".G'..E1
.2.AR:E1$.D(E1)..'..E2.1.AR:E2$.D(E2)..'
..E3.AR:E3$.D(E3)..(...E2.1.E2$.""..($..
E3.1.E3$."".+(...E3.0.E3$."":V3$."".D(8.
S1$."+":.C2.0.S1$."".](B.S2$."+":.C3.0.S
2$."".|(L..C3.0.C3$."":S2$."":V3$.""..(V
..C2.0.S1$."":C2$."":V2$."":E2$.""..(`..
C1.0.CI$."".E(J..C1.1.C1$." ".V(T..C2.1.
C2$.""..(~..C3..1.6280..(...V3$.."".C3$.
""..)...C1..1.C1$."-". )...C2..1.C2$."-"
.1)...C3...1.6500.F)...V3$.."".C3$."-"..
)D.P$.".".C1$.V1$.".".E1$.".".S1$.C2$.V2
$.".".E2$.".".S2$.C3$.V3$.".".E3$."...)H
.BR$.P$:.8000:P$.BR$..)W...I)X.. GENERAT
E FACTORS.W)..FA$.D(AQ)..)F..AQ.1.FA$.""
..)K..AQ..1.FA$."-"..*P.FB$."X":.AR.0.FB
$."".3*Z.FC$."^".D(AR):.AR.0.FC$."".D*..
.AR.1.FC$."".X*..F1$.FA$.FB$.FC$.F*..FD$
.D(AM).W*...AM.1.FD$.""..*..FE$."X"..*..
FF$."+":.AN..0.FF$.""..*...AM.0.FD$."":F
E$."":FF$.""..*..FG$.D(AN):.AN.0.FG$."":
FF$.""..* .F2$."(".FD$.FE$.FF$.FG$.")"..
+R.FH$.D(AO)..+W..AO.1.FH$."".)+\.FI$."X
".C+F.FJ$."+":.AP..0.FJ$."".B+P..AO.0.FH
$."":FI$."":FJ$.""..+Z.FK$.D(AP):.AP.0.F
K$."":FJ$.""..+..F3$."(".FH$.FI$.FJ$.FK$
.")"..+L..F2$.F3$.F3$."^2".O+...F1$.".."
.F1$.""..+..BR$.F1$:.8000:F1$.BR$..,..BR
$.F2$:.8000:F2$.BR$..,(.BR$.F3$:.8000:F3
$.BR$.#,?...E,@.. BLANK REMOVAL, STRING
= BR$.P,J.BP$."".A,T..DV.1.C(BR$).{,^..J
(BR$,DV,1)." ".8050..,A..J(BR$,DV,1)."["
.BP$.BP$."(":.8050.I,C..J(BR$,DV,1)."]".
BP$.BP$.")":.8050..,H.BP$.BP$.J(BR$,DV,1
)..,R....,|.BR$.BP$..,.....-(#. FINDING
FACTORS IN ANSWER.3-<#BR$.IN$:.8000:IN$.
BR$.Y-A#.H(IN$,1)."?".IN$.I(IN$,C(IN$).1
).D-F#G1$."".U-P#.DV.1.C(IN$)..-Z#.J(IN$
,DV,1)."(".9100..-D#G1$.G1$.J(IN$,DV,1).
.-N#...-X#WA.1:..W-.#IO$.I(IN$,(C(IN$).C
(G1$)))..-.#G2$.""..- #.DV.1.C(IO$)....#
.J(IO$,DV,1).")".9200.%..#G2$.G2$.J(IO$,
DV,1).+..#..6..#WA.1:..N..#G2$.G2$.J(IO$
,DV,1).M..#G3$.I(IO$,(C(IO$).C(G2$))).S.
.&.....'. COMPARING TRUE FACTORS AND ANS
WER....'.G1$..F1$.WA.1:..D.$'.G2$..F2$.1
0100.Y..'.G3$..F3$.WA.1:....B'....T'.G2$
..F3$.WA.1:.../~'.G3$..F2$.WA.1:.../X'..
#/.*. PLACE MARKERS.,/.+.".".9/.+.DV.1.P
N.?/.+..E/.+..O/.+."..".E/ +BR$.".".D(PN
).".".W/*+.8000:PM$.BR$../4+SA$.""../>+.
DV.0.SC(PN):SA$.SA$." ":.../H+SB$."".N/R
+.DV.0.36.SC(PN):SB$.SB$." ":.../\+.".";
SA$;PM$;SB$;".."../.+....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL