EQUATIONS.C3
FILE INFORMATION
FILENAME(S): EQUATIONS.C3
FILE TYPE(S): PRG
FILE SIZE: 13.7K
FIRST SEEN: 2025-10-20 14:30:09
APPEARS ON: 1 disk(s)
FILE HASH
23f66846d785807ae7318dee40b963750dd3c4bef81f2f13dfbbe66703e74cfc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0007ED | EQUATIONS.C3 | PRG | Treasure Chest - Klaus Der Suhler | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C9 08 0A 00 8F 2D 2D 2D |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 2D 2D 2D 2D 00 CF 08 0F 00 3A 00 |UTINE----.....:.|
000000D0: EF 08 14 00 8F 2D 2D 2D 2D 2D 53 45 54 20 55 50 |.....-----SET UP|
000000E0: 20 56 41 52 49 41 42 4C 45 53 2D 2D 2D 2D 2D 00 | VARIABLES-----.|
000000F0: 02 09 18 00 AB 53 55 42 54 52 41 43 54 20 42 41 |.....SUBTRACT BA|
00000100: 47 53 00 08 09 19 00 3A 00 0E 09 1E 00 3A 00 2B |GS.....:.....:.+|
00000110: 09 23 00 8F 2D 2D 2D 2D 2D 49 4E 50 55 54 20 53 |.#..-----INPUT S|
00000120: 45 43 54 49 4F 4E 2D 2D 2D 2D 2D 00 40 09 28 00 |ECTION-----.@.(.|
00000130: 3A 20 20 55 52 24 B2 22 22 3A 55 49 24 B2 22 22 |: UR$."":UI$.""|
00000140: 00 54 09 2A 00 3A 20 20 8B 20 55 4C B2 30 A7 55 |.T.*.: . UL.0.U|
00000150: 4C B2 38 30 00 67 09 2D 00 99 22 20 20 9D 9D 22 |L.80.g.-.." .."|
00000160: 3B 3A 97 55 43 2C 30 00 7E 09 32 00 3A 20 20 A1 |;:.UC,0.~.2.: .|
00000170: 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 AB |UI$:.UI$."".50..|
00000180: 09 37 00 3A 20 20 8B 55 49 24 B2 C7 28 31 33 29 |.7.: .UI$..(13)|
00000190: AF C3 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 |..(UR$)..1..UC,1|
000001A0: 3A 99 22 20 9D 22 3B 3A 89 38 35 00 C1 09 3C 00 |:." .";:.85...<.|
000001B0: 3A 20 20 8B 55 49 24 B2 C7 28 32 30 29 A7 31 30 |: .UI$..(20).10|
000001C0: 35 00 D9 09 3E 00 3A 20 20 8B 20 C3 28 55 52 24 |5...>.: . .(UR$|
000001D0: 29 B2 B1 55 4C 20 A7 35 30 00 01 0A 41 00 3A 20 |)..UL .50...A.: |
000001E0: 20 8D 31 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F | .120:. CHECK FO|
000001F0: 52 20 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 |R VALID CHARACTE|
00000200: 52 00 14 0A 46 00 3A 20 20 55 52 24 B2 55 52 24 |R...F.: UR$.UR$|
00000210: AA 55 49 24 00 21 0A 4B 00 3A 20 20 99 55 49 24 |.UI$.!.K.: .UI$|
00000220: 3B 00 2C 0A 50 00 3A 20 20 89 35 30 00 52 0A 55 |;.,.P.: .50.R.U|
00000230: 00 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 46 4F 52 |..-----CHECK FOR|
00000240: 20 48 45 4C 50 20 52 45 51 55 45 53 54 2D 2D 2D | HELP REQUEST---|
00000250: 2D 2D 00 7D 0A 5A 00 3A 20 20 8B 55 52 24 B2 55 |--.}.Z.: .UR$.U|
00000260: 58 24 A7 31 39 35 3A 8F 20 45 58 49 54 20 54 4F |X$.195:. EXIT TO|
00000270: 20 48 45 4C 50 20 52 4F 55 54 49 4E 45 00 8F 0A | HELP ROUTINE...|
00000280: 5F 00 3A 20 20 8B 55 46 B2 31 A7 8D 32 34 30 00 |_.: .UF.1..240.|
00000290: 9E 0A 64 00 3A 20 55 46 B2 30 3A 99 3A 8E 00 BA |..d.: UF.0:.:...|
000002A0: 0A 66 00 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 44 |.f..-----CHECK D|
000002B0: 45 4C 45 54 45 2D 2D 2D 2D 2D 00 CD 0A 69 00 3A |ELETE-----...i.:|
000002C0: 20 8B C3 28 55 52 24 29 B3 31 A7 35 30 00 E7 0A | ..(UR$).1.50...|
000002D0: 6E 00 3A 20 55 52 24 B2 C8 28 55 52 24 2C C3 28 |n.: UR$..(UR$,.(|
000002E0: 55 52 24 29 AB 31 29 00 FB 0A 73 00 3A 20 99 22 |UR$).1)...s.: ."|
000002F0: 9D 20 20 9D 9D 22 3B 3A 89 35 30 00 25 0B 78 00 |. ..";:.50.%.x.|
00000300: 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 46 4F 52 20 |.-----CHECK FOR |
00000310: 56 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 53 |VALID CHARACTERS|
00000320: 2D 2D 2D 2D 2D 00 3A 0B 7D 00 3A 20 20 8B C3 28 |-----.:.}.: ..(|
00000330: 55 53 24 29 B2 30 A7 31 35 30 00 4E 0B 82 00 3A |US$).0.150.N...:|
00000340: 20 20 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 6A | .US.1..(US$).j|
00000350: 0B 87 00 3A 20 20 20 20 8B 55 49 24 B2 CA 28 55 |...: .UI$..(U|
00000360: 53 24 2C 55 53 2C 31 29 A7 8E 00 73 0B 8C 00 3A |S$,US,1)...s...:|
00000370: 20 20 82 00 83 0B 91 00 3A 20 20 55 49 24 B2 22 | ......: UI$."|
00000380: 22 3A 8E 00 A1 0B 96 00 8F 2D 2D 2D 2D 2D 53 54 |":.......-----ST|
00000390: 41 4E 44 41 52 44 20 49 4E 50 55 54 2D 2D 2D 2D |ANDARD INPUT----|
000003A0: 2D 00 B6 0B 98 00 3A 20 20 8B C6 28 55 49 24 29 |-.....: ..(UI$)|
000003B0: B2 34 36 A7 20 8E 00 CB 0B 9B 00 3A 20 20 8B 55 |.46. ......: .U|
000003C0: 49 24 B2 C7 28 33 32 29 A7 20 8E 00 ED 0B A0 00 |I$..(32). ......|
000003D0: 3A 20 20 8B C6 28 55 49 24 29 B3 34 38 20 B0 20 |: ..(UI$).48 . |
000003E0: C6 28 55 49 24 29 B1 35 37 A7 31 37 30 00 F6 0B |.(UI$).57.170...|
000003F0: A5 00 3A 20 20 8E 00 18 0C AA 00 3A 20 20 8B C6 |..: ......: ..|
00000400: 28 55 49 24 29 B3 36 35 20 B0 20 C6 28 55 49 24 |(UI$).65 . .(UI$|
00000410: 29 B1 39 30 A7 31 38 30 00 21 0C AF 00 3A 20 20 |).90.180.!...: |
00000420: 8E 00 4A 0C B4 00 3A 20 20 8B C6 28 55 49 24 29 |..J...: ..(UI$)|
00000430: B3 31 39 33 20 B0 20 C6 28 55 49 24 29 B1 32 31 |.193 . .(UI$).21|
00000440: 38 A7 55 49 24 B2 22 22 3A 8E 00 78 0C B9 00 3A |8.UI$."":..x...:|
00000450: 20 20 8B C2 28 55 54 29 B2 31 32 B0 C2 28 55 54 | ..(UT).12..(UT|
00000460: 29 B2 32 31 A7 55 49 24 B2 C7 28 C6 28 55 49 24 |).21.UI$..(.(UI$|
00000470: 29 AB 31 32 38 29 3A 8E 00 81 0C BB 00 3A 20 20 |).128):......: |
00000480: 8E 00 91 0C BE 00 3A 20 20 55 49 24 B2 22 22 3A |......: UI$."":|
00000490: 8E 00 BA 0C C3 00 3A 20 20 55 46 B2 31 3A 8F 2D |......: UF.1:.-|
000004A0: 2D 2D 2D 2D 48 45 4C 50 20 52 4F 55 54 49 4E 45 |----HELP ROUTINE|
000004B0: 20 45 58 49 54 2D 2D 2D 2D 2D 00 C6 0C C5 00 3A | EXIT-----.....:|
000004C0: 20 20 8D 32 35 30 00 D2 0C C8 00 3A 20 20 8D 32 | .250.....: .2|
000004D0: 34 35 00 F4 0C CD 00 3A 20 20 81 55 51 B2 55 42 |45.....: .UQ.UB|
000004E0: A4 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 |.(U2%.256.U1%.U3|
000004F0: 25 AB 32 29 00 13 0D D2 00 3A 20 20 55 51 25 28 |%.2).....: UQ%(|
00000500: 55 51 AB 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 |UQ.UB)..(UQ):.:.|
00000510: 22 93 22 00 29 0D D7 00 3A 20 20 55 5A B2 31 3A |".".)...: UZ.1:|
00000520: 55 56 25 B2 C2 28 55 54 29 00 35 0D D8 00 3A 20 |UV%..(UT).5...: |
00000530: 20 89 33 30 30 00 5A 0D D9 00 55 5A B2 30 3A 55 | .300.Z...UZ.0:U|
00000540: 53 24 B2 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 |S$.UJ$:UG$.UK$:U|
00000550: 50 B2 55 4A 3A 55 4C B2 55 4B 00 91 0D DA 00 8B |P.UJ:UL.UK......|
00000560: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000570: 31 2C 31 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 |1,1:.".";:.53281|
00000580: 2C 36 3A 97 35 33 32 38 30 2C 31 34 3A 89 32 32 |,6:.53280,14:.22|
00000590: 30 00 9B 0D DB 00 99 22 93 22 3B 00 CA 0D DC 00 |0......".";.....|
000005A0: 55 54 24 B2 55 4C 24 3A 97 55 54 2C 55 56 25 3A |UT$.UL$:.UT,UV%:|
000005B0: 81 55 51 B2 55 42 A4 28 55 32 25 AC 32 35 36 AA |.UQ.UB.(U2%.256.|
000005C0: 55 31 25 AA 55 33 25 AB 33 29 00 E2 0D E1 00 3A |U1%.U3%.3).....:|
000005D0: 20 20 97 55 51 2C 55 51 25 28 55 51 AB 55 42 29 | .UQ,UQ%(UQ.UB)|
000005E0: 3A 82 00 F1 0D E6 00 3A 20 20 97 55 31 2C 55 31 |:......: .U1,U1|
000005F0: 25 00 00 0E E8 00 3A 20 20 97 55 32 2C 55 32 25 |%.....: .U2,U2%|
00000600: 00 0F 0E E9 00 3A 20 20 97 55 34 2C 55 34 25 00 |.....: .U4,U4%.|
00000610: 20 0E EA 00 3A 20 20 97 55 33 2C 55 33 25 AB 31 | ...: .U3,U3%.1|
00000620: 00 2B 0E EB 00 3A 20 20 89 33 35 00 60 0E F0 00 |.+...: .35.`...|
00000630: 3A 20 20 55 44 25 B2 28 28 55 32 25 AC 32 35 36 |: UD%.((U2%.256|
00000640: AA 55 31 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 |.U1%.U3%).UB).40|
00000650: 3A 99 C8 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E |:..(UD$,UD%.1):.|
00000660: 00 9E 0E F5 00 3A 20 20 99 C8 28 55 44 24 2C 32 |.....: ..(UD$,2|
00000670: 34 29 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 |4);" |
00000680: 20 20 20 20 20 20 20 20 20 20 12 20 48 45 4C 50 | . HELP|
00000690: 20 43 4F 4D 49 4E 47 20 92 20 20 22 3A 8E 00 CD | COMING . ":...|
000006A0: 0E FA 00 3A 20 20 55 31 25 B2 C2 28 55 31 29 3A |...: U1%..(U1):|
000006B0: 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 |U2%..(U2):U3%..(|
000006C0: 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 00 DF 0E |U3):U4%..(U4)...|
000006D0: FB 00 55 4A 24 B2 55 53 24 3A 55 4A B2 55 4C 00 |..UJ$.US$:UJ.UL.|
000006E0: 02 0F FC 00 3A 20 20 55 4A 24 B2 55 53 24 3A 55 |....: UJ$.US$:U|
000006F0: 4B 24 B2 55 47 24 3A 55 4A B2 55 50 3A 55 4B B2 |K$.UG$:UJ.UP:UK.|
00000700: 55 4C 00 0B 0F FF 00 3A 20 20 8E 00 1F 0F 2C 01 |UL.....: ....,.|
00000710: 8F 2D 2D 2D 2D 2D 4D 45 4E 55 2D 2D 2D 2D 2D 00 |.-----MENU-----.|
00000720: 25 0F 2D 01 3A 00 57 0F 2E 01 3A 20 20 99 22 93 |%.-.:.W...: .".|
00000730: 22 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |":.UT,UU%:..(500|
00000740: 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 |03).0..53281,9:.|
00000750: 35 33 32 38 30 2C 38 00 5D 0F 2F 01 3A 00 7D 0F |53280,8.]./.:.}.|
00000760: 31 01 3A 20 20 99 22 93 20 20 20 20 20 20 20 20 |1.: .". |
00000770: 20 20 20 20 20 20 20 20 4D 45 4E 55 22 00 AF 0F | MENU"...|
00000780: 36 01 3A 20 20 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D |6.: ." --------|
00000790: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000007A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
000007B0: D8 0F 3B 01 3A 20 20 99 22 11 11 20 20 20 20 20 |..;.: .".. |
000007C0: 20 20 31 2E 20 20 20 45 51 55 41 54 49 4F 4E 20 | 1. EQUATION |
000007D0: 45 58 45 52 43 49 53 45 00 05 10 40 01 3A 20 20 |EXERCISE...@.: |
000007E0: 99 22 11 11 20 20 20 20 20 20 20 32 2E 20 20 20 |.".. 2. |
000007F0: 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 54 |STUDENT INSTRUCT|
00000800: 49 4F 4E 53 22 00 32 10 45 01 3A 20 20 99 22 11 |IONS".2.E.: .".|
00000810: 11 20 20 20 20 20 20 20 33 2E 20 20 20 54 45 41 |. 3. TEA|
00000820: 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E |CHER INSTRUCTION|
00000830: 53 22 00 62 10 4A 01 3A 20 20 99 22 11 11 20 20 |S".b.J.: .".. |
00000840: 20 20 20 20 20 34 2E 20 20 20 4D 4F 44 49 46 49 | 4. MODIFI|
00000850: 43 41 54 49 4F 4E 20 4F 46 20 50 52 4F 47 52 41 |CATION OF PROGRA|
00000860: 4D 22 00 81 10 4F 01 3A 20 20 99 22 11 11 20 20 |M"...O.: .".. |
00000870: 20 20 20 20 20 35 2E 20 20 20 51 55 49 54 11 11 | 5. QUIT..|
00000880: 22 00 B3 10 54 01 3A 20 20 99 22 20 2D 2D 2D 2D |"...T.: ." ----|
00000890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008B0: 2D 2D 22 00 E1 10 59 01 3A 20 20 99 22 11 11 20 |--"...Y.: .".. |
000008C0: 20 20 20 20 20 20 50 52 45 53 53 20 41 20 4E 55 | PRESS A NU|
000008D0: 4D 42 45 52 20 4B 45 59 20 28 31 2D 35 29 20 22 |MBER KEY (1-5) "|
000008E0: 3B 00 12 11 5E 01 3A 20 20 55 4C B2 31 3A 55 53 |;...^.: UL.1:US|
000008F0: 24 B2 22 31 32 33 34 35 22 3A 8D 33 35 3A 8F 2D |$."12345":.35:.-|
00000900: 2D 2D 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 2D |--INPUT ROUTINE-|
00000910: 2D 2D 00 20 11 60 01 3A 20 20 55 53 24 B2 22 22 |--. .`.: US$.""|
00000920: 00 44 11 63 01 3A 20 20 91 C5 28 55 52 24 29 8D |.D.c.: ..(UR$).|
00000930: 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 36 30 30 |1000,400,500,600|
00000940: 2C 33 39 36 00 50 11 68 01 3A 20 20 89 33 30 30 |,396.P.h.: .300|
00000950: 00 7A 11 8B 01 8F 2D 2D 2D 2D 2D 52 45 2D 45 4E |.z....-----RE-EN|
00000960: 41 42 4C 45 20 53 54 4F 50 20 4B 45 59 20 41 4E |ABLE STOP KEY AN|
00000970: 44 20 45 4E 44 2D 2D 2D 2D 2D 00 AC 11 8C 01 3A |D END-----.....:|
00000980: 20 20 8B C2 28 35 30 30 30 33 29 B3 B1 31 AF C2 | ..(50003)..1..|
00000990: 28 35 30 30 30 33 29 B3 B1 31 36 30 AF C2 28 35 |(50003)..160..(5|
000009A0: 30 30 30 33 29 B3 B1 30 A7 33 39 39 00 D9 11 8D |0003)..0.399....|
000009B0: 01 3A 20 20 9E 55 55 AA 37 31 3A 8B C2 28 35 30 |.: .UU.71:..(50|
000009C0: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A |003).0..53281,6:|
000009D0: 97 35 33 32 38 30 2C 31 34 00 E8 11 8E 01 3A 20 |.53280,14.....: |
000009E0: 20 99 22 9A 93 22 3A 80 00 F6 11 8F 01 3A 20 20 | ."..":......: |
000009F0: 8D 38 37 35 3A 8E 00 1A 12 90 01 8F 2D 2D 2D 2D |.875:.......----|
00000A00: 2D 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 43 |-STUDENT INSTRUC|
00000A10: 54 49 4F 4E 53 2D 2D 2D 2D 2D 00 4C 12 95 01 3A |TIONS-----.L...:|
00000A20: 20 20 99 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B | .".":.UT,UL%:.|
00000A30: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00000A40: 31 2C 30 3A 97 35 33 32 38 30 2C 30 00 6D 12 9A |1,0:.53280,0.m..|
00000A50: 01 55 50 B2 30 3A 55 47 24 B2 22 D3 54 55 44 45 |.UP.0:UG$.".TUDE|
00000A60: 4E 54 20 C9 4E 53 54 22 3A 8D 38 35 30 00 9B 12 |NT .NST":.850...|
00000A70: 9C 01 3A 20 20 99 22 11 11 11 20 20 20 C9 27 4D |..: ."... .'M|
00000A80: 20 47 4F 49 4E 47 20 54 4F 20 50 52 49 4E 54 20 | GOING TO PRINT |
00000A90: 55 50 20 41 20 53 43 41 4C 45 22 00 CB 12 9E 01 |UP A SCALE".....|
00000AA0: 3A 20 20 99 22 20 20 42 41 4C 41 4E 43 45 44 20 |: ." BALANCED |
00000AB0: 57 49 54 48 20 4D 41 52 42 4C 45 53 2E 20 20 D3 |WITH MARBLES. .|
00000AC0: 4F 4D 45 20 4F 46 20 54 48 45 22 00 FC 12 9F 01 |OME OF THE".....|
00000AD0: 3A 20 20 99 22 20 20 4D 41 52 42 4C 45 53 20 41 |: ." MARBLES A|
00000AE0: 52 45 20 49 4E 20 55 4E 4D 41 52 4B 45 44 20 42 |RE IN UNMARKED B|
00000AF0: 41 47 53 20 41 4E 44 20 41 4C 4C 22 00 2C 13 A2 |AGS AND ALL".,..|
00000B00: 01 3A 20 20 99 22 20 20 4F 46 20 54 48 45 20 42 |.: ." OF THE B|
00000B10: 41 47 53 20 43 4F 4E 54 41 49 4E 20 54 48 45 20 |AGS CONTAIN THE |
00000B20: 53 41 4D 45 20 4E 55 4D 42 45 52 22 00 57 13 A4 |SAME NUMBER".W..|
00000B30: 01 3A 20 20 99 22 20 20 4F 46 20 4D 41 52 42 4C |.: ." OF MARBL|
00000B40: 45 53 2E 20 20 D9 4F 55 20 4D 55 53 54 A0 46 49 |ES. .OU MUST.FI|
00000B50: 4E 44 20 4F 55 54 22 00 85 13 A6 01 3A 20 20 99 |ND OUT".....: .|
00000B60: 22 20 20 48 4F 57 20 4D 41 4E 59 20 4D 41 52 42 |" HOW MANY MARB|
00000B70: 4C 45 53 20 41 52 45 20 49 4E 20 45 41 43 48 20 |LES ARE IN EACH |
00000B80: 42 41 47 2E 22 00 B5 13 A8 01 3A 20 20 99 22 20 |BAG.".....: ." |
00000B90: 20 D4 4F 20 44 4F 20 54 48 49 53 20 59 4F 55 20 | .O DO THIS YOU |
00000BA0: 4D 55 53 54 20 47 45 54 20 52 49 44 20 4F 46 20 |MUST GET RID OF |
00000BB0: 4D 4F 53 54 22 00 E5 13 AA 01 3A 20 20 99 22 20 |MOST".....: ." |
00000BC0: 20 4F 46 20 54 48 45 20 42 41 47 53 20 41 4E 44 | OF THE BAGS AND|
00000BD0: 20 4D 41 52 42 4C 45 53 2C 20 55 4E 54 49 4C 20 | MARBLES, UNTIL |
00000BE0: 4F 4E 4C 59 22 00 17 14 AC 01 3A 20 20 99 22 20 |ONLY".....: ." |
00000BF0: 20 4F 4E 45 20 42 41 47 20 41 4E 44 20 41 20 50 | ONE BAG AND A P|
00000C00: 49 4C 45 20 4F 46 20 4D 41 52 42 4C 45 53 20 52 |ILE OF MARBLES R|
00000C10: 45 4D 41 49 4E 2E 22 00 47 14 AE 01 3A 20 20 99 |EMAIN.".G...: .|
00000C20: 22 11 20 20 C2 C5 20 D3 D5 D2 C5 20 D4 CF 20 CB |". .. .... .. .|
00000C30: C5 C5 D0 A0 D4 C8 C5 A0 D3 C3 C1 CC C5 A0 C2 C1 |................|
00000C40: CC C1 CE C3 C5 C4 22 00 53 14 B0 01 3A 20 20 8D |......".S...: .|
00000C50: 38 33 35 00 5F 14 B2 01 3A 20 20 8D 38 35 30 00 |835._...: .850.|
00000C60: 91 14 B4 01 3A 20 20 99 22 13 11 11 11 11 11 20 |....: ."...... |
00000C70: 20 20 D2 45 4D 45 4D 42 45 52 20 54 4F 20 48 49 | .EMEMBER TO HI|
00000C80: 54 20 3C 52 45 54 55 52 4E 3E 20 41 46 54 45 52 |T <RETURN> AFTER|
00000C90: 22 00 BD 14 B6 01 3A 20 20 99 22 20 20 54 59 50 |".....: ." TYP|
00000CA0: 49 4E 47 20 59 4F 55 52 20 41 4E 53 57 45 52 2E |ING YOUR ANSWER.|
00000CB0: 20 20 D4 48 49 53 20 54 45 4C 4C 53 22 00 E9 14 | .HIS TELLS"...|
00000CC0: B8 01 3A 20 20 99 22 20 20 54 48 45 20 43 4F 4D |..: ." THE COM|
00000CD0: 50 55 54 45 52 20 54 4F 20 41 43 43 45 50 54 20 |PUTER TO ACCEPT |
00000CE0: 57 48 41 54 20 59 4F 55 22 00 02 15 BA 01 3A 20 |WHAT YOU".....: |
00000CF0: 20 99 22 20 20 48 41 56 45 20 54 59 50 45 44 2E | ." HAVE TYPED.|
00000D00: 11 22 00 2E 15 BC 01 3A 20 20 99 22 20 20 20 D4 |.".....: ." .|
00000D10: 59 50 45 20 3C 48 3E 20 41 54 20 41 4E 59 20 54 |YPE <H> AT ANY T|
00000D20: 49 4D 45 20 54 4F 20 52 45 54 55 52 4E 22 00 5A |IME TO RETURN".Z|
00000D30: 15 BE 01 3A 20 20 99 22 20 20 54 4F 20 54 48 45 |...: ." TO THE|
00000D40: 20 4D 45 4E 55 20 46 4F 52 20 48 45 4C 50 2E 20 | MENU FOR HELP. |
00000D50: 20 D9 4F 55 20 57 49 4C 4C 22 00 86 15 C0 01 3A | .OU WILL".....:|
00000D60: 20 20 99 22 20 20 42 45 20 52 45 54 55 52 4E 45 | ." BE RETURNE|
00000D70: 44 20 54 4F 20 54 48 45 20 50 4C 41 43 45 20 49 |D TO THE PLACE I|
00000D80: 4E 20 54 48 45 22 00 B0 15 C2 01 3A 20 20 99 22 |N THE".....: ."|
00000D90: 20 20 50 52 4F 47 52 41 4D 20 57 48 45 52 45 20 | PROGRAM WHERE |
00000DA0: 59 4F 55 20 4C 45 46 54 20 4F 46 46 20 41 53 22 |YOU LEFT OFF AS"|
00000DB0: 00 DD 15 C4 01 3A 20 20 99 22 20 20 53 4F 4F 4E |.....: ." SOON|
00000DC0: 20 41 53 20 54 48 45 20 4F 50 54 49 4F 4E 20 46 | AS THE OPTION F|
00000DD0: 52 4F 4D 20 54 48 45 20 4D 45 4E 55 22 00 F6 15 |ROM THE MENU"...|
00000DE0: C6 01 3A 20 20 99 22 20 20 49 53 20 43 4F 4D 50 |..: ." IS COMP|
00000DF0: 4C 45 54 45 2E 22 00 02 16 E5 01 3A 20 20 8D 38 |LETE.".....: .8|
00000E00: 33 35 00 19 16 EA 01 3A 20 20 8B 55 5A B2 31 A7 |35.....: .UZ.1.|
00000E10: 9E 55 50 25 3A 89 32 31 37 00 22 16 F3 01 3A 20 |.UP%:.217."...: |
00000E20: 20 8E 00 46 16 F4 01 8F 2D 2D 2D 2D 2D 54 45 41 | ..F....-----TEA|
00000E30: 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F 4E |CHER INSTRUCTION|
00000E40: 53 2D 2D 2D 2D 2D 00 79 16 F5 01 3A 20 20 99 22 |S-----.y...: ."|
00000E50: 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 |.":.UT,UL%:..(50|
00000E60: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A |003).0..53281,2:|
00000E70: 97 35 33 32 38 30 2C 31 30 00 9E 16 F6 01 3A 20 |.53280,10.....: |
00000E80: 20 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 48 | UP.0:UG$.".EACH|
00000E90: 45 52 20 C9 4E 53 54 2E 22 3A 8D 38 35 30 00 CF |ER .NST.":.850..|
00000EA0: 16 F7 01 3A 20 20 99 22 11 11 20 20 20 20 20 20 |...: .".. |
00000EB0: D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 4F |.O THE BEST OF O|
00000EC0: 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 00 |UR KNOWLEDGE,.".|
00000ED0: FB 16 F8 01 3A 20 20 99 22 20 20 20 54 48 49 53 |....: ." THIS|
00000EE0: 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 | PROGRAM IS IN T|
00000EF0: 48 45 20 50 55 42 4C 49 43 11 22 00 2A 17 F9 01 |HE PUBLIC.".*...|
00000F00: 3A 20 20 99 22 20 20 20 44 4F 4D 41 49 4E 2E 20 |: ." DOMAIN. |
00000F10: 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 20 | .F THIS IS NOT |
00000F20: 54 48 45 20 43 41 53 45 11 22 00 4A 17 FA 01 3A |THE CASE.".J...:|
00000F30: 20 20 99 22 20 20 20 50 4C 45 41 53 45 20 43 4F | ." PLEASE CO|
00000F40: 4E 54 41 43 54 3A 11 11 11 22 00 77 17 FB 01 3A |NTACT:...".w...:|
00000F50: 20 20 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F 44 | ." .OMMOD|
00000F60: 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 43 |ORE .USINESS .AC|
00000F70: 48 49 4E 45 53 11 22 00 9D 17 FC 01 3A 20 20 99 |HINES.".....: .|
00000F80: 22 20 20 20 20 20 20 20 20 20 20 33 33 37 30 20 |" 3370 |
00000F90: D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 C4 17 |.HARMACY .VE....|
00000FA0: FD 01 3A 20 20 99 22 20 20 20 20 20 20 20 20 20 |..: ." |
00000FB0: 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 41 | .GINCOURT, .NTA|
00000FC0: 52 49 4F 22 00 E9 17 FE 01 3A 20 20 99 22 20 20 |RIO".....: ." |
00000FD0: 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 20 20 | .ANADA |
00000FE0: 20 CD 31 D7 20 32 CB 34 22 00 0C 18 FF 01 3A 20 | .1. 2.4".....: |
00000FF0: 20 99 22 20 20 20 20 20 20 20 20 20 20 28 34 31 | ." (41|
00001000: 36 29 20 34 39 39 2D 34 32 39 32 22 00 22 18 00 |6) 499-4292"."..|
00001010: 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 38 35 |.UP.1:. 835:. 85|
00001020: 30 3A 00 51 18 01 02 99 22 20 20 20 20 20 11 11 |0:.Q...." ..|
00001030: D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 C5 51 |.ROGRAM .AME: .Q|
00001040: 55 41 54 49 4F 4E 20 45 58 45 52 43 49 53 45 11 |UATION EXERCISE.|
00001050: 22 00 77 18 02 02 99 22 20 20 20 20 20 D7 52 49 |".w...." .RI|
00001060: 54 54 45 4E 20 C2 59 20 20 3A 20 D6 49 4E 43 45 |TTEN .Y : .INCE|
00001070: 20 CD 49 4C 4C 53 11 00 9F 18 03 02 99 22 20 20 | .ILLS......." |
00001080: 20 20 20 D5 50 47 52 41 44 45 44 20 C2 59 20 3A | .PGRADED .Y :|
00001090: 20 CC 59 4E 44 41 20 C2 4F 4E 41 4E 4E 4F 11 00 | .YNDA .ONANNO..|
000010A0: CA 18 04 02 99 22 20 20 20 20 20 11 D4 48 49 53 |....." ..HIS|
000010B0: 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 | PROGRAM WILL RU|
000010C0: 4E 20 4F 4E 20 41 4E 59 11 11 00 EA 18 07 02 99 |N ON ANY........|
000010D0: 22 20 20 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 |" ... 64|
000010E0: 20 C3 CF CD D0 D5 D4 C5 D2 11 00 0F 19 08 02 99 | ...............|
000010F0: 22 20 20 20 20 20 20 20 20 20 C3 CF CD CD CF C4 |" ......|
00001100: CF D2 C5 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 |... 64 .........|
00001110: 20 19 09 02 3A 20 20 8D 38 33 35 3A 8D 38 35 32 | ...: .835:.852|
00001120: 00 4D 19 0A 02 3A 20 20 99 22 11 20 20 20 20 C9 |.M...: .". .|
00001130: 27 4D 20 47 4F 49 4E 47 20 54 4F 20 50 52 49 4E |'M GOING TO PRIN|
00001140: 54 20 55 50 20 41 20 53 43 41 4C 45 22 00 7C 19 |T UP A SCALE".|.|
00001150: 0C 02 3A 20 20 99 22 11 20 42 41 4C 41 4E 43 45 |..: .". BALANCE|
00001160: 44 20 57 49 54 48 20 4D 41 52 42 4C 45 53 2E 20 |D WITH MARBLES. |
00001170: D3 4F 4D 45 20 4F 46 20 54 48 45 22 00 AD 19 0E |.OME OF THE"....|
00001180: 02 3A 20 20 99 22 11 20 4D 41 52 42 4C 45 53 20 |.: .". MARBLES |
00001190: 41 52 45 20 49 4E 20 55 4E 4D 41 52 4B 45 44 20 |ARE IN UNMARKED |
000011A0: 42 41 47 53 20 41 4E 44 20 41 4C 4C 22 00 DD 19 |BAGS AND ALL"...|
000011B0: 10 02 3A 20 20 99 22 11 20 4F 46 20 54 48 45 20 |..: .". OF THE |
000011C0: 42 41 47 53 20 43 4F 4E 54 41 49 4E 20 54 48 45 |BAGS CONTAIN THE|
000011D0: 20 53 41 4D 45 20 4E 55 4D 42 45 52 22 00 08 1A | SAME NUMBER"...|
000011E0: 12 02 3A 20 20 99 22 11 20 4F 46 20 4D 41 52 42 |..: .". OF MARB|
000011F0: 4C 45 53 2E 20 20 D9 4F 55 20 4D 55 53 54 20 46 |LES. .OU MUST F|
00001200: 49 4E 44 20 4F 55 54 22 00 36 1A 16 02 3A 20 20 |IND OUT".6...: |
00001210: 99 22 11 20 48 4F 57 20 4D 41 4E 59 20 4D 41 52 |.". HOW MANY MAR|
00001220: 42 4C 45 53 20 41 52 45 20 49 4E 20 45 41 43 48 |BLES ARE IN EACH|
00001230: 20 42 41 47 2E 22 00 66 1A 18 02 3A 20 20 99 22 | BAG.".f...: ."|
00001240: 11 20 D4 4F 20 44 4F 20 54 48 49 53 20 59 4F 55 |. .O DO THIS YOU|
00001250: 20 4D 55 53 54 20 47 45 54 20 52 49 44 20 4F 46 | MUST GET RID OF|
00001260: 20 4D 4F 53 54 22 00 96 1A 1A 02 3A 20 20 99 22 | MOST".....: ."|
00001270: 11 20 4F 46 20 54 48 45 20 42 41 47 53 20 41 4E |. OF THE BAGS AN|
00001280: 44 20 4D 41 52 42 4C 45 53 2C 20 55 4E 54 49 4C |D MARBLES, UNTIL|
00001290: 20 4F 4E 4C 59 22 00 C8 1A 1C 02 3A 20 20 99 22 | ONLY".....: ."|
000012A0: 11 20 4F 4E 45 20 42 41 47 20 41 4E 44 20 41 20 |. ONE BAG AND A |
000012B0: 50 49 4C 45 20 4F 46 20 4D 41 52 42 4C 45 53 20 |PILE OF MARBLES |
000012C0: 52 45 4D 41 49 4E 2E 22 00 D4 1A 2A 02 3A 20 20 |REMAIN."...*.: |
000012D0: 8D 38 33 35 00 EB 1A 4E 02 3A 20 20 8B 55 5A B2 |.835...N.: .UZ.|
000012E0: 31 A7 9E 55 50 25 3A 89 32 31 37 00 F4 1A 57 02 |1..UP%:.217...W.|
000012F0: 3A 20 20 8E 00 1D 1B 58 02 8F 2D 2D 2D 2D 2D 50 |: ....X..-----P|
00001300: 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 43 41 54 |ROGRAM MODIFICAT|
00001310: 49 4F 4E 20 49 4E 53 54 2D 2D 2D 2D 2D 00 31 1B |ION INST-----.1.|
00001320: 59 02 3A 20 20 99 22 93 22 3A 97 55 54 2C 55 4C |Y.: .".":.UT,UL|
00001330: 25 00 54 1B 5D 02 3A 20 20 55 50 B2 30 3A 55 47 |%.T.].: UP.0:UG|
00001340: 24 B2 22 D0 52 4F 47 52 41 4D 20 CD 4F 44 22 3A |$.".ROGRAM .OD":|
00001350: 8D 38 35 30 00 7F 1B 62 02 3A 20 20 99 22 11 11 |.850...b.: ."..|
00001360: 11 20 20 20 D4 48 49 53 20 50 52 4F 47 52 41 4D |. .HIS PROGRAM|
00001370: 20 44 4F 45 53 20 4E 4F 54 20 4C 45 4E 44 22 00 | DOES NOT LEND".|
00001380: AB 1B 64 02 3A 20 20 99 22 11 20 20 49 54 53 45 |..d.: .". ITSE|
00001390: 4C 46 20 54 4F 20 53 49 4D 50 4C 45 20 4D 4F 44 |LF TO SIMPLE MOD|
000013A0: 49 46 49 43 41 54 49 4F 4E 2E 22 00 D9 1B 66 02 |IFICATION."...f.|
000013B0: 3A 20 20 99 22 11 20 20 D9 4F 55 20 4D 41 59 2C |: .". .OU MAY,|
000013C0: 20 48 4F 57 45 56 45 52 2C 20 57 49 53 48 20 54 | HOWEVER, WISH T|
000013D0: 4F 20 43 48 41 4E 47 45 22 00 08 1C 68 02 3A 20 |O CHANGE"...h.: |
000013E0: 20 99 22 11 20 20 53 4F 4D 45 20 4F 46 20 54 48 | .". SOME OF TH|
000013F0: 45 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 |E STUDENT INSTRU|
00001400: 43 54 49 4F 4E 53 2E 22 00 39 1C 6A 02 3A 20 20 |CTIONS.".9.j.: |
00001410: 99 22 11 20 20 D4 48 49 53 20 49 53 20 53 49 4D |.". .HIS IS SIM|
00001420: 50 4C 59 20 41 20 4D 41 54 54 45 52 20 4F 46 20 |PLY A MATTER OF |
00001430: 43 48 41 4E 47 49 4E 47 22 00 64 1C 6C 02 3A 20 |CHANGING".d.l.: |
00001440: 20 99 22 11 20 20 54 48 45 20 50 52 49 4E 54 20 | .". THE PRINT |
00001450: 53 54 41 54 45 4D 45 4E 54 53 20 49 4E 20 4C 49 |STATEMENTS IN LI|
00001460: 4E 45 53 22 00 81 1C 6E 02 3A 20 20 99 22 11 20 |NES"...n.: .". |
00001470: 20 34 30 30 20 54 48 52 4F 55 47 48 20 34 39 39 | 400 THROUGH 499|
00001480: 2E 00 8D 1C 94 02 3A 20 20 8D 38 33 35 00 A4 1C |......: .835...|
00001490: B2 02 3A 20 20 8B 55 5A B2 31 A7 9E 55 50 25 3A |..: .UZ.1..UP%:|
000014A0: 89 32 31 37 00 AD 1C BB 02 3A 20 20 8E 00 D5 1C |.217.....: ....|
000014B0: BC 02 8F 2D 2D 2D 2D 2D 54 4F 20 55 53 45 20 38 |...-----TO USE 8|
000014C0: 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 33 32 |032 LOAD CBM4032|
000014D0: 2D 2D 2D 2D 2D 00 0B 1D C6 02 99 22 93 11 11 11 |-----......"....|
000014E0: 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E 47 20 |.BEFORE RUNNING |
000014F0: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F 4E 20 |THIS PROGRAM ON |
00001500: 41 4E 20 38 30 33 32 20 20 11 11 00 41 1D D0 02 |AN 8032 ...A...|
00001510: 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 48 45 |." LOAD THE|
00001520: 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 4F 47 | 'CBM 4032' PROG|
00001530: 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 11 11 |RAM.............|
00001540: 22 00 4A 1D DA 02 3A 20 20 8E 00 53 1D E4 02 3A |".J...: ..S...:|
00001550: 20 20 8F 00 73 1D 20 03 8F 20 2A 2A 20 54 20 49 | ..s. .. ** T I|
00001560: 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 45 | T L E P A G E|
00001570: 20 2A 2A 00 A7 1D 22 03 99 22 93 11 1D 05 22 3B | **...".."....";|
00001580: 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 |:.UT,UU%:..(5000|
00001590: 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A 97 |3).0..53280,14:.|
000015A0: 35 33 32 38 31 2C 36 00 BD 1D 24 03 81 49 B2 31 |53281,6...$..I.1|
000015B0: A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 D5 1D |.38:."...";:....|
000015C0: 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 A6 |&..I.1.22:."....|
000015D0: 92 22 3B 3A 82 00 ED 1D 28 03 81 49 B2 31 A4 33 |.";:....(..I.1.3|
000015E0: 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 05 1E |7:.".....";:....|
000015F0: 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 A6 |*..I.1.22:."....|
00001600: 92 22 3B 3A 82 00 2A 1E 2C 03 99 22 13 11 11 11 |.";:..*.,.."....|
00001610: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001620: 1D 1D 1D 1D 1D 12 A9 20 20 92 00 4C 1E 2E 03 99 |....... ..L....|
00001630: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00001640: 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 6D 1E 30 |.... . . ...m.0|
00001650: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00001660: 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 8B 1E |...... . ......|
00001670: 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |2.."............|
00001680: 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 B3 1E 34 03 |........ ....4.|
00001690: 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
000016A0: 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 20 |C O M M O D O R |
000016B0: 45 11 11 00 D6 1E 36 03 99 22 1D 1D 1D 1D 1D 1D |E.....6.."......|
000016C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 49 |.........EDUCATI|
000016D0: 4F 4E 41 4C 11 11 00 F5 1E 38 03 99 22 1D 1D 1D |ONAL.....8.."...|
000016E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F 46 |.............SOF|
000016F0: 54 57 41 52 45 00 10 1F 3A 03 8F 20 2A 2A 20 43 |TWARE...:.. ** C|
00001700: 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A 2A |OMMODORE LOGO **|
00001710: 00 48 1F 3B 03 99 C8 28 55 44 24 2C 32 34 29 3B |.H.;...(UD$,24);|
00001720: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 |"..........PRESS|
00001730: 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 41 | SPACE BAR OR WA|
00001740: 49 54 92 22 3A 49 B2 30 00 6A 1F 3C 03 A1 41 24 |IT.":I.0.j.<..A$|
00001750: 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 3A |:.A$.." ".I.I.1:|
00001760: 8B 49 B3 32 35 30 A7 38 32 38 00 91 1F 3E 03 3A |.I.250.828...>.:|
00001770: 20 20 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A | T1$."":T2$."":|
00001780: 54 33 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 |T3$."":T4$."":I.|
00001790: 30 00 9D 1F 40 03 3A 20 20 89 33 30 30 00 BC 1F |0...@.: .300...|
000017A0: 43 03 8F 2D 2D 2D 2D 2D 53 50 41 43 45 20 42 41 |C..-----SPACE BA|
000017B0: 52 20 50 52 45 53 53 2D 2D 2D 2D 2D 00 F4 1F 48 |R PRESS-----...H|
000017C0: 03 3A 20 20 99 C8 28 55 44 24 2C 32 34 29 3B 22 |.: ..(UD$,24);"|
000017D0: 1D 1D 1D 1D 1D 1D 12 50 52 45 53 53 20 53 50 41 |.......PRESS SPA|
000017E0: 43 45 20 42 41 52 20 54 4F 20 43 4F 4E 54 49 4E |CE BAR TO CONTIN|
000017F0: 55 45 92 22 00 0E 20 4C 03 3A 20 20 A1 55 49 24 |UE.".. L.: .UI$|
00001800: 3A 8B 55 49 24 B3 B1 22 20 22 A7 38 34 34 00 17 |:.UI$.." ".844..|
00001810: 20 4E 03 3A 20 20 8E 00 3A 20 52 03 8F 2D 2D 2D | N.: ..: R..---|
00001820: 2D 2D 50 41 47 45 20 44 45 53 49 47 4E 20 52 4F |--PAGE DESIGN RO|
00001830: 55 54 49 4E 45 2D 2D 2D 2D 2D 00 49 20 54 03 3A |UTINE-----.I T.:|
00001840: 20 20 55 50 B2 55 50 AA 31 00 73 20 57 03 3A 20 | UP.UP.1.s W.: |
00001850: 20 99 22 93 22 C8 28 55 54 24 AA 55 50 24 2C 32 | .".".(UT$.UP$,2|
00001860: 31 29 3B C8 28 55 47 24 AA 55 50 24 2C 31 34 29 |1);.(UG$.UP$,14)|
00001870: 3B 55 50 00 A5 20 5C 03 3A 20 20 99 22 20 2D 2D |;UP.. \.: ." --|
00001880: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001890: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000018A0: 2D 2D 2D 2D 22 00 DC 20 61 03 3A 20 20 99 C8 28 |----".. a.: ..(|
000018B0: 55 44 24 2C 32 34 29 3B C8 28 55 50 24 2C 36 29 |UD$,24);.(UP$,6)|
000018C0: 3B 22 48 45 4C 50 20 2D 20 50 52 45 53 53 20 20 |;"HELP - PRESS |
000018D0: 20 48 20 3C 52 45 54 55 52 4E 3E 22 00 EB 20 66 | H <RETURN>".. f|
000018E0: 03 3A 20 20 99 22 13 11 22 3A 8E 00 0D 21 6B 03 |.: ."..":...!k.|
000018F0: 8F 2D 2D 2D 2D 2D 50 4C 45 41 53 45 20 57 41 49 |.-----PLEASE WAI|
00001900: 54 20 52 45 4D 41 52 4B 2D 2D 2D 2D 2D 00 46 21 |T REMARK-----.F!|
00001910: 70 03 3A 20 20 99 C8 28 55 44 24 2C 32 34 29 3B |p.: ..(UD$,24);|
00001920: 22 20 20 20 20 20 20 20 20 20 20 20 4F 4E 45 20 |" ONE |
00001930: 4D 4F 4D 45 4E 54 20 50 4C 45 41 53 45 2E 2E 2E |MOMENT PLEASE...|
00001940: 20 20 20 20 20 22 00 4F 21 75 03 3A 20 20 8E 00 | ".O!u.: ..|
00001950: 6F 21 84 03 8F 2D 2D 2D 2D 2D 53 45 54 20 55 50 |o!...-----SET UP|
00001960: 20 56 41 52 49 41 42 4C 45 53 2D 2D 2D 2D 2D 00 | VARIABLES-----.|
00001970: BD 21 85 03 3A 20 20 55 58 24 B2 22 48 22 3A 86 |.!..: UX$."H":.|
00001980: 55 51 25 28 31 30 30 30 29 3A 55 42 B2 33 32 37 |UQ%(1000):UB.327|
00001990: 36 38 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 |68:U1.196:U2.197|
000019A0: 3A 55 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 |:U3.198:U4.216:U|
000019B0: 43 B2 31 36 37 3A 55 55 B2 31 30 32 34 00 F6 21 |C.167:UU.1024..!|
000019C0: 86 03 3A 20 20 55 54 B2 35 39 34 36 38 3A 55 55 |..: UT.59468:UU|
000019D0: 25 B2 31 32 3A 55 4C 25 B2 31 34 3A 55 50 25 B2 |%.12:UL%.14:UP%.|
000019E0: 31 31 34 36 3A 55 4D B2 33 32 37 36 38 3A 97 35 |1146:UM.32768:.5|
000019F0: 30 30 30 33 2C 30 00 39 22 87 03 8B C2 28 35 30 |0003,0.9"....(50|
00001A00: 30 30 33 29 B2 30 A7 55 42 B2 31 30 32 34 3A 55 |003).0.UB.1024:U|
00001A10: 31 B2 32 30 39 3A 55 32 B2 32 31 30 3A 55 33 B2 |1.209:U2.210:U3.|
00001A20: 32 31 31 3A 55 34 B2 32 31 34 3A 55 43 B2 32 30 |211:U4.214:UC.20|
00001A30: 34 3A 55 55 B2 32 30 34 38 00 71 22 88 03 8B C2 |4:UU.2048.q"....|
00001A40: 28 35 30 30 30 33 29 B2 30 A7 55 54 B2 35 33 32 |(50003).0.UT.532|
00001A50: 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 B2 32 33 |72:UU%.21:UL%.23|
00001A60: 3A 55 50 25 B2 32 31 33 39 3A 55 4D B2 31 30 32 |:UP%.2139:UM.102|
00001A70: 34 00 98 22 89 03 3A 20 20 55 44 24 B2 22 13 11 |4.."..: UD$."..|
00001A80: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001A90: 11 11 11 11 11 11 11 22 00 CD 22 8A 03 3A 20 20 |.......".."..: |
00001AA0: 55 50 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 |UP$." |
00001AB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001AC0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 1B 23 | "..#|
00001AD0: 8B 03 3A 20 20 55 54 24 B2 22 20 C5 D1 D5 C1 D4 |..: UT$." .....|
00001AE0: C9 CF CE 20 C5 D8 C5 D2 C3 C9 D3 C5 A0 22 3A 8F |... .........":.|
00001AF0: 20 50 4C 41 43 45 20 50 52 4F 47 52 41 4D 20 54 | PLACE PROGRAM T|
00001B00: 49 54 4C 45 20 48 45 52 45 21 21 21 21 21 21 21 |ITLE HERE!!!!!!!|
00001B10: 21 21 21 21 21 21 21 21 2A 2A 2A 00 24 23 8C 03 |!!!!!!!!***.$#..|
00001B20: 3A 20 20 8E 00 41 23 8E 03 8F 2D 2D 2D 2D 2D 53 |: ..A#...-----S|
00001B30: 45 54 20 56 41 52 49 41 42 4C 45 53 2D 2D 2D 2D |ET VARIABLES----|
00001B40: 2D 00 4D 23 93 03 3A 20 20 8D 39 30 30 00 53 23 |-.M#..: .900.S#|
00001B50: 95 03 3A 00 71 23 98 03 8F 2D 2D 2D 2D 2D 43 48 |..:.q#...-----CH|
00001B60: 45 43 4B 20 46 4F 52 20 38 30 33 32 2D 2D 2D 2D |ECK FOR 8032----|
00001B70: 2D 00 92 23 9D 03 3A 20 20 99 22 93 22 3A 99 22 |-..#..: .".":."|
00001B80: A0 22 3A 8F 20 53 48 49 46 54 45 44 20 53 50 41 |.":. SHIFTED SPA|
00001B90: 43 45 00 AC 23 A2 03 3A 20 20 8B C2 28 55 42 AA |CE..#..: ..(UB.|
00001BA0: 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 C8 23 A3 |40)..96..700..#.|
00001BB0: 03 8F 2D 2D 2D 2D 2D 4D 45 4D 4F 52 59 20 43 48 |..-----MEMORY CH|
00001BC0: 45 43 4B 2D 2D 2D 2D 2D 00 DF 23 A4 03 3A 20 20 |ECK-----..#..: |
00001BD0: 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 33 37 00 |. .(0).2000.937.|
00001BE0: 10 24 A5 03 3A 20 20 99 22 93 11 11 05 54 48 49 |.$..: ."....THI|
00001BF0: 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 53 20 4E |S MACHINE DOES N|
00001C00: 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 48 11 22 |OT HAVE ENOUGH."|
00001C10: 00 37 24 A6 03 3A 20 20 99 22 4D 45 4D 4F 52 59 |.7$..: ."MEMORY|
00001C20: 20 54 4F 20 52 55 4E 20 54 48 49 53 20 50 52 4F | TO RUN THIS PRO|
00001C30: 47 52 41 4D 20 21 22 00 45 24 A7 03 3A 20 20 9E |GRAM !".E$..: .|
00001C40: 55 55 AA 37 31 00 4E 24 A8 03 3A 20 20 80 00 6B |UU.71.N$..: ..k|
00001C50: 24 A9 03 3A 20 20 99 22 93 05 22 3A 8B C2 28 35 |$..: ."..":..(5|
00001C60: 30 30 30 33 29 B2 30 A7 39 36 32 00 9D 24 AC 03 |0003).0.962..$..|
00001C70: 8F 2D 2D 2D 2D 2D 42 41 53 49 43 20 32 2E 30 20 |.-----BASIC 2.0 |
00001C80: 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 20 43 2D | OR 4.0 OR C-|
00001C90: 36 34 20 53 45 54 55 50 2D 2D 2D 2D 2D 00 DB 24 |64 SETUP-----..$|
00001CA0: AD 03 97 31 30 37 35 2C 31 33 33 3A 97 31 30 37 |...1075,133:.107|
00001CB0: 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 33 34 3A |6,144:.1077,234:|
00001CC0: 97 31 30 37 39 2C 34 3A 97 31 30 38 30 2C 31 33 |.1079,4:.1080,13|
00001CD0: 33 3A 97 31 30 38 31 2C 31 34 35 00 11 25 AE 03 |3:.1081,145..%..|
00001CE0: 97 31 30 39 31 2C 31 35 35 3A 97 31 30 39 38 2C |.1091,155:.1098,|
00001CF0: 31 33 33 3A 97 31 30 39 39 2C 31 34 34 3A 97 31 |133:.1099,144:.1|
00001D00: 31 30 30 2C 32 33 34 3A 97 31 31 30 33 2C 31 33 |100,234:.1103,13|
00001D10: 33 00 33 25 AF 03 97 31 31 30 34 2C 31 34 35 3A |3.3%...1104,145:|
00001D20: 97 31 31 30 35 2C 32 33 34 3A 97 31 30 38 32 2C |.1105,234:.1082,|
00001D30: 32 33 34 00 4D 25 B1 03 3A 20 20 8B C2 28 35 30 |234.M%..: ..(50|
00001D40: 30 30 33 29 B3 B1 31 36 30 A7 39 35 35 00 7F 25 |003)..160.955..%|
00001D50: B6 03 3A 20 20 97 31 30 39 33 2C 38 38 3A 97 31 |..: .1093,88:.1|
00001D60: 30 39 34 2C 32 32 38 3A 97 31 30 39 37 2C 38 35 |094,228:.1097,85|
00001D70: 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 36 35 00 |:.1102,228:.965.|
00001D80: 97 25 BB 03 3A 20 20 8B C2 28 35 30 30 30 33 29 |.%..: ..(50003)|
00001D90: B3 B1 31 A7 39 39 30 00 C9 25 C0 03 3A 20 20 97 |..1.990..%..: .|
00001DA0: 31 30 39 33 2C 34 39 3A 97 31 30 39 34 2C 32 33 |1093,49:.1094,23|
00001DB0: 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 31 30 32 |0:.1097,46:.1102|
00001DC0: 2C 32 33 30 3A 89 39 36 35 00 03 26 C2 03 97 32 |,230:.965..&...2|
00001DD0: 30 39 39 2C 31 34 31 3A 97 32 31 30 30 2C 32 30 |099,141:.2100,20|
00001DE0: 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 33 2C 38 |:.2101,3:.2103,8|
00001DF0: 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 31 30 35 |:.2104,141:.2105|
00001E00: 2C 32 31 00 3F 26 C3 03 97 32 31 30 36 2C 33 3A |,21.?&...2106,3:|
00001E10: 97 32 31 31 35 2C 31 34 35 3A 97 32 31 31 37 2C |.2115,145:.2117,|
00001E20: 35 32 3A 97 32 31 31 38 2C 32 33 34 3A 97 32 31 |52:.2118,234:.21|
00001E30: 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 34 31 00 |21,49:.2122,141.|
00001E40: 79 26 C4 03 97 32 31 32 33 2C 32 30 3A 97 32 31 |y&...2123,20:.21|
00001E50: 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 34 3A 97 |24,3:.2126,234:.|
00001E60: 32 31 32 37 2C 31 34 31 3A 97 32 31 32 38 2C 32 |2127,141:.2128,2|
00001E70: 31 3A 97 32 31 32 39 2C 33 00 9A 26 C5 03 3A 20 |1:.2129,3..&..: |
00001E80: 20 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 42 4C | .UU.48:. DISABL|
00001E90: 45 20 53 54 4F 50 20 4B 45 59 00 AE 26 CA 03 3A |E STOP KEY..&..:|
00001EA0: 20 20 8D 38 30 30 3A 8F 20 54 49 54 4C 45 00 C1 | .800:. TITLE..|
00001EB0: 26 D4 03 3A 20 20 89 33 30 30 3A 8F 20 4D 45 4E |&..: .300:. MEN|
00001EC0: 55 00 F5 26 DE 03 3A 20 20 99 22 93 54 48 45 20 |U..&..: .".THE |
00001ED0: 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 |PGM WILL NOT WOR|
00001EE0: 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 49 4E |K ON THIS MACHIN|
00001EF0: 45 21 22 3A 80 00 2F 27 E8 03 3A 20 8B 55 5A B2 |E!":../'..: .UZ.|
00001F00: 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 |1..UP%:.UP%:UZ.0|
00001F10: 3A 8F 2D 2D 2D 2D 2D 50 52 4F 47 52 41 4D 20 53 |:.-----PROGRAM S|
00001F20: 54 41 52 54 53 20 48 45 52 45 2D 2D 2D 2D 2D 00 |TARTS HERE-----.|
00001F30: 59 27 E9 03 99 22 93 05 22 3B 3A 8B C2 28 35 30 |Y'..."..";:..(50|
00001F40: 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A |003).0..53281,6:|
00001F50: 97 35 33 32 38 30 2C 31 34 00 7F 27 F2 03 8F 20 |.53280,14..'... |
00001F60: 47 41 4D 45 2E 2E 2E 2E 45 51 55 41 54 49 4F 4E |GAME....EQUATION|
00001F70: 53 2E 2E 2E 2E 36 32 20 2D 20 56 31 31 2E 31 00 |S....62 - V11.1.|
00001F80: A5 27 FC 03 8F 20 42 59 20 56 49 4E 43 45 20 4D |.'... BY VINCE M|
00001F90: 49 4C 4C 53 20 2D 20 28 34 31 35 29 20 35 32 33 |ILLS - (415) 523|
00001FA0: 2D 37 31 36 33 00 CB 27 06 04 8F 20 43 4F 50 59 |-7163..'... COPY|
00001FB0: 52 49 47 48 54 20 4D 41 59 20 31 39 38 30 20 2D |RIGHT MAY 1980 -|
00001FC0: 20 50 45 52 4D 49 53 53 49 4F 4E 00 F2 27 10 04 | PERMISSION..'..|
00001FD0: 8F 20 52 45 53 45 52 56 45 44 20 2D 20 4C 49 4D |. RESERVED - LIM|
00001FE0: 49 54 45 44 20 44 49 53 54 52 49 42 55 54 49 4F |ITED DISTRIBUTIO|
00001FF0: 4E 2E 00 04 28 1A 04 99 22 93 22 3A 97 20 55 54 |N...(...".":. UT|
00002000: 2C 55 4C 25 00 1A 28 24 04 8B 20 C2 28 38 39 38 |,UL%..($.. .(898|
00002010: 29 B2 31 20 A7 20 31 30 39 30 00 3A 28 2E 04 8F |).1 . 1090.:(...|
00002020: 20 2D 2D 2D 20 53 45 54 55 50 2D 2D 2D 2D 2D 2D | --- SETUP------|
00002030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 50 28 38 04 97 |----------.P(8..|
00002040: 38 39 37 2C 31 3A 97 38 39 38 2C 31 3A 50 B2 31 |897,1:.898,1:P.1|
00002050: 00 6C 28 42 04 42 31 24 B2 22 12 DF A9 11 9D 9D |.l(B.B1$."......|
00002060: A9 DF 11 9D 9D A4 A4 91 91 1D 92 22 00 86 28 4C |..........."..(L|
00002070: 04 4D 24 B2 22 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 D7 |.M$."...........|
00002080: D7 D7 D7 D7 D7 22 00 B0 28 56 04 50 31 24 B2 22 |....."..(V.P1$."|
00002090: 92 20 B7 B7 B7 B7 B7 B7 12 20 92 B7 B7 B7 B7 B7 |. ....... ......|
000020A0: B7 9D 9D 9D 9D 9D 9D 9D 11 12 20 92 11 9D D1 22 |.......... ...."|
000020B0: 00 E2 28 60 04 4D 31 24 B2 22 20 20 20 20 20 20 |..(`.M1$." |
000020C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000020D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000020E0: 20 22 00 FE 28 6A 04 4E 31 24 B2 22 92 20 20 20 | "..(j.N1$.". |
000020F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 1A | "..|
00002100: 29 74 04 4E 32 24 B2 22 11 9D 9D 9D 9D 9D 9D 9D |)t.N2$."........|
00002110: 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 00 35 29 7E 04 4E |.........".5)~.N|
00002120: 33 24 B2 22 41 4D 4F 55 4E 54 20 4F 4E 20 54 48 |3$."AMOUNT ON TH|
00002130: 49 53 20 20 22 00 5A 29 88 04 4E 34 24 B2 22 53 |IS ".Z)..N4$."S|
00002140: 49 44 45 20 5B 20 20 20 20 20 20 20 20 20 20 9D |IDE [ .|
00002150: 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 00 7B 29 92 04 4E |.........".{)..N|
00002160: 36 24 B2 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |6$."............|
00002170: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 86 29 9C 04 |.........."..)..|
00002180: 89 20 31 32 30 30 00 A4 29 A6 04 99 20 C9 28 C4 |. 1200..)... .(.|
00002190: 28 44 30 29 2C C3 28 C4 28 44 30 29 29 AB 31 29 |(D0),.(.(D0)).1)|
000021A0: 3B 20 3A 8E 00 C4 29 B0 04 8F 20 2D 2D 2D 20 49 |; :...)... --- I|
000021B0: 4E 53 54 52 55 43 54 49 4F 4E 53 2D 2D 2D 2D 2D |NSTRUCTIONS-----|
000021C0: 2D 2D 2D 2D 00 F0 29 BA 04 99 22 93 22 3A 58 B2 |----..)...".":X.|
000021D0: 31 33 3A 59 B2 30 3A 8D 20 32 39 32 30 3A 99 22 |13:Y.0:. 2920:."|
000021E0: 12 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 3B |..............";|
000021F0: 00 12 2A C4 04 59 B2 31 3A 8D 20 32 39 32 30 3A |..*..Y.1:. 2920:|
00002200: 99 22 12 DD 20 C5 51 55 41 54 49 4F 4E 53 20 DD |.".. .QUATIONS .|
00002210: 22 3B 00 33 2A CE 04 59 B2 32 3A 8D 20 32 39 32 |";.3*..Y.2:. 292|
00002220: 30 3A 99 22 12 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |0:."............|
00002230: C0 BD 22 00 39 2A E2 04 99 00 69 2A 50 05 99 3A |..".9*....i*P..:|
00002240: 99 22 11 11 11 11 20 D7 49 4C 4C 20 59 4F 55 20 |.".... .ILL YOU |
00002250: 44 45 46 49 4E 45 20 54 48 45 20 45 51 55 41 54 |DEFINE THE EQUAT|
00002260: 49 4F 4E 53 20 3F 20 22 3B 00 8E 2A 5A 05 55 4C |IONS ? ";..*Z.UL|
00002270: B2 31 3A 55 53 24 B2 22 59 4E 48 22 3A 8D 33 35 |.1:US$."YNH":.35|
00002280: 3A 8B 55 52 24 B2 22 59 22 A7 31 35 32 30 00 A5 |:.UR$."Y".1520..|
00002290: 2A 64 05 8F 20 2D 2D 2D 20 50 49 43 4B 20 50 52 |*d.. --- PICK PR|
000022A0: 4F 42 4C 45 4D 00 AE 2A 6E 05 99 22 93 22 00 BA |OBLEM..*n.."."..|
000022B0: 2A 78 05 43 B2 30 3A 42 B2 30 00 CE 2A 82 05 45 |*x.C.0:B.0..*..E|
000022C0: B2 32 AA B5 28 BB 28 30 29 AC 37 2E 39 29 00 E7 |.2..(.(0).7.9)..|
000022D0: 2A 8C 05 8B 20 50 B2 32 20 A7 20 41 B2 31 20 3A |*... P.2 . A.1 :|
000022E0: 20 89 20 31 34 36 30 00 FB 2A 96 05 41 B2 32 AA | . 1460..*..A.2.|
000022F0: B5 28 BB 28 30 29 AC 31 2E 39 29 00 0C 2B A0 05 |.(.(0).1.9)..+..|
00002300: 8B 20 50 B3 37 20 A7 20 31 34 36 30 00 22 2B AA |. P.7 . 1460."+.|
00002310: 05 43 B2 31 AA B5 28 BB 28 30 29 AC 28 41 AB 31 |.C.1..(.(0).(A.1|
00002320: 29 29 00 33 2B B4 05 8B 20 50 B2 31 20 A7 20 31 |)).3+... P.1 . 1|
00002330: 35 30 30 00 40 2B BE 05 42 B2 32 38 AB 39 AC 41 |500.@+..B.28.9.A|
00002340: 00 52 2B C8 05 8B 20 41 B3 B1 31 20 A7 20 31 35 |.R+... A..1 . 15|
00002350: 30 30 00 6C 2B D2 05 42 B2 32 39 AA B5 28 BB 28 |00.l+..B.29..(.(|
00002360: 30 29 AC 31 30 2E 39 29 AB 39 AC 41 00 7C 2B DC |0).10.9).9.A.|+.|
00002370: 05 44 B2 41 AC 45 AA 42 AB 43 AC 45 00 87 2B E6 |.D.A.E.B.C.E..+.|
00002380: 05 89 20 31 37 34 30 00 CF 2B F0 05 8F 20 2D 2D |.. 1740..+... --|
00002390: 2D 20 55 53 45 52 20 50 52 4F 42 4C 45 4D 2D 2D |- USER PROBLEM--|
000023A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000023B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000023C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 |---------------.|
000023D0: E3 2B F5 05 55 53 24 B2 22 48 32 33 34 35 36 37 |.+..US$."H234567|
000023E0: 38 39 22 00 EE 2B FA 05 97 38 39 37 2C 30 00 FC |89"..+...897,0..|
000023F0: 2B 04 06 97 35 39 34 36 38 2C 31 34 00 34 2C 0E |+...59468,14.4,.|
00002400: 06 99 20 22 93 11 11 11 11 11 11 11 20 C8 4F 57 |.. "........ .OW|
00002410: 20 4D 41 4E 59 20 4D 41 52 42 4C 45 53 20 49 4E | MANY MARBLES IN|
00002420: 20 45 41 43 48 20 42 41 47 20 5B 32 2D 39 5D 20 | EACH BAG [2-9] |
00002430: 3F 20 22 3B 00 41 2C 18 06 55 4C B2 31 3A 8D 33 |? ";.A,..UL.1:.3|
00002440: 35 00 4E 2C 22 06 45 B2 C5 28 55 52 24 29 00 67 |5.N,".E..(UR$).g|
00002450: 2C 2C 06 8B 20 45 B3 32 20 B0 20 45 B1 39 20 A7 |,,.. E.2 . E.9 .|
00002460: 20 89 20 31 35 35 30 00 A6 2C 36 06 55 53 24 B2 | . 1550..,6.US$.|
00002470: 22 48 31 32 33 22 3A 99 22 20 C8 4F 57 20 4D 41 |"H123":." .OW MA|
00002480: 4E 59 20 42 41 47 53 20 4F 4E 20 54 48 45 20 4C |NY BAGS ON THE L|
00002490: 45 46 54 20 5B 31 2D 33 5D 20 3F 22 3B 3A 55 4C |EFT [1-3] ?";:UL|
000024A0: B2 31 3A 8D 33 35 00 B3 2C 40 06 41 B2 C5 28 55 |.1:.35..,@.A..(U|
000024B0: 52 24 29 00 CA 2C 4A 06 8B 20 41 B3 31 20 B0 20 |R$)..,J.. A.1 . |
000024C0: 41 B1 33 20 A7 20 31 35 39 30 00 EE 2C 54 06 8B |A.3 . 1590..,T..|
000024D0: 20 41 B2 31 20 A7 20 55 53 24 B2 22 30 31 32 33 | A.1 . US$."0123|
000024E0: 34 35 36 37 38 39 48 22 3A 89 31 36 36 30 00 04 |456789H":.1660..|
000024F0: 2D 59 06 55 53 24 B2 22 30 31 32 33 34 35 36 37 |-Y.US$."01234567|
00002500: 38 39 48 22 00 42 2D 5E 06 99 22 11 1D C8 4F 57 |89H".B-^.."...OW|
00002510: 20 4D 41 4E 59 20 42 41 47 53 20 4F 4E 20 54 48 | MANY BAGS ON TH|
00002520: 45 20 52 49 47 48 54 20 5B 30 2D 22 3B 3A 44 30 |E RIGHT [0-";:D0|
00002530: B2 41 AB 31 3A 8D 31 31 39 30 3A 99 22 5D 20 3F |.A.1:.1190:."] ?|
00002540: 22 3B 00 58 2D 68 06 55 4C B2 32 3A 8D 33 35 3A |";.X-h.UL.2:.35:|
00002550: 43 B2 C5 28 55 52 24 29 00 79 2D 72 06 8B 20 43 |C..(UR$).y-r.. C|
00002560: B3 2E 20 B0 20 43 B1 41 AB 31 20 A7 20 99 22 91 |.. . C.A.1 . .".|
00002570: 91 91 22 3A 89 31 36 33 30 00 BC 2D 7C 06 99 22 |..":.1630..-|.."|
00002580: 11 1D C8 4F 57 20 4D 41 4E 59 20 4D 41 52 42 4C |...OW MANY MARBL|
00002590: 45 53 20 4F 4E 20 54 48 45 20 4C 45 46 54 20 5B |ES ON THE LEFT [|
000025A0: 30 2D 22 3B 3A 44 30 B2 33 39 AB 39 AC 41 3A 8D |0-";:D0.39.9.A:.|
000025B0: 31 31 39 30 3A 99 22 5D 20 3F 22 3B 00 D2 2D 86 |1190:."] ?";..-.|
000025C0: 06 55 4C B2 32 3A 8D 33 35 3A 42 B2 C5 28 55 52 |.UL.2:.35:B..(UR|
000025D0: 24 29 00 F7 2D 90 06 8B 20 42 B3 2E 20 B0 20 42 |$)..-... B.. . B|
000025E0: B1 33 39 AB 39 AC 41 20 A7 99 22 91 91 91 91 22 |.39.9.A .."...."|
000025F0: 3A 89 20 31 36 36 30 00 07 2E 9A 06 44 B2 41 AC |:. 1660.....D.A.|
00002600: 45 AA 42 AB 43 AC 45 00 1D 2E A4 06 8B 20 44 AB |E.B.C.E...... D.|
00002610: B5 28 44 29 B2 30 20 A7 20 31 37 32 30 00 4C 2E |.(D).0 . 1720.L.|
00002620: AE 06 99 20 22 11 D4 C8 C5 A0 CE D5 CD C2 C5 D2 |... "...........|
00002630: D3 A0 C4 CF CE 27 D4 A0 C1 C4 C4 A0 D5 D0 2E 22 |.....'........."|
00002640: 3A 8D 38 33 35 3A 89 20 31 35 32 30 00 6D 2E B8 |:.835:. 1520.m..|
00002650: 06 8F 20 20 57 54 3D 31 3A 47 4F 53 55 42 20 32 |.. WT=1:GOSUB 2|
00002660: 38 38 30 3A 50 52 49 4E 54 22 93 22 3B 00 77 2E |880:PRINT".";.w.|
00002670: C2 06 99 22 93 22 3B 00 8A 2E CC 06 8F 20 2D 2D |...".";...... --|
00002680: 2D 20 52 55 4E 20 47 41 4D 45 00 97 2E D6 06 97 |- RUN GAME......|
00002690: 20 55 54 2C 55 55 25 00 A2 2E E0 06 8D 20 32 39 | UT,UU%...... 29|
000026A0: 37 30 00 B6 2E EA 06 58 B2 2E 3A 59 B2 31 32 3A |70.....X..:Y.12:|
000026B0: 8D 20 32 39 32 30 00 D5 2E F4 06 99 22 20 20 20 |. 2920......" |
000026C0: 20 20 20 20 20 20 20 20 20 46 55 4E 43 54 49 4F | FUNCTIO|
000026D0: 4E 53 3A 11 22 00 F5 2E FE 06 99 22 20 20 20 20 |NS:."......" |
000026E0: 20 20 20 20 20 20 20 20 20 31 2D 41 44 44 20 42 | 1-ADD B|
000026F0: 41 4C 4C 53 22 00 1A 2F 08 07 99 22 20 20 20 20 |ALLS"../..." |
00002700: 20 20 20 20 20 20 20 20 20 32 2D 53 55 42 54 52 | 2-SUBTR|
00002710: 41 43 54 20 42 41 4C 4C 53 22 00 39 2F 12 07 99 |ACT BALLS".9/...|
00002720: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 33 2D |" 3-|
00002730: 41 44 44 20 42 41 47 53 22 00 5D 2F 1C 07 99 22 |ADD BAGS".]/..."|
00002740: 20 20 20 20 20 20 20 20 20 20 20 20 20 34 2D 53 | 4-S|
00002750: 55 42 54 52 41 43 54 20 42 41 47 53 22 00 7A 2F |UBTRACT BAGS".z/|
00002760: 26 07 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |&.." |
00002770: 20 35 2D 44 49 56 49 44 45 22 00 97 2F 30 07 99 | 5-DIVIDE"../0..|
00002780: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 36 2D |" 6-|
00002790: 53 4F 4C 56 45 11 22 00 B7 2F 3A 07 99 22 20 20 |SOLVE."../:.." |
000027A0: 20 20 20 20 20 20 20 20 20 20 46 55 4E 43 54 49 | FUNCTI|
000027B0: 4F 4E 20 3F 20 22 3B 00 D2 2F 44 07 55 4C B2 31 |ON ? ";../D.UL.1|
000027C0: 3A 55 53 24 B2 22 48 31 32 33 34 35 36 22 3A 8D |:US$."H123456":.|
000027D0: 33 35 00 DF 2F 4E 07 46 B2 C5 28 55 52 24 29 00 |35../N.F..(UR$).|
000027E0: F2 2F 58 07 58 B2 30 3A 59 B2 31 32 3A 8D 32 39 |./X.X.0:Y.12:.29|
000027F0: 32 30 00 FE 2F 5A 07 81 51 B2 31 A4 31 31 00 30 |20../Z..Q.1.11.0|
00002800: 30 5C 07 3A 20 20 99 22 20 20 20 20 20 20 20 20 |0\.: ." |
00002810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002830: 00 37 30 5E 07 82 51 00 5F 30 6C 07 91 20 46 20 |.70^..Q._0l.. F |
00002840: 89 20 31 39 31 30 2C 32 30 32 30 2C 32 31 33 30 |. 1910,2020,2130|
00002850: 2C 32 32 34 30 2C 32 33 35 30 2C 32 34 39 30 00 |,2240,2350,2490.|
00002860: 73 30 76 07 8F 20 2D 2D 2D 20 41 44 44 20 42 41 |s0v.. --- ADD BA|
00002870: 4C 4C 53 00 81 30 80 07 57 31 B2 42 3A 57 32 B2 |LLS..0..W1.B:W2.|
00002880: 44 00 9C 30 8A 07 58 B2 31 3A 59 B2 31 31 3A 8D |D..0..X.1:Y.11:.|
00002890: 20 32 39 32 30 3A 4E 35 24 B2 22 22 00 BA 30 94 | 2920:N5$.""..0.|
000028A0: 07 4C 30 B2 2E 3A 48 30 B2 33 39 AB 28 41 AC 39 |.L0..:H0.39.(A.9|
000028B0: AA 52 29 3A 8D 20 33 34 30 30 00 D1 30 9E 07 57 |.R):. 3400..0..W|
000028C0: 33 B2 C5 28 42 24 29 3A 42 B2 42 AA C5 28 42 24 |3..(B$):B.B..(B$|
000028D0: 29 00 DC 30 A8 07 8D 20 33 34 36 30 00 F9 30 B2 |)..0... 3460..0.|
000028E0: 07 58 B2 32 33 3A 59 B2 31 31 3A 8D 20 32 39 32 |.X.23:Y.11:. 292|
000028F0: 30 3A 4E 35 24 B2 4E 36 24 00 17 31 BC 07 4C 30 |0:N5$.N6$..1..L0|
00002900: B2 2E 3A 48 30 B2 33 39 AB 28 43 AC 39 AA 44 29 |..:H0.39.(C.9.D)|
00002910: 3A 8D 20 33 34 30 30 00 2E 31 C6 07 57 34 B2 C5 |:. 3400..1..W4..|
00002920: 28 42 24 29 3A 44 B2 44 AA C5 28 42 24 29 00 4C |(B$):D.D..(B$).L|
00002930: 31 D0 07 8B 20 57 33 B3 B1 57 34 20 A7 42 B2 57 |1... W3..W4 .B.W|
00002940: 31 3A 44 B2 57 32 3A 89 33 33 35 30 00 57 31 DA |1:D.W2:.3350.W1.|
00002950: 07 89 20 31 37 34 30 00 70 31 E4 07 8F 20 2D 2D |.. 1740.p1... --|
00002960: 2D 20 53 55 42 54 52 41 43 54 20 42 41 4C 4C 53 |- SUBTRACT BALLS|
00002970: 00 7E 31 EE 07 57 31 B2 42 3A 57 32 B2 44 00 99 |.~1..W1.B:W2.D..|
00002980: 31 F8 07 58 B2 31 3A 59 B2 31 31 3A 8D 20 32 39 |1..X.1:Y.11:. 29|
00002990: 32 30 3A 4E 35 24 B2 22 22 00 AE 31 02 08 4C 30 |20:N5$.""..1..L0|
000029A0: B2 2E 3A 48 30 B2 42 3A 8D 20 33 34 30 30 00 C5 |..:H0.B:. 3400..|
000029B0: 31 0C 08 57 33 B2 C5 28 42 24 29 3A 42 B2 42 AB |1..W3..(B$):B.B.|
000029C0: C5 28 42 24 29 00 D0 31 16 08 8D 20 33 34 36 30 |.(B$)..1... 3460|
000029D0: 00 ED 31 20 08 58 B2 32 33 3A 59 B2 31 31 3A 8D |..1 .X.23:Y.11:.|
000029E0: 20 32 39 32 30 3A 4E 35 24 B2 4E 36 24 00 02 32 | 2920:N5$.N6$..2|
000029F0: 2A 08 4C 30 B2 2E 3A 48 30 B2 44 3A 8D 20 33 34 |*.L0..:H0.D:. 34|
00002A00: 30 30 00 19 32 34 08 57 34 B2 C5 28 42 24 29 3A |00..24.W4..(B$):|
00002A10: 44 B2 44 AB C5 28 42 24 29 00 37 32 3E 08 8B 20 |D.D..(B$).72>.. |
00002A20: 57 33 B3 B1 57 34 20 A7 42 B2 57 31 3A 44 B2 57 |W3..W4 .B.W1:D.W|
00002A30: 32 3A 89 33 33 35 30 00 42 32 48 08 89 20 31 37 |2:.3350.B2H.. 17|
00002A40: 34 30 00 55 32 52 08 8F 20 2D 2D 2D 20 41 44 44 |40.U2R.. --- ADD|
00002A50: 20 42 41 47 53 00 63 32 5C 08 57 31 B2 41 3A 57 | BAGS.c2\.W1.A:W|
00002A60: 32 B2 43 00 7E 32 66 08 58 B2 31 3A 59 B2 31 31 |2.C.~2f.X.1:Y.11|
00002A70: 3A 8D 20 32 39 32 30 3A 4E 35 24 B2 22 22 00 A3 |:. 2920:N5$.""..|
00002A80: 32 70 08 4C 30 B2 2E 3A 48 30 B2 B5 28 28 33 39 |2p.L0..:H0..((39|
00002A90: AB 28 41 AC 39 AA 42 29 29 AD 39 29 3A 8D 20 33 |.(A.9.B)).9):. 3|
00002AA0: 34 30 30 00 BA 32 7A 08 57 33 B2 C5 28 42 24 29 |400..2z.W3..(B$)|
00002AB0: 3A 41 B2 41 AA C5 28 42 24 29 00 C5 32 84 08 8D |:A.A..(B$)..2...|
00002AC0: 20 33 34 36 30 00 E2 32 8E 08 58 B2 32 33 3A 59 | 3460..2..X.23:Y|
00002AD0: B2 31 31 3A 8D 20 32 39 32 30 3A 4E 35 24 B2 4E |.11:. 2920:N5$.N|
00002AE0: 36 24 00 07 33 98 08 4C 30 B2 2E 3A 48 30 B2 B5 |6$..3..L0..:H0..|
00002AF0: 28 28 33 39 AB 28 43 AC 39 AA 44 29 29 AD 39 29 |((39.(C.9.D)).9)|
00002B00: 3A 8D 20 33 34 30 30 00 1E 33 A2 08 57 34 B2 C5 |:. 3400..3..W4..|
00002B10: 28 42 24 29 3A 43 B2 43 AA C5 28 42 24 29 00 3C |(B$):C.C..(B$).<|
00002B20: 33 AC 08 8B 20 57 33 B3 B1 57 34 20 A7 41 B2 57 |3... W3..W4 .A.W|
00002B30: 31 3A 43 B2 57 32 3A 89 33 33 35 30 00 47 33 B6 |1:C.W2:.3350.G3.|
00002B40: 08 89 20 31 37 34 30 00 5F 33 C0 08 8F 20 2D 2D |.. 1740._3... --|
00002B50: 2D 20 53 55 42 54 52 41 43 54 20 42 41 47 53 00 |- SUBTRACT BAGS.|
00002B60: 6D 33 CA 08 57 31 B2 41 3A 57 32 B2 43 00 88 33 |m3..W1.A:W2.C..3|
00002B70: D4 08 58 B2 31 3A 59 B2 31 31 3A 8D 20 32 39 32 |..X.1:Y.11:. 292|
00002B80: 30 3A 4E 35 24 B2 22 22 00 9D 33 DE 08 4C 30 B2 |0:N5$.""..3..L0.|
00002B90: 2E 3A 48 30 B2 41 3A 8D 20 33 34 30 30 00 B4 33 |.:H0.A:. 3400..3|
00002BA0: E8 08 57 33 B2 C5 28 42 24 29 3A 41 B2 41 AB C5 |..W3..(B$):A.A..|
00002BB0: 28 42 24 29 00 BF 33 F2 08 8D 20 33 34 36 30 00 |(B$)..3... 3460.|
00002BC0: DC 33 FC 08 58 B2 32 33 3A 59 B2 31 31 3A 8D 20 |.3..X.23:Y.11:. |
00002BD0: 32 39 32 30 3A 4E 35 24 B2 4E 36 24 00 F1 33 06 |2920:N5$.N6$..3.|
00002BE0: 09 4C 30 B2 2E 3A 48 30 B2 43 3A 8D 20 33 34 30 |.L0..:H0.C:. 340|
00002BF0: 30 00 08 34 10 09 57 34 B2 C5 28 42 24 29 3A 43 |0..4..W4..(B$):C|
00002C00: B2 43 AB C5 28 42 24 29 00 26 34 1A 09 8B 20 57 |.C..(B$).&4... W|
00002C10: 33 B3 B1 57 34 20 A7 41 B2 57 31 3A 43 B2 57 32 |3..W4 .A.W1:C.W2|
00002C20: 3A 89 33 33 35 30 00 31 34 24 09 89 20 31 37 34 |:.3350.14$.. 174|
00002C30: 30 00 42 34 2E 09 8F 20 2D 2D 2D 20 44 49 56 49 |0.B4... --- DIVI|
00002C40: 44 45 00 73 34 38 09 58 B2 39 3A 59 B2 31 31 3A |DE.s48.X.9:Y.11:|
00002C50: 8D 20 32 39 32 30 3A 99 22 92 20 20 20 20 20 20 |. 2920:.". |
00002C60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002C70: 20 22 3B 00 A4 34 42 09 59 B2 31 32 3A 8D 20 32 | ";..4B.Y.12:. 2|
00002C80: 39 32 30 3A 99 22 44 49 56 49 44 45 20 42 59 20 |920:."DIVIDE BY |
00002C90: 57 48 41 54 20 46 41 43 54 4F 52 20 3F 22 3B 3A |WHAT FACTOR ?";:|
00002CA0: 59 B2 31 34 00 E4 34 4C 09 8D 32 39 32 30 3A 99 |Y.14..4L..2920:.|
00002CB0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00002CC0: 20 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D | ........|
00002CD0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 20 |............... |
00002CE0: 5B 31 22 3B 00 FE 34 56 09 96 20 A5 41 28 54 30 |[1";..4V.. .A(T0|
00002CF0: 29 B2 54 30 AD 49 AB B5 28 54 30 AD 49 29 00 1D |).T0.I..(T0.I)..|
00002D00: 35 60 09 53 30 28 31 29 B2 AB 31 3A 81 20 49 B2 |5`.S0(1)..1:. I.|
00002D10: 32 20 A4 20 33 3A 53 30 28 49 29 B2 30 00 4D 35 |2 . 3:S0(I).0.M5|
00002D20: 6A 09 8B 20 A5 41 28 41 29 B2 2E AF 20 A5 41 28 |j.. .A(A)... .A(|
00002D30: 42 29 B2 2E AF A5 41 28 43 29 B2 2E 20 AF 20 A5 |B)....A(C).. . .|
00002D40: 41 28 44 29 B2 2E 20 A7 20 32 34 33 30 00 58 35 |A(D).. . 2430.X5|
00002D50: 74 09 89 20 32 34 34 30 00 78 35 7E 09 99 20 22 |t.. 2440.x5~.. "|
00002D60: 2D 22 3B 3A 44 30 B2 49 3A 8D 20 31 31 39 30 3A |-";:D0.I:. 1190:|
00002D70: 53 30 28 49 29 B2 AB 31 00 80 35 88 09 82 20 49 |S0(I)..1..5... I|
00002D80: 00 B1 35 92 09 99 22 5D 20 3F 22 3B 3A 55 4C B2 |..5..."] ?";:UL.|
00002D90: 31 3A 55 53 24 B2 22 48 31 32 33 34 35 36 37 38 |1:US$."H12345678|
00002DA0: 39 30 22 3A 8D 33 35 3A 42 30 B2 C5 28 55 52 24 |90":.35:B0..(UR$|
00002DB0: 29 00 DC 35 9C 09 8B 20 42 30 20 B3 20 31 20 B0 |)..5... B0 . 1 .|
00002DC0: 20 42 30 20 B1 20 33 20 A7 20 57 54 B2 32 3A 8D | B0 . 3 . WT.2:.|
00002DD0: 20 32 38 38 30 3A 89 20 32 33 38 30 00 FA 35 A6 | 2880:. 2380..5.|
00002DE0: 09 8B 20 A8 20 53 30 28 42 30 29 20 A7 20 42 30 |.. . S0(B0) . B0|
00002DF0: B2 AB 31 3A 89 20 32 34 36 30 00 2E 36 B0 09 41 |..1:. 2460..6..A|
00002E00: B2 41 AD 42 30 3A 42 B2 42 AD 42 30 3A 43 B2 43 |.A.B0:B.B.B0:C.C|
00002E10: AD 42 30 3A 44 B2 44 AD 42 30 3A 99 22 93 22 3B |.B0:D.D.B0:.".";|
00002E20: 3A 8D 20 33 30 30 30 3A 89 20 31 37 37 30 00 3E |:. 3000:. 1770.>|
00002E30: 36 BA 09 8F 20 2D 2D 2D 20 53 4F 4C 56 45 00 5F |6... --- SOLVE._|
00002E40: 36 C4 09 8B 20 41 AC 42 B2 2E 20 AF 20 43 AC 44 |6... A.B.. . C.D|
00002E50: B2 2E 20 AF 20 41 B2 31 20 A7 20 32 35 33 30 00 |.. . A.1 . 2530.|
00002E60: 92 36 CE 09 58 B2 39 3A 59 B2 31 31 3A 8D 32 39 |.6..X.9:Y.11:.29|
00002E70: 32 30 3A 99 22 12 20 53 49 4D 50 4C 49 46 59 20 |20:.". SIMPLIFY |
00002E80: 53 4F 4D 45 20 4D 4F 52 45 20 21 20 22 3A 8D 38 |SOME MORE ! ":.8|
00002E90: 33 35 00 C0 36 D8 09 58 B2 39 3A 59 B2 31 31 3A |35..6..X.9:Y.11:|
00002EA0: 8D 32 39 32 30 3A 99 22 20 20 20 20 20 20 20 20 |.2920:." |
00002EB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002EC0: 00 FA 36 DD 09 58 B2 36 3A 59 B2 32 33 3A 8D 32 |..6..X.6:Y.23:.2|
00002ED0: 39 32 30 3A 99 22 20 20 20 20 20 20 20 20 20 20 |920:." |
00002EE0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002EF0: 20 20 22 3A 89 20 31 37 37 30 00 30 37 E2 09 58 | ":. 1770.07..X|
00002F00: B2 39 3A 59 B2 31 31 3A 8D 20 32 39 32 30 3A 99 |.9:Y.11:. 2920:.|
00002F10: 22 92 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00002F20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00002F30: 00 5C 37 EC 09 59 B2 31 32 3A 8D 20 32 39 32 30 |.\7..Y.12:. 2920|
00002F40: 3A 99 22 20 48 4F 57 20 4D 41 4E 59 20 42 41 4C |:." HOW MANY BAL|
00002F50: 4C 53 20 41 52 45 20 49 4E 20 22 3B 00 9F 37 F6 |LS ARE IN ";..7.|
00002F60: 09 59 B2 31 33 3A 8D 20 32 39 32 30 3A 99 22 20 |.Y.13:. 2920:." |
00002F70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002F80: 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ..........|
00002F90: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 |.............";.|
00002FA0: CE 37 00 0A 99 22 20 54 48 45 20 42 41 47 20 3F |.7..." THE BAG ?|
00002FB0: 20 22 3B 3A 55 4C B2 31 3A 55 53 24 B2 22 48 30 | ";:UL.1:US$."H0|
00002FC0: 31 32 33 34 35 36 37 38 39 22 3A 8D 33 35 00 F3 |123456789":.35..|
00002FD0: 37 0A 0A 8B 20 C5 28 55 52 24 29 B3 B1 45 20 A7 |7... .(UR$)..E .|
00002FE0: 20 57 54 B2 32 3A 8D 20 32 38 38 30 3A 89 20 32 | WT.2:. 2880:. 2|
00002FF0: 35 35 30 00 20 38 14 0A 59 B2 31 35 3A 8D 20 32 |550. 8..Y.15:. 2|
00003000: 39 32 30 3A 99 22 92 20 20 20 20 20 20 20 20 20 |920:.". |
00003010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3B | ";|
00003020: 00 4C 38 1E 0A 59 B2 31 36 3A 8D 20 32 39 32 30 |.L8..Y.16:. 2920|
00003030: 3A 99 22 20 54 48 41 54 27 53 20 52 49 47 48 54 |:." THAT'S RIGHT|
00003040: 20 21 21 21 21 21 21 21 20 20 22 3B 00 5E 38 28 | !!!!!!! ";.^8(|
00003050: 0A 59 B2 31 37 3A 8D 20 32 39 32 30 3A 99 00 99 |.Y.17:. 2920:...|
00003060: 38 32 0A 58 B2 32 3A 59 B2 32 33 3A 8D 20 32 39 |82.X.2:Y.23:. 29|
00003070: 32 30 3A 99 22 20 44 4F 20 59 4F 55 20 57 41 4E |20:." DO YOU WAN|
00003080: 54 20 54 4F 20 54 52 59 20 41 4E 4F 54 48 45 52 |T TO TRY ANOTHER|
00003090: 3F 20 28 59 2F 4E 29 22 3B 00 BE 38 37 0A 55 4C |? (Y/N)";..87.UL|
000030A0: B2 31 3A 55 53 24 B2 22 48 59 4E 22 3A 8D 33 35 |.1:US$."HYN":.35|
000030B0: 3A 8B 55 52 24 B2 22 59 22 A7 32 36 32 30 00 06 |:.UR$."Y".2620..|
000030C0: 39 39 0A 89 33 30 30 3A 8F 2D 2D 52 45 54 55 52 |99..300:.--RETUR|
000030D0: 4E 20 54 4F 20 4D 45 4E 55 2D 2D 2D 2D 2D 2D 2D |N TO MENU-------|
000030E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000030F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003100: 2D 2D 2D 2D 2D 2D 00 1C 39 3C 0A 8B 20 C2 28 38 |------..9<.. .(8|
00003110: 39 37 29 B2 30 20 A7 20 31 35 32 30 00 4E 39 46 |97).0 . 1520.N9F|
00003120: 0A 97 38 39 37 2C C2 28 38 39 37 29 AA 31 3A 50 |..897,.(897).1:P|
00003130: B2 B5 28 BB 28 30 29 AC C2 28 38 39 37 29 AA 2E |..(.(0)..(897)..|
00003140: 39 29 3A 99 22 93 22 3B 3A 89 31 33 38 30 00 70 |9):.".";:.1380.p|
00003150: 39 40 0B 8F 2D 57 41 49 54 2D 2D 2D 2D 2D 2D 2D |9@..-WAIT-------|
00003160: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00003170: 00 7F 39 4A 0B 54 B2 54 49 AA 36 30 AC 57 54 00 |..9J.T.TI.60.WT.|
00003180: 91 39 54 0B 8B 20 54 B1 54 49 20 A7 20 32 39 30 |.9T.. T.TI . 290|
00003190: 30 00 97 39 5E 0B 8E 00 B9 39 68 0B 8F 2D 4D 4F |0..9^....9h..-MO|
000031A0: 56 45 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |VE--------------|
000031B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E9 39 72 0B 44 44 |---------..9r.DD|
000031C0: 24 B2 22 11 11 11 11 11 11 11 11 11 11 11 11 11 |$.".............|
000031D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
000031E0: 11 11 22 3A 99 22 13 22 3B 00 FD 39 7C 0B 8B 20 |..":.".";..9|.. |
000031F0: 59 B2 30 20 A7 20 99 A6 58 29 3B 3A 8E 00 16 3A |Y.0 . ..X);:...:|
00003200: 86 0B 8B 20 58 B2 30 20 A7 20 99 C8 28 44 44 24 |... X.0 . ..(DD$|
00003210: 2C 59 29 3B 3A 8E 00 2A 3A 90 0B 99 C8 28 44 44 |,Y);:..*:....(DD|
00003220: 24 2C 59 29 A6 58 29 3B 3A 8E 00 48 3A 9A 0B 8F |$,Y).X);:..H:...|
00003230: 20 2D 2D 20 55 50 44 41 54 45 20 42 41 4C 41 4E | -- UPDATE BALAN|
00003240: 43 45 20 53 43 41 4C 45 00 52 3A A4 0B 99 22 13 |CE SCALE.R:...".|
00003250: 22 3B 00 68 3A AE 0B 81 20 49 B2 31 A4 31 36 3A |";.h:... I.1.16:|
00003260: 99 4D 31 24 3A 82 20 49 00 7A 3A B8 0B 5A B2 43 |.M1$:. I.z:..Z.C|
00003270: AC 45 AA 44 AB 41 AC 45 AB 42 00 8E 3A C2 0B 58 |.E.D.A.E.B..:..X|
00003280: B2 31 39 3A 59 B2 37 3A 8D 20 32 39 32 30 00 AE |.19:Y.7:. 2920..|
00003290: 3A CC 0B 99 22 12 A9 DF 11 9D 9D 9D A9 D2 D2 DF |:..."...........|
000032A0: 11 9D 9D 9D 9D 9D A9 20 C4 C4 20 DF 22 3B 00 BA |....... .. .";..|
000032B0: 3A D6 0B 58 B2 2E 3A 59 B2 34 00 CA 3A E0 0B 8B |:..X..:Y.4..:...|
000032C0: 20 5A B1 30 20 A7 20 59 B2 33 00 DA 3A EA 0B 8B | Z.0 . Y.3..:...|
000032D0: 20 5A B3 30 20 A7 20 59 B2 35 00 EC 3A F4 0B 8D | Z.0 . Y.5..:...|
000032E0: 20 32 39 32 30 3A 99 20 50 31 24 3B 00 21 3B FE | 2920:. P1$;.!;.|
000032F0: 0B 8B 20 5A B2 30 20 A7 20 99 22 C5 C5 C5 C5 C5 |.. Z.0 . .".....|
00003300: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00003310: C5 C5 C5 91 91 9D 9D 9D 9D 9D 9D 9D 22 50 31 24 |............"P1$|
00003320: 3B 00 56 3B 08 0C 8B 20 5A B1 30 20 A7 20 99 22 |;.V;... Z.0 . ."|
00003330: A3 A3 A3 C4 C4 C4 C0 C0 C0 D2 D2 D2 11 A3 A3 A3 |................|
00003340: C4 C4 C4 C0 C0 C0 D2 D2 D2 91 9D 9D 9D 9D 9D 9D |................|
00003350: 9D 22 50 31 24 3B 00 8D 3B 12 0C 8B 20 5A B3 30 |."P1$;..;... Z.0|
00003360: 20 A7 20 99 22 91 D2 D2 D2 C0 C0 C0 C4 C4 C4 A3 | . ."...........|
00003370: A3 A3 91 D2 D2 D2 C0 C0 C0 C4 C4 C4 A3 A3 A3 91 |................|
00003380: 91 9D 9D 9D 9D 9D 9D 9D 22 50 31 24 3B 00 99 3B |........"P1$;..;|
00003390: 1C 0C 58 B2 30 3A 59 B2 31 00 A9 3B 26 0C 8B 20 |..X.0:Y.1..;&.. |
000033A0: 5A B1 2E 20 A7 20 59 B2 30 00 B9 3B 30 0C 8B 20 |Z.. . Y.0..;0.. |
000033B0: 5A B3 2E 20 A7 20 59 B2 32 00 C8 3B 3A 0C 58 B2 |Z.. . Y.2..;:.X.|
000033C0: 2E 3A 8D 20 32 39 32 30 00 DD 3B 44 0C 51 31 B2 |.:. 2920..;D.Q1.|
000033D0: 41 3A 51 32 B2 42 3A 8D 20 33 32 31 30 00 EA 3B |A:Q2.B:. 3210..;|
000033E0: 4E 0C 58 B2 32 35 3A 59 B2 31 00 FA 3B 58 0C 8B |N.X.25:Y.1..;X..|
000033F0: 20 5A B3 2E 20 A7 20 59 B2 30 00 0A 3C 62 0C 8B | Z.. . Y.0..<b..|
00003400: 20 5A B1 2E 20 A7 20 59 B2 32 00 15 3C 6C 0C 8D | Z.. . Y.2..<l..|
00003410: 20 32 39 32 30 00 2A 3C 76 0C 51 31 B2 43 3A 51 | 2920.*<v.Q1.C:Q|
00003420: 32 B2 44 3A 8D 20 33 32 31 30 00 30 3C 80 0C 8E |2.D:. 3210.0<...|
00003430: 00 47 3C 8A 0C 8F 20 2D 2D 20 50 52 49 4E 54 20 |.G<... -- PRINT |
00003440: 41 20 50 4C 41 54 45 00 52 3C 94 0C 99 20 22 1D |A PLATE.R<... ".|
00003450: 22 3B 00 66 3C 9E 0C 8B 20 51 31 B2 2E 20 A7 20 |";.f<... Q1.. . |
00003460: 89 20 33 32 35 30 00 7E 3C A8 0C 81 20 49 B2 31 |. 3250.~<... I.1|
00003470: A4 51 31 3A 99 20 42 31 24 3B 3A 82 20 49 00 89 |.Q1:. B1$;:. I..|
00003480: 3C B2 0C 99 22 11 11 22 3B 00 9A 3C BC 0C 51 33 |<..."..";..<..Q3|
00003490: B2 31 33 AB 28 33 AC 51 31 29 00 AE 3C C6 0C 8B |.13.(3.Q1)..<...|
000034A0: 20 51 33 B1 51 32 20 A7 20 51 33 B2 51 32 00 C0 | Q3.Q2 . Q3.Q2..|
000034B0: 3C D0 0C 8B 20 51 33 B2 30 20 A7 20 33 33 34 30 |<... Q3.0 . 3340|
000034C0: 00 CD 3C DA 0C 51 32 B2 51 32 AB 51 33 00 DD 3C |..<..Q2.Q2.Q3..<|
000034D0: E4 0C 99 20 C9 28 4D 24 2C 51 33 29 3B 00 FB 3C |... .(M$,Q3);..<|
000034E0: EE 0C 99 C9 28 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |....("..........|
000034F0: 9D 9D 9D 9D 9D 22 2C 51 33 29 3B 00 06 3D F8 0C |.....",Q3);..=..|
00003500: 99 20 22 91 22 3B 00 11 3D 02 0D 89 20 33 32 36 |. ".";..=... 326|
00003510: 30 00 17 3D 0C 0D 8E 00 47 3D 16 0D 58 B2 38 3A |0..=....G=..X.8:|
00003520: 59 B2 31 34 3A 8D 20 32 39 32 30 3A 99 22 92 A4 |Y.14:. 2920:."..|
00003530: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00003540: A4 A4 A4 A4 A4 A4 22 00 73 3D 20 0D 59 B2 31 35 |......".s= .Y.15|
00003550: 3A 8D 20 32 39 32 30 3A 99 22 12 59 4F 55 20 48 |:. 2920:.".YOU H|
00003560: 41 56 45 20 54 4F 20 44 4F 20 54 48 45 20 53 41 |AVE TO DO THE SA|
00003570: 4D 45 22 00 9F 3D 2A 0D 59 B2 31 36 3A 8D 20 32 |ME"..=*.Y.16:. 2|
00003580: 39 32 30 3A 99 22 12 20 54 48 49 4E 47 20 4F 4E |920:.". THING ON|
00003590: 20 42 4F 54 48 20 53 49 44 45 53 20 21 20 22 00 | BOTH SIDES ! ".|
000035A0: AF 3D 34 0D 57 54 B2 33 3A 8D 20 32 38 38 30 00 |.=4.WT.3:. 2880.|
000035B0: C8 3D 3E 0D 99 20 22 93 22 3B 3A 8D 20 33 30 30 |.=>.. ".";:. 300|
000035C0: 30 3A 89 20 31 37 37 30 00 E2 3D 48 0D 8F 20 2D |0:. 1770..=H.. -|
000035D0: 2D 20 47 45 54 20 41 4D 4F 55 4E 54 53 20 53 55 |- GET AMOUNTS SU|
000035E0: 42 52 00 F9 3D 52 0D 99 20 4E 31 24 4E 32 24 4E |BR..=R.. N1$N2$N|
000035F0: 33 24 4E 32 24 4E 34 24 3B 00 28 3E 5C 0D 44 30 |3$N2$N4$;.(>\.D0|
00003600: B2 4C 30 3A 8D 31 31 39 30 3A 99 22 2D 22 3B 3A |.L0:.1190:."-";:|
00003610: 44 30 B2 48 30 3A 8D 31 31 39 30 3A 99 22 5D 20 |D0.H0:.1190:."] |
00003620: 3F 22 3B 3A 55 4C B2 32 00 68 3E 66 0D 55 53 24 |?";:UL.2.h>f.US$|
00003630: B2 22 48 30 31 32 33 34 35 36 37 38 39 22 3A 8D |."H0123456789":.|
00003640: 33 35 3A 42 24 B2 55 52 24 3A 8B 20 C5 28 42 24 |35:B$.UR$:. .(B$|
00003650: 29 B1 B2 4C 30 20 AF 20 C5 28 42 24 29 B3 B2 48 |)..L0 . .(B$)..H|
00003660: 30 20 A7 20 33 34 35 30 00 91 3E 70 0D 99 20 22 |0 . 3450..>p.. "|
00003670: 1D 91 22 4E 35 24 4E 34 24 C4 28 4C 30 29 22 2D |.."N5$N4$.(L0)"-|
00003680: 22 C4 28 48 30 29 22 3E 22 3B 3A 89 20 33 34 33 |".(H0)">";:. 343|
00003690: 30 00 97 3E 7A 0D 8E 00 BA 3E 84 0D 99 22 13 22 |0..>z....>..."."|
000036A0: 3B 3A 81 49 B2 31 A4 31 36 3A 99 4D 31 24 3A 82 |;:.I.1.16:.M1$:.|
000036B0: 49 3A 8D 20 33 30 30 30 3A 8E 00 C0 3E 8E 0D 80 |I:. 3000:...>...|
000036C0: 00 00 00 |... |
.......910.*.... ** ML STOP KEY DISABLE
**.U...."X.=........X` ......L4.X.1.....
...X`.T...."XHHH.H.HHHHHHH.H.HX`111"....
.."HHHHHHH`1"...... ** 4 - POP ML SUBROU
TINE **.I....---GENERAL INPUT ROUTINE---
-.O...:......-----SET UP VARIABLES-----.
.....SUBTRACT BAGS.....:.....:.+.#..----
-INPUT SECTION-----.@.(.: UR$."":UI$.""
.T.*.: . UL.0.UL.80.G.-.." ..";:.UC,0.
~.2.: .UI$:.UI$."".50...7.: .UI$.G(13)
.C(UR$)..1..UC,1:." .";:.85.A.<.: .UI$.
G(20).105.Y.>.: . C(UR$)..UL .50...A.:
.120:. CHECK FOR VALID CHARACTER...F.:
UR$.UR$.UI$.!.K.: .UI$;.,.P.: .50.R.U
..-----CHECK FOR HELP REQUEST-----.}.Z.:
.UR$.UX$.195:. EXIT TO HELP ROUTINE...
_.: .UF.1..240...D.: UF.0:.:....F..----
-CHECK DELETE-----.M.I.: .C(UR$).1.50...
N.: UR$.H(UR$,C(UR$).1)...S.: .". ..";:
.50.%.X..-----CHECK FOR VALID CHARACTERS
-----.:.}.: .C(US$).0.150.N...: .US.1.
C(US$).J...: .UI$.J(US$,US,1)...S...:
......: UI$."":.......-----STANDARD I
NPUT-----.....: .F(UI$).46. ..K...: .U
I$.G(32). .... .: .F(UI$).48 . F(UI$).5
7.170.....: ......: .F(UI$).65 . F(UI$
).90.180.!...: ..J...: .F(UI$).193 . F
(UI$).218.UI$."":..X...: .B(UT).12.B(UT
).21.UI$.G(F(UI$).128):......: ......:
UI$."":....C.: UF.1:.-----HELP ROUTINE
EXIT-----.F.E.: .250.R.H.: .245...M.:
.UQ.UB.(U2%.256.U1%.U3%.2)...R.: UQ%(
UQ.UB).B(UQ):.:.".".).W.: UZ.1:UV%.B(UT
).5.X.: .300.Z.Y.UZ.0:US$.UJ$:UG$.UK$:U
P.UJ:UL.UK...Z..B(50003).0..53281,1:."."
;:.53281,6:.53280,14:.220......".";.J...
UT$.UL$:.UT,UV%:.UQ.UB.(U2%.256.U1%.U3%.
3).....: .UQ,UQ%(UQ.UB):......: .U1,U1
%.....: .U2,U2%.....: .U4,U4%. ...: .
U3,U3%.1.+...: .35.`...: UD%.((U2%.256
.U1%.U3%).UB).40:.H(UD$,UD%.1):......:
.H(UD$,24);" . HELP
COMING . ":..M...: U1%.B(U1):U2%.B(U2
):U3%.B(U3):U4%.B(U4).....UJ$.US$:UJ.UL.
....: UJ$.US$:UK$.UG$:UJ.UP:UK.UL.....:
....,..-----MENU-----.%.-.:.W...: .".
":.UT,UU%:.B(50003).0..53281,9:.53280,8.
]./.:.}.1.: .". MENU"...
6.: ." --------------------------------
------".X.;.: .".. 1. EQUATION
EXERCISE...@.: .".. 2. STUDENT
INSTRUCTIONS".2.E.: .".. 3. TEA
CHER INSTRUCTIONS".B.J.: .".. 4.
MODIFICATION OF PROGRAM"...O.: ."..
5. QUIT.."...T.: ." ------------
--------------------------"...Y.: ."..
PRESS A NUMBER KEY (1-5) ";...^.:
UL.1:US$."12345":.35:.---INPUT ROUTINE-
--. .`.: US$."".D.C.: .E(UR$).1000,400
,500,600,396.P.H.: .300.Z....-----RE-EN
ABLE STOP KEY AND END-----.....: .B(500
03)..1.B(50003)..160.B(50003)..0.399.Y..
.: .UU.71:.B(50003).0..53281,6:.53280,1
4.....: ."..":......: .875:.......----
-STUDENT INSTRUCTIONS-----.L...: .".":.
UT,UL%:.B(50003).0..53281,0:.53280,0.M..
.UP.0:UG$."STUDENT INST":.850.....: .".
.. I'M GOING TO PRINT UP A SCALE".K...
: ." BALANCED WITH MARBLES. SOME OF T
HE".....: ." MARBLES ARE IN UNMARKED B
AGS AND ALL".,...: ." OF THE BAGS CONT
AIN THE SAME NUMBER".W...: ." OF MARBL
ES. YOU MUST FIND OUT".....: ." HOW M
ANY MARBLES ARE IN EACH BAG.".....: ."
TO DO THIS YOU MUST GET RID OF MOST"...
..: ." OF THE BAGS AND MARBLES, UNTIL
ONLY".....: ." ONE BAG AND A PILE OF M
ARBLES REMAIN.".G...: .". BE SURE TO K
EEP THE SCALE BALANCED".S...: .835._...
: .850.....: ."...... REMEMBER TO HI
T <RETURN> AFTER".....: ." TYPING YOUR
ANSWER. THIS TELLS".....: ." THE COM
PUTER TO ACCEPT WHAT YOU".....: ." HAV
E TYPED..".....: ." TYPE <H> AT ANY T
IME TO RETURN".Z...: ." TO THE MENU FO
R HELP. YOU WILL".....: ." BE RETURNE
D TO THE PLACE IN THE"...B.: ." PROGRA
M WHERE YOU LEFT OFF AS"...D.: ." SOON
AS THE OPTION FROM THE MENU"...F.: ."
IS COMPLETE.".....: .835.....: .UZ.1.
.UP%:.217."...: ..F....-----TEACHER INS
TRUCTIONS-----.Y...: .".":.UT,UL%:.B(50
003).0..53281,2:.53280,10.....: UP.0:UG
$."TEACHER INST.":.850.O...: ."..
TO THE BEST OF OUR KNOWLEDGE,.".....: .
" THIS PROGRAM IS IN THE PUBLIC.".*...
: ." DOMAIN. IF THIS IS NOT THE CASE
.".J...: ." PLEASE CONTACT:...".W...:
." COMMODORE BUSINESS MACHINES.".
....: ." 3370 PHARMACY AVE..D.
..: ." AGINCOURT, ONTARIO"....
.: ." CANADA M1W 2K4".....:
." (416) 499-4292"."...UP.1:.
835:. 850:.Q...." ..PROGRAM NAME: EQ
UATION EXERCISE.".W...." WRITTEN BY
: VINCE MILLS......." UPGRADED BY :
LYNDA BONANNO..J...." .THIS PROGRAM
WILL RUN ON ANY........" PET 64
COMPUTER......." COMMODORE 64 C
OMPUTER. ...: .835:.852.M...: .". I
'M GOING TO PRINT UP A SCALE".|...: .".
BALANCED WITH MARBLES. SOME OF THE"....
.: .". MARBLES ARE IN UNMARKED BAGS AND
ALL".....: .". OF THE BAGS CONTAIN THE
SAME NUMBER".....: .". OF MARBLES. YO
U MUST FIND OUT".6...: .". HOW MANY MAR
BLES ARE IN EACH BAG.".F...: .". TO DO
THIS YOU MUST GET RID OF MOST".....: ."
. OF THE BAGS AND MARBLES, UNTIL ONLY".H
...: .". ONE BAG AND A PILE OF MARBLES
REMAIN.".T.*.: .835...N.: .UZ.1..UP%:.
217...W.: ....X..-----PROGRAM MODIFICAT
ION INST-----.1.Y.: .".":.UT,UL%.T.].:
UP.0:UG$."PROGRAM MOD":.850..B.: ."..
. THIS PROGRAM DOES NOT LEND"...D.: .
". ITSELF TO SIMPLE MODIFICATION.".Y.F.
: .". YOU MAY, HOWEVER, WISH TO CHANGE
"...H.: .". SOME OF THE STUDENT INSTRU
CTIONS.".9.J.: .". THIS IS SIMPLY A MA
TTER OF CHANGING".D.L.: .". THE PRINT
STATEMENTS IN LINES"...N.: .". 400 THR
OUGH 499......: .835.....: .UZ.1..UP%:
.217.....: ..U....-----TO USE 8032 LOAD
CBM4032-----...F..".....BEFORE RUNNING
THIS PROGRAM ON AN 8032 ...A.P.."
LOAD THE 'CBM 4032' PROGRAM.............
".J.Z.: ..S...: ..S. .. ** T I T L E
P A G E **...".."....";:.UT,UU%:.B(5000
3).0..53280,14:.53281,6...$..I.1.38:."..
.";:..U.&..I.1.22:.".....";:....(..I.1.3
7:.".....";:....*..I.1.22:.".....";:..*.
,.."........................... ..L....
"................... . . ...M.0..".....
.............. . ......2.."............
........ ....4.."..............C O M M
O D O R E...V.6.."...............EDUCATI
ONAL.....8.."................SOFTWARE...
:.. ** COMMODORE LOGO **.H.;..H(UD$,24);
"..........PRESS SPACE BAR OR WAIT.":I.0
.J.<..A$:.A$.." ".I.I.1:.I.250.828...>.:
T1$."":T2$."":T3$."":T4$."":I.0...@.:
.300...C..-----SPACE BAR PRESS-----...H
.: .H(UD$,24);".......PRESS SPACE BAR T
O CONTINUE.".. L.: .UI$:.UI$.." ".844..
N.: ..: R..-----PAGE DESIGN ROUTINE---
--.I T.: UP.UP.1.S W.: ."."H(UT$.UP$,2
1);H(UG$.UP$,14);UP.. \.: ." ----------
----------------------------".. A.: .H(
UD$,24);H(UP$,6);"HELP - PRESS H <RETU
RN>".. F.: ."..":...!K..-----PLEASE WAI
T REMARK-----.F!P.: .H(UD$,24);"
ONE MOMENT PLEASE... ".O!U.: ..
O!...-----SET UP VARIABLES-----..!..: U
X$."H":.UQ%(1000):UB.32768:U1.196:U2.197
:U3.198:U4.216:UC.167:UU.1024..!..: UT.
59468:UU%.12:UL%.14:UP%.1146:UM.32768:.5
0003,0.9"...B(50003).0.UB.1024:U1.209:U2
.210:U3.211:U4.214:UC.204:UU.2048.Q"...B
(50003).0.UT.53272:UU%.21:UL%.23:UP%.213
9:UM.1024.."..: UD$."..................
.......".M"..: UP$."
"..#..: UT$." EQUAT
ION EXERCISE ":. PLACE PROGRAM TITLE HER
E!!!!!!!!!!!!!!!***.$#..: ..A#...-----S
ET VARIABLES-----.M#..: .900.S#..:.Q#..
.-----CHECK FOR 8032-----..#..: .".":."
":. SHIFTED SPACE..#..: .B(UB.40)..96.
.700.H#...-----MEMORY CHECK-----..#..:
. .(0).2000.937..$..: ."....THIS MACHIN
E DOES NOT HAVE ENOUGH.".7$..: ."MEMORY
TO RUN THIS PROGRAM !".E$..: .UU.71.N$
..: ..K$..: ."..":.B(50003).0.962..$..
.-----BASIC 2.0 OR 4.0 OR C-64 SETUP
-----..$...1075,133:.1076,144:.1077,234:
.1079,4:.1080,133:.1081,145..%...1091,15
5:.1098,133:.1099,144:.1100,234:.1103,13
3.3%...1104,145:.1105,234:.1082,234.M%..
: .B(50003)..160.955.%..: .1093,88:.1
094,228:.1097,85:.1102,228:.965..%..: .
B(50003)..1.990.I%..: .1093,49:.1094,23
0:.1097,46:.1102,230:.965..&B..2099,141:
.2100,20:.2101,3:.2103,8:.2104,141:.2105
,21.?&C..2106,3:.2115,145:.2117,52:.2118
,234:.2121,49:.2122,141.Y&D..2123,20:.21
24,3:.2126,234:.2127,141:.2128,21:.2129,
3..&E.: .UU.48:. DISABLE STOP KEY..&J.:
.800:. TITLE.A&T.: .300:. MENU..&..:
.".THE PGM WILL NOT WORK ON THIS MACHIN
E!":../'..: .UZ.1..UP%:.UP%:UZ.0:.-----P
ROGRAM STARTS HERE-----.Y'..."..";:.B(50
003).0..53281,6:.53280,14.'... GAME....
EQUATIONS....62 - V11.1..'... BY VINCE M
ILLS - (415) 523-7163.K'... COPYRIGHT MA
Y 1980 - PERMISSION..'... RESERVED - LIM
ITED DISTRIBUTION...(...".":. UT,UL%..($
.. B(898).1 . 1090.:(... --- SETUP------
----------.P(8..897,1:.898,1:P.1.L(B.B1$
."................."..(L.M$."WWWWWWWWWWW
WWWWW"..(V.P1$.". ....... ..............
.. ...Q"..(`.M1$."
"..(J.N1$.".
"..)T.N2$.".................".5)~.N
3$."AMOUNT ON THIS ".Z)..N4$."SIDE [
..........".{)..N6$."............
.........."..)... 1200..)... I(D(D0),C(D
(D0)).1); :..D)... --- INSTRUCTIONS-----
----..)...".":X.13:Y.0:. 2920:."........
......";..*D.Y.1:. 2920:.".. EQUATIONS .
";.3*N.Y.2:. 2920:."..............".9*..
..I*P..:.".... WILL YOU DEFINE THE EQUAT
IONS ? ";..*Z.UL.1:US$."YNH":.35:.UR$."Y
".1520..*D.. --- PICK PROBLEM..*N.."."..
*X.C.0:B.0.N*..E.2..(.(0).7.9)..*... P.2
. A.1 : . 1460..*..A.2..(.(0).1.9)..+ .
. P.7 . 1460."+..C.1..(.(0).(A.1)).3+...
P.1 . 1500.@+..B.28.9.A.R+H.. A..1 . 15
00.L+R.B.29..(.(0).10.9).9.A.|+..D.A.E.B
.C.E..+... 1740.O+... --- USER PROBLEM--
----------------------------------------
-------..+..US$."H23456789"..+...897,0..
+...59468,14.4,... "........ HOW MANY MA
RBLES IN EACH BAG [2-9] ? ";.A,..UL.1:.3
5.N,".E.E(UR$).G,,.. E.2 . E.9 . . 1550.
.,6.US$."H123":." HOW MANY BAGS ON THE L
EFT [1-3] ?";:UL.1:.35..,@.A.E(UR$).J,J.
. A.1 . A.3 . 1590..,T.. A.1 . US$."0123
456789H":.1660..-Y.US$."0123456789H".B-^
.."..HOW MANY BAGS ON THE RIGHT [0-";:D0
.A.1:.1190:."] ?";.X-H.UL.2:.35:C.E(UR$)
.Y-R.. C.. . C.A.1 . ."...":.1630..-|.."
..HOW MANY MARBLES ON THE LEFT [0-";:D0.
39.9.A:.1190:."] ?";.R-..UL.2:.35:B.E(UR
$)..-... B.. . B.39.9.A .."....":. 1660.
....D.A.E.B.C.E...... D..(D).0 . 1720.L.
... ".THE NUMBERS DON'T ADD UP.":.835:.
1520.M.... WT=1:GOSUB 2880:PRINT".";.W.
B..".";...L.. --- RUN GAME...V.. UT,UU%.
..... 2970.....X..:Y.12:. 2920.U...."
FUNCTIONS:."......"
1-ADD BALLS"../..." 2-SUBTR
ACT BALLS".9/..." 3-ADD BAGS
".]/..." 4-SUBTRACT BAGS".Z/
&.." 5-DIVIDE"../0.."
6-SOLVE."../:.." FUNCTI
ON ? ";.R/D.UL.1:US$."H123456":.35../N.F
.E(UR$)../X.X.0:Y.12:.2920../Z..Q.1.11.0
0\.: ."
".70^..Q._0L.. F . 1910,2020,2130
,2240,2350,2490.S0V.. --- ADD BALLS..0..
W1.B:W2.D..0..X.1:Y.11:. 2920:N5$.""..0.
.L0..:H0.39.(A.9.R):. 3400.Q0..W3.E(B$):
B.B.E(B$)..0... 3460..0..X.23:Y.11:. 292
0:N5$.N6$..1..L0..:H0.39.(C.9.D):. 3400.
.1F.W4.E(B$):D.D.E(B$).L1P.. W3..W4 .B.W
1:D.W2:.3350.W1Z.. 1740.P1... --- SUBTRA
CT BALLS.~1..W1.B:W2.D..1..X.1:Y.11:. 29
20:N5$.""..1..L0..:H0.B:. 3400.E1..W3.E(
B$):B.B.E(B$).P1... 3460..1 .X.23:Y.11:.
2920:N5$.N6$..2*.L0..:H0.D:. 3400..24.W
4.E(B$):D.D.E(B$).72>.. W3..W4 .B.W1:D.W
2:.3350.B2H.. 1740.U2R.. --- ADD BAGS.C2
\.W1.A:W2.C.~2F.X.1:Y.11:. 2920:N5$.""..
2P.L0..:H0..((39.(A.9.B)).9):. 3400..2Z.
W3.E(B$):A.A.E(B$).E2... 3460..2..X.23:Y
.11:. 2920:N5$.N6$..3..L0..:H0..((39.(C.
9.D)).9):. 3400..3..W4.E(B$):C.C.E(B$).<
3... W3..W4 .A.W1:C.W2:.3350.G3... 1740.
_3... --- SUBTRACT BAGS.M3J.W1.A:W2.C..3
T.X.1:Y.11:. 2920:N5$.""..3..L0..:H0.A:.
3400..3..W3.E(B$):A.A.E(B$)..3... 3460.
.3..X.23:Y.11:. 2920:N5$.N6$..3..L0..:H0
.C:. 3400..4..W4.E(B$):C.C.E(B$).&4... W
3..W4 .A.W1:C.W2:.3350.14$.. 1740.B4...
--- DIVIDE.S48.X.9:Y.11:. 2920:.".
";..4B.Y.12:. 2920:."DI
VIDE BY WHAT FACTOR ?";:Y.14..4L..2920:.
" ................
....... [1";..4V.. .A(T0).T0.I..(T0.I)..
5`.S0(1)..1:. I.2 . 3:S0(I).0.M5J.. .A(A
)... .A(B)....A(C).. . .A(D).. . 2430.X5
T.. 2440.X5~.. "-";:D0.I:. 1190:S0(I)..1
..5... I..5..."] ?";:UL.1:US$."H12345678
90":.35:B0.E(UR$)..5... B0 . 1 . B0 . 3
. WT.2:. 2880:. 2380..5... . S0(B0) . B0
..1:. 2460..6..A.A.B0:B.B.B0:C.C.B0:D.D.
B0:.".";:. 3000:. 1770.>6... --- SOLVE._
6D.. A.B.. . C.D.. . A.1 . 2530..6N.X.9:
Y.11:.2920:.". SIMPLIFY SOME MORE ! ":.8
35..6X.X.9:Y.11:.2920:."
"..6..X.6:Y.23:.2920:."
":. 1770.07..X.9:Y.11:
. 2920:.". ";
.\7..Y.12:. 2920:." HOW MANY BALLS ARE I
N ";..7..Y.13:. 2920:."
.......................";.N7..." T
HE BAG ? ";:UL.1:US$."H0123456789":.35..
7... E(UR$)..E . WT.2:. 2880:. 2550. 8..
Y.15:. 2920:.". ";
.L8..Y.16:. 2920:." THAT'S RIGHT !!!!!!!
";.^8(.Y.17:. 2920:...82.X.2:Y.23:. 29
20:." DO YOU WANT TO TRY ANOTHER? (Y/N)"
;..87.UL.1:US$."HYN":.35:.UR$."Y".2620..
99..300:.--RETURN TO MENU---------------
------------------------------..9<.. B(8
97).0 . 1520.N9F..897,B(897).1:P..(.(0).
B(897)..9):.".";:.1380.P9@..-WAIT-------
----------------.9J.T.TI.60.WT..9T.. T.
TI . 2900..9^....9H..-MOVE--------------
---------..9R.DD$.".....................
..........":.".";..9|.. Y.0 . ..X);:...:
... X.0 . .H(DD$,Y);:..*:...H(DD$,Y).X);
:..H:... -- UPDATE BALANCE SCALE.R:...".
";.H:... I.1.16:.M1$:. I.Z:..Z.C.E.D.A.E
.B..:B.X.19:Y.7:. 2920..:L.."........RR.
....... DD .";..:V.X..:Y.4.J:... Z.0 . Y
.3.Z:... Z.0 . Y.5..:... 2920:. P1$;.!;.
.. Z.0 . ."EEEEEEEEEEEEEEEEEEEEEEEE.....
...."P1$;.V;... Z.0 . ."...DDD...RRR....
DDD...RRR........"P1$;..;... Z.0 . .".RR
R...DDD....RRR...DDD............"P1$;..;
..X.0:Y.1..;&.. Z.. . Y.0..;0.. Z.. . Y.
2.H;:.X..:. 2920..;D.Q1.A:Q2.B:. 3210..;
N.X.25:Y.1..;X.. Z.. . Y.0..<B.. Z.. . Y
.2..<L.. 2920.*<V.Q1.C:Q2.D:. 3210.0<...
.G<... -- PRINT A PLATE.R<... ".";.F<...
Q1.. . . 3250.~<... I.1.Q1:. B1$;:. I..
<..."..";..<..Q3.13.(3.Q1)..<F.. Q3.Q2 .
Q3.Q2..<P.. Q3.0 . 3340.M<Z.Q2.Q2.Q3..<
... I(M$,Q3);..<...I("...............",Q
3);..=... ".";..=... 3260..=....G=..X.8:
Y.14:. 2920:."........................".
S= .Y.15:. 2920:.".YOU HAVE TO DO THE SA
ME"..=*.Y.16:. 2920:.". THING ON BOTH SI
DES ! "..=4.WT.3:. 2880.H=>.. ".";:. 300
0:. 1770..=H.. -- GET AMOUNTS SUBR..=R..
N1$N2$N3$N2$N4$;.(>\.D0.L0:.1190:."-";:
D0.H0:.1190:."] ?";:UL.2.H>F.US$."H01234
56789":.35:B$.UR$:. E(B$)..L0 . E(B$)..H
0 . 3450..>P.. ".."N5$N4$D(L0)"-"D(H0)">
";:. 3430..>Z....>...".";:.I.1.16:.M1$:.
I:. 3000:...>......
> CLICK IMAGE PREVIEW FOR FULL MODAL