EQN MANIPULAT.C3
FILE INFORMATION
FILENAME(S): EQN MANIPULAT.C3
FILE TYPE(S): PRG
FILE SIZE: 15.2K
FIRST SEEN: 2025-11-30 01:07:52
APPEARS ON: 2 disk(s)
FILE HASH
befafc9cef3ce188471d5b822460be3f90e1ddfa8c84f1333a3cf6a92ed7dac0
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FREESOFT DISK NR | EQN MANIPULAT.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 9 | DOWNLOAD FILE |
| L EHRNEN | EQN MANIPULAT.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 16 | 9 | 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: D5 08 19 00 3A 00 DB 08 1E 00 3A 00 F8 08 23 00 |....:.....:...#.|
000000E0: 8F 2D 2D 2D 2D 2D 49 4E 50 55 54 20 53 45 43 54 |.-----INPUT SECT|
000000F0: 49 4F 4E 2D 2D 2D 2D 2D 00 0D 09 28 00 3A 20 20 |ION-----...(.: |
00000100: 55 52 24 B2 22 22 3A 55 49 24 B2 22 22 00 21 09 |UR$."":UI$."".!.|
00000110: 2A 00 3A 20 20 8B 20 55 4C B2 30 A7 55 4C B2 38 |*.: . UL.0.UL.8|
00000120: 30 00 34 09 2D 00 99 22 20 20 9D 9D 22 3B 3A 97 |0.4.-.." ..";:.|
00000130: 55 43 2C 30 00 4B 09 32 00 3A 20 20 A1 55 49 24 |UC,0.K.2.: .UI$|
00000140: 3A 8B 55 49 24 B2 22 22 A7 35 30 00 78 09 37 00 |:.UI$."".50.x.7.|
00000150: 3A 20 20 8B 55 49 24 B2 C7 28 31 33 29 AF C3 28 |: .UI$..(13)..(|
00000160: 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 22 |UR$)..1..UC,1:."|
00000170: 20 9D 22 3B 3A 89 38 35 00 8E 09 3C 00 3A 20 20 | .";:.85...<.: |
00000180: 8B 55 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 A6 |.UI$..(20).105..|
00000190: 09 3E 00 3A 20 20 8B 20 C3 28 55 52 24 29 B2 B1 |.>.: . .(UR$)..|
000001A0: 55 4C 20 A7 35 30 00 CE 09 41 00 3A 20 20 8D 31 |UL .50...A.: .1|
000001B0: 32 30 3A 8F 20 43 48 45 43 4B 20 46 4F 52 20 56 |20:. CHECK FOR V|
000001C0: 41 4C 49 44 20 43 48 41 52 41 43 54 45 52 00 E1 |ALID CHARACTER..|
000001D0: 09 46 00 3A 20 20 55 52 24 B2 55 52 24 AA 55 49 |.F.: UR$.UR$.UI|
000001E0: 24 00 EE 09 4B 00 3A 20 20 99 55 49 24 3B 00 F9 |$...K.: .UI$;..|
000001F0: 09 50 00 3A 20 20 89 35 30 00 1F 0A 55 00 8F 2D |.P.: .50...U..-|
00000200: 2D 2D 2D 2D 43 48 45 43 4B 20 46 4F 52 20 48 45 |----CHECK FOR HE|
00000210: 4C 50 20 52 45 51 55 45 53 54 2D 2D 2D 2D 2D 00 |LP REQUEST-----.|
00000220: 4A 0A 5A 00 3A 20 20 8B 55 52 24 B2 55 58 24 A7 |J.Z.: .UR$.UX$.|
00000230: 31 39 35 3A 8F 20 45 58 49 54 20 54 4F 20 48 45 |195:. EXIT TO HE|
00000240: 4C 50 20 52 4F 55 54 49 4E 45 00 5C 0A 5F 00 3A |LP ROUTINE.\._.:|
00000250: 20 20 8B 55 46 B2 31 A7 8D 32 34 30 00 6B 0A 64 | .UF.1..240.k.d|
00000260: 00 3A 20 55 46 B2 30 3A 99 3A 8E 00 87 0A 66 00 |.: UF.0:.:....f.|
00000270: 8F 2D 2D 2D 2D 2D 43 48 45 43 4B 20 44 45 4C 45 |.-----CHECK DELE|
00000280: 54 45 2D 2D 2D 2D 2D 00 9A 0A 69 00 3A 20 8B C3 |TE-----...i.: ..|
00000290: 28 55 52 24 29 B3 31 A7 35 30 00 B4 0A 6E 00 3A |(UR$).1.50...n.:|
000002A0: 20 55 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 | UR$..(UR$,.(UR$|
000002B0: 29 AB 31 29 00 C8 0A 73 00 3A 20 99 22 9D 20 20 |).1)...s.: .". |
000002C0: 9D 9D 22 3B 3A 89 35 30 00 F2 0A 78 00 8F 2D 2D |..";:.50...x..--|
000002D0: 2D 2D 2D 43 48 45 43 4B 20 46 4F 52 20 56 41 4C |---CHECK FOR VAL|
000002E0: 49 44 20 43 48 41 52 41 43 54 45 52 53 2D 2D 2D |ID CHARACTERS---|
000002F0: 2D 2D 00 07 0B 7D 00 3A 20 20 8B C3 28 55 53 24 |--...}.: ..(US$|
00000300: 29 B2 30 A7 31 35 30 00 1B 0B 82 00 3A 20 20 81 |).0.150.....: .|
00000310: 55 53 B2 31 A4 C3 28 55 53 24 29 00 37 0B 87 00 |US.1..(US$).7...|
00000320: 3A 20 20 20 20 8B 55 49 24 B2 CA 28 55 53 24 2C |: .UI$..(US$,|
00000330: 55 53 2C 31 29 A7 8E 00 40 0B 8C 00 3A 20 20 82 |US,1)...@...: .|
00000340: 00 50 0B 91 00 3A 20 20 55 49 24 B2 22 22 3A 8E |.P...: UI$."":.|
00000350: 00 6E 0B 96 00 8F 2D 2D 2D 2D 2D 53 54 41 4E 44 |.n....-----STAND|
00000360: 41 52 44 20 49 4E 50 55 54 2D 2D 2D 2D 2D 00 83 |ARD INPUT-----..|
00000370: 0B 98 00 3A 20 20 8B C6 28 55 49 24 29 B2 34 36 |...: ..(UI$).46|
00000380: A7 20 8E 00 98 0B 9B 00 3A 20 20 8B 55 49 24 B2 |. ......: .UI$.|
00000390: C7 28 33 32 29 A7 20 8E 00 BA 0B A0 00 3A 20 20 |.(32). ......: |
000003A0: 8B C6 28 55 49 24 29 B3 34 38 20 B0 20 C6 28 55 |..(UI$).48 . .(U|
000003B0: 49 24 29 B1 35 37 A7 31 37 30 00 C3 0B A5 00 3A |I$).57.170.....:|
000003C0: 20 20 8E 00 E5 0B AA 00 3A 20 20 8B C6 28 55 49 | ......: ..(UI|
000003D0: 24 29 B3 36 35 20 B0 20 C6 28 55 49 24 29 B1 39 |$).65 . .(UI$).9|
000003E0: 30 A7 31 38 30 00 EE 0B AF 00 3A 20 20 8E 00 17 |0.180.....: ...|
000003F0: 0C B4 00 3A 20 20 8B C6 28 55 49 24 29 B3 31 39 |...: ..(UI$).19|
00000400: 33 20 B0 20 C6 28 55 49 24 29 B1 32 31 38 A7 55 |3 . .(UI$).218.U|
00000410: 49 24 B2 22 22 3A 8E 00 45 0C B9 00 3A 20 20 8B |I$."":..E...: .|
00000420: C2 28 55 54 29 B2 31 32 B0 C2 28 55 54 29 B2 32 |.(UT).12..(UT).2|
00000430: 31 A7 55 49 24 B2 C7 28 C6 28 55 49 24 29 AB 31 |1.UI$..(.(UI$).1|
00000440: 32 38 29 3A 8E 00 4E 0C BB 00 3A 20 20 8E 00 5E |28):..N...: ..^|
00000450: 0C BE 00 3A 20 20 55 49 24 B2 22 22 3A 8E 00 87 |...: UI$."":...|
00000460: 0C C3 00 3A 20 20 55 46 B2 31 3A 8F 2D 2D 2D 2D |...: UF.1:.----|
00000470: 2D 48 45 4C 50 20 52 4F 55 54 49 4E 45 20 45 58 |-HELP ROUTINE EX|
00000480: 49 54 2D 2D 2D 2D 2D 00 93 0C C5 00 3A 20 20 8D |IT-----.....: .|
00000490: 32 35 30 00 9F 0C C8 00 3A 20 20 8D 32 34 35 00 |250.....: .245.|
000004A0: C1 0C CD 00 3A 20 20 81 55 51 B2 55 42 A4 28 55 |....: .UQ.UB.(U|
000004B0: 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 25 AB 32 |2%.256.U1%.U3%.2|
000004C0: 29 00 E0 0C D2 00 3A 20 20 55 51 25 28 55 51 AB |).....: UQ%(UQ.|
000004D0: 55 42 29 B2 C2 28 55 51 29 3A 82 3A 99 22 93 22 |UB)..(UQ):.:."."|
000004E0: 00 F6 0C D7 00 3A 20 20 55 5A B2 31 3A 55 56 25 |.....: UZ.1:UV%|
000004F0: B2 C2 28 55 54 29 00 02 0D D8 00 3A 20 20 89 33 |..(UT).....: .3|
00000500: 30 30 00 27 0D D9 00 55 5A B2 30 3A 55 53 24 B2 |00.'...UZ.0:US$.|
00000510: 55 4A 24 3A 55 47 24 B2 55 4B 24 3A 55 50 B2 55 |UJ$:UG$.UK$:UP.U|
00000520: 4A 3A 55 4C B2 55 4B 00 5E 0D DA 00 8B C2 28 35 |J:UL.UK.^.....(5|
00000530: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 31 |0003).0..53281,1|
00000540: 3A 99 22 93 22 3B 3A 97 35 33 32 38 31 2C 36 3A |:.".";:.53281,6:|
00000550: 97 35 33 32 38 30 2C 31 34 3A 89 32 32 30 00 68 |.53280,14:.220.h|
00000560: 0D DB 00 99 22 93 22 3B 00 97 0D DC 00 55 54 24 |....".";.....UT$|
00000570: B2 55 4C 24 3A 97 55 54 2C 55 56 25 3A 81 55 51 |.UL$:.UT,UV%:.UQ|
00000580: B2 55 42 A4 28 55 32 25 AC 32 35 36 AA 55 31 25 |.UB.(U2%.256.U1%|
00000590: AA 55 33 25 AB 33 29 00 AF 0D E1 00 3A 20 20 97 |.U3%.3).....: .|
000005A0: 55 51 2C 55 51 25 28 55 51 AB 55 42 29 3A 82 00 |UQ,UQ%(UQ.UB):..|
000005B0: BE 0D E6 00 3A 20 20 97 55 31 2C 55 31 25 00 CD |....: .U1,U1%..|
000005C0: 0D E8 00 3A 20 20 97 55 32 2C 55 32 25 00 DC 0D |...: .U2,U2%...|
000005D0: E9 00 3A 20 20 97 55 34 2C 55 34 25 00 ED 0D EA |..: .U4,U4%....|
000005E0: 00 3A 20 20 97 55 33 2C 55 33 25 AB 31 00 F8 0D |.: .U3,U3%.1...|
000005F0: EB 00 3A 20 20 89 33 35 00 2D 0E F0 00 3A 20 20 |..: .35.-...: |
00000600: 55 44 25 B2 28 28 55 32 25 AC 32 35 36 AA 55 31 |UD%.((U2%.256.U1|
00000610: 25 AA 55 33 25 29 AB 55 42 29 AD 34 30 3A 99 C8 |%.U3%).UB).40:..|
00000620: 28 55 44 24 2C 55 44 25 AA 31 29 3A 8E 00 6B 0E |(UD$,UD%.1):..k.|
00000630: F5 00 3A 20 20 99 C8 28 55 44 24 2C 32 34 29 3B |..: ..(UD$,24);|
00000640: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000650: 20 20 20 20 20 20 20 12 20 48 45 4C 50 20 43 4F | . HELP CO|
00000660: 4D 49 4E 47 20 92 20 20 22 3A 8E 00 9A 0E FA 00 |MING . ":......|
00000670: 3A 20 20 55 31 25 B2 C2 28 55 31 29 3A 55 32 25 |: U1%..(U1):U2%|
00000680: B2 C2 28 55 32 29 3A 55 33 25 B2 C2 28 55 33 29 |..(U2):U3%..(U3)|
00000690: 3A 55 34 25 B2 C2 28 55 34 29 00 AC 0E FB 00 55 |:U4%..(U4).....U|
000006A0: 4A 24 B2 55 53 24 3A 55 4A B2 55 4C 00 CF 0E FC |J$.US$:UJ.UL....|
000006B0: 00 3A 20 20 55 4A 24 B2 55 53 24 3A 55 4B 24 B2 |.: UJ$.US$:UK$.|
000006C0: 55 47 24 3A 55 4A B2 55 50 3A 55 4B B2 55 4C 00 |UG$:UJ.UP:UK.UL.|
000006D0: D8 0E FF 00 3A 20 20 8E 00 EC 0E 2C 01 8F 2D 2D |....: ....,..--|
000006E0: 2D 2D 2D 4D 45 4E 55 2D 2D 2D 2D 2D 00 F2 0E 2D |---MENU-----...-|
000006F0: 01 3A 00 24 0F 2E 01 3A 20 20 99 22 93 22 3A 97 |.:.$...: .".":.|
00000700: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00000710: B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 35 33 32 |.0..53281,9:.532|
00000720: 38 30 2C 38 00 2A 0F 2F 01 3A 00 4A 0F 31 01 3A |80,8.*./.:.J.1.:|
00000730: 20 20 99 22 93 20 20 20 20 20 20 20 20 20 20 20 | .". |
00000740: 20 20 20 20 20 4D 45 4E 55 22 00 7C 0F 36 01 3A | MENU".|.6.:|
00000750: 20 20 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ." -----------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 AA 0F 3B |-----------"...;|
00000780: 01 3A 20 20 99 22 11 11 20 20 20 20 20 20 20 31 |.: .".. 1|
00000790: 2E 20 20 20 45 51 55 41 54 49 4F 4E 20 4D 41 4E |. EQUATION MAN|
000007A0: 49 50 55 4C 41 54 49 4F 4E 22 00 D7 0F 40 01 3A |IPULATION"...@.:|
000007B0: 20 20 99 22 11 11 20 20 20 20 20 20 20 32 2E 20 | .".. 2. |
000007C0: 20 20 53 54 55 44 45 4E 54 20 49 4E 53 54 52 55 | STUDENT INSTRU|
000007D0: 43 54 49 4F 4E 53 22 00 04 10 45 01 3A 20 20 99 |CTIONS"...E.: .|
000007E0: 22 11 11 20 20 20 20 20 20 20 33 2E 20 20 20 54 |".. 3. T|
000007F0: 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 |EACHER INSTRUCTI|
00000800: 4F 4E 53 22 00 34 10 4A 01 3A 20 20 99 22 11 11 |ONS".4.J.: ."..|
00000810: 20 20 20 20 20 20 20 34 2E 20 20 20 4D 4F 44 49 | 4. MODI|
00000820: 46 49 43 41 54 49 4F 4E 20 4F 46 20 50 52 4F 47 |FICATION OF PROG|
00000830: 52 41 4D 22 00 53 10 4F 01 3A 20 20 99 22 11 11 |RAM".S.O.: ."..|
00000840: 20 20 20 20 20 20 20 35 2E 20 20 20 51 55 49 54 | 5. QUIT|
00000850: 11 11 22 00 85 10 54 01 3A 20 20 99 22 20 2D 2D |.."...T.: ." --|
00000860: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000870: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000880: 2D 2D 2D 2D 22 00 B3 10 59 01 3A 20 20 99 22 11 |----"...Y.: .".|
00000890: 11 20 20 20 20 20 20 20 50 52 45 53 53 20 41 20 |. PRESS A |
000008A0: 4E 55 4D 42 45 52 20 4B 45 59 20 28 31 2D 35 29 |NUMBER KEY (1-5)|
000008B0: 20 22 3B 00 E4 10 5E 01 3A 20 20 55 4C B2 31 3A | ";...^.: UL.1:|
000008C0: 55 53 24 B2 22 31 32 33 34 35 22 3A 8D 33 35 3A |US$."12345":.35:|
000008D0: 8F 2D 2D 2D 49 4E 50 55 54 20 52 4F 55 54 49 4E |.---INPUT ROUTIN|
000008E0: 45 2D 2D 2D 00 F9 10 5F 01 3A 20 20 8B C3 28 55 |E---..._.: ..(U|
000008F0: 52 24 29 B1 31 A7 33 30 30 00 07 11 60 01 3A 20 |R$).1.300...`.: |
00000900: 20 55 53 24 B2 22 22 00 2B 11 63 01 3A 20 20 91 | US$."".+.c.: .|
00000910: C5 28 55 52 24 29 8D 31 30 30 30 2C 34 30 30 2C |.(UR$).1000,400,|
00000920: 35 30 30 2C 36 30 30 2C 33 39 36 00 37 11 68 01 |500,600,396.7.h.|
00000930: 3A 20 20 89 33 30 30 00 61 11 8B 01 8F 2D 2D 2D |: .300.a....---|
00000940: 2D 2D 52 45 2D 45 4E 41 42 4C 45 20 53 54 4F 50 |--RE-ENABLE STOP|
00000950: 20 4B 45 59 20 41 4E 44 20 45 4E 44 2D 2D 2D 2D | KEY AND END----|
00000960: 2D 00 93 11 8C 01 3A 20 20 8B C2 28 35 30 30 30 |-.....: ..(5000|
00000970: 33 29 B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 |3)..1..(50003)..|
00000980: 31 36 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 |160..(50003)..0.|
00000990: 33 39 39 00 C0 11 8D 01 3A 20 20 9E 55 55 AA 37 |399.....: .UU.7|
000009A0: 31 3A 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 |1:..(50003).0..5|
000009B0: 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 |3281,6:.53280,14|
000009C0: 00 CF 11 8E 01 3A 20 20 99 22 9A 93 22 3A 80 00 |.....: ."..":..|
000009D0: DD 11 8F 01 3A 20 20 8D 38 37 35 3A 8E 00 01 12 |....: .875:....|
000009E0: 90 01 8F 2D 2D 2D 2D 2D 53 54 55 44 45 4E 54 20 |...-----STUDENT |
000009F0: 49 4E 53 54 52 55 43 54 49 4F 4E 53 2D 2D 2D 2D |INSTRUCTIONS----|
00000A00: 2D 00 33 12 95 01 3A 20 20 99 22 93 22 3A 97 55 |-.3...: .".":.U|
00000A10: 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 |T,UL%:..(50003).|
00000A20: 30 A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 |0..53281,0:.5328|
00000A30: 30 2C 30 00 54 12 9A 01 55 50 B2 30 3A 55 47 24 |0,0.T...UP.0:UG$|
00000A40: B2 22 D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 3A |.".TUDENT .NST":|
00000A50: 8D 38 35 30 00 82 12 9B 01 3A 20 20 99 22 11 11 |.850.....: ."..|
00000A60: 11 20 20 20 20 C1 20 46 4C 41 53 48 49 4E 47 20 |. . FLASHING |
00000A70: 53 51 55 41 52 45 20 4D 45 41 4E 53 20 54 48 41 |SQUARE MEANS THA|
00000A80: 54 22 00 AF 12 9C 01 3A 20 20 99 22 20 20 20 41 |T".....: ." A|
00000A90: 4E 20 41 4E 53 57 45 52 20 49 53 20 45 58 50 45 |N ANSWER IS EXPE|
00000AA0: 43 54 45 44 20 46 52 4F 4D 20 59 4F 55 2E 22 00 |CTED FROM YOU.".|
00000AB0: DB 12 9D 01 3A 20 20 99 22 20 20 20 D2 45 4D 45 |....: ." .EME|
00000AC0: 4D 42 45 52 20 54 4F 20 48 49 54 20 3C 52 45 54 |MBER TO HIT <RET|
00000AD0: 55 52 4E 3E 20 41 46 54 45 52 22 00 07 13 9E 01 |URN> AFTER".....|
00000AE0: 3A 20 20 99 22 20 20 20 54 59 50 49 4E 47 20 59 |: ." TYPING Y|
00000AF0: 4F 55 52 20 41 4E 53 57 45 52 2E 20 D4 48 49 53 |OUR ANSWER. .HIS|
00000B00: 20 54 45 4C 4C 53 22 00 34 13 A0 01 3A 20 20 99 | TELLS".4...: .|
00000B10: 22 20 20 20 54 48 45 20 43 4F 4D 50 55 54 45 52 |" THE COMPUTER|
00000B20: 20 54 4F 20 41 43 43 45 50 54 20 57 48 41 54 20 | TO ACCEPT WHAT |
00000B30: 59 4F 55 22 00 62 13 A2 01 3A 20 20 99 22 20 20 |YOU".b...: ." |
00000B40: 20 48 41 56 45 20 54 59 50 45 44 2E 20 D9 4F 55 | HAVE TYPED. .OU|
00000B50: 20 43 41 4E 20 45 52 41 53 45 20 45 52 52 4F 52 | CAN ERASE ERROR|
00000B60: 53 22 00 88 13 A3 01 3A 20 20 99 22 20 20 20 57 |S".....: ." W|
00000B70: 49 54 48 20 54 48 45 20 3C 49 4E 53 54 2F 44 45 |ITH THE <INST/DE|
00000B80: 4C 3E 20 4B 45 59 2E 22 00 B5 13 A4 01 3A 20 20 |L> KEY.".....: |
00000B90: 99 22 20 20 20 20 D4 59 50 45 20 3C 48 3E 20 41 |." .YPE <H> A|
00000BA0: 54 20 41 4E 59 20 54 49 4D 45 20 54 4F 20 52 45 |T ANY TIME TO RE|
00000BB0: 54 55 52 4E 22 00 E2 13 A6 01 3A 20 20 99 22 20 |TURN".....: ." |
00000BC0: 20 20 54 4F 20 54 48 45 20 4D 45 4E 55 20 46 4F | TO THE MENU FO|
00000BD0: 52 20 48 45 4C 50 2E 20 20 D9 4F 55 20 57 49 4C |R HELP. .OU WIL|
00000BE0: 4C 22 00 0F 14 A8 01 3A 20 20 99 22 20 20 20 42 |L".....: ." B|
00000BF0: 45 20 52 45 54 55 52 4E 45 44 20 54 4F 20 54 48 |E RETURNED TO TH|
00000C00: 45 20 50 4C 41 43 45 20 49 4E 20 54 48 45 22 00 |E PLACE IN THE".|
00000C10: 3A 14 AA 01 3A 20 20 99 22 20 20 20 50 52 4F 47 |:...: ." PROG|
00000C20: 52 41 4D 20 57 48 45 52 45 20 59 4F 55 20 4C 45 |RAM WHERE YOU LE|
00000C30: 46 54 20 4F 46 46 20 41 53 22 00 68 14 AC 01 3A |FT OFF AS".h...:|
00000C40: 20 20 99 22 20 20 20 53 4F 4F 4E 20 41 53 20 54 | ." SOON AS T|
00000C50: 48 45 20 4F 50 54 49 4F 4E 20 46 52 4F 4D 20 54 |HE OPTION FROM T|
00000C60: 48 45 20 4D 45 4E 55 22 00 94 14 AE 01 3A 20 20 |HE MENU".....: |
00000C70: 99 22 20 20 20 49 53 20 43 4F 4D 50 4C 45 54 45 |." IS COMPLETE|
00000C80: 20 55 4E 4C 45 53 53 20 59 4F 55 20 57 41 4E 54 | UNLESS YOU WANT|
00000C90: 20 54 4F 22 00 B3 14 B0 01 3A 20 20 99 22 20 20 | TO".....: ." |
00000CA0: 20 53 54 41 52 54 20 4F 56 45 52 20 41 47 41 49 | START OVER AGAI|
00000CB0: 4E 2E 22 00 C4 14 B2 01 3A 20 20 8D 38 33 35 3A |N.".....: .835:|
00000CC0: 8D 38 35 30 00 F7 14 B4 01 3A 20 20 99 22 11 11 |.850.....: ."..|
00000CD0: 11 20 20 20 20 C4 55 52 49 4E 47 20 54 48 45 20 |. .URING THE |
00000CE0: 45 58 45 52 43 49 53 45 2C 20 44 4F 4E 27 54 20 |EXERCISE, DON'T |
00000CF0: 46 4F 52 47 45 54 22 00 20 15 B6 01 3A 20 20 99 |FORGET". ...: .|
00000D00: 22 20 20 20 54 4F 20 45 4E 54 45 52 20 54 48 45 |" TO ENTER THE|
00000D10: 20 57 48 4F 4C 45 20 46 4F 52 4D 55 4C 41 2E 22 | WHOLE FORMULA."|
00000D20: 00 4B 15 B8 01 3A 20 20 99 22 11 20 20 20 20 45 |.K...: .". E|
00000D30: 47 2E 20 20 C9 46 20 58 3D 42 59 2F 5A 20 20 20 |G. .F X=BY/Z |
00000D40: D7 48 41 54 20 49 53 20 42 3F 22 00 7F 15 BA 01 |.HAT IS B?".....|
00000D50: 3A 20 20 99 22 11 11 20 20 20 20 20 20 45 4E 54 |: .".. ENT|
00000D60: 45 52 20 12 42 3D 58 5A 2F 59 92 20 20 28 CE 4F |ER .B=XZ/Y. (.O|
00000D70: 54 20 4A 55 53 54 20 27 58 5A 2F 59 27 29 22 00 |T JUST 'XZ/Y')".|
00000D80: AF 15 BC 01 3A 20 20 99 22 11 20 20 20 20 C1 4C |....: .". .L|
00000D90: 53 4F 2C 20 4D 55 4C 54 49 50 4C 49 43 41 54 49 |SO, MULTIPLICATI|
00000DA0: 4F 4E 20 53 49 47 4E 53 20 28 27 2A 27 29 22 00 |ON SIGNS ('*')".|
00000DB0: DC 15 BE 01 3A 20 20 99 22 20 20 20 41 52 45 20 |....: ." ARE |
00000DC0: 4E 4F 54 20 4E 45 45 44 45 44 20 42 55 54 20 55 |NOT NEEDED BUT U|
00000DD0: 53 45 20 42 52 41 43 4B 45 54 53 22 00 F9 15 C0 |SE BRACKETS"....|
00000DE0: 01 3A 20 20 99 22 20 20 20 57 48 45 4E 20 4E 45 |.: ." WHEN NE|
00000DF0: 43 45 53 53 41 52 59 2E 22 00 23 16 C2 01 3A 20 |CESSARY.".#...: |
00000E00: 20 99 22 11 20 20 20 20 D3 45 45 20 49 46 20 59 | .". .EE IF Y|
00000E10: 4F 55 20 43 41 4E 20 4F 55 54 4C 41 53 54 20 54 |OU CAN OUTLAST T|
00000E20: 48 45 22 00 47 16 C4 01 3A 20 20 99 22 20 20 20 |HE".G...: ." |
00000E30: 43 4F 4D 50 55 54 45 52 20 49 4E 20 54 48 45 20 |COMPUTER IN THE |
00000E40: 44 52 49 4C 4C 2E 22 00 53 16 E5 01 3A 20 20 8D |DRILL.".S...: .|
00000E50: 38 33 35 00 6A 16 EA 01 3A 20 20 8B 55 5A B2 31 |835.j...: .UZ.1|
00000E60: A7 9E 55 50 25 3A 89 32 31 37 00 73 16 F3 01 3A |..UP%:.217.s...:|
00000E70: 20 20 8E 00 97 16 F4 01 8F 2D 2D 2D 2D 2D 54 45 | .......-----TE|
00000E80: 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 49 4F |ACHER INSTRUCTIO|
00000E90: 4E 53 2D 2D 2D 2D 2D 00 CA 16 F5 01 3A 20 20 99 |NS-----.....: .|
00000EA0: 22 93 22 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 |".":.UT,UL%:..(5|
00000EB0: 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 |0003).0..53281,2|
00000EC0: 3A 97 35 33 32 38 30 2C 31 30 00 EF 16 F6 01 3A |:.53280,10.....:|
00000ED0: 20 20 55 50 B2 30 3A 55 47 24 B2 22 D4 45 41 43 | UP.0:UG$.".EAC|
00000EE0: 48 45 52 20 C9 4E 53 54 2E 22 3A 8D 38 35 30 00 |HER .NST.":.850.|
00000EF0: 20 17 F7 01 3A 20 20 99 22 11 11 20 20 20 20 20 | ...: .".. |
00000F00: 20 D4 4F 20 54 48 45 20 42 45 53 54 20 4F 46 20 | .O THE BEST OF |
00000F10: 4F 55 52 20 4B 4E 4F 57 4C 45 44 47 45 2C 11 22 |OUR KNOWLEDGE,."|
00000F20: 00 4C 17 F8 01 3A 20 20 99 22 20 20 20 54 48 49 |.L...: ." THI|
00000F30: 53 20 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 |S PROGRAM IS IN |
00000F40: 54 48 45 20 50 55 42 4C 49 43 11 22 00 7B 17 F9 |THE PUBLIC.".{..|
00000F50: 01 3A 20 20 99 22 20 20 20 44 4F 4D 41 49 4E 2E |.: ." DOMAIN.|
00000F60: 20 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 | .F THIS IS NOT|
00000F70: 20 54 48 45 20 43 41 53 45 11 22 00 9B 17 FA 01 | THE CASE.".....|
00000F80: 3A 20 20 99 22 20 20 20 50 4C 45 41 53 45 20 43 |: ." PLEASE C|
00000F90: 4F 4E 54 41 43 54 3A 11 11 11 22 00 C8 17 FB 01 |ONTACT:...".....|
00000FA0: 3A 20 20 99 22 20 20 20 20 20 20 C3 4F 4D 4D 4F |: ." .OMMO|
00000FB0: 44 4F 52 45 20 C2 55 53 49 4E 45 53 53 20 CD 41 |DORE .USINESS .A|
00000FC0: 43 48 49 4E 45 53 11 22 00 EE 17 FC 01 3A 20 20 |CHINES.".....: |
00000FD0: 99 22 20 20 20 20 20 20 20 20 20 20 33 33 37 30 |." 3370|
00000FE0: 20 D0 48 41 52 4D 41 43 59 20 C1 56 45 2E 00 15 | .HARMACY .VE...|
00000FF0: 18 FD 01 3A 20 20 99 22 20 20 20 20 20 20 20 20 |...: ." |
00001000: 20 20 C1 47 49 4E 43 4F 55 52 54 2C 20 CF 4E 54 | .GINCOURT, .NT|
00001010: 41 52 49 4F 22 00 3A 18 FE 01 3A 20 20 99 22 20 |ARIO".:...: ." |
00001020: 20 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 20 | .ANADA |
00001030: 20 20 CD 31 D7 20 32 CB 34 22 00 5D 18 FF 01 3A | .1. 2.4".]...:|
00001040: 20 20 99 22 20 20 20 20 20 20 20 20 20 20 28 34 | ." (4|
00001050: 31 36 29 20 34 39 39 2D 34 32 39 32 22 00 73 18 |16) 499-4292".s.|
00001060: 00 02 55 50 B2 31 3A 8D 20 38 33 35 3A 8D 20 38 |..UP.1:. 835:. 8|
00001070: 35 30 3A 00 A4 18 01 02 99 22 20 20 20 20 20 11 |50:......" .|
00001080: 11 D0 52 4F 47 52 41 4D 20 CE 41 4D 45 3A 20 C5 |..ROGRAM .AME: .|
00001090: 51 55 41 54 49 4F 4E 20 CD 41 4E 49 50 55 4C 41 |QUATION .ANIPULA|
000010A0: 54 49 4F 4E 00 C8 18 02 02 99 22 20 20 20 20 20 |TION......" |
000010B0: D7 52 49 54 54 45 4E 20 C2 59 20 20 3A 20 D2 2E |.RITTEN .Y : ..|
000010C0: D7 2E 20 C4 52 41 59 11 00 EC 18 03 02 99 22 20 |.. .RAY......." |
000010D0: 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 59 20 | .PGRADED .Y |
000010E0: 3A 20 C4 45 52 45 4B 20 CC 45 45 11 00 17 19 04 |: .EREK .EE.....|
000010F0: 02 99 22 20 20 20 20 20 11 D4 48 49 53 20 50 52 |.." ..HIS PR|
00001100: 4F 47 52 41 4D 20 57 49 4C 4C 20 52 55 4E 20 4F |OGRAM WILL RUN O|
00001110: 4E 20 41 4E 59 11 11 00 36 19 07 02 99 22 20 20 |N ANY...6...." |
00001120: 20 20 20 20 20 20 20 D0 C5 D4 20 36 34 20 C3 CF | ... 64 ..|
00001130: CD D0 D5 D4 C5 D2 00 5B 19 08 02 99 22 20 20 20 |.......[...." |
00001140: 20 20 20 20 20 20 C3 CF CD CD CF C4 CF D2 C5 20 | ......... |
00001150: 36 34 20 C3 CF CD D0 D5 D4 C5 D2 00 6D 19 0C 02 |64 .........m...|
00001160: 3A 20 20 8D 20 38 33 35 3A 8D 38 35 30 00 9F 19 |: . 835:.850...|
00001170: 0E 02 3A 20 20 99 22 11 11 11 11 20 20 20 20 D4 |..: .".... .|
00001180: 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 41 |HIS PROGRAM IS A|
00001190: 20 4C 45 53 53 4F 4E 20 49 4E 20 54 48 45 22 00 | LESSON IN THE".|
000011A0: CB 19 10 02 3A 20 20 99 22 20 20 20 4D 41 4E 49 |....: ." MANI|
000011B0: 50 55 4C 41 54 49 4F 4E 20 4F 46 20 45 51 55 41 |PULATION OF EQUA|
000011C0: 54 49 4F 4E 53 2E 20 20 C9 54 22 00 F7 19 12 02 |TIONS. .T".....|
000011D0: 3A 20 20 99 22 20 20 20 43 4F 56 45 52 53 20 43 |: ." COVERS C|
000011E0: 41 53 45 53 20 57 49 54 48 20 27 2B 2C 2D 2C 2A |ASES WITH '+,-,*|
000011F0: 2C 2F 27 20 4F 52 22 00 25 1A 14 02 3A 20 20 99 |,/' OR".%...: .|
00001200: 22 20 20 20 43 4F 4D 42 49 4E 41 54 49 4F 4E 53 |" COMBINATIONS|
00001210: 2E 20 D4 48 45 20 50 52 4F 47 52 41 4D 20 43 41 |. .HE PROGRAM CA|
00001220: 4E 20 42 45 22 00 55 1A 16 02 3A 20 20 99 22 20 |N BE".U...: ." |
00001230: 20 20 55 53 45 44 20 41 53 20 41 20 54 45 41 43 | USED AS A TEAC|
00001240: 48 49 4E 47 20 41 49 44 20 4F 52 20 41 20 52 45 |HING AID OR A RE|
00001250: 56 49 45 57 22 00 7F 1A 18 02 3A 20 20 99 22 20 |VIEW".....: ." |
00001260: 20 20 45 58 45 52 43 49 53 45 20 46 4F 52 20 53 | EXERCISE FOR S|
00001270: 54 55 44 45 4E 54 53 20 48 41 56 49 4E 47 22 00 |TUDENTS HAVING".|
00001280: A3 1A 1A 02 3A 20 20 99 22 20 20 20 50 52 4F 42 |....: ." PROB|
00001290: 4C 45 4D 53 20 49 4E 20 54 48 49 53 20 41 52 45 |LEMS IN THIS ARE|
000012A0: 41 2E 22 00 D1 1A 1C 02 3A 20 20 99 22 11 20 20 |A.".....: .". |
000012B0: 20 20 C1 20 44 52 49 4C 4C 20 49 53 20 49 4E 43 | . DRILL IS INC|
000012C0: 4C 55 44 45 44 20 41 54 20 54 48 45 20 45 4E 44 |LUDED AT THE END|
000012D0: 22 00 FA 1A 1E 02 3A 20 20 99 22 20 20 20 46 4F |".....: ." FO|
000012E0: 52 20 49 4E 44 49 56 49 44 55 41 4C 20 50 52 41 |R INDIVIDUAL PRA|
000012F0: 43 54 49 43 45 20 41 4E 44 22 00 24 1B 20 02 3A |CTICE AND".$. .:|
00001300: 20 20 99 22 20 20 20 52 45 56 49 45 57 2E 20 C5 | ." REVIEW. .|
00001310: 4E 43 4F 55 52 41 47 49 4E 47 20 43 4F 4D 4D 45 |NCOURAGING COMME|
00001320: 4E 54 53 22 00 4F 1B 22 02 3A 20 20 99 22 20 20 |NTS".O.".: ." |
00001330: 20 41 52 45 20 50 52 4F 56 49 44 45 44 20 46 4F | ARE PROVIDED FO|
00001340: 52 20 54 48 45 20 53 54 55 44 45 4E 54 2E 22 00 |R THE STUDENT.".|
00001350: 5B 1B 44 02 3A 20 20 8D 38 33 35 00 72 1B 4E 02 |[.D.: .835.r.N.|
00001360: 3A 20 20 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 |: .UZ.1..UP%:.2|
00001370: 31 37 00 7B 1B 57 02 3A 20 20 8E 00 A4 1B 58 02 |17.{.W.: ....X.|
00001380: 8F 2D 2D 2D 2D 2D 50 52 4F 47 52 41 4D 20 4D 4F |.-----PROGRAM MO|
00001390: 44 49 46 49 43 41 54 49 4F 4E 20 49 4E 53 54 2D |DIFICATION INST-|
000013A0: 2D 2D 2D 2D 00 B8 1B 59 02 3A 20 20 99 22 93 22 |----...Y.: ."."|
000013B0: 3A 97 55 54 2C 55 4C 25 00 DB 1B 5D 02 3A 20 20 |:.UT,UL%...].: |
000013C0: 55 50 B2 30 3A 55 47 24 B2 22 D0 52 4F 47 52 41 |UP.0:UG$.".ROGRA|
000013D0: 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 0A 1C 62 02 |M .OD":.850...b.|
000013E0: 3A 20 20 99 22 11 11 11 11 20 20 20 20 D4 48 45 |: .".... .HE|
000013F0: 20 45 51 55 41 54 49 4F 4E 53 20 43 41 4E 20 42 | EQUATIONS CAN B|
00001400: 45 20 43 48 41 4E 47 45 44 22 00 37 1C 64 02 3A |E CHANGED".7.d.:|
00001410: 20 20 99 22 20 20 20 42 59 20 43 48 41 4E 47 49 | ." BY CHANGI|
00001420: 4E 47 20 54 48 45 20 44 41 54 41 20 53 54 41 54 |NG THE DATA STAT|
00001430: 45 4D 45 4E 54 53 22 00 62 1C 66 02 3A 20 20 99 |EMENTS".b.f.: .|
00001440: 22 20 20 20 46 52 4F 4D 20 4C 49 4E 45 53 20 33 |" FROM LINES 3|
00001450: 36 36 30 20 54 4F 20 33 39 30 30 2E 20 C5 41 43 |660 TO 3900. .AC|
00001460: 48 22 00 92 1C 68 02 3A 20 20 99 22 20 20 20 53 |H"...h.: ." S|
00001470: 54 41 54 45 4D 45 4E 54 20 48 41 53 20 4F 4E 45 |TATEMENT HAS ONE|
00001480: 20 45 51 55 41 54 49 4F 4E 20 41 4E 44 20 54 57 | EQUATION AND TW|
00001490: 4F 22 00 B8 1C 6A 02 3A 20 20 99 22 20 20 20 50 |O"...j.: ." P|
000014A0: 4F 53 53 49 42 4C 45 20 41 4E 53 57 45 52 53 20 |OSSIBLE ANSWERS |
000014B0: 46 4F 52 20 49 54 2E 22 00 F1 1C 6C 02 3A 20 20 |FOR IT."...l.: |
000014C0: 99 22 11 20 20 20 45 47 2E 20 33 36 38 30 20 44 |.". EG. 3680 D|
000014D0: 41 54 41 22 3B C7 28 33 34 29 3B 22 58 3D 42 2F |ATA";.(34);"X=B/|
000014E0: 59 22 3B C7 28 33 34 29 22 2C 22 C7 28 33 34 29 |Y";.(34)",".(34)|
000014F0: 3B 00 1A 1D 6D 02 3A 20 20 99 22 42 3D 58 59 22 |;...m.: ."B=XY"|
00001500: 3B C7 28 33 34 29 22 2C 22 C7 28 33 34 29 22 42 |;.(34)",".(34)"B|
00001510: 3D 59 58 22 3B C7 28 33 34 29 00 49 1D 6E 02 3A |=YX";.(34).I.n.:|
00001520: 20 20 99 22 11 20 20 20 20 D4 48 45 20 46 49 52 | .". .HE FIR|
00001530: 53 54 20 31 35 20 41 52 45 20 55 53 55 41 4C 4C |ST 15 ARE USUALL|
00001540: 59 20 45 41 53 49 45 52 22 00 78 1D 6F 02 3A 20 |Y EASIER".x.o.: |
00001550: 20 99 22 20 20 20 41 4E 44 20 54 48 45 20 4E 45 | ." AND THE NE|
00001560: 58 54 20 31 30 20 47 45 54 20 48 41 52 44 45 52 |XT 10 GET HARDER|
00001570: 2E 20 20 CD 41 4B 45 22 00 A5 1D 70 02 3A 20 20 |. .AKE"...p.: |
00001580: 99 22 20 20 20 53 55 52 45 20 54 48 45 52 45 20 |." SURE THERE |
00001590: 41 52 45 20 32 35 20 4F 46 20 54 48 45 53 45 20 |ARE 25 OF THESE |
000015A0: 44 41 54 41 22 00 CE 1D 71 02 3A 20 20 99 22 20 |DATA"...q.: ." |
000015B0: 20 20 53 54 41 54 45 4D 45 4E 54 53 20 41 46 54 | STATEMENTS AFT|
000015C0: 45 52 20 4D 41 4B 49 4E 47 20 54 48 45 22 00 E4 |ER MAKING THE"..|
000015D0: 1D 72 02 3A 20 20 99 22 20 20 20 43 48 41 4E 47 |.r.: ." CHANG|
000015E0: 45 53 2E 22 00 F5 1D 74 02 3A 20 20 8D 38 33 35 |ES."...t.: .835|
000015F0: 3A 8D 38 35 30 00 29 1E 76 02 3A 20 20 99 22 11 |:.850.).v.: .".|
00001600: 11 11 11 11 11 11 20 20 20 20 D4 48 45 20 43 4F |...... .HE CO|
00001610: 4D 4D 45 4E 54 53 20 43 41 4E 20 42 45 20 43 48 |MMENTS CAN BE CH|
00001620: 41 4E 47 45 44 20 42 59 22 00 56 1E 78 02 3A 20 |ANGED BY".V.x.: |
00001630: 20 99 22 20 20 20 42 59 20 43 48 41 4E 47 49 4E | ." BY CHANGIN|
00001640: 47 20 54 48 45 20 44 41 54 41 20 53 54 41 54 45 |G THE DATA STATE|
00001650: 4D 45 4E 54 53 22 00 85 1E 7A 02 3A 20 20 99 22 |MENTS"...z.: ."|
00001660: 20 20 20 46 52 4F 4D 20 4C 49 4E 45 53 20 33 39 | FROM LINES 39|
00001670: 31 30 20 54 4F 20 33 39 35 30 2E 20 20 CF 4E 20 |10 TO 3950. .N |
00001680: 45 41 43 48 22 00 B4 1E 7C 02 3A 20 20 99 22 20 |EACH"...|.: ." |
00001690: 20 20 4C 49 4E 45 2C 20 43 4F 4D 4D 45 4E 54 53 | LINE, COMMENTS|
000016A0: 20 41 52 45 20 53 45 50 41 52 41 54 45 44 20 57 | ARE SEPARATED W|
000016B0: 49 54 48 22 00 E3 1E 7E 02 3A 20 20 99 22 20 20 |ITH"...~.: ." |
000016C0: 20 43 4F 4D 4D 41 53 2E 20 20 CD 41 4B 45 20 53 | COMMAS. .AKE S|
000016D0: 55 52 45 20 54 48 41 54 20 54 48 45 52 45 20 41 |URE THAT THERE A|
000016E0: 52 45 22 00 0D 1F 80 02 3A 20 20 99 22 20 20 20 |RE".....: ." |
000016F0: 31 35 20 43 4F 4D 4D 45 4E 54 53 20 41 46 54 45 |15 COMMENTS AFTE|
00001700: 52 20 4D 41 4B 49 4E 47 20 54 48 45 22 00 23 1F |R MAKING THE".#.|
00001710: 82 02 3A 20 20 99 22 20 20 20 43 48 41 4E 47 45 |..: ." CHANGE|
00001720: 53 2E 22 00 2F 1F 94 02 3A 20 20 8D 38 33 35 00 |S."./...: .835.|
00001730: 46 1F B2 02 3A 20 20 8B 55 5A B2 31 A7 9E 55 50 |F...: .UZ.1..UP|
00001740: 25 3A 89 32 31 37 00 4F 1F BB 02 3A 20 20 8E 00 |%:.217.O...: ..|
00001750: 77 1F BC 02 8F 2D 2D 2D 2D 2D 54 4F 20 55 53 45 |w....-----TO USE|
00001760: 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D 34 30 | 8032 LOAD CBM40|
00001770: 33 32 2D 2D 2D 2D 2D 00 AD 1F C6 02 99 22 93 11 |32-----......"..|
00001780: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
00001790: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
000017A0: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 E3 1F |N AN 8032 .....|
000017B0: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
000017C0: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
000017D0: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
000017E0: 11 11 22 00 F1 1F DA 02 3A 20 20 9E 55 55 AA 37 |..".....: .UU.7|
000017F0: 31 00 FA 1F E4 02 3A 20 20 80 00 1A 20 20 03 8F |1.....: ... ..|
00001800: 20 2A 2A 20 54 20 49 20 54 20 4C 20 45 20 20 20 | ** T I T L E |
00001810: 50 20 41 20 47 20 45 20 2A 2A 00 4E 20 22 03 99 |P A G E **.N "..|
00001820: 22 93 11 1D 05 22 3B 3A 97 55 54 2C 55 55 25 3A |"....";:.UT,UU%:|
00001830: 8B C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 |..(50003).0..532|
00001840: 38 30 2C 31 34 3A 97 35 33 32 38 31 2C 36 00 64 |80,14:.53281,6.d|
00001850: 20 24 03 81 49 B2 31 A4 33 38 3A 99 22 12 A6 92 | $..I.1.38:."...|
00001860: 22 3B 3A 82 00 7C 20 26 03 81 49 B2 31 A4 32 32 |";:..| &..I.1.22|
00001870: 3A 99 22 11 9D 12 A6 92 22 3B 3A 82 00 94 20 28 |:.".....";:... (|
00001880: 03 81 49 B2 31 A4 33 37 3A 99 22 9D 9D 12 A6 92 |..I.1.37:.".....|
00001890: 22 3B 3A 82 00 AC 20 2A 03 81 49 B2 31 A4 32 32 |";:... *..I.1.22|
000018A0: 3A 99 22 91 9D 12 A6 92 22 3B 3A 82 00 D1 20 2C |:.".....";:... ,|
000018B0: 03 99 22 13 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D |..".............|
000018C0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 A9 20 20 |.............. |
000018D0: 92 00 F3 20 2E 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D |... ..."........|
000018E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 |........... . .|
000018F0: 20 92 A9 00 14 21 30 03 99 22 1D 1D 1D 1D 1D 1D | ....!0.."......|
00001900: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 20 92 20 |............. . |
00001910: 20 12 A3 DF 00 32 21 32 03 99 22 1D 1D 1D 1D 1D | ....2!2..".....|
00001920: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D DF 12 20 |............... |
00001930: 20 92 00 5A 21 34 03 99 22 11 11 1D 1D 1D 1D 1D | ..Z!4..".......|
00001940: 1D 1D 1D 1D 1D 1D 1D 43 20 4F 20 4D 20 4D 20 4F |.......C O M M O|
00001950: 20 44 20 4F 20 52 20 45 11 11 00 7D 21 36 03 99 | D O R E...}!6..|
00001960: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00001970: 45 44 55 43 41 54 49 4F 4E 41 4C 11 11 00 9C 21 |EDUCATIONAL....!|
00001980: 38 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |8.."............|
00001990: 1D 1D 1D 1D 53 4F 46 54 57 41 52 45 00 B7 21 3A |....SOFTWARE..!:|
000019A0: 03 8F 20 2A 2A 20 43 4F 4D 4D 4F 44 4F 52 45 20 |.. ** COMMODORE |
000019B0: 4C 4F 47 4F 20 2A 2A 00 EF 21 3B 03 99 C8 28 55 |LOGO **..!;...(U|
000019C0: 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 1D 1D |D$,24);"........|
000019D0: 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 |..PRESS SPACE BA|
000019E0: 52 20 4F 52 20 57 41 49 54 92 22 3A 49 B2 30 00 |R OR WAIT.":I.0.|
000019F0: 11 22 3C 03 A1 41 24 3A 8B 41 24 B3 B1 22 20 22 |."<..A$:.A$.." "|
00001A00: A7 49 B2 49 AA 31 3A 8B 49 B3 32 35 30 A7 38 32 |.I.I.1:.I.250.82|
00001A10: 38 00 38 22 3E 03 3A 20 20 54 31 24 B2 22 22 3A |8.8">.: T1$."":|
00001A20: 54 32 24 B2 22 22 3A 54 33 24 B2 22 22 3A 54 34 |T2$."":T3$."":T4|
00001A30: 24 B2 22 22 3A 49 B2 30 00 44 22 40 03 3A 20 20 |$."":I.0.D"@.: |
00001A40: 89 33 30 30 00 63 22 43 03 8F 2D 2D 2D 2D 2D 53 |.300.c"C..-----S|
00001A50: 50 41 43 45 20 42 41 52 20 50 52 45 53 53 2D 2D |PACE BAR PRESS--|
00001A60: 2D 2D 2D 00 9B 22 48 03 3A 20 20 99 C8 28 55 44 |---.."H.: ..(UD|
00001A70: 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D 1D 12 50 52 |$,24);".......PR|
00001A80: 45 53 53 20 53 50 41 43 45 20 42 41 52 20 54 4F |ESS SPACE BAR TO|
00001A90: 20 43 4F 4E 54 49 4E 55 45 92 22 00 B5 22 4C 03 | CONTINUE.".."L.|
00001AA0: 3A 20 20 A1 55 49 24 3A 8B 55 49 24 B3 B1 22 20 |: .UI$:.UI$.." |
00001AB0: 22 A7 38 34 34 00 BE 22 4E 03 3A 20 20 8E 00 E1 |".844.."N.: ...|
00001AC0: 22 52 03 8F 2D 2D 2D 2D 2D 50 41 47 45 20 44 45 |"R..-----PAGE DE|
00001AD0: 53 49 47 4E 20 52 4F 55 54 49 4E 45 2D 2D 2D 2D |SIGN ROUTINE----|
00001AE0: 2D 00 F0 22 54 03 3A 20 20 55 50 B2 55 50 AA 31 |-.."T.: UP.UP.1|
00001AF0: 00 1A 23 57 03 3A 20 20 99 22 93 22 C8 28 55 54 |..#W.: .".".(UT|
00001B00: 24 AA 55 50 24 2C 32 31 29 3B C8 28 55 47 24 AA |$.UP$,21);.(UG$.|
00001B10: 55 50 24 2C 31 34 29 3B 55 50 00 4C 23 5C 03 3A |UP$,14);UP.L#\.:|
00001B20: 20 20 99 22 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ." -----------|
00001B30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001B40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 83 23 61 |-----------"..#a|
00001B50: 03 3A 20 20 99 C8 28 55 44 24 2C 32 34 29 3B C8 |.: ..(UD$,24);.|
00001B60: 28 55 50 24 2C 36 29 3B 22 48 45 4C 50 20 2D 20 |(UP$,6);"HELP - |
00001B70: 50 52 45 53 53 20 20 20 48 20 3C 52 45 54 55 52 |PRESS H <RETUR|
00001B80: 4E 3E 22 00 92 23 66 03 3A 20 20 99 22 13 11 22 |N>"..#f.: .".."|
00001B90: 3A 8E 00 B4 23 6B 03 8F 2D 2D 2D 2D 2D 50 4C 45 |:...#k..-----PLE|
00001BA0: 41 53 45 20 57 41 49 54 20 52 45 4D 41 52 4B 2D |ASE WAIT REMARK-|
00001BB0: 2D 2D 2D 2D 00 ED 23 70 03 3A 20 20 99 C8 28 55 |----..#p.: ..(U|
00001BC0: 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 |D$,24);" |
00001BD0: 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C | ONE MOMENT PL|
00001BE0: 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 F6 23 |EASE... "..#|
00001BF0: 75 03 3A 20 20 8E 00 16 24 84 03 8F 2D 2D 2D 2D |u.: ...$...----|
00001C00: 2D 53 45 54 20 55 50 20 56 41 52 49 41 42 4C 45 |-SET UP VARIABLE|
00001C10: 53 2D 2D 2D 2D 2D 00 64 24 85 03 3A 20 20 55 58 |S-----.d$..: UX|
00001C20: 24 B2 22 48 22 3A 86 55 51 25 28 31 30 30 30 29 |$."H":.UQ%(1000)|
00001C30: 3A 55 42 B2 33 32 37 36 38 3A 55 31 B2 31 39 36 |:UB.32768:U1.196|
00001C40: 3A 55 32 B2 31 39 37 3A 55 33 B2 31 39 38 3A 55 |:U2.197:U3.198:U|
00001C50: 34 B2 32 31 36 3A 55 43 B2 31 36 37 3A 55 55 B2 |4.216:UC.167:UU.|
00001C60: 31 30 32 34 00 9D 24 86 03 3A 20 20 55 54 B2 35 |1024..$..: UT.5|
00001C70: 39 34 36 38 3A 55 55 25 B2 31 32 3A 55 4C 25 B2 |9468:UU%.12:UL%.|
00001C80: 31 34 3A 55 50 25 B2 31 31 34 36 3A 55 4D B2 33 |14:UP%.1146:UM.3|
00001C90: 32 37 36 38 3A 97 35 30 30 30 33 2C 30 00 E0 24 |2768:.50003,0..$|
00001CA0: 87 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 42 |....(50003).0.UB|
00001CB0: B2 31 30 32 34 3A 55 31 B2 32 30 39 3A 55 32 B2 |.1024:U1.209:U2.|
00001CC0: 32 31 30 3A 55 33 B2 32 31 31 3A 55 34 B2 32 31 |210:U3.211:U4.21|
00001CD0: 34 3A 55 43 B2 32 30 34 3A 55 55 B2 32 30 34 38 |4:UC.204:UU.2048|
00001CE0: 00 18 25 88 03 8B C2 28 35 30 30 30 33 29 B2 30 |..%....(50003).0|
00001CF0: A7 55 54 B2 35 33 32 37 32 3A 55 55 25 B2 32 31 |.UT.53272:UU%.21|
00001D00: 3A 55 4C 25 B2 32 33 3A 55 50 25 B2 32 31 33 39 |:UL%.23:UP%.2139|
00001D10: 3A 55 4D B2 31 30 32 34 00 3F 25 89 03 3A 20 20 |:UM.1024.?%..: |
00001D20: 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |UD$."...........|
00001D30: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
00001D40: 74 25 8A 03 3A 20 20 55 50 24 B2 22 20 20 20 20 |t%..: UP$." |
00001D50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001D70: 20 20 20 22 00 B6 25 8B 03 3A 20 20 55 54 24 B2 | "..%..: UT$.|
00001D80: 22 20 C5 D1 CE 20 CD C1 CE C9 D0 D5 CC C1 D4 2E |" ... ..........|
00001D90: 22 3A 8F 20 50 4C 41 43 45 20 50 52 4F 47 52 41 |":. PLACE PROGRA|
00001DA0: 4D 20 54 49 54 4C 45 20 48 45 52 45 21 21 21 21 |M TITLE HERE!!!!|
00001DB0: 21 21 21 2A 2A 2A 00 BF 25 8C 03 3A 20 20 8E 00 |!!!***..%..: ..|
00001DC0: DC 25 8E 03 8F 2D 2D 2D 2D 2D 53 45 54 20 56 41 |.%...-----SET VA|
00001DD0: 52 49 41 42 4C 45 53 2D 2D 2D 2D 2D 00 E8 25 93 |RIABLES-----..%.|
00001DE0: 03 3A 20 20 8D 39 30 30 00 16 26 95 03 86 41 24 |.: .900..&...A$|
00001DF0: 28 32 35 29 2C 42 24 28 32 35 29 2C 43 24 28 32 |(25),B$(25),C$(2|
00001E00: 35 29 2C 44 24 28 31 35 29 2C 46 28 32 35 29 2C |5),D$(15),F(25),|
00001E10: 47 28 31 35 31 29 00 34 26 98 03 8F 2D 2D 2D 2D |G(151).4&...----|
00001E20: 2D 43 48 45 43 4B 20 46 4F 52 20 38 30 33 32 2D |-CHECK FOR 8032-|
00001E30: 2D 2D 2D 2D 00 55 26 9D 03 3A 20 20 99 22 93 22 |----.U&..: ."."|
00001E40: 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 44 20 |:.".":. SHIFTED |
00001E50: 53 50 41 43 45 00 6F 26 A2 03 3A 20 20 8B C2 28 |SPACE.o&..: ..(|
00001E60: 55 42 AA 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 |UB.40)..96..700.|
00001E70: 8B 26 A3 03 8F 2D 2D 2D 2D 2D 4D 45 4D 4F 52 59 |.&...-----MEMORY|
00001E80: 20 43 48 45 43 4B 2D 2D 2D 2D 2D 00 A2 26 A4 03 | CHECK-----..&..|
00001E90: 3A 20 20 8B 20 B8 28 30 29 B1 32 30 30 30 A7 39 |: . .(0).2000.9|
00001EA0: 33 37 00 D3 26 A5 03 3A 20 20 99 22 93 11 11 05 |37..&..: ."....|
00001EB0: 54 48 49 53 20 4D 41 43 48 49 4E 45 20 44 4F 45 |THIS MACHINE DOE|
00001EC0: 53 20 4E 4F 54 20 48 41 56 45 20 45 4E 4F 55 47 |S NOT HAVE ENOUG|
00001ED0: 48 11 22 00 FA 26 A6 03 3A 20 20 99 22 4D 45 4D |H."..&..: ."MEM|
00001EE0: 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 53 20 |ORY TO RUN THIS |
00001EF0: 50 52 4F 47 52 41 4D 20 21 22 00 08 27 A7 03 3A |PROGRAM !"..'..:|
00001F00: 20 20 9E 55 55 AA 37 31 00 11 27 A8 03 3A 20 20 | .UU.71..'..: |
00001F10: 80 00 2E 27 A9 03 3A 20 20 99 22 93 05 22 3A 8B |...'..: ."..":.|
00001F20: C2 28 35 30 30 30 33 29 B2 30 A7 39 36 32 00 60 |.(50003).0.962.`|
00001F30: 27 AC 03 8F 2D 2D 2D 2D 2D 42 41 53 49 43 20 32 |'...-----BASIC 2|
00001F40: 2E 30 20 20 4F 52 20 20 34 2E 30 20 20 4F 52 20 |.0 OR 4.0 OR |
00001F50: 20 43 2D 36 34 20 53 45 54 55 50 2D 2D 2D 2D 2D | C-64 SETUP-----|
00001F60: 00 9E 27 AD 03 97 31 30 37 35 2C 31 33 33 3A 97 |..'...1075,133:.|
00001F70: 31 30 37 36 2C 31 34 34 3A 97 31 30 37 37 2C 32 |1076,144:.1077,2|
00001F80: 33 34 3A 97 31 30 37 39 2C 34 3A 97 31 30 38 30 |34:.1079,4:.1080|
00001F90: 2C 31 33 33 3A 97 31 30 38 31 2C 31 34 35 00 D4 |,133:.1081,145..|
00001FA0: 27 AE 03 97 31 30 39 31 2C 31 35 35 3A 97 31 30 |'...1091,155:.10|
00001FB0: 39 38 2C 31 33 33 3A 97 31 30 39 39 2C 31 34 34 |98,133:.1099,144|
00001FC0: 3A 97 31 31 30 30 2C 32 33 34 3A 97 31 31 30 33 |:.1100,234:.1103|
00001FD0: 2C 31 33 33 00 F6 27 AF 03 97 31 31 30 34 2C 31 |,133..'...1104,1|
00001FE0: 34 35 3A 97 31 31 30 35 2C 32 33 34 3A 97 31 30 |45:.1105,234:.10|
00001FF0: 38 32 2C 32 33 34 00 10 28 B1 03 3A 20 20 8B C2 |82,234..(..: ..|
00002000: 28 35 30 30 30 33 29 B3 B1 31 36 30 A7 39 35 35 |(50003)..160.955|
00002010: 00 42 28 B6 03 3A 20 20 97 31 30 39 33 2C 38 38 |.B(..: .1093,88|
00002020: 3A 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 37 |:.1094,228:.1097|
00002030: 2C 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 |,85:.1102,228:.9|
00002040: 36 35 00 5A 28 BB 03 3A 20 20 8B C2 28 35 30 30 |65.Z(..: ..(500|
00002050: 30 33 29 B3 B1 31 A7 39 39 30 00 8C 28 C0 03 3A |03)..1.990..(..:|
00002060: 20 20 97 31 30 39 33 2C 34 39 3A 97 31 30 39 34 | .1093,49:.1094|
00002070: 2C 32 33 30 3A 97 31 30 39 37 2C 34 36 3A 97 31 |,230:.1097,46:.1|
00002080: 31 30 32 2C 32 33 30 3A 89 39 36 35 00 C6 28 C2 |102,230:.965..(.|
00002090: 03 97 32 30 39 39 2C 31 34 31 3A 97 32 31 30 30 |..2099,141:.2100|
000020A0: 2C 32 30 3A 97 32 31 30 31 2C 33 3A 97 32 31 30 |,20:.2101,3:.210|
000020B0: 33 2C 38 3A 97 32 31 30 34 2C 31 34 31 3A 97 32 |3,8:.2104,141:.2|
000020C0: 31 30 35 2C 32 31 00 02 29 C3 03 97 32 31 30 36 |105,21..)...2106|
000020D0: 2C 33 3A 97 32 31 31 35 2C 31 34 35 3A 97 32 31 |,3:.2115,145:.21|
000020E0: 31 37 2C 35 32 3A 97 32 31 31 38 2C 32 33 34 3A |17,52:.2118,234:|
000020F0: 97 32 31 32 31 2C 34 39 3A 97 32 31 32 32 2C 31 |.2121,49:.2122,1|
00002100: 34 31 00 3C 29 C4 03 97 32 31 32 33 2C 32 30 3A |41.<)...2123,20:|
00002110: 97 32 31 32 34 2C 33 3A 97 32 31 32 36 2C 32 33 |.2124,3:.2126,23|
00002120: 34 3A 97 32 31 32 37 2C 31 34 31 3A 97 32 31 32 |4:.2127,141:.212|
00002130: 38 2C 32 31 3A 97 32 31 32 39 2C 33 00 5C 29 C5 |8,21:.2129,3.\).|
00002140: 03 3A 20 9E 55 55 AA 34 38 3A 8F 20 44 49 53 41 |.: .UU.48:. DISA|
00002150: 42 4C 45 20 53 54 4F 50 20 4B 45 59 00 70 29 CA |BLE STOP KEY.p).|
00002160: 03 3A 20 20 8D 38 30 30 3A 8F 20 54 49 54 4C 45 |.: .800:. TITLE|
00002170: 00 83 29 D4 03 3A 20 20 89 33 30 30 3A 8F 20 4D |..)..: .300:. M|
00002180: 45 4E 55 00 B7 29 DE 03 3A 20 20 99 22 93 54 48 |ENU..)..: .".TH|
00002190: 45 20 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 |E PGM WILL NOT W|
000021A0: 4F 52 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 |ORK ON THIS MACH|
000021B0: 49 4E 45 21 22 3A 80 00 F1 29 E8 03 3A 20 8B 55 |INE!":...)..: .U|
000021C0: 5A B2 31 A7 9E 55 50 25 3A 9E 55 50 25 3A 55 5A |Z.1..UP%:.UP%:UZ|
000021D0: B2 30 3A 8F 2D 2D 2D 2D 2D 50 52 4F 47 52 41 4D |.0:.-----PROGRAM|
000021E0: 20 53 54 41 52 54 53 20 48 45 52 45 2D 2D 2D 2D | STARTS HERE----|
000021F0: 2D 00 1B 2A E9 03 99 22 93 05 22 3B 3A 8B C2 28 |-..*..."..";:..(|
00002200: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00002210: 36 3A 97 35 33 32 38 30 2C 31 34 00 3A 2A DC 05 |6:.53280,14.:*..|
00002220: 8F 20 45 51 55 41 54 49 4F 4E 20 4D 41 4E 49 50 |. EQUATION MANIP|
00002230: 55 4C 41 54 49 4F 4E 20 42 59 00 6A 2A E6 05 8F |ULATION BY.j*...|
00002240: 20 52 2E 57 2E 44 52 41 59 2C 20 52 2E 52 23 32 | R.W.DRAY, R.R#2|
00002250: 20 50 45 54 45 52 42 4F 52 4F 55 47 48 20 4F 4E | PETERBOROUGH ON|
00002260: 54 2E 20 4B 39 4A 20 36 58 33 00 AD 2A EB 05 8F |T. K9J 6X3..*...|
00002270: 20 55 50 47 52 41 44 45 44 20 42 59 20 44 45 52 | UPGRADED BY DER|
00002280: 45 4B 20 4C 45 45 20 20 20 20 20 20 20 20 20 20 |EK LEE |
00002290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000022A0: 20 20 20 20 20 20 4A 55 4C 59 2F 38 32 00 BE 2A | JULY/82..*|
000022B0: F0 05 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 C4 |...".":.UT,UL%..|
000022C0: 2A 18 06 8C 00 E6 2A 22 06 81 49 B2 31 A4 32 35 |*.....*"..I.1.25|
000022D0: 3A 87 20 41 24 28 49 29 2C 42 24 28 49 29 2C 43 |:. A$(I),B$(I),C|
000022E0: 24 28 49 29 3A 82 00 FB 2A 2C 06 81 49 B2 31 A4 |$(I):...*,..I.1.|
000022F0: 31 35 3A 87 44 24 28 49 29 3A 82 00 06 2B 36 06 |15:.D$(I):...+6.|
00002300: 8D 20 33 39 36 30 00 21 2B 40 06 55 47 24 B2 22 |. 3960.!+@.UG$."|
00002310: CC 45 53 53 4F 4E 22 3A 55 50 B2 30 3A 8D 38 35 |.ESSON":UP.0:.85|
00002320: 30 00 54 2B 7C 06 99 22 11 11 11 11 11 11 11 20 |0.T+|.."....... |
00002330: 20 D4 4F 20 4D 41 4E 49 50 55 4C 41 54 45 20 41 | .O MANIPULATE A|
00002340: 4E 20 45 51 55 41 54 49 4F 4E 20 4D 45 41 4E 53 |N EQUATION MEANS|
00002350: 20 54 4F 22 00 83 2B 86 06 99 22 20 54 41 4B 45 | TO"..+..." TAKE|
00002360: 20 53 4F 4D 45 54 48 49 4E 47 20 4C 49 4B 45 20 | SOMETHING LIKE |
00002370: 58 3D 32 42 2F 59 20 41 4E 44 20 46 49 4E 44 20 |X=2B/Y AND FIND |
00002380: 42 2E 22 00 AE 2B 90 06 99 22 11 20 20 D4 48 45 |B."..+...". .HE|
00002390: 20 50 55 52 50 4F 53 45 20 4F 46 20 54 48 49 53 | PURPOSE OF THIS|
000023A0: 20 50 52 4F 47 52 41 4D 20 49 53 20 54 4F 00 D7 | PROGRAM IS TO..|
000023B0: 2B 9A 06 99 22 20 48 45 4C 50 20 59 4F 55 20 54 |+..." HELP YOU T|
000023C0: 4F 20 44 4F 20 54 48 49 53 20 57 49 54 48 4F 55 |O DO THIS WITHOU|
000023D0: 54 20 55 53 49 4E 47 00 F8 2B A4 06 99 22 20 43 |T USING..+..." C|
000023E0: 4F 4D 50 4C 49 43 41 54 45 44 20 4D 41 54 48 45 |OMPLICATED MATHE|
000023F0: 4D 41 54 49 43 53 2E 22 00 01 2C AE 06 8D 38 33 |MATICS."..,...83|
00002400: 35 00 0F 2C B8 06 55 50 B2 31 3A 8D 38 35 30 00 |5..,..UP.1:.850.|
00002410: 3E 2C C2 06 99 22 11 11 20 20 20 20 20 20 C9 46 |>,...".. .F|
00002420: 20 20 54 48 45 20 20 45 51 55 41 54 49 4F 4E 20 | THE EQUATION |
00002430: 20 43 4F 4E 54 41 49 4E 53 20 20 4E 4F 22 00 6D | CONTAINS NO".m|
00002440: 2C CC 06 99 22 20 2B 20 4F 52 20 2D 20 53 49 47 |,..." + OR - SIG|
00002450: 4E 53 2C 20 54 48 45 20 54 41 53 4B 20 49 53 20 |NS, THE TASK IS |
00002460: 56 45 52 59 20 53 49 4D 50 4C 45 2E 22 00 9C 2C |VERY SIMPLE."..,|
00002470: D6 06 99 22 20 D7 45 20 57 49 4C 4C 20 55 53 45 |..." .E WILL USE|
00002480: 20 54 48 45 20 20 43 52 4F 53 53 20 20 4D 55 4C | THE CROSS MUL|
00002490: 54 49 50 4C 49 43 41 54 49 4F 4E 22 00 B8 2C E0 |TIPLICATION"..,.|
000024A0: 06 99 22 20 52 55 4C 45 2C 20 57 48 49 43 48 20 |.." RULE, WHICH |
000024B0: 53 54 41 54 45 53 3A 22 00 E9 2C EA 06 99 3A 99 |STATES:"..,...:.|
000024C0: 22 20 20 20 20 20 20 D7 48 45 4E 20 53 4F 4D 45 |" .HEN SOME|
000024D0: 54 48 49 4E 47 20 49 53 20 4D 4F 56 45 44 20 41 |THING IS MOVED A|
000024E0: 43 52 4F 53 53 20 41 4E 22 00 18 2D F4 06 99 22 |CROSS AN"..-..."|
000024F0: 20 45 51 55 41 4C 20 53 49 47 4E 2C 49 54 20 4D | EQUAL SIGN,IT M|
00002500: 55 53 54 20 42 45 20 4D 4F 56 45 44 20 44 49 41 |UST BE MOVED DIA|
00002510: 47 4F 4E 41 4C 4C 59 22 00 37 2D FE 06 99 22 20 |GONALLY".7-..." |
00002520: 41 43 52 4F 53 53 20 54 48 45 20 45 51 55 41 4C |ACROSS THE EQUAL|
00002530: 20 53 49 47 4E 2E 22 00 3D 2D 08 07 99 00 6A 2D | SIGN.".=-....j-|
00002540: 12 07 99 22 20 20 20 20 20 20 C9 46 20 53 4F 4D |..." .F SOM|
00002550: 45 54 48 49 4E 47 20 20 57 41 53 20 4F 4E 20 54 |ETHING WAS ON T|
00002560: 48 45 20 42 4F 54 54 4F 4D 22 00 99 2D 1C 07 99 |HE BOTTOM"..-...|
00002570: 22 20 4C 45 46 54 20 53 49 44 45 2C 20 49 54 20 |" LEFT SIDE, IT |
00002580: 20 57 49 4C 4C 20 20 42 45 20 4F 4E 20 54 48 45 | WILL BE ON THE|
00002590: 20 20 54 4F 50 20 4F 4E 22 00 C1 2D 26 07 99 22 | TOP ON"..-&.."|
000025A0: 20 54 48 45 20 52 49 47 48 54 20 53 49 44 45 2C | THE RIGHT SIDE,|
000025B0: 20 41 4E 44 20 56 49 43 45 20 56 45 52 53 41 2E | AND VICE VERSA.|
000025C0: 22 00 C7 2D 30 07 99 00 F2 2D 3A 07 99 22 20 20 |"..-0....-:.." |
000025D0: 45 47 20 20 58 3D 41 2F 42 20 54 48 45 52 45 46 |EG X=A/B THEREF|
000025E0: 4F 52 45 20 42 58 3D 41 20 4F 52 20 42 3D 41 2F |ORE BX=A OR B=A/|
000025F0: 58 22 00 21 2E 44 07 99 3A 99 22 20 20 20 20 20 |X".!.D..:." |
00002600: 20 D3 54 55 44 59 20 54 48 49 53 20 43 41 52 45 | .TUDY THIS CARE|
00002610: 46 55 4C 4C 59 20 55 4E 54 49 4C 20 20 59 4F 55 |FULLY UNTIL YOU|
00002620: 22 00 47 2E 4E 07 99 22 20 43 41 4E 20 53 45 45 |".G.N.." CAN SEE|
00002630: 20 48 4F 57 20 54 48 45 20 52 55 4C 45 20 41 50 | HOW THE RULE AP|
00002640: 50 4C 49 45 53 2E 22 00 4D 2E 58 07 99 00 56 2E |PLIES.".M.X...V.|
00002650: 62 07 8D 38 33 35 00 64 2E 76 07 55 50 B2 32 3A |b..835.d.v.UP.2:|
00002660: 8D 38 35 30 00 87 2E 80 07 99 22 11 11 20 20 CE |.850......".. .|
00002670: 4F 57 20 46 4F 52 20 41 20 4C 49 54 54 4C 45 20 |OW FOR A LITTLE |
00002680: 43 48 45 43 4B 2E 22 00 B2 2E 8A 07 99 3A 99 22 |CHECK."......:."|
00002690: 20 20 C9 46 20 58 3D 41 42 2F 43 2C 20 57 48 41 | .F X=AB/C, WHA|
000026A0: 54 20 44 4F 45 53 20 27 41 27 20 45 51 55 41 4C |T DOES 'A' EQUAL|
000026B0: 3F 22 00 E0 2E 94 07 99 22 11 20 20 28 C7 49 56 |?"......". (.IV|
000026C0: 45 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 4E 4C |E THE NUMBER ONL|
000026D0: 59 20 54 48 45 4E 20 3C 52 45 54 55 52 4E 3E 29 |Y THEN <RETURN>)|
000026E0: 00 F8 2E 9E 07 99 3A 99 22 20 20 D3 45 4C 45 43 |......:." .ELEC|
000026F0: 54 20 46 52 4F 4D 3A 22 00 19 2F A3 07 99 22 11 |T FROM:"../...".|
00002700: 20 20 20 20 31 2E 20 41 3D 43 58 2F 42 20 20 32 | 1. A=CX/B 2|
00002710: 2E 20 41 3D 42 58 2F 43 22 00 3A 2F A8 07 99 22 |. A=BX/C".:/..."|
00002720: 11 20 20 20 20 33 2E 20 41 3D 58 42 43 20 20 20 |. 3. A=XBC |
00002730: 34 2E 20 41 3D 42 2F 43 58 22 00 7A 2F B2 07 99 |4. A=B/CX".z/...|
00002740: 22 11 11 20 20 D7 48 41 54 20 49 53 20 59 4F 55 |".. .HAT IS YOU|
00002750: 52 20 43 48 4F 49 43 45 3F 20 22 3B 3A 55 53 24 |R CHOICE? ";:US$|
00002760: B2 22 31 32 33 34 48 22 3A 55 4C B2 31 3A 8D 33 |."1234H":UL.1:.3|
00002770: 35 3A 47 B2 C5 28 55 52 24 29 00 98 2F BC 07 91 |5:G..(UR$)../...|
00002780: 20 47 20 89 20 32 30 31 30 2C 32 30 33 30 2C 32 | G . 2010,2030,2|
00002790: 30 36 30 2C 32 30 38 30 00 A7 2F D0 07 8D 38 33 |060,2080../...83|
000027A0: 35 3A 89 31 39 31 30 00 D1 2F DA 07 99 3A 99 22 |5:.1910../...:."|
000027B0: 20 20 D4 48 41 54 20 49 53 20 43 4F 52 52 45 43 | .HAT IS CORREC|
000027C0: 54 2C 20 54 52 59 20 4F 4E 45 20 4D 4F 52 45 2E |T, TRY ONE MORE.|
000027D0: 22 00 E0 2F E4 07 8D 38 33 35 3A 89 32 31 30 35 |"../...835:.2105|
000027E0: 00 0E 30 EE 07 99 3A 99 22 20 20 D7 48 45 4E 20 |..0...:." .HEN |
000027F0: 42 20 26 20 43 20 43 52 4F 53 53 2C 20 54 48 45 |B & C CROSS, THE|
00002800: 59 20 4D 55 53 54 20 53 57 49 54 43 48 22 00 3A |Y MUST SWITCH".:|
00002810: 30 F8 07 99 22 20 20 54 4F 50 20 41 4E 44 20 42 |0..." TOP AND B|
00002820: 4F 54 54 4F 4D 20 41 53 20 57 45 4C 4C 2E 20 D4 |OTTOM AS WELL. .|
00002830: 52 59 20 41 47 41 49 4E 2E 22 00 4A 30 02 08 8D |RY AGAIN.".J0...|
00002840: 38 33 35 3A 89 20 31 39 31 30 00 73 30 0C 08 99 |835:. 1910.s0...|
00002850: 3A 99 22 20 20 42 20 4D 55 53 54 20 47 4F 20 46 |:." B MUST GO F|
00002860: 52 4F 4D 20 54 4F 50 20 54 4F 20 42 4F 54 54 4F |ROM TOP TO BOTTO|
00002870: 4D 2E 22 00 86 30 11 08 99 22 20 20 D4 52 59 20 |M."..0..." .RY |
00002880: 41 47 41 49 4E 2E 00 95 30 16 08 8D 38 33 35 3A |AGAIN...0...835:|
00002890: 89 31 39 31 30 00 BB 30 20 08 99 22 11 20 20 D7 |.1910..0 ..". .|
000028A0: CF D7 21 20 C5 56 45 52 59 20 4F 4E 45 20 57 41 |..! .VERY ONE WA|
000028B0: 53 20 53 57 49 54 43 48 45 44 22 00 E7 30 2A 08 |S SWITCHED"..0*.|
000028C0: 99 22 20 20 49 4E 43 4F 52 52 45 43 54 4C 59 21 |." INCORRECTLY!|
000028D0: 20 C3 48 45 43 4B 20 54 48 45 20 52 55 4C 45 20 | .HECK THE RULE |
000028E0: 41 47 41 49 4E 21 22 00 F7 30 34 08 8D 38 33 35 |AGAIN!"..04..835|
000028F0: 3A 89 20 31 37 32 30 00 05 31 39 08 55 50 B2 33 |:. 1720..19.UP.3|
00002900: 3A 8D 38 35 30 00 2C 31 3E 08 99 22 11 11 11 11 |:.850.,1>.."....|
00002910: 11 20 20 C9 46 20 43 3D 57 53 2F 32 54 2C 20 57 |. .F C=WS/2T, W|
00002920: 48 41 54 20 49 53 20 27 54 27 3F 22 00 51 31 48 |HAT IS 'T'?".Q1H|
00002930: 08 99 22 11 20 20 20 20 31 2E 20 54 3D 32 57 53 |..". 1. T=2WS|
00002940: 2F 43 20 20 20 32 2E 20 54 3D 32 43 2F 57 53 20 |/C 2. T=2C/WS |
00002950: 22 00 74 31 52 08 99 22 11 20 20 20 20 33 2E 20 |".t1R..". 3. |
00002960: 54 3D 43 2F 32 57 53 20 20 20 34 2E 20 54 3D 57 |T=C/2WS 4. T=W|
00002970: 53 2F 32 43 00 B4 31 5C 08 99 22 11 11 20 20 D7 |S/2C..1\..".. .|
00002980: 48 41 54 20 49 53 20 59 4F 55 52 20 43 48 4F 49 |HAT IS YOUR CHOI|
00002990: 43 45 3F 20 22 3B 3A 55 53 24 B2 22 31 32 33 34 |CE? ";:US$."1234|
000029A0: 48 22 3A 55 4C B2 31 3A 8D 33 35 3A 47 B2 C5 28 |H":UL.1:.35:G..(|
000029B0: 55 52 24 29 00 D2 31 66 08 91 20 47 20 89 20 32 |UR$)..1f.. G . 2|
000029C0: 31 38 30 2C 32 32 30 30 2C 32 32 32 30 2C 32 32 |180,2200,2220,22|
000029D0: 34 30 00 E2 31 7A 08 8D 38 33 35 3A 89 20 32 31 |40..1z..835:. 21|
000029E0: 30 35 00 0A 32 84 08 99 3A 99 22 20 20 C3 48 45 |05..2...:." .HE|
000029F0: 43 4B 20 54 48 45 20 50 4F 53 49 54 49 4F 4E 20 |CK THE POSITION |
00002A00: 4F 46 20 54 48 45 20 32 2E 22 00 19 32 8E 08 8D |OF THE 2."..2...|
00002A10: 38 33 35 3A 89 32 31 30 35 00 46 32 98 08 99 22 |835:.2105.F2..."|
00002A20: 11 20 20 D7 48 45 4E 20 43 52 4F 53 53 49 4E 47 |. .HEN CROSSING|
00002A30: 20 54 48 45 20 45 51 55 41 4C 20 53 49 47 4E 2C | THE EQUAL SIGN,|
00002A40: 20 54 48 45 59 22 00 6A 32 9D 08 99 22 20 20 4D | THEY".j2..." M|
00002A50: 55 53 54 20 47 4F 20 46 52 4F 4D 20 54 4F 50 20 |UST GO FROM TOP |
00002A60: 54 4F 20 42 4F 54 54 4F 4D 22 00 79 32 A2 08 8D |TO BOTTOM".y2...|
00002A70: 38 33 35 3A 89 32 31 30 35 00 A3 32 AC 08 99 3A |835:.2105..2...:|
00002A80: 99 22 20 20 D4 48 45 20 32 20 49 53 20 4F 4B 2C |." .HE 2 IS OK,|
00002A90: 20 42 55 54 20 54 48 45 20 4C 45 54 54 45 52 53 | BUT THE LETTERS|
00002AA0: 3F 3F 22 00 B2 32 B6 08 8D 38 33 35 3A 89 32 31 |??"..2...835:.21|
00002AB0: 30 35 00 E0 32 C0 08 99 3A 99 22 20 20 D4 48 41 |05..2...:." .HA|
00002AC0: 54 20 49 53 20 43 4F 52 52 45 43 54 2E 20 CE 4F |T IS CORRECT. .O|
00002AD0: 57 20 46 4F 52 20 53 4F 4D 45 20 4D 4F 52 45 22 |W FOR SOME MORE"|
00002AE0: 00 F7 32 CA 08 99 22 20 20 49 4E 53 54 52 55 43 |..2..." INSTRUC|
00002AF0: 54 49 4F 4E 53 2E 22 00 00 33 D4 08 8D 38 33 35 |TIONS."..3...835|
00002B00: 00 0E 33 D9 08 55 50 B2 34 3A 8D 38 35 30 00 3D |..3..UP.4:.850.=|
00002B10: 33 DE 08 99 22 11 20 20 20 20 20 20 C9 46 20 54 |3...". .F T|
00002B20: 48 45 20 45 51 55 41 54 49 4F 4E 20 43 4F 4E 54 |HE EQUATION CONT|
00002B30: 41 49 4E 53 20 2B 20 4F 52 20 2D 20 22 00 6B 33 |AINS + OR - ".k3|
00002B40: E8 08 99 22 20 53 49 47 4E 53 2C 20 54 48 45 20 |..." SIGNS, THE |
00002B50: 52 55 4C 45 20 4D 55 53 54 20 43 48 41 4E 47 45 |RULE MUST CHANGE|
00002B60: 20 41 20 4C 49 54 54 4C 45 2E 22 00 96 33 F2 08 | A LITTLE."..3..|
00002B70: 99 22 20 C1 20 54 45 52 4D 20 57 49 54 48 20 41 |." . TERM WITH A|
00002B80: 20 50 4F 53 49 54 49 56 45 20 53 49 47 4E 20 4F | POSITIVE SIGN O|
00002B90: 4E 20 4F 4E 45 22 00 C0 33 FC 08 99 22 20 53 49 |N ONE"..3..." SI|
00002BA0: 44 45 20 4F 46 20 54 48 45 20 45 51 55 41 54 49 |DE OF THE EQUATI|
00002BB0: 4F 4E 20 57 49 4C 4C 20 48 41 56 45 20 41 20 22 |ON WILL HAVE A "|
00002BC0: 00 ED 33 06 09 99 22 20 4E 45 47 41 54 49 56 45 |..3..." NEGATIVE|
00002BD0: 20 53 49 47 4E 20 4F 4E 20 54 48 45 20 4F 54 48 | SIGN ON THE OTH|
00002BE0: 45 52 20 53 49 44 45 2C 20 41 4E 44 22 00 01 34 |ER SIDE, AND"..4|
00002BF0: 10 09 99 22 20 56 49 43 45 20 56 45 52 53 41 2E |..." VICE VERSA.|
00002C00: 22 00 15 34 15 09 99 22 11 20 D4 48 45 52 45 46 |"..4...". .HEREF|
00002C10: 4F 52 45 2C 22 00 39 34 1A 09 99 3A 99 22 20 20 |ORE,".94...:." |
00002C20: 20 20 20 20 C9 46 20 58 3D 59 2B 33 20 20 20 54 | .F X=Y+3 T|
00002C30: 48 45 4E 20 58 2D 33 3D 59 00 5D 34 24 09 99 3A |HEN X-3=Y.]4$..:|
00002C40: 99 22 20 20 20 20 20 20 C9 46 20 41 3D 42 2D 43 |." .F A=B-C|
00002C50: 20 20 20 54 48 45 4E 20 41 2B 43 3D 42 00 85 34 | THEN A+C=B..4|
00002C60: 2E 09 99 3A 99 22 20 20 20 20 20 20 C9 46 20 34 |...:." .F 4|
00002C70: 58 3D 33 59 2D 43 20 54 48 45 4E 20 34 58 2D 33 |X=3Y-C THEN 4X-3|
00002C80: 59 3D 2D 43 22 00 B4 34 38 09 99 3A 99 22 20 20 |Y=-C"..48..:." |
00002C90: 20 20 20 20 CE 4F 54 49 43 45 20 54 48 41 54 20 | .OTICE THAT |
00002CA0: 54 48 45 20 57 48 4F 4C 45 20 54 45 52 4D 20 4D |THE WHOLE TERM M|
00002CB0: 55 53 54 22 00 E1 34 42 09 99 22 20 42 45 20 4D |UST"..4B.." BE M|
00002CC0: 4F 56 45 44 20 45 47 2E 20 28 33 59 29 20 41 4E |OVED EG. (3Y) AN|
00002CD0: 44 20 4E 4F 54 20 4A 55 53 54 20 54 48 45 20 33 |D NOT JUST THE 3|
00002CE0: 22 00 F3 34 4C 09 99 22 20 4F 52 20 54 48 45 20 |"..4L.." OR THE |
00002CF0: 59 2E 22 00 FD 34 56 09 8D 20 38 33 35 00 0B 35 |Y."..4V.. 835..5|
00002D00: 5B 09 55 50 B2 35 3A 8D 38 35 30 00 3A 35 6A 09 |[.UP.5:.850.:5j.|
00002D10: 99 22 11 20 20 20 20 C9 46 20 59 4F 55 20 48 41 |.". .F YOU HA|
00002D20: 44 20 33 58 3D 32 59 2B 33 44 20 41 4E 44 20 59 |D 3X=2Y+3D AND Y|
00002D30: 4F 55 20 57 41 4E 54 45 44 22 00 69 35 74 09 99 |OU WANTED".i5t..|
00002D40: 22 20 54 4F 20 46 49 4E 44 20 44 2C 20 46 49 52 |" TO FIND D, FIR|
00002D50: 53 54 20 4D 4F 56 45 20 54 48 45 20 28 32 59 29 |ST MOVE THE (2Y)|
00002D60: 20 41 43 52 4F 53 53 2E 22 00 6F 35 7E 09 99 00 | ACROSS.".o5~...|
00002D70: 86 35 88 09 99 22 20 20 20 20 20 20 20 20 33 58 |.5..." 3X|
00002D80: 2D 32 59 3D 33 44 00 8C 35 92 09 99 00 BA 35 9C |-2Y=3D..5.....5.|
00002D90: 09 99 22 20 20 20 20 D4 48 45 4E 20 55 53 45 20 |.." .HEN USE |
00002DA0: 43 52 4F 53 53 20 4D 55 4C 54 49 50 4C 49 43 41 |CROSS MULTIPLICA|
00002DB0: 54 49 4F 4E 2C 20 42 55 54 22 00 E8 35 A6 09 99 |TION, BUT"..5...|
00002DC0: 22 20 42 45 20 53 55 52 45 20 54 48 45 20 33 20 |" BE SURE THE 3 |
00002DD0: 49 53 20 4F 4E 20 54 48 45 20 42 4F 54 54 4F 4D |IS ON THE BOTTOM|
00002DE0: 20 4F 46 20 54 48 45 22 00 0F 36 B0 09 99 22 20 | OF THE"..6..." |
00002DF0: 57 48 4F 4C 45 20 4C 45 46 54 20 53 49 44 45 2E |WHOLE LEFT SIDE.|
00002E00: 20 28 55 53 45 20 42 52 41 43 4B 45 54 53 29 00 | (USE BRACKETS).|
00002E10: 15 36 BA 09 99 00 30 36 C4 09 99 22 20 20 20 20 |.6....06..." |
00002E20: 20 20 20 28 33 58 2D 32 59 29 2F 33 20 3D 20 44 | (3X-2Y)/3 = D|
00002E30: 00 36 36 CE 09 99 00 60 36 D8 09 99 3A 99 22 20 |.66....`6...:." |
00002E40: C7 49 56 45 4E 3A 20 20 33 41 3D 39 58 2B 44 2F |.IVEN: 3A=9X+D/|
00002E50: 34 45 20 20 20 20 20 46 49 4E 44 20 27 45 27 22 |4E FIND 'E'"|
00002E60: 00 82 36 E2 09 99 3A 99 22 20 C6 49 52 53 54 20 |..6...:." .IRST |
00002E70: D3 54 45 50 3A 20 20 20 33 41 2D 39 58 3D 44 2F |.TEP: 3A-9X=D/|
00002E80: 34 45 00 A7 36 EC 09 99 3A 99 22 20 D3 45 43 4F |4E..6...:." .ECO|
00002E90: 4E 44 20 D3 54 45 50 3A 20 20 34 45 3D 44 2F 28 |ND .TEP: 4E=D/(|
00002EA0: 33 41 2D 39 58 29 22 00 CD 36 F6 09 99 3A 99 22 |3A-9X)"..6...:."|
00002EB0: 20 C6 49 4E 41 4C 20 D3 54 45 50 3A 20 20 20 20 | .INAL .TEP: |
00002EC0: 45 3D 44 2F 28 33 41 2D 39 58 29 34 22 00 D6 36 |E=D/(3A-9X)4"..6|
00002ED0: 00 0A 8D 38 33 35 00 F3 36 0A 0A 55 47 24 B2 22 |...835..6..UG$."|
00002EE0: C5 58 45 52 43 49 53 45 22 3A 55 50 B2 30 3A 8D |.XERCISE":UP.0:.|
00002EF0: 38 35 30 00 23 37 14 0A 99 22 11 11 11 20 20 20 |850.#7..."... |
00002F00: 20 20 20 20 CE 4F 57 20 49 53 20 54 48 45 20 54 | .OW IS THE T|
00002F10: 49 4D 45 20 54 4F 20 53 45 45 20 57 48 45 54 48 |IME TO SEE WHETH|
00002F20: 45 52 22 00 4F 37 1E 0A 99 22 20 4F 52 20 4E 4F |ER".O7..." OR NO|
00002F30: 54 20 59 4F 55 20 55 4E 44 45 52 53 54 41 4E 44 |T YOU UNDERSTAND|
00002F40: 20 57 48 41 54 20 59 4F 55 20 48 41 56 45 22 00 | WHAT YOU HAVE".|
00002F50: 66 37 28 0A 99 22 20 42 45 45 4E 20 53 54 55 44 |f7(.." BEEN STUD|
00002F60: 59 49 4E 47 2E 22 00 93 37 32 0A 99 22 11 20 20 |YING."..72..". |
00002F70: 20 20 20 20 20 D9 4F 55 20 57 49 4C 4C 20 42 45 | .OU WILL BE|
00002F80: 20 47 49 56 45 4E 20 41 4E 20 45 51 55 41 54 49 | GIVEN AN EQUATI|
00002F90: 4F 4E 22 00 BF 37 3C 0A 99 22 20 41 4E 44 20 49 |ON"..7<.." AND I|
00002FA0: 4E 20 45 41 43 48 20 43 41 53 45 20 59 4F 55 20 |N EACH CASE YOU |
00002FB0: 4D 55 53 54 20 44 45 54 45 52 4D 49 4E 45 22 00 |MUST DETERMINE".|
00002FC0: EB 37 46 0A 99 22 20 54 48 45 20 56 41 4C 55 45 |.7F.." THE VALUE|
00002FD0: 20 4F 46 20 27 42 27 2E 20 20 D9 4F 55 20 57 49 | OF 'B'. .OU WI|
00002FE0: 4C 4C 20 54 59 50 45 20 49 4E 22 00 18 38 50 0A |LL TYPE IN"..8P.|
00002FF0: 99 22 20 59 4F 55 52 20 41 4E 53 57 45 52 20 41 |." YOUR ANSWER A|
00003000: 4E 44 20 54 48 45 4E 20 50 52 45 53 53 20 3C 52 |ND THEN PRESS <R|
00003010: 45 54 55 52 4E 3E 2E 22 00 46 38 5A 0A 99 3A 99 |ETURN>.".F8Z..:.|
00003020: 22 20 20 20 20 20 20 20 C9 46 20 59 4F 55 20 57 |" .F YOU W|
00003030: 41 4E 54 20 54 4F 20 47 4F 20 42 41 43 4B 20 54 |ANT TO GO BACK T|
00003040: 4F 20 54 48 45 22 00 71 38 64 0A 99 22 20 49 4E |O THE".q8d.." IN|
00003050: 53 54 52 55 43 54 49 4F 4E 53 2C 20 45 4E 54 45 |STRUCTIONS, ENTE|
00003060: 52 20 27 48 27 20 49 4E 53 54 45 41 44 20 4F 46 |R 'H' INSTEAD OF|
00003070: 22 00 9B 38 6E 0A 99 22 20 59 4F 55 52 20 41 4E |"..8n.." YOUR AN|
00003080: 53 57 45 52 20 41 4E 44 20 43 48 4F 4F 53 45 20 |SWER AND CHOOSE |
00003090: 27 31 27 20 49 4E 20 54 48 45 22 00 C9 38 78 0A |'1' IN THE"..8x.|
000030A0: 99 22 20 4D 45 4E 55 2E 20 C9 46 20 59 4F 55 20 |." MENU. .F YOU |
000030B0: 48 41 56 45 20 48 41 44 20 45 4E 4F 55 47 48 20 |HAVE HAD ENOUGH |
000030C0: 50 52 41 43 54 49 43 45 22 00 F4 38 82 0A 99 22 |PRACTICE"..8..."|
000030D0: 20 41 4E 44 20 57 41 4E 54 20 54 4F 20 51 55 49 | AND WANT TO QUI|
000030E0: 54 2C 20 45 4E 54 45 52 20 27 53 54 4F 50 27 20 |T, ENTER 'STOP' |
000030F0: 41 4E 44 22 00 10 39 8C 0A 99 22 20 54 48 45 4E |AND"..9..." THEN|
00003100: 20 50 52 45 53 53 20 3C 52 45 54 55 52 4E 3E 2E | PRESS <RETURN>.|
00003110: 00 19 39 96 0A 8D 38 33 35 00 2E 39 68 0B 81 49 |..9...835..9h..I|
00003120: B2 31 A4 32 35 3A 46 28 49 29 B2 30 3A 82 00 4C |.1.25:F(I).0:..L|
00003130: 39 72 0B 55 47 24 B2 22 20 20 20 20 D1 55 45 53 |9r.UG$." .UES|
00003140: 54 49 4F 4E 20 23 22 3A 55 50 B2 30 00 55 39 7C |TION #":UP.0.U9||
00003150: 0B 8D 38 35 30 00 84 39 86 0B 99 22 13 11 11 11 |..850..9..."....|
00003160: 22 3A 99 22 20 C1 54 54 45 4D 50 54 45 44 20 22 |":." .TTEMPTED "|
00003170: 3B 41 2C 22 23 20 43 4F 52 52 45 43 54 20 49 53 |;A,"# CORRECT IS|
00003180: 20 22 3B 43 00 AD 39 90 0B 99 3A 99 22 20 D2 45 | ";C..9...:." .E|
00003190: 4D 45 4D 42 45 52 2C 20 54 59 50 45 20 27 53 54 |MEMBER, TYPE 'ST|
000031A0: 4F 50 27 20 54 4F 20 51 55 49 54 2E 22 00 BC 39 |OP' TO QUIT."..9|
000031B0: 9A 0B 8B 43 B3 B1 35 89 33 30 35 30 00 C2 39 A4 |...C..5.3050..9.|
000031C0: 0B 99 00 F0 39 AE 0B 99 3A 99 22 20 D9 4F 55 20 |....9...:." .OU |
000031D0: 48 41 56 45 20 35 20 43 4F 52 52 45 43 54 2E 2E |HAVE 5 CORRECT..|
000031E0: 2E 45 4E 4F 55 47 48 20 4F 46 20 4A 55 53 54 22 |.ENOUGH OF JUST"|
000031F0: 00 17 3A B8 0B 99 22 20 54 48 45 20 45 41 53 59 |..:..." THE EASY|
00003200: 20 4F 4E 45 53 2E 20 CC 45 54 53 20 47 4F 20 47 | ONES. .ETS GO G|
00003210: 45 4E 49 55 53 2E 22 00 20 3A C2 0B 8D 38 33 35 |ENIUS.". :...835|
00003220: 00 57 3A CC 0B 99 22 13 11 11 11 11 11 11 11 11 |.W:...".........|
00003230: 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00003240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003250: 20 20 20 20 20 20 22 00 7F 3A D6 0B 99 22 20 20 | "..:..." |
00003260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00003280: C6 3A DB 0B 99 22 13 11 11 11 11 11 11 11 11 11 |.:..."..........|
00003290: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 |.............. |
000032A0: 20 20 20 48 45 4C 50 20 2D 20 50 52 45 53 53 20 | HELP - PRESS |
000032B0: 20 20 48 20 3C 52 45 54 55 52 4E 3E 20 20 20 20 | H <RETURN> |
000032C0: 13 11 11 11 11 22 00 D0 3A E0 0B 89 33 30 38 30 |....."..:...3080|
000032D0: 00 E0 3A EA 0B 8B 43 B1 35 20 89 20 33 30 37 30 |..:...C.5 . 3070|
000032E0: 00 EF 3A F4 0B 4E B2 31 35 3A 89 33 30 38 30 00 |..:..N.15:.3080.|
000032F0: F8 3A FE 0B 4E B2 32 35 00 0A 3B 08 0C 49 B2 B5 |.:..N.25..;..I..|
00003300: 28 4E AC BB 28 31 29 AA 31 29 00 1E 3B 12 0C 8B |(N..(1).1)..;...|
00003310: 20 46 28 49 29 B2 31 20 A7 20 33 30 38 30 00 3F | F(I).1 . 3080.?|
00003320: 3B 1C 0C 46 28 49 29 B2 31 3A 46 31 B2 46 31 AA |;..F(I).1:F1.F1.|
00003330: 31 3A 8B 46 31 B2 31 34 A7 20 8D 33 39 37 30 00 |1:.F1.14. .3970.|
00003340: 47 3B 26 0C 50 B2 30 00 71 3B 30 0C 99 22 11 11 |G;&.P.0.q;0.."..|
00003350: 11 11 20 49 46 20 22 3B 41 24 28 49 29 3B 22 20 |.. IF ";A$(I);" |
00003360: 20 20 20 20 20 20 57 48 41 54 20 49 53 20 42 3F | WHAT IS B?|
00003370: 22 00 B1 3B 3A 0C 99 22 11 11 11 11 11 20 3F 20 |"..;:.."..... ? |
00003380: 22 3B 3A 55 53 24 B2 22 3D 2F 2B 2D 28 29 41 42 |";:US$."=/+-()AB|
00003390: 43 44 45 46 48 49 4A 4B 4D 4E 4F 50 53 54 55 56 |CDEFHIJKMNOPSTUV|
000033A0: 58 59 5A 31 32 33 34 35 36 37 30 22 3A 55 4C B2 |XYZ12345670":UL.|
000033B0: 30 00 C0 3B 3F 0C 8D 33 35 3A 47 24 B2 55 52 24 |0..;?..35:G$.UR$|
000033C0: 00 D7 3B 4E 0C 8B 20 47 24 B2 22 53 54 4F 50 22 |..;N.. G$."STOP"|
000033D0: 20 A7 20 34 33 32 30 00 E7 3B 58 0C 41 B2 41 AA | . 4320..;X.A.A.|
000033E0: 31 3A 50 B2 50 AA 31 00 FC 3B 62 0C 8B 47 24 B2 |1:P.P.1..;b..G$.|
000033F0: 42 24 28 49 29 20 A7 20 33 32 39 30 00 11 3C 6C |B$(I) . 3290..<l|
00003400: 0C 8B 47 24 B2 43 24 28 49 29 20 A7 20 33 32 39 |..G$.C$(I) . 329|
00003410: 30 00 1A 3C 76 0C 43 31 B2 30 00 2B 3C 80 0C 8B |0..<v.C1.0.+<...|
00003420: 20 50 B2 32 20 A7 20 33 32 35 30 00 59 3C 8A 0C | P.2 . 3250.Y<..|
00003430: 99 22 91 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
00003440: 1D 1D 1D 1D 1D 1D 20 D7 52 4F 4E 47 2C 20 54 52 |...... .RONG, TR|
00003450: 59 20 41 47 41 49 4E 2E 22 00 85 3C 94 0C 99 22 |Y AGAIN."..<..."|
00003460: 13 11 11 11 11 20 C1 54 54 45 4D 50 54 45 44 20 |..... .TTEMPTED |
00003470: 22 3B 41 2C 22 23 20 43 4F 52 52 45 43 54 20 49 |";A,"# CORRECT I|
00003480: 53 20 22 3B 43 00 B0 3C 9E 0C 99 22 11 11 11 11 |S ";C..<..."....|
00003490: 11 11 11 11 11 11 11 11 11 11 20 3F 20 22 3B 3A |.......... ? ";:|
000034A0: 8D 33 35 3A 47 24 B2 55 52 24 3A 89 33 31 35 30 |.35:G$.UR$:.3150|
000034B0: 00 BA 3C A8 0C 89 33 31 33 30 00 E6 3C B2 0C 99 |..<...3130..<...|
000034C0: 3A 99 22 20 D3 54 49 4C 4C 20 57 52 4F 4E 47 2E |:." .TILL WRONG.|
000034D0: 20 D4 48 45 20 41 4E 53 57 45 52 20 49 53 20 22 | .HE ANSWER IS "|
000034E0: 3B 42 24 28 49 29 00 EF 3C BC 0C 8D 38 33 35 00 |;B$(I)..<...835.|
000034F0: F9 3C D0 0C 89 32 39 34 30 00 19 3D DA 0C 43 B2 |.<...2940..=..C.|
00003500: 43 AA 31 3A 43 31 B2 43 31 AA 31 3A 8B 43 31 B2 |C.1:C1.C1.1:.C1.|
00003510: 31 30 20 A7 20 33 35 38 30 00 2B 3D E4 0C 8B 20 |10 . 3580.+=... |
00003520: 43 B2 32 35 20 A7 20 34 31 35 30 00 4C 3D EE 0C |C.25 . 4150.L=..|
00003530: 4A B2 B5 28 31 35 AC BB 28 31 29 AA 31 29 3A 8B |J..(15..(1).1):.|
00003540: 47 28 4A 29 B3 B1 30 A7 33 33 31 30 00 5D 3D F8 |G(J)..0.3310.]=.|
00003550: 0C 47 28 4A 29 B2 31 3A 5A B2 5A AA 31 00 6D 3D |.G(J).1:Z.Z.1.m=|
00003560: 02 0D 8B 5A B3 B1 31 31 A7 33 33 35 30 00 77 3D |...Z..11.3350.w=|
00003570: 0C 0D 8D 33 39 36 30 00 9C 3D 16 0D 99 22 13 11 |...3960..=..."..|
00003580: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00003590: 11 11 11 11 20 22 3B 44 24 28 4A 29 00 A5 3D 20 |.... ";D$(J)..= |
000035A0: 0D 8D 38 33 35 00 AF 3D 2A 0D 89 32 39 34 30 00 |..835..=*..2940.|
000035B0: E2 3D FC 0D 99 22 93 11 11 11 11 11 11 11 11 11 |.=..."..........|
000035C0: 11 20 20 20 20 20 20 20 20 D7 CF D7 21 20 31 30 |. ...! 10|
000035D0: 20 43 4F 52 52 45 43 54 20 49 4E 20 41 20 52 4F | CORRECT IN A RO|
000035E0: 57 21 00 0C 3E 06 0E 99 22 20 20 20 20 D9 4F 55 |W!..>..." .OU|
000035F0: 27 52 45 20 47 45 54 54 49 4E 47 20 54 4F 20 42 |'RE GETTING TO B|
00003600: 45 20 41 20 57 48 49 5A 20 41 54 22 00 36 3E 10 |E A WHIZ AT".6>.|
00003610: 0E 99 22 20 20 20 20 54 48 49 53 2E 20 20 C2 55 |.." THIS. .U|
00003620: 54 20 4C 45 54 27 53 20 53 45 45 20 59 4F 55 20 |T LET'S SEE YOU |
00003630: 44 4F 20 32 35 22 00 4A 3E 15 0E 99 22 20 20 20 |DO 25".J>..." |
00003640: 20 4F 46 20 54 48 45 4D 21 22 00 51 3E 1A 0E 99 | OF THEM!".Q>...|
00003650: 22 00 5A 3E 38 0E 8D 38 33 35 00 64 3E 42 0E 89 |".Z>8..835.d>B..|
00003660: 32 39 34 30 00 86 3E 4C 0E 83 22 4B 3D 33 32 2F |2940..>L.."K=32/|
00003670: 32 42 22 2C 22 42 3D 31 36 2F 4B 22 2C 22 42 3D |2B","B=16/K","B=|
00003680: 33 32 2F 32 4B 22 00 A6 3E 56 0E 83 22 4A 3D 32 |32/2K"..>V.."J=2|
00003690: 42 2F 43 22 2C 22 42 3D 4A 43 2F 32 22 2C 22 42 |B/C","B=JC/2","B|
000036A0: 3D 43 4A 2F 32 22 00 C1 3E 60 0E 83 22 58 3D 42 |=CJ/2"..>`.."X=B|
000036B0: 2F 59 22 2C 22 42 3D 58 59 22 2C 22 42 3D 59 58 |/Y","B=XY","B=YX|
000036C0: 22 00 DC 3E 6A 0E 83 22 41 3D 42 2F 43 22 2C 22 |"..>j.."A=B/C","|
000036D0: 42 3D 41 43 22 2C 22 42 3D 43 41 22 00 F8 3E 74 |B=AC","B=CA"..>t|
000036E0: 0E 83 22 59 3D 42 43 22 2C 22 42 3D 59 2F 43 22 |.."Y=BC","B=Y/C"|
000036F0: 2C 22 42 3D 59 2F 43 22 00 14 3F 7E 0E 83 22 58 |,"B=Y/C"..?~.."X|
00003700: 3D 44 42 22 2C 22 42 3D 58 2F 44 22 2C 22 42 3D |=DB","B=X/D","B=|
00003710: 58 2F 44 22 00 30 3F 88 0E 83 22 56 3D 49 42 22 |X/D".0?..."V=IB"|
00003720: 2C 22 42 3D 56 2F 49 22 2C 22 42 3D 56 2F 49 22 |,"B=V/I","B=V/I"|
00003730: 00 4F 3F 92 0E 83 22 45 3D 42 49 54 22 2C 22 42 |.O?..."E=BIT","B|
00003740: 3D 45 2F 49 54 22 2C 22 42 3D 45 2F 54 49 22 00 |=E/IT","B=E/TI".|
00003750: 6E 3F 9C 0E 83 22 53 3D 58 42 46 22 2C 22 42 3D |n?..."S=XBF","B=|
00003760: 53 2F 58 46 22 2C 22 42 3D 53 2F 46 58 22 00 8A |S/XF","B=S/FX"..|
00003770: 3F A6 0E 83 22 54 3D 34 42 22 2C 22 42 3D 54 2F |?..."T=4B","B=T/|
00003780: 34 22 2C 22 42 3D 54 2F 34 22 00 A9 3F B0 0E 83 |4","B=T/4"..?...|
00003790: 22 55 3D 32 42 43 22 2C 22 42 3D 55 2F 32 43 22 |"U=2BC","B=U/2C"|
000037A0: 2C 22 42 3D 55 2F 43 32 22 00 C8 3F BA 0E 83 22 |,"B=U/C2"..?..."|
000037B0: 56 3D 32 41 42 22 2C 22 42 3D 56 2F 32 41 22 2C |V=2AB","B=V/2A",|
000037C0: 22 42 3D 56 2F 41 32 22 00 E8 3F C4 0E 83 22 59 |"B=V/A2"..?..."Y|
000037D0: 3D 32 42 2F 43 22 2C 22 42 3D 43 59 2F 32 22 2C |=2B/C","B=CY/2",|
000037E0: 22 42 3D 59 43 2F 32 22 00 08 40 CE 0E 83 22 46 |"B=YC/2"..@..."F|
000037F0: 3D 42 59 2F 54 22 2C 22 42 3D 46 54 2F 59 22 2C |=BY/T","B=FT/Y",|
00003800: 22 42 3D 54 46 2F 59 22 00 28 40 D8 0E 83 22 5A |"B=TF/Y".(@..."Z|
00003810: 3D 58 59 2F 42 22 2C 22 42 3D 58 59 2F 5A 22 2C |=XY/B","B=XY/Z",|
00003820: 22 42 3D 59 58 2F 5A 22 00 4B 40 E2 0E 83 22 4D |"B=YX/Z".K@..."M|
00003830: 3D 4E 53 2F 33 42 22 2C 22 42 3D 4E 53 2F 33 4D |=NS/3B","B=NS/3M|
00003840: 22 2C 22 42 3D 53 4E 2F 33 4D 22 00 6E 40 EC 0E |","B=SN/3M".n@..|
00003850: 83 22 58 3D 33 42 2F 34 54 22 2C 22 42 3D 34 58 |."X=3B/4T","B=4X|
00003860: 54 2F 33 22 2C 22 42 3D 34 54 58 2F 33 22 00 8F |T/3","B=4TX/3"..|
00003870: 40 F6 0E 83 22 33 58 3D 42 2F 35 54 22 2C 22 42 |@..."3X=B/5T","B|
00003880: 3D 31 35 58 54 22 2C 22 42 3D 31 35 54 58 22 00 |=15XT","B=15TX".|
00003890: B5 40 00 0F 83 22 56 3D 53 2D 33 42 22 2C 22 42 |.@..."V=S-3B","B|
000038A0: 3D 28 53 2D 56 29 2F 33 22 2C 22 42 3D 28 53 2D |=(S-V)/3","B=(S-|
000038B0: 56 29 2F 33 22 00 DB 40 0A 0F 83 22 54 2D 32 3D |V)/3"..@..."T-2=|
000038C0: 36 58 2B 42 22 2C 22 42 3D 54 2D 32 2D 36 58 22 |6X+B","B=T-2-6X"|
000038D0: 2C 22 42 3D 54 2D 36 58 2D 32 22 00 07 41 14 0F |,"B=T-6X-2"..A..|
000038E0: 83 22 45 3D 28 33 42 2B 32 29 59 22 2C 22 42 3D |."E=(3B+2)Y","B=|
000038F0: 28 45 2F 59 2D 32 29 2F 33 22 2C 22 42 3D 45 2F |(E/Y-2)/3","B=E/|
00003900: 33 59 2D 32 2F 33 22 00 30 41 1E 0F 83 22 5A 3D |3Y-2/3".0A..."Z=|
00003910: 28 58 2B 33 29 2F 42 22 2C 22 42 3D 28 58 2B 33 |(X+3)/B","B=(X+3|
00003920: 29 2F 5A 22 2C 22 42 3D 28 33 2B 58 29 2F 5A 22 |)/Z","B=(3+X)/Z"|
00003930: 00 61 41 28 0F 83 22 5A 4B 3D 28 34 42 2D 58 29 |.aA(.."ZK=(4B-X)|
00003940: 2F 33 59 22 2C 22 42 3D 28 33 5A 4B 59 2B 58 29 |/3Y","B=(3ZKY+X)|
00003950: 2F 34 22 2C 22 42 3D 28 33 4B 59 5A 2B 58 29 2F |/4","B=(3KYZ+X)/|
00003960: 34 00 93 41 32 0F 83 22 28 34 42 2D 36 43 29 2F |4..A2.."(4B-6C)/|
00003970: 58 3D 31 30 22 2C 22 42 3D 28 36 43 2B 31 30 58 |X=10","B=(6C+10X|
00003980: 29 2F 34 22 2C 22 42 3D 28 31 30 58 2B 36 43 29 |)/4","B=(10X+6C)|
00003990: 2F 34 22 00 BA 41 3C 0F 83 22 32 37 2D 33 58 3D |/4"..A<.."27-3X=|
000039A0: 42 2D 33 22 2C 22 42 3D 33 30 2D 33 58 22 2C 22 |B-3","B=30-3X","|
000039B0: 42 3D 33 28 31 30 2D 58 29 22 00 FD 41 46 0F 83 |B=3(10-X)"..AF..|
000039C0: 22 C7 52 45 41 54 20 53 48 4F 57 21 22 2C 22 D7 |".REAT SHOW!",".|
000039D0: 45 4C 4C 20 44 4F 4E 45 21 22 2C 22 D4 48 41 54 |ELL DONE!",".HAT|
000039E0: 27 53 20 49 54 21 22 2C 22 C2 4F 59 2C 20 41 52 |'S IT!",".OY, AR|
000039F0: 45 20 59 4F 55 20 47 52 45 41 54 21 22 00 38 42 |E YOU GREAT!".8B|
00003A00: 50 0F 83 22 C7 45 45 20 59 4F 55 27 52 45 20 53 |P..".EE YOU'RE S|
00003A10: 4D 41 52 54 21 22 2C 22 57 41 59 20 54 4F 20 47 |MART!","WAY TO G|
00003A20: 4F 21 22 2C 22 CB 45 45 50 20 49 54 20 55 50 21 |O!",".EEP IT UP!|
00003A30: 22 2C 22 D9 55 50 21 22 00 64 42 5A 0F 83 22 D6 |",".UP!".dBZ..".|
00003A40: 45 52 59 20 C7 4F 4F 44 21 21 22 2C 22 CB 45 45 |ERY .OOD!!",".EE|
00003A50: 50 20 55 50 20 54 48 45 20 47 4F 4F 44 20 57 4F |P UP THE GOOD WO|
00003A60: 52 4B 21 22 00 8A 42 64 0F 83 22 D7 41 59 20 54 |RK!"..Bd..".AY T|
00003A70: 4F 20 47 4F 21 22 2C 22 D9 4F 55 20 44 49 44 20 |O GO!",".OU DID |
00003A80: 49 54 20 41 47 41 49 4E 21 22 00 C3 42 6E 0F 83 |IT AGAIN!"..Bn..|
00003A90: 22 D4 48 41 54 27 53 20 54 48 45 20 57 41 59 20 |".HAT'S THE WAY |
00003AA0: 54 4F 20 44 4F 20 49 54 21 22 2C 22 CD 41 52 56 |TO DO IT!",".ARV|
00003AB0: 45 4C 4F 55 53 21 22 2C 22 D4 45 52 52 49 46 49 |ELOUS!",".ERRIFI|
00003AC0: 43 21 22 00 DE 42 78 0F 81 52 B2 31 A4 31 35 3A |C!"..Bx..R.1.15:|
00003AD0: 47 28 52 29 B2 30 3A 82 3A 5A B2 30 3A 8E 00 FA |G(R).0:.:Z.0:...|
00003AE0: 42 82 0F 81 52 B2 31 A4 32 35 3A 46 28 52 29 B2 |B...R.1.25:F(R).|
00003AF0: 30 3A 82 3A 46 31 B2 30 3A 8E 00 32 43 36 10 99 |0:.:F1.0:..2C6..|
00003B00: 22 93 11 11 11 11 11 11 11 11 11 11 11 20 D7 45 |"............ .E|
00003B10: 4C 4C 20 53 4D 41 52 54 20 50 45 52 53 4F 4E 2C |LL SMART PERSON,|
00003B20: 54 48 41 54 27 53 20 32 35 20 43 4F 52 52 45 43 |THAT'S 25 CORREC|
00003B30: 54 22 00 5F 43 40 10 99 22 20 4E 4F 57 2E 20 D9 |T"._C@.." NOW. .|
00003B40: 4F 55 20 53 45 45 4D 20 54 4F 20 4B 4E 4F 57 20 |OU SEEM TO KNOW |
00003B50: 49 54 20 51 55 49 54 45 20 57 45 4C 4C 2C 22 00 |IT QUITE WELL,".|
00003B60: 8D 43 4A 10 99 22 20 41 4E 44 20 C9 20 54 48 49 |.CJ.." AND . THI|
00003B70: 4E 4B 20 59 4F 55 20 43 41 4E 20 47 4F 20 4F 4E |NK YOU CAN GO ON|
00003B80: 20 54 4F 20 46 41 52 2C 20 46 41 52 22 00 A4 43 | TO FAR, FAR"..C|
00003B90: 54 10 99 22 20 42 45 54 54 45 52 20 54 48 49 4E |T.." BETTER THIN|
00003BA0: 47 53 21 22 00 AD 43 5E 10 8D 38 33 35 00 B6 43 |GS!"..C^..835..C|
00003BB0: D6 10 89 33 30 30 00 BF 43 E0 10 99 22 93 22 00 |...300..C...".".|
00003BC0: D4 43 EA 10 99 22 11 11 11 11 11 11 11 11 11 11 |.C..."..........|
00003BD0: 11 11 22 3B 00 FE 43 F4 10 99 22 20 20 20 D4 48 |..";..C..." .H|
00003BE0: 41 54 27 53 20 41 4C 4C 20 46 4F 4C 4B 53 21 20 |AT'S ALL FOLKS! |
00003BF0: C9 54 53 20 42 45 45 4E 20 46 55 4E 2E 22 00 0E |.TS BEEN FUN."..|
00003C00: 44 FE 10 99 22 13 22 3A 97 55 4D 2C 33 32 00 17 |D...".":.UM,32..|
00003C10: 44 08 11 8D 38 33 35 00 25 44 12 11 99 22 93 22 |D...835.%D..."."|
00003C20: 3A 89 33 30 30 00 55 44 1C 11 8F 20 52 2E 57 2E |:.300.UD... R.W.|
00003C30: 44 52 41 59 2C 20 52 2E 52 23 32 20 50 45 54 45 |DRAY, R.R#2 PETE|
00003C40: 52 42 4F 52 4F 55 47 48 20 4F 4E 54 2E 20 4B 39 |RBOROUGH ONT. K9|
00003C50: 4A 20 36 58 33 00 98 44 26 11 8F 20 55 50 47 52 |J 6X3..D&.. UPGR|
00003C60: 41 44 45 44 20 42 59 20 44 45 52 45 4B 20 4C 45 |ADED BY DEREK LE|
00003C70: 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |E |
00003C80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003C90: 20 4A 55 4C 59 2F 38 32 00 00 00 | JULY/82... |
.......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...:.U...:.....:...#..-----INPUT SECT
ION-----...(.: UR$."":UI$."".!.*.: . U
L.0.UL.80.4.-.." ..";:.UC,0.K.2.: .UI$
:.UI$."".50.X.7.: .UI$.G(13).C(UR$)..1.
.UC,1:." .";:.85...<.: .UI$.G(20).105..
.>.: . C(UR$)..UL .50.N.A.: .120:. CHE
CK FOR VALID CHARACTER...F.: UR$.UR$.UI
$...K.: .UI$;...P.: .50...U..-----CHEC
K FOR HELP REQUEST-----.J.Z.: .UR$.UX$.
195:. EXIT TO HELP ROUTINE.\._.: .UF.1.
.240.K.D.: UF.0:.:....F..-----CHECK DELE
TE-----...I.: .C(UR$).1.50...N.: UR$.H(U
R$,C(UR$).1).H.S.: .". ..";:.50...X..--
---CHECK FOR VALID CHARACTERS-----...}.:
.C(US$).0.150.....: .US.1.C(US$).7...
: .UI$.J(US$,US,1)...@...: ..P...:
UI$."":..N....-----STANDARD INPUT-----..
...: .F(UI$).46. ......: .UI$.G(32). .
... .: .F(UI$).48 . F(UI$).57.170.C...:
......: .F(UI$).65 . F(UI$).90.180...
..: ......: .F(UI$).193 . F(UI$).218.U
I$."":..E...: .B(UT).12.B(UT).21.UI$.G(
F(UI$).128):..N...: ..^...: UI$."":...
.C.: UF.1:.-----HELP ROUTINE EXIT-----.
..E.: .250...H.: .245.A.M.: .UQ.UB.(U
2%.256.U1%.U3%.2)...R.: UQ%(UQ.UB).B(UQ
):.:."."...W.: UZ.1:UV%.B(UT)...X.: .3
00.'.Y.UZ.0:US$.UJ$:UG$.UK$:UP.UJ:UL.UK.
^.Z..B(50003).0..53281,1:.".";:.53281,6:
.53280,14:.220.H....".";.....UT$.UL$:.UT
,UV%:.UQ.UB.(U2%.256.U1%.U3%.3).....: .
UQ,UQ%(UQ.UB):......: .U1,U1%.M...: .U
2,U2%.....: .U4,U4%.....: .U3,U3%.1...
..: .35.-...: UD%.((U2%.256.U1%.U3%).U
B).40:.H(UD$,UD%.1):..K...: .H(UD$,24);
" . HELP COMING .
":......: U1%.B(U1):U2%.B(U2):U3%.B(U3)
:U4%.B(U4).....UJ$.US$:UJ.UL.O...: UJ$.
US$:UK$.UG$:UJ.UP:UK.UL.X...: ....,..--
---MENU-----...-.:.$...: .".":.UT,UU%:.
B(50003).0..53281,9:.53280,8.*./.:.J.1.:
.". MENU".|.6.: ." ---
-----------------------------------"...;
.: .".. 1. EQUATION MANIPULATIO
N".W.@.: .".. 2. STUDENT INSTRU
CTIONS"...E.: .".. 3. TEACHER I
NSTRUCTIONS".4.J.: .".. 4. MODI
FICATION OF PROGRAM".S.O.: .".. 5
. QUIT.."...T.: ." ------------------
--------------------"...Y.: ."..
PRESS A NUMBER KEY (1-5) ";...^.: UL.1:
US$."12345":.35:.---INPUT ROUTINE---..._
.: .C(UR$).1.300...`.: US$."".+.C.: .
E(UR$).1000,400,500,600,396.7.H.: .300.
A....-----RE-ENABLE STOP KEY AND END----
-.....: .B(50003)..1.B(50003)..160.B(50
003)..0.399.....: .UU.71:.B(50003).0..5
3281,6:.53280,14.O...: ."..":......: .
875:.......-----STUDENT INSTRUCTIONS----
-.3...: .".":.UT,UL%:.B(50003).0..53281
,0:.53280,0.T...UP.0:UG$."STUDENT INST":
.850.....: ."... A FLASHING SQUARE M
EANS THAT".....: ." AN ANSWER IS EXPE
CTED FROM YOU.".....: ." REMEMBER TO
HIT <RETURN> AFTER".....: ." TYPING Y
OUR ANSWER. THIS TELLS".4. .: ." THE
COMPUTER TO ACCEPT WHAT YOU".B...: ."
HAVE TYPED. YOU CAN ERASE ERRORS".....:
." WITH THE <INST/DEL> KEY.".....:
." TYPE <H> AT ANY TIME TO RETURN"...
..: ." TO THE MENU FOR HELP. YOU WIL
L".....: ." BE RETURNED TO THE PLACE
IN THE".:...: ." PROGRAM WHERE YOU LE
FT OFF AS".H...: ." SOON AS THE OPTIO
N FROM THE MENU".....: ." IS COMPLETE
UNLESS YOU WANT TO".....: ." START O
VER AGAIN.".D...: .835:.850.....: ."..
. DURING THE EXERCISE, DON'T FORGET".
...: ." TO ENTER THE WHOLE FORMULA."
.K...: .". EG. IF X=BY/Z WHAT IS
B?"....: .".. ENTER .B=XZ/Y. (NO
T JUST 'XZ/Y')".....: .". ALSO, MULT
IPLICATION SIGNS ('*')".....: ." ARE
NOT NEEDED BUT USE BRACKETS".....: ."
WHEN NECESSARY.".#.B.: .". SEE IF Y
OU CAN OUTLAST THE".G.D.: ." COMPUTER
IN THE DRILL.".S...: .835.J...: .UZ.1
..UP%:.217.S...: .......-----TEACHER IN
STRUCTIONS-----.J...: .".":.UT,UL%:.B(5
0003).0..53281,2:.53280,10.....: UP.0:U
G$."TEACHER INST.":.850. ...: ."..
TO THE BEST OF OUR KNOWLEDGE,.".L...:
." THIS PROGRAM IS IN THE PUBLIC.".{..
.: ." DOMAIN. IF THIS IS NOT THE CAS
E.".....: ." PLEASE CONTACT:...".H...
: ." COMMODORE BUSINESS MACHINES."
.....: ." 3370 PHARMACY AVE...
...: ." AGINCOURT, ONTARIO".:.
..: ." CANADA M1W 2K4".]...:
." (416) 499-4292".S...UP.1:.
835:. 850:......" ..PROGRAM NAME: E
QUATION MANIPULATION.H...." WRITTEN
BY : R.W. DRAY......." UPGRADED BY
: DEREK LEE......." .THIS PROGRAM WI
LL RUN ON ANY...6...." PET 64 CO
MPUTER.[...." COMMODORE 64 COMPU
TER.M...: . 835:.850.....: .".... T
HIS PROGRAM IS A LESSON IN THE".K...: .
" MANIPULATION OF EQUATIONS. IT".....
: ." COVERS CASES WITH '+,-,*,/' OR".
%...: ." COMBINATIONS. THE PROGRAM CA
N BE".U...: ." USED AS A TEACHING AID
OR A REVIEW"....: ." EXERCISE FOR S
TUDENTS HAVING".....: ." PROBLEMS IN
THIS AREA.".Q...: .". A DRILL IS INC
LUDED AT THE END".....: ." FOR INDIVI
DUAL PRACTICE AND".$. .: ." REVIEW. E
NCOURAGING COMMENTS".O.".: ." ARE PRO
VIDED FOR THE STUDENT.".[.D.: .835.R.N.
: .UZ.1..UP%:.217.{.W.: ....X..-----PR
OGRAM MODIFICATION INST-----...Y.: ."."
:.UT,UL%...].: UP.0:UG$."PROGRAM MOD":.
850...B.: .".... THE EQUATIONS CAN B
E CHANGED".7.D.: ." BY CHANGING THE D
ATA STATEMENTS".B.F.: ." FROM LINES 3
660 TO 3900. EACH"...H.: ." STATEMENT
HAS ONE EQUATION AND TWO"...J.: ." P
OSSIBLE ANSWERS FOR IT."...L.: .". EG
. 3680 DATA";G(34);"X=B/Y";G(34)","G(34)
;...M.: ."B=XY";G(34)","G(34)"B=YX";G(3
4).I.N.: .". THE FIRST 15 ARE USUALL
Y EASIER".X.O.: ." AND THE NEXT 10 GE
T HARDER. MAKE"...P.: ." SURE THERE
ARE 25 OF THESE DATA".N.Q.: ." STATEM
ENTS AFTER MAKING THE"...R.: ." CHANG
ES."...T.: .835:.850.).V.: .".......
THE COMMENTS CAN BE CHANGED BY".V.X.:
." BY CHANGING THE DATA STATEMENTS"..
.Z.: ." FROM LINES 3910 TO 3950. ON
EACH"...|.: ." LINE, COMMENTS ARE SEP
ARATED WITH"...~.: ." COMMAS. MAKE S
URE THAT THERE ARE".....: ." 15 COMME
NTS AFTER MAKING THE".#...: ." CHANGE
S."./...: .835.F...: .UZ.1..UP%:.217.O
...: ..W....-----TO USE 8032 LOAD CBM40
32-----...F..".....BEFORE RUNNING THIS P
ROGRAM ON AN 8032 .....P.." LOAD T
HE 'CBM 4032' PROGRAM............."...Z.
: .UU.71.....: ... .. ** T I T L E
P A G E **.N ".."....";:.UT,UU%:.B(50003
).0..53280,14:.53281,6.D $..I.1.38:."...
";:..| &..I.1.22:.".....";:... (..I.1.37
:.".....";:... *..I.1.22:.".....";:..Q ,
.."........................... ... ..."
................... . . ....!0.."......
............. . ....2!2..".............
....... ..Z!4.."..............C O M M O
D O R E...}!6.."...............EDUCATIO
NAL....!8.."................SOFTWARE..!:
.. ** COMMODORE LOGO **..!;..H(UD$,24);"
..........PRESS SPACE BAR OR WAIT.":I.0.
."<..A$:.A$.." ".I.I.1:.I.250.828.8">.:
T1$."":T2$."":T3$."":T4$."":I.0.D"@.:
.300.C"C..-----SPACE BAR PRESS-----.."H.
: .H(UD$,24);".......PRESS SPACE BAR TO
CONTINUE.".."L.: .UI$:.UI$.." ".844.."
N.: ..."R..-----PAGE DESIGN ROUTINE----
-.."T.: UP.UP.1..#W.: ."."H(UT$.UP$,21
);H(UG$.UP$,14);UP.L#\.: ." -----------
---------------------------"..#A.: .H(U
D$,24);H(UP$,6);"HELP - PRESS H <RETUR
N>"..#F.: ."..":...#K..-----PLEASE WAIT
REMARK-----..#P.: .H(UD$,24);"
ONE MOMENT PLEASE... "..#U.: ...
$...-----SET UP VARIABLES-----.D$..: UX
$."H":.UQ%(1000):UB.32768:U1.196:U2.197:
U3.198:U4.216:UC.167:UU.1024..$..: UT.5
9468:UU%.12:UL%.14:UP%.1146:UM.32768:.50
003,0..$...B(50003).0.UB.1024:U1.209:U2.
210:U3.211:U4.214:UC.204:UU.2048..%...B(
50003).0.UT.53272:UU%.21:UL%.23:UP%.2139
:UM.1024.?%..: UD$."...................
......".T%..: UP$."
"..%..: UT$." EQN MA
NIPULAT.":. PLACE PROGRAM TITLE HERE!!!!
!!!***..%..: ...%...-----SET VARIABLES-
----..%..: .900..&...A$(25),B$(25),C$(2
5),D$(15),F(25),G(151).4&...-----CHECK F
OR 8032-----.U&..: .".":." ":. SHIFTED
SPACE.O&..: .B(UB.40)..96..700..&...---
--MEMORY CHECK-----..&..: . .(0).2000.9
37.S&..: ."....THIS MACHINE DOES NOT HA
VE ENOUGH."..&..: ."MEMORY TO RUN THIS
PROGRAM !"..'..: .UU.71..'..: ...'..:
."..":.B(50003).0.962.`'...-----BASIC 2
.0 OR 4.0 OR C-64 SETUP-----..'...10
75,133:.1076,144:.1077,234:.1079,4:.1080
,133:.1081,145.T'...1091,155:.1098,133:.
1099,144:.1100,234:.1103,133..'...1104,1
45:.1105,234:.1082,234..(..: .B(50003).
.160.955.B(..: .1093,88:.1094,228:.1097
,85:.1102,228:.965.Z(..: .B(50003)..1.9
90..(..: .1093,49:.1094,230:.1097,46:.1
102,230:.965.F(B..2099,141:.2100,20:.210
1,3:.2103,8:.2104,141:.2105,21..)C..2106
,3:.2115,145:.2117,52:.2118,234:.2121,49
:.2122,141.<)D..2123,20:.2124,3:.2126,23
4:.2127,141:.2128,21:.2129,3.\)E.: .UU.4
8:. DISABLE STOP KEY.P)J.: .800:. TITLE
..)T.: .300:. MENU..)..: .".THE PGM WI
LL NOT WORK ON THIS MACHINE!":...)..: .U
Z.1..UP%:.UP%:UZ.0:.-----PROGRAM STARTS
HERE-----..*..."..";:.B(50003).0..53281,
6:.53280,14.:*... EQUATION MANIPULATION
BY.J*... R.W.DRAY, R.R#2 PETERBOROUGH ON
T. K9J 6X3..*... UPGRADED BY DEREK LEE
JULY/82..*
...".":.UT,UL%.D*.....*"..I.1.25:. A$(I)
,B$(I),C$(I):...*,..I.1.15:.D$(I):...+6.
. 3960.!+@.UG$."LESSON":UP.0:.850.T+|.."
....... TO MANIPULATE AN EQUATION MEANS
TO"..+..." TAKE SOMETHING LIKE X=2B/Y A
ND FIND B."..+...". THE PURPOSE OF THIS
PROGRAM IS TO.W+..." HELP YOU TO DO THI
S WITHOUT USING..+..." COMPLICATED MATHE
MATICS."..,...835..,..UP.1:.850.>,B.."..
IF THE EQUATION CONTAINS NO".M
,L.." + OR - SIGNS, THE TASK IS VERY SIM
PLE."..,V.." WE WILL USE THE CROSS MUL
TIPLICATION"..,..." RULE, WHICH STATES:"
..,...:." WHEN SOMETHING IS MOVED A
CROSS AN"..-..." EQUAL SIGN,IT MUST BE M
OVED DIAGONALLY".7-..." ACROSS THE EQUAL
SIGN.".=-....J-..." IF SOMETHING
WAS ON THE BOTTOM"..-..." LEFT SIDE, IT
WILL BE ON THE TOP ON".A-&.." THE RIG
HT SIDE, AND VICE VERSA.".G-0....-:.."
EG X=A/B THEREFORE BX=A OR B=A/X".!.D..
:." STUDY THIS CAREFULLY UNTIL YOU
".G.N.." CAN SEE HOW THE RULE APPLIES.".
M.X...V.B..835.D.V.UP.2:.850......".. N
OW FOR A LITTLE CHECK."......:." IF X=A
B/C, WHAT DOES 'A' EQUAL?"......". (GIV
E THE NUMBER ONLY THEN <RETURN>)......:.
" SELECT FROM:"../...". 1. A=CX/B 2
. A=BX/C".:/...". 3. A=XBC 4. A=B/C
X".Z/...".. WHAT IS YOUR CHOICE? ";:US$
."1234H":UL.1:.35:G.E(UR$)../... G . 201
0,2030,2060,2080../P..835:.1910.Q/Z..:."
THAT IS CORRECT, TRY ONE MORE."../...8
35:.2105..0...:." WHEN B & C CROSS, THE
Y MUST SWITCH".:0..." TOP AND BOTTOM AS
WELL. TRY AGAIN.".J0...835:. 1910.S0...
:." B MUST GO FROM TOP TO BOTTOM."..0..
." TRY AGAIN...0...835:.1910..0 ..". W
OW! EVERY ONE WAS SWITCHED"..0*.." INCO
RRECTLY! CHECK THE RULE AGAIN!"..04..835
:. 1720..19.UP.3:.850.,1>.."..... IF C=
WS/2T, WHAT IS 'T'?".Q1H..". 1. T=2WS
/C 2. T=2C/WS ".T1R..". 3. T=C/2WS
4. T=WS/2C..1\..".. WHAT IS YOUR CHOI
CE? ";:US$."1234H":UL.1:.35:G.E(UR$).R1F
.. G . 2180,2200,2220,2240..1Z..835:. 21
05..2...:." CHECK THE POSITION OF THE 2
."..2...835:.2105.F2...". WHEN CROSSING
THE EQUAL SIGN, THEY".J2..." MUST GO F
ROM TOP TO BOTTOM".Y2...835:.2105..2...:
." THE 2 IS OK, BUT THE LETTERS??"..2..
.835:.2105..2...:." THAT IS CORRECT. NO
W FOR SOME MORE"..2J.." INSTRUCTIONS.".
.3T..835..3Y.UP.4:.850.=3...". IF T
HE EQUATION CONTAINS + OR - ".K3..." SIG
NS, THE RULE MUST CHANGE A LITTLE."..3..
." A TERM WITH A POSITIVE SIGN ON ONE"..
3..." SIDE OF THE EQUATION WILL HAVE A "
..3..." NEGATIVE SIGN ON THE OTHER SIDE,
AND"..4..." VICE VERSA."..4...". THEREF
ORE,".94...:." IF X=Y+3 THEN X-3=
Y.]4$..:." IF A=B-C THEN A+C=B..4
...:." IF 4X=3Y-C THEN 4X-3Y=-C"..4
8..:." NOTICE THAT THE WHOLE TERM M
UST"..4B.." BE MOVED EG. (3Y) AND NOT JU
ST THE 3"..4L.." OR THE Y."..4V.. 835..5
[.UP.5:.850.:5J..". IF YOU HAD 3X=2Y+
3D AND YOU WANTED".I5T.." TO FIND D, FIR
ST MOVE THE (2Y) ACROSS.".O5~....5..."
3X-2Y=3D..5.....5..." THEN USE
CROSS MULTIPLICATION, BUT"..5..." BE SUR
E THE 3 IS ON THE BOTTOM OF THE"..6..."
WHOLE LEFT SIDE. (USE BRACKETS)..6....06
D.." (3X-2Y)/3 = D.66N...`6X..:."
GIVEN: 3A=9X+D/4E FIND 'E'"..6...:.
" FIRST STEP: 3A-9X=D/4E..6...:." SECO
ND STEP: 4E=D/(3A-9X)".M6...:." FINAL S
TEP: E=D/(3A-9X)4".V6...835..6..UG$."
EXERCISE":UP.0:.850.#7..."... NOW
IS THE TIME TO SEE WHETHER".O7..." OR NO
T YOU UNDERSTAND WHAT YOU HAVE".F7(.." B
EEN STUDYING."..72..". YOU WILL BE
GIVEN AN EQUATION"..7<.." AND IN EACH C
ASE YOU MUST DETERMINE"..7F.." THE VALUE
OF 'B'. YOU WILL TYPE IN"..8P.." YOUR
ANSWER AND THEN PRESS <RETURN>.".F8Z..:.
" IF YOU WANT TO GO BACK TO THE".Q
8D.." INSTRUCTIONS, ENTER 'H' INSTEAD OF
"..8N.." YOUR ANSWER AND CHOOSE '1' IN T
HE".I8X.." MENU. IF YOU HAVE HAD ENOUGH
PRACTICE"..8..." AND WANT TO QUIT, ENTER
'STOP' AND"..9..." THEN PRESS <RETURN>.
..9...835..9H..I.1.25:F(I).0:..L9R.UG$."
QUESTION #":UP.0.U9|..850..9..."....
":." ATTEMPTED ";A,"# CORRECT IS ";C..9.
..:." REMEMBER, TYPE 'STOP' TO QUIT."..9
...C..5.3050.B9.....9...:." YOU HAVE 5 C
ORRECT...ENOUGH OF JUST"..:..." THE EASY
ONES. LETS GO GENIUS.". :B..835.W:L..".
.........
".:V.."
".F:..."........................
HELP - PRESS H <RETURN> .....".P
:...3080..:...C.5 . 3070..:..N.15:.3080.
.:..N.25..;..I..(N..(1).1)..;... F(I).1
. 3080.?;..F(I).1:F1.F1.1:.F1.14. .3970.
G;&.P.0.Q;0..".... IF ";A$(I);" WH
AT IS B?"..;:.."..... ? ";:US$."=/+-()AB
CDEFHIJKMNOPSTUVXYZ12345670":UL.0..;?..3
5:G$.UR$.W;N.. G$."STOP" . 4320..;X.A.A.
1:P.P.1..;B..G$.B$(I) . 3290..<L..G$.C$(
I) . 3290..<V.C1.0.+<... P.2 . 3250.Y<..
.".................... WRONG, TRY AGAIN.
"..<..."..... ATTEMPTED ";A,"# CORRECT I
S ";C..<...".............. ? ";:.35:G$.U
R$:.3150..<...3130..<...:." STILL WRONG.
THE ANSWER IS ";B$(I)..<...835..<P..294
0..=Z.C.C.1:C1.C1.1:.C1.10 . 3580.+=...
C.25 . 4150.L=..J..(15..(1).1):.G(J)..0.
3310.]=..G(J).1:Z.Z.1.M=...Z..11.3350.W=
...3960..=..."...................... ";D
$(J)..= ..835..=*..2940..=..."..........
. WOW! 10 CORRECT IN A ROW!..>...
" YOU'RE GETTING TO BE A WHIZ AT".6>.
.." THIS. BUT LET'S SEE YOU DO 25".J
>..." OF THEM!".Q>...".Z>8..835.D>B..
2940..>L.."K=32/2B","B=16/K","B=32/2K"..
>V.."J=2B/C","B=JC/2","B=CJ/2".A>`.."X=B
/Y","B=XY","B=YX"..>J.."A=B/C","B=AC","B
=CA"..>T.."Y=BC","B=Y/C","B=Y/C"..?~.."X
=DB","B=X/D","B=X/D".0?..."V=IB","B=V/I"
,"B=V/I".O?..."E=BIT","B=E/IT","B=E/TI".
N?..."S=XBF","B=S/XF","B=S/FX"..?..."T=4
B","B=T/4","B=T/4"..?..."U=2BC","B=U/2C"
,"B=U/C2".H?..."V=2AB","B=V/2A","B=V/A2"
..?D.."Y=2B/C","B=CY/2","B=YC/2"..@N.."F
=BY/T","B=FT/Y","B=TF/Y".(@X.."Z=XY/B","
B=XY/Z","B=YX/Z".K@..."M=NS/3B","B=NS/3M
","B=SN/3M".N@..."X=3B/4T","B=4XT/3","B=
4TX/3"..@..."3X=B/5T","B=15XT","B=15TX".
.@..."V=S-3B","B=(S-V)/3","B=(S-V)/3"..@
..."T-2=6X+B","B=T-2-6X","B=T-6X-2"..A..
."E=(3B+2)Y","B=(E/Y-2)/3","B=E/3Y-2/3".
0A..."Z=(X+3)/B","B=(X+3)/Z","B=(3+X)/Z"
.AA(.."ZK=(4B-X)/3Y","B=(3ZKY+X)/4","B=(
3KYZ+X)/4..A2.."(4B-6C)/X=10","B=(6C+10X
)/4","B=(10X+6C)/4"..A<.."27-3X=B-3","B=
30-3X","B=3(10-X)"..AF.."GREAT SHOW!","W
ELL DONE!","THAT'S IT!","BOY, ARE YOU GR
EAT!".8BP.."GEE YOU'RE SMART!","WAY TO G
O!","KEEP IT UP!","YUP!".DBZ.."VERY GOOD
!!","KEEP UP THE GOOD WORK!"..BD.."WAY T
O GO!","YOU DID IT AGAIN!".CBN.."THAT'S
THE WAY TO DO IT!","MARVELOUS!","TERRIFI
C!"..BX..R.1.15:G(R).0:.:Z.0:...B...R.1.
25:F(R).0:.:F1.0:..2C6.."............ WE
LL SMART PERSON,THAT'S 25 CORRECT"._C@..
" NOW. YOU SEEM TO KNOW IT QUITE WELL,".
.CJ.." AND I THINK YOU CAN GO ON TO FAR,
FAR"..CT.." BETTER THINGS!"..C^..835..C
V..300..C...".".TC..."............";..C.
.." THAT'S ALL FOLKS! ITS BEEN FUN."..
D...".":.UM,32..D...835.%D...".":.300.UD
... R.W.DRAY, R.R#2 PETERBOROUGH ONT. K9
J 6X3..D&.. UPGRADED BY DEREK LEE
JULY/82...
> CLICK IMAGE PREVIEW FOR FULL MODAL