FISHERY.C3
FILE INFORMATION
FILENAME(S): FISHERY.C3
FILE TYPE(S): PRG
FILE SIZE: 11.8K
FIRST SEEN: 2025-10-20 14:30:09
APPEARS ON: 3 disk(s)
FILE HASH
5d89ae7ec7df6445d2de4b0839d6b360771e87a875ba4736e5abacf5cb11ef4c
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0007ED | FISHERY.C3 | PRG | Treasure Chest - Klaus Der Suhler | 14 | 17 | DOWNLOAD FILE |
| FREESOFT DISK NR | FISHERY.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 25 | 1 | DOWNLOAD FILE |
| L EHRNEN | FISHERY.C3 | PRG | Treasure Chest - Wolfgang Rauprich | 25 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 89 39 31 30 00 2A 08 02 00 8F |.......910.*....|
00000010: 20 2A 2A 20 4D 4C 20 53 54 4F 50 20 4B 45 59 20 | ** ML STOP KEY |
00000020: 44 49 53 41 42 4C 45 20 2A 2A 00 55 08 03 00 99 |DISABLE **.U....|
00000030: 22 78 A9 3D 8D 14 03 A9 08 8D 15 03 58 60 20 EA |"x.=........X` .|
00000040: FF A9 FF 85 91 4C 34 EA 78 A9 31 8D 14 03 A9 EA |.....L4.x.1.....|
00000050: 8D 15 03 58 60 00 74 08 04 00 99 22 78 68 68 68 |...X`.t...."xhhh|
00000060: AA 68 A8 68 68 68 68 68 68 68 98 48 8A 48 58 60 |.h.hhhhhhh.H.HX`|
00000070: 31 31 31 22 00 85 08 05 00 99 22 68 68 68 68 68 |111"......"hhhhh|
00000080: 68 68 60 31 22 00 A7 08 06 00 8F 20 2A 2A 20 34 |hh`1"...... ** 4|
00000090: 20 2D 20 50 4F 50 20 4D 4C 20 53 55 42 52 4F 55 | - POP ML SUBROU|
000000A0: 54 49 4E 45 20 2A 2A 00 C8 08 0A 00 8F 20 2A 2A |TINE **...... **|
000000B0: 47 45 4E 45 52 41 4C 20 49 4E 50 55 54 20 52 4F |GENERAL INPUT RO|
000000C0: 55 54 49 4E 45 20 2A 2A 00 CE 08 0F 00 3A 00 D4 |UTINE **.....:..|
000000D0: 08 1E 00 3A 00 F0 08 23 00 8F 20 2B 2B 2B 20 49 |...:...#.. +++ I|
000000E0: 4E 50 55 54 20 53 45 43 54 49 4F 4E 20 2B 2B 2B |NPUT SECTION +++|
000000F0: 00 08 09 28 00 97 55 4F 2C 30 3A 55 52 24 B2 22 |...(..UO,0:UR$."|
00000100: 22 3A 55 49 24 B2 22 22 00 18 09 2A 00 8B 55 4C |":UI$.""...*..UL|
00000110: B2 30 A7 55 4C B2 38 30 00 2B 09 2D 00 99 22 20 |.0.UL.80.+.-.." |
00000120: 20 9D 9D 22 3B 3A 97 55 43 2C 30 00 3F 09 32 00 | ..";:.UC,0.?.2.|
00000130: A1 55 49 24 3A 8B 55 49 24 B2 22 22 A7 35 30 00 |.UI$:.UI$."".50.|
00000140: 69 09 37 00 8B 55 49 24 B2 C7 28 31 33 29 AF C3 |i.7..UI$..(13)..|
00000150: 28 55 52 24 29 B1 B2 31 A7 97 55 43 2C 31 3A 99 |(UR$)..1..UC,1:.|
00000160: 22 20 9D 22 3B 3A 89 38 35 00 7C 09 3C 00 8B 55 |" .";:.85.|.<..U|
00000170: 49 24 B2 C7 28 32 30 29 A7 31 30 35 00 90 09 3E |I$..(20).105...>|
00000180: 00 8B 20 C3 28 55 52 24 29 B2 B1 55 4C A7 35 30 |.. .(UR$)..UL.50|
00000190: 00 B5 09 41 00 8D 31 32 30 3A 8F 20 43 48 45 43 |...A..120:. CHEC|
000001A0: 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 41 52 |K FOR VALID CHAR|
000001B0: 41 43 54 45 52 00 C5 09 46 00 55 52 24 B2 55 52 |ACTER...F.UR$.UR|
000001C0: 24 AA 55 49 24 00 CF 09 4B 00 99 55 49 24 3B 00 |$.UI$...K..UI$;.|
000001D0: D7 09 50 00 89 35 30 00 FC 09 55 00 8F 20 2B 2B |..P..50...U.. ++|
000001E0: 2B 20 43 48 45 43 4B 20 46 4F 52 20 48 45 4C 50 |+ CHECK FOR HELP|
000001F0: 20 52 45 51 55 45 53 54 20 2B 2B 2B 00 24 0A 5A | REQUEST +++.$.Z|
00000200: 00 8B 55 52 24 B2 55 58 24 A7 31 39 35 3A 8F 20 |..UR$.UX$.195:. |
00000210: 45 58 49 54 20 54 4F 20 48 45 4C 50 20 52 4F 55 |EXIT TO HELP ROU|
00000220: 54 49 4E 45 00 33 0A 5F 00 8B 55 46 B2 31 A7 8D |TINE.3._..UF.1..|
00000230: 32 34 30 00 40 0A 64 00 55 46 B2 30 3A 99 3A 8E |240.@.d.UF.0:.:.|
00000240: 00 59 0A 66 00 8F 20 2B 2B 20 43 48 45 43 4B 20 |.Y.f.. ++ CHECK |
00000250: 44 45 4C 45 54 45 20 2B 2B 00 6A 0A 69 00 8B C3 |DELETE ++.j.i...|
00000260: 28 55 52 24 29 B3 31 A7 35 30 00 82 0A 6E 00 55 |(UR$).1.50...n.U|
00000270: 52 24 B2 C8 28 55 52 24 2C C3 28 55 52 24 29 AB |R$..(UR$,.(UR$).|
00000280: 31 29 00 94 0A 73 00 99 22 9D 20 20 9D 9D 22 3B |1)...s..". ..";|
00000290: 3A 89 35 30 00 BB 0A 78 00 8F 20 2B 2B 20 43 48 |:.50...x.. ++ CH|
000002A0: 45 43 4B 20 46 4F 52 20 56 41 4C 49 44 20 43 48 |ECK FOR VALID CH|
000002B0: 41 52 41 43 54 45 52 53 20 2B 2B 00 CD 0A 7D 00 |ARACTERS ++...}.|
000002C0: 8B C3 28 55 53 24 29 B2 30 A7 31 35 30 00 DE 0A |..(US$).0.150...|
000002D0: 82 00 81 55 53 B2 31 A4 C3 28 55 53 24 29 00 F5 |...US.1..(US$)..|
000002E0: 0A 87 00 8B 55 49 24 B2 CA 28 55 53 24 2C 55 53 |....UI$..(US$,US|
000002F0: 2C 31 29 A7 8E 00 FB 0A 8C 00 82 00 08 0B 91 00 |,1).............|
00000300: 55 49 24 B2 22 22 3A 8E 00 23 0B 96 00 8F 20 2A |UI$."":..#.... *|
00000310: 2A 20 53 54 41 4E 44 41 52 44 20 49 4E 50 55 54 |* STANDARD INPUT|
00000320: 20 2A 2A 00 34 0B 98 00 8B C6 28 55 49 24 29 B2 | **.4.....(UI$).|
00000330: 34 36 A7 8E 00 45 0B 9B 00 8B 55 49 24 B2 C7 28 |46...E....UI$..(|
00000340: 33 32 29 A7 8E 00 62 0B A0 00 8B C6 28 55 49 24 |32)...b.....(UI$|
00000350: 29 B3 34 38 B0 C6 28 55 49 24 29 B1 35 37 A7 31 |).48..(UI$).57.1|
00000360: 37 30 00 68 0B A5 00 8E 00 85 0B AA 00 8B C6 28 |70.h...........(|
00000370: 55 49 24 29 B3 36 35 B0 C6 28 55 49 24 29 B1 39 |UI$).65..(UI$).9|
00000380: 30 A7 31 38 30 00 8B 0B AF 00 8E 00 AF 0B B4 00 |0.180...........|
00000390: 8B C6 28 55 49 24 29 B3 31 39 33 B0 C6 28 55 49 |..(UI$).193..(UI|
000003A0: 24 29 B1 32 31 38 A7 55 49 24 B2 22 22 3A 8E 00 |$).218.UI$."":..|
000003B0: D2 0B B9 00 8B C2 28 55 54 29 B2 55 55 25 A7 55 |......(UT).UU%.U|
000003C0: 49 24 B2 C7 28 C6 28 55 49 24 29 AB 31 32 38 29 |I$..(.(UI$).128)|
000003D0: 3A 8E 00 D8 0B BB 00 8E 00 E5 0B BE 00 55 49 24 |:............UI$|
000003E0: B2 22 22 3A 8E 00 0A 0C C3 00 55 46 B2 31 3A 8F |."":......UF.1:.|
000003F0: 20 2B 2B 2B 20 48 45 4C 50 20 52 4F 55 54 49 4E | +++ HELP ROUTIN|
00000400: 45 20 45 58 49 54 20 2B 2B 2B 00 13 0C C5 00 8D |E EXIT +++......|
00000410: 32 35 30 00 1C 0C C8 00 8D 32 34 35 00 2E 0C CD |250......245....|
00000420: 00 81 55 51 B2 55 42 A4 55 42 AA 39 31 35 00 5F |..UQ.UB.UB.915._|
00000430: 0C D2 00 55 51 25 28 55 51 AB 55 42 29 B2 C2 28 |...UQ%(UQ.UB)..(|
00000440: 55 51 29 3A 82 3A 55 51 25 28 55 34 25 AC 34 30 |UQ):.:UQ%(U4%.40|
00000450: AA 55 33 25 AB 31 29 B2 33 32 3A 99 22 93 22 00 |.U3%.1).32:.".".|
00000460: 72 0C D7 00 55 5A B2 31 3A 55 56 25 B2 C2 28 55 |r...UZ.1:UV%..(U|
00000470: 54 29 00 7B 0C D8 00 89 33 30 30 00 A0 0C D9 00 |T).{....300.....|
00000480: 55 5A B2 30 3A 55 53 24 B2 55 4A 24 3A 55 47 24 |UZ.0:US$.UJ$:UG$|
00000490: B2 55 4B 24 3A 55 50 B2 55 4A 3A 55 4C B2 55 4B |.UK$:UP.UJ:UL.UK|
000004A0: 00 D7 0C DA 00 8B C2 28 35 30 30 30 33 29 B2 30 |.......(50003).0|
000004B0: A7 97 35 33 32 38 31 2C 31 3A 99 22 93 22 3B 3A |..53281,1:.".";:|
000004C0: 97 35 33 32 38 31 2C 36 3A 97 35 33 32 38 30 2C |.53281,6:.53280,|
000004D0: 31 34 3A 89 32 32 30 00 E1 0C DB 00 99 22 93 22 |14:.220......"."|
000004E0: 3B 00 03 0D DC 00 55 54 24 B2 55 4C 24 3A 97 55 |;.....UT$.UL$:.U|
000004F0: 54 2C 55 56 25 3A 81 55 51 B2 55 42 A4 55 42 AA |T,UV%:.UQ.UB.UB.|
00000500: 39 31 35 00 1D 0D E1 00 97 55 51 2C 55 51 25 28 |915......UQ,UQ%(|
00000510: 55 51 AB 55 42 29 3A 82 3A 8D 38 36 35 00 29 0D |UQ.UB):.:.865.).|
00000520: E6 00 97 55 31 2C 55 31 25 00 35 0D E8 00 97 55 |...U1,U1%.5....U|
00000530: 32 2C 55 32 25 00 41 0D E9 00 97 55 34 2C 55 34 |2,U2%.A....U4,U4|
00000540: 25 00 4F 0D EA 00 97 55 33 2C 55 33 25 AB 31 00 |%.O....U3,U3%.1.|
00000550: 57 0D EB 00 89 33 35 00 89 0D F0 00 55 44 25 B2 |W....35.....UD%.|
00000560: 28 28 55 32 25 AC 32 35 36 AA 55 31 25 AA 55 33 |((U2%.256.U1%.U3|
00000570: 25 29 AB 55 42 29 AD 34 30 3A 99 C8 28 55 44 24 |%).UB).40:..(UD$|
00000580: 2C 55 44 25 AA 31 29 3A 8E 00 C4 0D F5 00 99 C8 |,UD%.1):........|
00000590: 28 55 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 |(UD$,24);" |
000005A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005B0: 12 20 48 45 4C 50 20 43 4F 4D 49 4E 47 20 92 20 |. HELP COMING . |
000005C0: 20 22 3A 8E 00 F0 0D FA 00 55 31 25 B2 C2 28 55 | ":......U1%..(U|
000005D0: 31 29 3A 55 32 25 B2 C2 28 55 32 29 3A 55 33 25 |1):U2%..(U2):U3%|
000005E0: B2 C2 28 55 33 29 3A 55 34 25 B2 C2 28 55 34 29 |..(U3):U4%..(U4)|
000005F0: 00 18 0E FB 00 55 4A 24 B2 55 53 24 3A 55 4B 24 |.....UJ$.US$:UK$|
00000600: B2 55 47 24 3A 55 4C 24 B2 55 54 24 3A 55 4A B2 |.UG$:UL$.UT$:UJ.|
00000610: 55 50 3A 55 4B B2 55 4C 00 1E 0E FF 00 8E 00 2F |UP:UK.UL......./|
00000620: 0E 2C 01 8F 20 2A 2A 20 4D 45 4E 55 20 2A 2A 00 |.,.. ** MENU **.|
00000630: 35 0E 2D 01 3A 00 64 0E 2E 01 99 22 93 22 3A 97 |5.-.:.d....".":.|
00000640: 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 30 33 29 |UT,UU%:..(50003)|
00000650: B2 30 A7 97 35 33 32 38 31 2C 39 3A 97 35 33 32 |.0..53281,9:.532|
00000660: 38 30 2C 38 00 6A 0E 2F 01 3A 00 87 0E 31 01 99 |80,8.j./.:...1..|
00000670: 22 13 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
00000680: 20 20 4D 45 4E 55 22 00 B6 0E 36 01 99 22 20 2D | MENU"...6.." -|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006B0: 2D 2D 2D 2D 2D 22 00 D8 0E 3B 01 99 22 11 11 20 |-----"...;..".. |
000006C0: 20 20 20 20 20 20 31 2E 20 20 20 42 45 47 49 4E | 1. BEGIN|
000006D0: 20 46 49 53 48 45 52 59 00 02 0F 40 01 99 22 11 | FISHERY...@..".|
000006E0: 11 20 20 20 20 20 20 20 32 2E 20 20 20 53 54 55 |. 2. STU|
000006F0: 44 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E |DENT INSTRUCTION|
00000700: 53 22 00 2C 0F 45 01 99 22 11 11 20 20 20 20 20 |S".,.E..".. |
00000710: 20 20 33 2E 20 20 20 54 45 41 43 48 45 52 20 49 | 3. TEACHER I|
00000720: 4E 53 54 52 55 43 54 49 4F 4E 53 22 00 48 0F 4F |NSTRUCTIONS".H.O|
00000730: 01 99 22 11 11 20 20 20 20 20 20 20 34 2E 20 20 |..".. 4. |
00000740: 20 51 55 49 54 11 11 22 00 77 0F 54 01 99 22 20 | QUIT..".w.T.." |
00000750: 2D 2D 2D 2D 2D 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 22 00 A2 0F 59 01 99 22 11 11 |------"...Y.."..|
00000780: 20 20 20 20 20 20 20 50 52 45 53 53 20 41 20 4E | PRESS A N|
00000790: 55 4D 42 45 52 20 4B 45 59 20 28 31 2D 34 29 20 |UMBER KEY (1-4) |
000007A0: 22 3B 00 CA 0F 5E 01 55 4C B2 31 3A 55 53 24 B2 |";...^.UL.1:US$.|
000007B0: 22 31 32 33 34 22 3A 8D 33 35 3A 8F 20 49 4E 50 |"1234":.35:. INP|
000007C0: 55 54 20 52 4F 55 54 49 4E 45 00 D5 0F 60 01 55 |UT ROUTINE...`.U|
000007D0: 53 24 B2 22 22 00 F2 0F 63 01 91 C5 28 55 52 24 |S$.""...c...(UR$|
000007E0: 29 8D 31 30 30 30 2C 34 30 30 2C 35 30 30 2C 33 |).1000,400,500,3|
000007F0: 39 36 00 FB 0F 68 01 89 33 30 30 00 22 10 8B 01 |96...h..300."...|
00000800: 8F 20 2A 2A 20 52 45 2D 45 4E 41 42 4C 45 20 53 |. ** RE-ENABLE S|
00000810: 54 4F 50 20 4B 45 59 20 41 4E 44 20 45 4E 44 20 |TOP KEY AND END |
00000820: 2A 2A 00 51 10 8C 01 8B C2 28 35 30 30 30 33 29 |**.Q.....(50003)|
00000830: B3 B1 31 AF C2 28 35 30 30 30 33 29 B3 B1 31 36 |..1..(50003)..16|
00000840: 30 AF C2 28 35 30 30 30 33 29 B3 B1 30 A7 33 39 |0..(50003)..0.39|
00000850: 39 00 7B 10 8D 01 9E 55 55 AA 37 31 3A 8B C2 28 |9.{....UU.71:..(|
00000860: 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 31 2C |50003).0..53281,|
00000870: 36 3A 97 35 33 32 38 30 2C 31 34 00 87 10 8E 01 |6:.53280,14.....|
00000880: 99 22 9A 93 22 3A 80 00 92 10 8F 01 8D 38 37 35 |."..":.......875|
00000890: 3A 8E 00 B3 10 90 01 8F 20 2A 2A 20 53 54 55 44 |:....... ** STUD|
000008A0: 45 4E 54 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 |ENT INSTRUCTIONS|
000008B0: 20 2A 2A 00 E2 10 95 01 99 22 93 22 3A 97 55 54 | **......".":.UT|
000008C0: 2C 55 4C 25 3A 8B C2 28 35 30 30 30 33 29 B2 30 |,UL%:..(50003).0|
000008D0: A7 97 35 33 32 38 31 2C 30 3A 97 35 33 32 38 30 |..53281,0:.53280|
000008E0: 2C 30 00 03 11 9A 01 55 50 B2 30 3A 55 47 24 B2 |,0.....UP.0:UG$.|
000008F0: 22 D3 54 55 44 45 4E 54 20 C9 4E 53 54 22 3A 8D |".TUDENT .NST":.|
00000900: 38 35 30 00 2C 11 A0 01 99 22 11 11 11 20 20 20 |850.,...."... |
00000910: 20 20 20 20 20 D4 48 49 53 20 49 53 20 41 20 53 | .HIS IS A S|
00000920: 49 4D 55 4C 41 54 49 4F 4E 20 4F 46 00 53 11 A2 |IMULATION OF.S..|
00000930: 01 99 22 11 20 20 20 20 20 20 20 20 41 20 46 49 |..". A FI|
00000940: 53 48 45 52 59 20 57 48 45 52 45 20 59 4F 55 20 |SHERY WHERE YOU |
00000950: 43 41 4E 00 7D 11 A4 01 99 22 11 20 20 20 20 20 |CAN.}....". |
00000960: 20 20 20 43 4F 4E 54 52 4F 4C 20 54 48 45 20 42 | CONTROL THE B|
00000970: 45 53 54 20 43 41 54 43 48 20 41 4E 44 00 9F 11 |EST CATCH AND...|
00000980: A6 01 99 22 11 20 20 20 20 20 20 20 20 45 53 43 |...". ESC|
00000990: 41 50 45 4D 45 4E 54 20 4C 45 56 45 4C 53 2E 00 |APEMENT LEVELS..|
000009A0: C4 11 A8 01 99 22 11 11 20 20 20 20 20 20 20 20 |.....".. |
000009B0: D9 4F 55 52 20 47 4F 41 4C 20 49 53 20 54 4F 20 |.OUR GOAL IS TO |
000009C0: 46 49 4E 44 00 EB 11 AA 01 99 22 11 20 20 20 20 |FIND......". |
000009D0: 20 20 20 20 54 48 45 20 4F 50 54 49 4D 55 4D 20 | THE OPTIMUM |
000009E0: 53 54 52 41 54 45 47 59 20 54 4F 00 04 12 AC 01 |STRATEGY TO.....|
000009F0: 99 22 11 20 20 20 20 20 20 20 20 42 45 20 55 53 |.". BE US|
00000A00: 45 44 2E 22 00 12 12 AE 01 8D 38 33 35 3A 8D 38 |ED."......835:.8|
00000A10: 35 30 00 3F 12 B0 01 99 22 11 11 11 11 11 20 20 |50.?...."..... |
00000A20: 20 20 20 CE 4F 54 45 20 54 48 41 54 20 54 48 45 | .OTE THAT THE|
00000A30: 20 53 54 52 41 54 45 47 59 20 57 48 49 43 48 00 | STRATEGY WHICH.|
00000A40: 6A 12 B2 01 99 22 11 20 20 20 20 20 50 52 4F 44 |j....". PROD|
00000A50: 55 43 45 53 20 54 48 45 20 42 45 53 54 20 43 41 |UCES THE BEST CA|
00000A60: 54 43 48 20 4D 41 59 20 42 45 00 93 12 B4 01 99 |TCH MAY BE......|
00000A70: 22 11 20 20 20 20 20 44 49 46 46 45 52 45 4E 54 |". DIFFERENT|
00000A80: 20 28 4E 55 4D 45 52 49 43 41 4C 4C 59 29 20 46 | (NUMERICALLY) F|
00000A90: 52 4F 4D 00 BB 12 B6 01 99 22 11 20 20 20 20 20 |ROM......". |
00000AA0: 54 48 45 20 53 54 52 41 54 45 47 59 20 57 48 49 |THE STRATEGY WHI|
00000AB0: 43 48 20 50 52 4F 44 55 43 45 53 00 E5 12 B8 01 |CH PRODUCES.....|
00000AC0: 99 22 11 20 20 20 20 20 54 48 45 20 42 45 53 54 |.". THE BEST|
00000AD0: 20 52 55 4E 20 28 3D 45 53 43 41 50 45 2B 43 41 | RUN (=ESCAPE+CA|
00000AE0: 54 43 48 29 2E 00 F3 12 BA 01 8D 38 33 35 3A 8D |TCH).......835:.|
00000AF0: 38 35 30 00 21 13 BC 01 99 22 11 11 11 11 11 11 |850.!...."......|
00000B00: 20 20 20 20 20 C9 4E 20 54 48 49 53 20 53 49 4D | .N THIS SIM|
00000B10: 55 4C 41 54 49 4F 4E 2C 20 57 45 20 53 48 41 4C |ULATION, WE SHAL|
00000B20: 4C 00 49 13 BE 01 99 22 11 20 20 20 20 20 44 45 |L.I....". DE|
00000B30: 46 49 4E 45 20 54 48 45 20 4F 50 54 49 4D 55 4D |FINE THE OPTIMUM|
00000B40: 20 53 54 52 41 54 45 47 59 00 73 13 C0 01 99 22 | STRATEGY.s...."|
00000B50: 11 20 20 20 20 20 54 4F 20 4D 45 41 4E 20 4F 4E |. TO MEAN ON|
00000B60: 45 20 54 48 41 54 20 50 52 4F 44 55 43 45 53 20 |E THAT PRODUCES |
00000B70: 54 48 45 00 86 13 C2 01 99 22 11 20 20 20 20 20 |THE......". |
00000B80: 43 41 54 43 48 2E 00 94 13 C4 01 8D 38 33 35 3A |CATCH.......835:|
00000B90: 8D 38 35 30 00 C0 13 C8 01 99 22 11 11 20 20 20 |.850......".. |
00000BA0: 20 D2 45 4D 45 4D 42 45 52 20 54 4F 20 48 49 54 | .EMEMBER TO HIT|
00000BB0: 20 3C 52 45 54 55 52 4E 3E 20 41 46 54 45 52 22 | <RETURN> AFTER"|
00000BC0: 00 DF 13 CA 01 99 22 11 20 20 20 20 54 59 50 49 |......". TYPI|
00000BD0: 4E 47 20 59 4F 55 52 20 41 4E 53 57 45 52 2E 00 |NG YOUR ANSWER..|
00000BE0: 0B 14 D0 01 99 22 11 11 20 20 20 20 D4 59 50 45 |.....".. .YPE|
00000BF0: 20 3C 48 3E 20 41 54 20 41 4E 59 20 54 49 4D 45 | <H> AT ANY TIME|
00000C00: 20 54 4F 20 52 45 54 55 52 4E 22 00 37 14 D2 01 | TO RETURN".7...|
00000C10: 99 22 11 20 20 20 20 54 4F 20 54 48 45 20 4D 45 |.". TO THE ME|
00000C20: 4E 55 20 46 4F 52 20 48 45 4C 50 2E 20 20 D9 4F |NU FOR HELP. .O|
00000C30: 55 20 57 49 4C 4C 22 00 63 14 D4 01 99 22 11 20 |U WILL".c....". |
00000C40: 20 20 20 42 45 20 52 45 54 55 52 4E 45 44 20 54 | BE RETURNED T|
00000C50: 4F 20 54 48 45 20 50 4C 41 43 45 20 49 4E 20 54 |O THE PLACE IN T|
00000C60: 48 45 22 00 8D 14 D6 01 99 22 11 20 20 20 20 50 |HE"......". P|
00000C70: 52 4F 47 52 41 4D 20 57 48 45 52 45 20 59 4F 55 |ROGRAM WHERE YOU|
00000C80: 20 4C 45 46 54 20 4F 46 46 20 41 53 22 00 BA 14 | LEFT OFF AS"...|
00000C90: D8 01 99 22 11 20 20 20 20 53 4F 4F 4E 20 41 53 |...". SOON AS|
00000CA0: 20 54 48 45 20 4F 50 54 49 4F 4E 20 46 52 4F 4D | THE OPTION FROM|
00000CB0: 20 54 48 45 20 4D 45 4E 55 22 00 D3 14 DA 01 99 | THE MENU"......|
00000CC0: 22 11 20 20 20 20 49 53 20 43 4F 4D 50 4C 45 54 |". IS COMPLET|
00000CD0: 45 2E 22 00 DC 14 E5 01 8D 38 33 35 00 F0 14 EA |E."......835....|
00000CE0: 01 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 31 37 |..UZ.1..UP%:.217|
00000CF0: 00 F6 14 F3 01 8E 00 17 15 F4 01 8F 20 2A 2A 20 |............ ** |
00000D00: 54 45 41 43 48 45 52 20 49 4E 53 54 52 55 43 54 |TEACHER INSTRUCT|
00000D10: 49 4F 4E 53 20 2A 2A 00 47 15 F5 01 99 22 93 22 |IONS **.G...."."|
00000D20: 3A 97 55 54 2C 55 4C 25 3A 8B C2 28 35 30 30 30 |:.UT,UL%:..(5000|
00000D30: 33 29 B2 30 A7 97 35 33 32 38 31 2C 32 3A 97 35 |3).0..53281,2:.5|
00000D40: 33 32 38 30 2C 31 30 00 68 15 F6 01 55 50 B2 30 |3280,10.h...UP.0|
00000D50: 3A 55 47 24 B2 22 D4 45 41 43 48 45 52 20 C9 4E |:UG$.".EACHER .N|
00000D60: 53 54 22 3A 8D 38 35 30 00 96 15 F7 01 99 22 11 |ST":.850......".|
00000D70: 11 20 20 20 20 20 20 D4 4F 20 54 48 45 20 42 45 |. .O THE BE|
00000D80: 53 54 20 4F 46 20 4F 55 52 20 4B 4E 4F 57 4C 45 |ST OF OUR KNOWLE|
00000D90: 44 47 45 2C 11 22 00 BF 15 F8 01 99 22 20 20 20 |DGE,."......" |
00000DA0: 54 48 49 53 20 50 52 4F 47 52 41 4D 20 49 53 20 |THIS PROGRAM IS |
00000DB0: 49 4E 20 54 48 45 20 50 55 42 4C 49 43 11 22 00 |IN THE PUBLIC.".|
00000DC0: EB 15 F9 01 99 22 20 20 20 44 4F 4D 41 49 4E 2E |....." DOMAIN.|
00000DD0: 20 20 C9 46 20 54 48 49 53 20 49 53 20 4E 4F 54 | .F THIS IS NOT|
00000DE0: 20 54 48 45 20 43 41 53 45 11 22 00 08 16 FA 01 | THE CASE.".....|
00000DF0: 99 22 20 20 20 50 4C 45 41 53 45 20 43 4F 4E 54 |." PLEASE CONT|
00000E00: 41 43 54 3A 11 11 11 22 00 32 16 FB 01 99 22 20 |ACT:...".2...." |
00000E10: 20 20 20 20 20 C3 4F 4D 4D 4F 44 4F 52 45 20 C2 | .OMMODORE .|
00000E20: 55 53 49 4E 45 53 53 20 CD 41 43 48 49 4E 45 53 |USINESS .ACHINES|
00000E30: 11 22 00 55 16 FC 01 99 22 20 20 20 20 20 20 20 |.".U...." |
00000E40: 20 20 20 33 33 37 30 20 D0 48 41 52 4D 41 43 59 | 3370 .HARMACY|
00000E50: 20 C1 56 45 2E 00 79 16 FD 01 99 22 20 20 20 20 | .VE..y...." |
00000E60: 20 20 20 20 20 20 C1 47 49 4E 43 4F 55 52 54 2C | .GINCOURT,|
00000E70: 20 CF 4E 54 41 52 49 4F 22 00 9B 16 FE 01 99 22 | .NTARIO"......"|
00000E80: 20 20 20 20 20 20 20 20 20 20 C3 41 4E 41 44 41 | .ANADA|
00000E90: 20 20 20 CD 31 D7 20 32 CB 34 22 00 BB 16 FF 01 | .1. 2.4".....|
00000EA0: 99 22 20 20 20 20 20 20 20 20 20 20 28 34 31 36 |." (416|
00000EB0: 29 20 34 39 39 2D 34 32 39 32 22 00 CA 16 40 02 |) 499-4292"...@.|
00000EC0: 8D 38 33 35 3A 8D 38 35 30 3A 00 EE 16 42 02 99 |.835:.850:...B..|
00000ED0: 22 20 20 20 20 20 11 11 D0 52 4F 47 52 41 4D 20 |" ...ROGRAM |
00000EE0: CE 41 4D 45 3A 20 C6 49 53 48 45 52 59 11 00 1A |.AME: .ISHERY...|
00000EF0: 17 44 02 99 22 20 20 20 20 20 D7 52 49 54 54 45 |.D.." .RITTE|
00000F00: 4E 20 C2 59 20 20 3A 20 DA 49 4E 4E 20 41 4E 44 |N .Y : .INN AND|
00000F10: 20 CD 43 C6 41 44 44 45 4E 11 00 35 17 46 02 99 | .C.ADDEN..5.F..|
00000F20: 22 20 20 20 20 20 D5 50 47 52 41 44 45 44 20 C2 |" .PGRADED .|
00000F30: 59 20 3A 20 11 00 60 17 48 02 99 22 20 20 20 20 |Y : ..`.H.." |
00000F40: 20 11 D4 48 49 53 20 50 52 4F 47 52 41 4D 20 57 | ..HIS PROGRAM W|
00000F50: 49 4C 4C 20 52 55 4E 20 4F 4E 20 41 4E 59 11 11 |ILL RUN ON ANY..|
00000F60: 00 80 17 4E 02 99 22 20 20 20 20 20 20 20 20 20 |...N.." |
00000F70: D0 C5 D4 20 36 34 20 C3 CF CD D0 D5 D4 C5 D2 11 |... 64 .........|
00000F80: 00 A5 17 50 02 99 22 20 20 20 20 20 20 20 20 20 |...P.." |
00000F90: C3 CF CD CD CF C4 CF D2 C5 20 36 34 20 C3 CF CD |......... 64 ...|
00000FA0: D0 D5 D4 C5 D2 00 AE 17 52 02 8D 38 33 35 00 C2 |........R..835..|
00000FB0: 17 54 02 8B 55 5A B2 31 A7 9E 55 50 25 3A 89 32 |.T..UZ.1..UP%:.2|
00000FC0: 31 37 00 C8 17 56 02 8E 00 EE 17 58 02 8F 20 2A |17...V.....X.. *|
00000FD0: 2A 20 50 52 4F 47 52 41 4D 20 4D 4F 44 49 46 49 |* PROGRAM MODIFI|
00000FE0: 43 41 54 49 4F 4E 20 49 4E 53 54 20 2A 2A 00 FF |CATION INST **..|
00000FF0: 17 59 02 99 22 93 22 3A 97 55 54 2C 55 4C 25 00 |.Y..".":.UT,UL%.|
00001000: 1F 18 5D 02 55 50 B2 30 3A 55 47 24 B2 22 D0 52 |..].UP.0:UG$.".R|
00001010: 4F 47 52 41 4D 20 CD 4F 44 22 3A 8D 38 35 30 00 |OGRAM .OD":.850.|
00001020: 28 18 94 02 8D 38 33 35 00 3C 18 B2 02 8B 55 5A |(....835.<....UZ|
00001030: B2 31 A7 9E 55 50 25 3A 89 32 31 37 00 42 18 BB |.1..UP%:.217.B..|
00001040: 02 8E 00 67 18 BC 02 8F 20 2A 2A 20 54 4F 20 55 |...g.... ** TO U|
00001050: 53 45 20 38 30 33 32 20 4C 4F 41 44 20 43 42 4D |SE 8032 LOAD CBM|
00001060: 34 30 33 32 20 2A 2A 00 9D 18 C6 02 99 22 93 11 |4032 **......"..|
00001070: 11 11 05 42 45 46 4F 52 45 20 52 55 4E 4E 49 4E |...BEFORE RUNNIN|
00001080: 47 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 4F |G THIS PROGRAM O|
00001090: 4E 20 41 4E 20 38 30 33 32 20 20 11 11 00 D3 18 |N AN 8032 .....|
000010A0: D0 02 99 22 20 20 20 20 20 20 4C 4F 41 44 20 54 |..." LOAD T|
000010B0: 48 45 20 27 43 42 4D 20 34 30 33 32 27 20 50 52 |HE 'CBM 4032' PR|
000010C0: 4F 47 52 41 4D 11 11 11 11 11 11 11 11 11 11 11 |OGRAM...........|
000010D0: 11 11 22 00 DE 18 DA 02 9E 55 55 AA 37 31 00 E4 |.."......UU.71..|
000010E0: 18 E4 02 80 00 04 19 20 03 8F 20 2A 2A 20 54 20 |....... .. ** T |
000010F0: 49 20 54 20 4C 20 45 20 20 20 50 20 41 20 47 20 |I T L E P A G |
00001100: 45 20 2A 2A 00 38 19 22 03 99 22 93 11 1D 05 22 |E **.8.".."...."|
00001110: 3B 3A 97 55 54 2C 55 55 25 3A 8B C2 28 35 30 30 |;:.UT,UU%:..(500|
00001120: 30 33 29 B2 30 A7 97 35 33 32 38 30 2C 31 34 3A |03).0..53280,14:|
00001130: 97 35 33 32 38 31 2C 36 00 4E 19 24 03 81 49 B2 |.53281,6.N.$..I.|
00001140: 31 A4 33 38 3A 99 22 12 A6 92 22 3B 3A 82 00 66 |1.38:."...";:..f|
00001150: 19 26 03 81 49 B2 31 A4 32 32 3A 99 22 11 9D 12 |.&..I.1.22:."...|
00001160: A6 92 22 3B 3A 82 00 7E 19 28 03 81 49 B2 31 A4 |..";:..~.(..I.1.|
00001170: 33 37 3A 99 22 9D 9D 12 A6 92 22 3B 3A 82 00 96 |37:.".....";:...|
00001180: 19 2A 03 81 49 B2 31 A4 32 32 3A 99 22 91 9D 12 |.*..I.1.22:."...|
00001190: A6 92 22 3B 3A 82 00 BB 19 2C 03 99 22 13 11 11 |..";:....,.."...|
000011A0: 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000011B0: 1D 1D 1D 1D 1D 1D 12 A9 20 20 92 00 DD 19 2E 03 |........ ......|
000011C0: 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |."..............|
000011D0: 1D 1D 1D 1D 12 20 92 20 20 12 20 92 A9 00 FE 19 |..... . . .....|
000011E0: 30 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |0.."............|
000011F0: 1D 1D 1D 1D 1D 1D 12 20 92 20 20 12 A3 DF 00 1C |....... . .....|
00001200: 1A 32 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.2.."...........|
00001210: 1D 1D 1D 1D 1D 1D 1D DF 12 20 20 92 00 44 1A 34 |......... ..D.4|
00001220: 03 99 22 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..".............|
00001230: 1D 43 20 4F 20 4D 20 4D 20 4F 20 44 20 4F 20 52 |.C O M M O D O R|
00001240: 20 45 11 11 00 67 1A 36 03 99 22 1D 1D 1D 1D 1D | E...g.6..".....|
00001250: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 44 55 43 41 54 |..........EDUCAT|
00001260: 49 4F 4E 41 4C 11 11 00 86 1A 38 03 99 22 1D 1D |IONAL.....8.."..|
00001270: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 4F |..............SO|
00001280: 46 54 57 41 52 45 00 A1 1A 3A 03 8F 20 2A 2A 20 |FTWARE...:.. ** |
00001290: 43 4F 4D 4D 4F 44 4F 52 45 20 4C 4F 47 4F 20 2A |COMMODORE LOGO *|
000012A0: 2A 00 D9 1A 3B 03 99 C8 28 55 44 24 2C 32 34 29 |*...;...(UD$,24)|
000012B0: 3B 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 52 45 53 |;"..........PRES|
000012C0: 53 20 53 50 41 43 45 20 42 41 52 20 4F 52 20 57 |S SPACE BAR OR W|
000012D0: 41 49 54 92 22 3A 49 B2 30 00 FB 1A 3C 03 A1 41 |AIT.":I.0...<..A|
000012E0: 24 3A 8B 41 24 B3 B1 22 20 22 A7 49 B2 49 AA 31 |$:.A$.." ".I.I.1|
000012F0: 3A 8B 49 B3 32 35 30 A7 38 32 38 00 1F 1B 3E 03 |:.I.250.828...>.|
00001300: 54 31 24 B2 22 22 3A 54 32 24 B2 22 22 3A 54 33 |T1$."":T2$."":T3|
00001310: 24 B2 22 22 3A 54 34 24 B2 22 22 3A 49 B2 30 00 |$."":T4$."":I.0.|
00001320: 28 1B 40 03 89 33 30 30 00 44 1B 43 03 8F 20 2A |(.@..300.D.C.. *|
00001330: 2A 20 53 50 41 43 45 20 42 41 52 20 50 52 45 53 |* SPACE BAR PRES|
00001340: 53 20 2A 2A 00 80 1B 48 03 97 55 4F 2C 30 3A 99 |S **...H..UO,0:.|
00001350: C8 28 55 44 24 2C 32 34 29 3B 22 1D 1D 1D 1D 1D |.(UD$,24);".....|
00001360: 1D 12 50 52 45 53 53 20 53 50 41 43 45 20 42 41 |..PRESS SPACE BA|
00001370: 52 20 54 4F 20 43 4F 4E 54 49 4E 55 45 20 92 22 |R TO CONTINUE ."|
00001380: 00 97 1B 4C 03 A1 55 49 24 3A 8B 55 49 24 B3 B1 |...L..UI$:.UI$..|
00001390: 22 20 22 A7 38 34 34 00 9D 1B 4E 03 8E 00 BD 1B |" ".844...N.....|
000013A0: 52 03 8F 20 2A 2A 20 50 41 47 45 20 44 45 53 49 |R.. ** PAGE DESI|
000013B0: 47 4E 20 52 4F 55 54 49 4E 45 20 2A 2A 00 C9 1B |GN ROUTINE **...|
000013C0: 54 03 55 50 B2 55 50 AA 31 00 F3 1B 57 03 99 22 |T.UP.UP.1...W.."|
000013D0: 93 22 C8 28 55 54 24 AA 55 50 24 2C 32 31 29 3B |.".(UT$.UP$,21);|
000013E0: C9 28 55 50 24 AA 55 47 24 AA C4 28 55 50 29 2C |.(UP$.UG$..(UP),|
000013F0: 31 38 29 00 22 1C 5C 03 99 22 20 2D 2D 2D 2D 2D |18).".\.." -----|
00001400: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001410: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001420: 2D 22 00 31 1C 60 03 8B 55 48 B3 B1 30 A7 38 37 |-".1.`..UH..0.87|
00001430: 30 00 67 1C 61 03 99 C8 28 55 44 24 2C 32 34 29 |0.g.a...(UD$,24)|
00001440: 3B C8 28 55 50 24 2C 37 29 3B 22 48 45 4C 50 20 |;.(UP$,7);"HELP |
00001450: 2D 20 50 52 45 53 53 20 20 20 48 20 3C 52 45 54 |- PRESS H <RET|
00001460: 55 52 4E 3E 20 20 22 00 78 1C 66 03 55 48 B2 30 |URN> ".x.f.UH.0|
00001470: 3A 99 22 13 11 22 3A 8E 00 97 1C 6B 03 8F 20 2A |:."..":....k.. *|
00001480: 2A 20 50 4C 45 41 53 45 20 57 41 49 54 20 52 45 |* PLEASE WAIT RE|
00001490: 4D 41 52 4B 20 2A 2A 00 CD 1C 70 03 99 C8 28 55 |MARK **...p...(U|
000014A0: 44 24 2C 32 34 29 3B 22 20 20 20 20 20 20 20 20 |D$,24);" |
000014B0: 20 20 20 4F 4E 45 20 4D 4F 4D 45 4E 54 20 50 4C | ONE MOMENT PL|
000014C0: 45 41 53 45 2E 2E 2E 20 20 20 20 20 22 00 D3 1C |EASE... "...|
000014D0: 75 03 8E 00 F0 1C 84 03 8F 20 2A 2A 20 53 45 54 |u........ ** SET|
000014E0: 20 55 50 20 56 41 52 49 41 42 4C 45 53 20 2A 2A | UP VARIABLES **|
000014F0: 00 3B 1D 85 03 55 58 24 B2 22 48 22 3A 86 55 51 |.;...UX$."H":.UQ|
00001500: 25 28 31 30 30 30 29 3A 55 42 B2 33 32 37 36 38 |%(1000):UB.32768|
00001510: 3A 55 31 B2 31 39 36 3A 55 32 B2 31 39 37 3A 55 |:U1.196:U2.197:U|
00001520: 33 B2 31 39 38 3A 55 34 B2 32 31 36 3A 55 43 B2 |3.198:U4.216:UC.|
00001530: 31 36 37 3A 55 55 B2 31 30 32 34 00 79 1D 86 03 |167:UU.1024.y...|
00001540: 55 54 B2 35 39 34 36 38 3A 55 55 25 B2 31 32 3A |UT.59468:UU%.12:|
00001550: 55 4C 25 B2 31 34 3A 55 50 25 B2 31 31 34 36 3A |UL%.14:UP%.1146:|
00001560: 55 4D B2 33 32 37 36 38 3A 55 4F B2 31 35 38 3A |UM.32768:UO.158:|
00001570: 97 20 35 30 30 30 33 2C 30 00 BC 1D 87 03 8B C2 |. 50003,0.......|
00001580: 28 35 30 30 30 33 29 B2 30 A7 55 42 B2 31 30 32 |(50003).0.UB.102|
00001590: 34 3A 55 31 B2 32 30 39 3A 55 32 B2 32 31 30 3A |4:U1.209:U2.210:|
000015A0: 55 33 B2 32 31 31 3A 55 34 B2 32 31 34 3A 55 43 |U3.211:U4.214:UC|
000015B0: B2 32 30 34 3A 55 55 B2 32 30 34 38 00 FB 1D 88 |.204:UU.2048....|
000015C0: 03 8B C2 28 35 30 30 30 33 29 B2 30 A7 55 54 B2 |...(50003).0.UT.|
000015D0: 35 33 32 37 32 3A 55 55 25 B2 32 31 3A 55 4C 25 |53272:UU%.21:UL%|
000015E0: B2 32 33 3A 55 50 25 B2 32 31 33 39 3A 55 4D B2 |.23:UP%.2139:UM.|
000015F0: 31 30 32 34 3A 55 4F B2 31 39 38 00 1F 1E 89 03 |1024:UO.198.....|
00001600: 55 44 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |UD$."...........|
00001610: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 22 00 |..............".|
00001620: 51 1E 8A 03 55 50 24 B2 22 20 20 20 20 20 20 20 |Q...UP$." |
00001630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001650: 22 00 64 1E 8B 03 55 54 24 B2 22 20 C6 C9 D3 C8 |".d...UT$." ....|
00001660: C5 D2 D9 22 00 75 1E 8C 03 86 45 28 38 29 2C 43 |...".u....E(8),C|
00001670: 28 38 29 3A 8E 00 8F 1E 8E 03 8F 20 2A 2A 20 53 |(8):....... ** S|
00001680: 45 54 20 56 41 52 49 41 42 4C 45 53 20 2A 2A 00 |ET VARIABLES **.|
00001690: 98 1E 93 03 8D 39 30 30 00 AC 1E 94 03 53 56 24 |.....900.....SV$|
000016A0: B2 22 46 49 53 48 45 52 59 2E 43 32 00 C7 1E 98 |."FISHERY.C2....|
000016B0: 03 8F 20 2A 2A 20 43 48 45 43 4B 20 46 4F 52 20 |.. ** CHECK FOR |
000016C0: 38 30 33 32 20 2A 2A 00 E5 1E 9D 03 99 22 93 22 |8032 **......"."|
000016D0: 3A 99 22 A0 22 3A 8F 20 53 48 49 46 54 45 44 20 |:.".":. SHIFTED |
000016E0: 53 50 41 43 45 00 FC 1E A2 03 8B C2 28 55 42 AA |SPACE.......(UB.|
000016F0: 34 30 29 B3 B1 39 36 A7 8D 37 30 30 00 15 1F A3 |40)..96..700....|
00001700: 03 8F 20 2A 2A 20 4D 45 4D 4F 52 59 20 43 48 45 |.. ** MEMORY CHE|
00001710: 43 4B 20 2A 2A 00 29 1F A4 03 8B 20 B8 28 30 29 |CK **.).... .(0)|
00001720: B1 32 30 30 30 A7 39 33 37 00 57 1F A5 03 99 22 |.2000.937.W...."|
00001730: 93 11 11 05 54 48 49 53 20 4D 41 43 48 49 4E 45 |....THIS MACHINE|
00001740: 20 44 4F 45 53 20 4E 4F 54 20 48 41 56 45 20 45 | DOES NOT HAVE E|
00001750: 4E 4F 55 47 48 11 22 00 7B 1F A6 03 99 22 4D 45 |NOUGH.".{...."ME|
00001760: 4D 4F 52 59 20 54 4F 20 52 55 4E 20 54 48 49 53 |MORY TO RUN THIS|
00001770: 20 50 52 4F 47 52 41 4D 20 21 22 00 86 1F A7 03 | PROGRAM !".....|
00001780: 9E 55 55 AA 37 31 00 8C 1F A8 03 80 00 A6 1F A9 |.UU.71..........|
00001790: 03 99 22 93 05 22 3A 8B C2 28 35 30 30 30 33 29 |.."..":..(50003)|
000017A0: B2 30 A7 39 36 32 00 D5 1F AC 03 8F 20 2A 2A 20 |.0.962...... ** |
000017B0: 42 41 53 49 43 20 32 2E 30 20 20 4F 52 20 20 34 |BASIC 2.0 OR 4|
000017C0: 2E 30 20 20 4F 52 20 20 43 2D 36 34 20 53 45 54 |.0 OR C-64 SET|
000017D0: 55 50 20 2A 2A 00 13 20 AD 03 97 31 30 37 35 2C |UP **.. ...1075,|
000017E0: 31 33 33 3A 97 31 30 37 36 2C 31 34 34 3A 97 31 |133:.1076,144:.1|
000017F0: 30 37 37 2C 32 33 34 3A 97 31 30 37 39 2C 34 3A |077,234:.1079,4:|
00001800: 97 31 30 38 30 2C 31 33 33 3A 97 31 30 38 31 2C |.1080,133:.1081,|
00001810: 31 34 35 00 49 20 AE 03 97 31 30 39 31 2C 31 35 |145.I ...1091,15|
00001820: 35 3A 97 31 30 39 38 2C 31 33 33 3A 97 31 30 39 |5:.1098,133:.109|
00001830: 39 2C 31 34 34 3A 97 31 31 30 30 2C 32 33 34 3A |9,144:.1100,234:|
00001840: 97 31 31 30 33 2C 31 33 33 00 6B 20 AF 03 97 31 |.1103,133.k ...1|
00001850: 31 30 34 2C 31 34 35 3A 97 31 31 30 35 2C 32 33 |104,145:.1105,23|
00001860: 34 3A 97 31 30 38 32 2C 32 33 34 00 82 20 B1 03 |4:.1082,234.. ..|
00001870: 8B C2 28 35 30 30 30 33 29 B3 B1 31 36 30 A7 39 |..(50003)..160.9|
00001880: 35 35 00 B1 20 B6 03 97 31 30 39 33 2C 38 38 3A |55.. ...1093,88:|
00001890: 97 31 30 39 34 2C 32 32 38 3A 97 31 30 39 37 2C |.1094,228:.1097,|
000018A0: 38 35 3A 97 31 31 30 32 2C 32 32 38 3A 89 39 36 |85:.1102,228:.96|
000018B0: 35 00 C6 20 BB 03 8B C2 28 35 30 30 30 33 29 B3 |5.. ....(50003).|
000018C0: B1 31 A7 39 39 30 00 F5 20 C0 03 97 31 30 39 33 |.1.990.. ...1093|
000018D0: 2C 34 39 3A 97 31 30 39 34 2C 32 33 30 3A 97 31 |,49:.1094,230:.1|
000018E0: 30 39 37 2C 34 36 3A 97 31 31 30 32 2C 32 33 30 |097,46:.1102,230|
000018F0: 3A 89 39 36 35 00 2F 21 C2 03 97 32 30 39 39 2C |:.965./!...2099,|
00001900: 31 34 31 3A 97 32 31 30 30 2C 32 30 3A 97 32 31 |141:.2100,20:.21|
00001910: 30 31 2C 33 3A 97 32 31 30 33 2C 38 3A 97 32 31 |01,3:.2103,8:.21|
00001920: 30 34 2C 31 34 31 3A 97 32 31 30 35 2C 32 31 00 |04,141:.2105,21.|
00001930: 6B 21 C3 03 97 32 31 30 36 2C 33 3A 97 32 31 31 |k!...2106,3:.211|
00001940: 35 2C 31 34 35 3A 97 32 31 31 37 2C 35 32 3A 97 |5,145:.2117,52:.|
00001950: 32 31 31 38 2C 32 33 34 3A 97 32 31 32 31 2C 34 |2118,234:.2121,4|
00001960: 39 3A 97 32 31 32 32 2C 31 34 31 00 A5 21 C4 03 |9:.2122,141..!..|
00001970: 97 32 31 32 33 2C 32 30 3A 97 32 31 32 34 2C 33 |.2123,20:.2124,3|
00001980: 3A 97 32 31 32 36 2C 32 33 34 3A 97 32 31 32 37 |:.2126,234:.2127|
00001990: 2C 31 34 31 3A 97 32 31 32 38 2C 32 31 3A 97 32 |,141:.2128,21:.2|
000019A0: 31 32 39 2C 33 00 C3 21 C5 03 9E 55 55 AA 34 38 |129,3..!...UU.48|
000019B0: 3A 8F 20 44 49 53 41 42 4C 45 20 53 54 4F 50 20 |:. DISABLE STOP |
000019C0: 4B 45 59 00 D4 21 CA 03 8D 38 30 30 3A 8F 20 54 |KEY..!...800:. T|
000019D0: 49 54 4C 45 00 E4 21 D4 03 89 33 30 30 3A 8F 20 |ITLE..!...300:. |
000019E0: 4D 45 4E 55 00 15 22 DE 03 99 22 93 54 48 45 20 |MENU.."...".THE |
000019F0: 50 47 4D 20 57 49 4C 4C 20 4E 4F 54 20 57 4F 52 |PGM WILL NOT WOR|
00001A00: 4B 20 4F 4E 20 54 48 49 53 20 4D 41 43 48 49 4E |K ON THIS MACHIN|
00001A10: 45 21 22 3A 80 00 4A 22 E8 03 8B 55 5A B2 31 A7 |E!":..J"...UZ.1.|
00001A20: 9E 55 50 25 3A 9E 55 50 25 3A 55 5A B2 30 3A 8F |.UP%:.UP%:UZ.0:.|
00001A30: 20 2A 2A 20 50 52 4F 47 52 41 4D 20 53 54 41 52 | ** PROGRAM STAR|
00001A40: 54 53 20 48 45 52 45 20 2A 2A 00 75 22 E9 03 99 |TS HERE **.u"...|
00001A50: 22 93 05 22 3B 3A 8C 3A 8B C2 28 35 30 30 30 33 |"..";:.:..(50003|
00001A60: 29 B2 30 A7 97 35 33 32 38 31 2C 36 3A 97 35 33 |).0..53281,6:.53|
00001A70: 32 38 30 2C 36 00 C2 22 F2 03 59 52 B2 31 39 38 |280,6.."..YR.198|
00001A80: 33 3A 8F 20 53 45 54 20 54 48 49 53 20 56 41 52 |3:. SET THIS VAR|
00001A90: 49 41 42 4C 45 20 54 4F 20 54 48 45 20 50 52 45 |IABLE TO THE PRE|
00001AA0: 53 45 4E 54 20 59 45 41 52 21 21 21 21 21 21 21 |SENT YEAR!!!!!!!|
00001AB0: 21 21 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |!!**************|
00001AC0: 2A 2A 00 E6 22 4C 04 8F 20 46 49 53 48 45 52 59 |**.."L.. FISHERY|
00001AD0: 20 4D 41 4E 41 47 45 4D 45 4E 54 20 53 49 4D 55 | MANAGEMENT SIMU|
00001AE0: 4C 41 54 49 4F 4E 00 F1 22 4D 04 8D 20 34 30 30 |LATION.."M.. 400|
00001AF0: 30 00 16 23 56 04 8F 20 41 44 41 50 54 45 44 20 |0..#V.. ADAPTED |
00001B00: 54 4F 20 50 45 54 20 46 52 4F 4D 20 48 50 20 41 |TO PET FROM HP A|
00001B10: 4E 44 20 4D 54 53 00 37 23 57 04 8F 20 52 45 56 |ND MTS.7#W.. REV|
00001B20: 49 53 45 44 20 42 59 20 52 4F 42 45 52 54 20 45 |ISED BY ROBERT E|
00001B30: 47 47 4C 45 54 4F 4E 00 68 23 60 04 8F 20 49 4E |GGLETON.h#`.. IN|
00001B40: 20 46 45 42 52 55 41 52 59 20 41 4E 44 20 4D 41 | FEBRUARY AND MA|
00001B50: 52 43 48 20 4F 46 20 31 39 37 38 20 42 59 20 54 |RCH OF 1978 BY T|
00001B60: 49 4D 20 42 45 52 4C 41 00 8C 23 6A 04 8F 20 28 |IM BERLA..#j.. (|
00001B70: 57 49 54 48 20 48 45 4C 50 20 46 52 4F 4D 20 53 |WITH HELP FROM S|
00001B80: 54 45 56 45 20 41 4E 44 52 45 29 2E 00 B7 23 74 |TEVE ANDRE)...#t|
00001B90: 04 8F 20 4D 49 4E 4F 52 20 4D 4F 44 49 46 49 43 |.. MINOR MODIFIC|
00001BA0: 41 54 49 4F 4E 53 20 42 59 20 5A 49 4E 4E 20 4D |ATIONS BY ZINN M|
00001BB0: 41 52 43 48 20 37 39 00 DE 23 7E 04 8F 20 4F 52 |ARCH 79..#~.. OR|
00001BC0: 49 47 49 4E 41 4C 20 56 45 52 53 49 4F 4E 20 57 |IGINAL VERSION W|
00001BD0: 41 53 20 42 59 20 5A 49 4E 4E 20 41 4E 44 00 02 |AS BY ZINN AND..|
00001BE0: 24 88 04 8F 20 4D 43 46 41 44 44 45 4E 20 4F 4E |$... MCFADDEN ON|
00001BF0: 20 49 42 4D 20 37 30 31 30 20 31 39 36 35 20 41 | IBM 7010 1965 A|
00001C00: 4E 44 00 25 24 92 04 8F 20 50 55 54 20 4F 4E 20 |ND.%$... PUT ON |
00001C10: 4D 54 53 20 28 49 42 4D 20 33 36 30 2F 36 37 29 |MTS (IBM 360/67)|
00001C20: 20 31 39 36 37 00 5D 24 9C 04 99 22 93 22 3A 97 | 1967.]$...".":.|
00001C30: 55 54 2C 55 4C 25 3A 55 47 24 B2 55 54 24 3A 8B |UT,UL%:UG$.UT$:.|
00001C40: C2 28 35 30 30 30 33 29 B2 30 A7 97 35 33 32 38 |.(50003).0..5328|
00001C50: 31 2C 36 3A 97 35 33 32 38 30 2C 31 34 00 70 24 |1,6:.53280,14.p$|
00001C60: A6 04 5A 46 B2 30 3A 55 48 B2 31 3A 8D 38 35 30 |..ZF.0:UH.1:.850|
00001C70: 00 9D 24 A7 04 99 22 11 11 11 11 11 11 20 20 20 |..$..."...... |
00001C80: 20 20 20 D9 4F 55 20 57 49 4C 4C 20 42 45 20 53 | .OU WILL BE S|
00001C90: 48 4F 57 4E 20 41 20 52 45 43 4F 52 44 00 C5 24 |HOWN A RECORD..$|
00001CA0: A8 04 99 22 11 20 20 20 20 20 20 4F 46 20 54 48 |...". OF TH|
00001CB0: 45 20 50 41 53 54 20 45 49 47 48 54 20 59 45 41 |E PAST EIGHT YEA|
00001CC0: 52 53 20 4F 46 00 EF 24 A9 04 99 22 11 20 20 20 |RS OF..$...". |
00001CD0: 20 20 20 46 49 53 48 45 52 59 20 4F 50 45 52 41 | FISHERY OPERA|
00001CE0: 54 49 4F 4E 2E 20 20 D4 48 49 53 20 4D 41 59 00 |TION. .HIS MAY.|
00001CF0: 18 25 AA 04 99 22 11 20 20 20 20 20 20 42 45 20 |.%...". BE |
00001D00: 55 53 45 44 20 54 4F 20 50 4C 41 4E 20 59 4F 55 |USED TO PLAN YOU|
00001D10: 52 20 46 55 54 55 52 45 00 2F 25 AB 04 99 22 11 |R FUTURE./%...".|
00001D20: 20 20 20 20 20 20 53 54 52 41 54 45 47 59 2E 00 | STRATEGY..|
00001D30: 52 25 CE 04 50 B2 31 31 3A 8F 20 50 45 41 4B 20 |R%..P.11:. PEAK |
00001D40: 41 54 20 54 48 49 53 20 56 41 4C 55 45 20 4F 46 |AT THIS VALUE OF|
00001D50: 20 45 00 73 25 D8 04 4D B2 33 30 3A 8F 20 4D 41 | E.s%..M.30:. MA|
00001D60: 58 20 4F 46 46 53 50 52 49 4E 47 2C 20 41 54 20 |X OFFSPRING, AT |
00001D70: 45 3D 50 00 7C 25 E2 04 52 B2 31 38 00 92 25 F6 |E=P.|%..R.18..%.|
00001D80: 04 45 31 B2 30 20 3A 20 54 B2 30 20 3A 20 43 31 |.E1.0 : T.0 : C1|
00001D90: B2 30 00 A1 25 00 05 4D 31 B2 28 4D AB 50 29 AD |.0..%..M1.(M.P).|
00001DA0: 33 00 AC 25 0A 05 4C B2 4D 31 AD 32 00 B6 25 14 |3..%..L.M1.2..%.|
00001DB0: 05 45 B2 50 AD 32 00 C2 25 1E 05 81 43 4F B2 31 |.E.P.2..%...CO.1|
00001DC0: A4 38 00 D2 25 28 05 43 B2 4D 31 AA 45 AA BB 28 |.8..%(.C.M1.E..(|
00001DD0: 31 29 00 E3 25 32 05 8B 20 52 B1 43 20 A7 20 31 |1)..%2.. R.C . 1|
00001DE0: 33 36 30 00 EE 25 3C 05 43 B2 43 AC 2E 33 00 F9 |360..%<.C.C..3..|
00001DF0: 25 46 05 89 20 31 33 33 30 00 03 26 50 05 45 B2 |%F.. 1330..&P.E.|
00001E00: 52 AB 43 00 17 26 5A 05 43 28 43 4F 29 B2 43 3A |R.C..&Z.C(CO).C:|
00001E10: 45 28 43 4F 29 B2 45 00 21 26 64 05 8D 32 33 36 |E(CO).E.!&d..236|
00001E20: 30 00 29 26 6E 05 82 43 4F 00 3F 26 78 05 59 B2 |0.)&n..CO.?&x.Y.|
00001E30: 59 52 AB 38 3A 8B 5A 46 B2 30 A7 8D 38 33 35 00 |YR.8:.ZF.0..835.|
00001E40: 49 26 82 05 8D 33 31 30 30 00 78 26 8C 05 81 59 |I&...3100.x&...Y|
00001E50: 43 B2 31 A4 33 3A 43 28 59 43 29 B2 43 28 59 43 |C.1.3:C(YC).C(YC|
00001E60: AA 35 29 3A 45 28 59 43 29 B2 45 28 59 43 AA 35 |.5):E(YC).E(YC.5|
00001E70: 29 3A 82 3A 59 43 B2 34 00 A9 26 B4 05 8D 38 36 |):.:YC.4..&...86|
00001E80: 35 3A 99 22 13 11 11 11 20 20 20 20 20 20 20 D7 |5:.".... .|
00001E90: 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F |OULD YOU LIKE TO|
00001EA0: 20 52 45 47 55 4C 41 54 45 00 D2 26 B9 05 99 22 | REGULATE..&..."|
00001EB0: 20 20 20 20 20 20 20 12 C5 92 53 43 41 50 45 4D | ...SCAPEM|
00001EC0: 45 4E 54 20 4F 52 20 12 C3 92 41 54 43 48 3F 20 |ENT OR ...ATCH? |
00001ED0: 22 3B 00 F6 26 BE 05 55 53 24 B2 22 45 43 48 22 |";..&..US$."ECH"|
00001EE0: 3A 55 4C B2 31 3A 8D 33 35 3A 53 24 B2 55 52 24 |:UL.1:.35:S$.UR$|
00001EF0: 3A 8D 32 39 37 30 00 0A 27 C8 05 8B 20 53 24 B2 |:.2970..'... S$.|
00001F00: 22 45 22 20 A7 20 31 36 32 35 00 42 27 D2 05 8D |"E" . 1625.B'...|
00001F10: 32 39 37 30 3A 99 22 11 20 20 20 20 20 20 20 C3 |2970:.". .|
00001F20: 41 54 43 48 20 4C 45 56 45 4C 20 46 4F 52 22 59 |ATCH LEVEL FOR"Y|
00001F30: 22 9D 3A 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D |".: ......|
00001F40: 22 3B 00 6B 27 DC 05 55 53 24 B2 22 2E 30 31 32 |";.k'..US$.".012|
00001F50: 33 34 35 36 37 38 39 48 22 3A 55 4C B2 36 3A 8D |3456789H":UL.6:.|
00001F60: 33 35 3A 43 B2 C5 28 55 52 24 29 00 75 27 04 06 |35:C..(UR$).u'..|
00001F70: 45 B2 52 AB 43 00 86 27 0E 06 8B 20 45 B1 30 20 |E.R.C..'... E.0 |
00001F80: A7 20 31 35 38 30 00 C0 27 18 06 99 22 20 20 20 |. 1580..'..." |
00001F90: 20 20 20 20 CE 4F 4E 45 20 45 53 43 41 50 45 44 | .ONE ESCAPED|
00001FA0: 3B 20 54 52 59 20 41 47 41 49 4E 2E 22 3A 81 58 |; TRY AGAIN.":.X|
00001FB0: B2 31 A4 31 30 30 30 3A 82 58 3A 89 31 34 39 30 |.1.1000:.X:.1490|
00001FC0: 00 E2 27 2C 06 45 28 59 43 29 B2 45 3A 43 28 59 |..',.E(YC).E:C(Y|
00001FD0: 43 29 B2 43 3A 59 43 B2 59 43 AA 31 3A 8D 32 38 |C).C:YC.YC.1:.28|
00001FE0: 38 30 00 ED 27 40 06 89 20 31 37 34 30 00 14 28 |80..'@.. 1740..(|
00001FF0: 59 06 8D 32 39 37 30 3A 99 A3 31 30 29 22 11 C5 |Y..2970:..10)"..|
00002000: 53 43 41 50 45 4D 45 4E 54 20 4C 45 56 45 4C 20 |SCAPEMENT LEVEL |
00002010: 46 4F 52 22 00 30 28 5B 06 99 A3 39 29 59 22 9D |FOR".0([...9)Y".|
00002020: 3A 20 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 22 3B |: ......";|
00002030: 00 59 28 5E 06 55 53 24 B2 22 2E 30 31 32 33 34 |.Y(^.US$.".01234|
00002040: 35 36 37 38 39 48 22 3A 55 4C B2 36 3A 8D 33 35 |56789H":UL.6:.35|
00002050: 3A 45 B2 C5 28 55 52 24 29 00 6A 28 68 06 8B 20 |:E..(UR$).j(h.. |
00002060: 45 B1 30 20 A7 20 31 36 38 30 00 9F 28 72 06 99 |E.0 . 1680..(r..|
00002070: 22 20 20 20 20 20 20 20 20 20 20 D3 4F 4D 45 20 |" .OME |
00002080: 4D 55 53 54 20 45 53 43 41 50 45 2E 22 3A 81 49 |MUST ESCAPE.":.I|
00002090: B2 31 A4 31 30 30 30 3A 82 3A 89 31 36 32 35 00 |.1.1000:.:.1625.|
000020A0: A9 28 90 06 43 B2 52 AB 45 00 BB 28 9A 06 8B 20 |.(..C.R.E..(... |
000020B0: 43 B1 B2 30 20 A7 20 31 37 32 30 00 C3 28 A4 06 |C..0 . 1720..(..|
000020C0: 43 B2 30 00 CB 28 AE 06 45 B2 52 00 ED 28 B8 06 |C.0..(..E.R..(..|
000020D0: 45 28 59 43 29 B2 45 3A 43 28 59 43 29 B2 43 3A |E(YC).E:C(YC).C:|
000020E0: 59 43 B2 59 43 AA 31 3A 8D 32 38 38 30 00 F7 28 |YC.YC.1:.2880..(|
000020F0: CC 06 54 B2 54 AA 43 00 09 29 D6 06 8B 20 43 B1 |..T.T.C..)... C.|
00002100: B2 4C 20 A7 20 31 37 38 30 00 34 29 E0 06 8D 32 |.L . 1780.4)...2|
00002110: 39 37 30 3A 99 22 11 20 20 20 20 20 20 20 CC 4F |970:.". .O|
00002120: 57 20 43 41 54 43 48 20 4D 41 44 45 20 46 49 53 |W CATCH MADE FIS|
00002130: 48 45 52 59 00 5A 29 E5 06 99 22 20 20 20 20 20 |HERY.Z)..." |
00002140: 20 20 46 55 52 49 4F 55 53 21 21 21 22 3A 81 58 | FURIOUS!!!":.X|
00002150: B2 31 A4 31 30 30 30 3A 82 58 00 65 29 EA 06 89 |.1.1000:.X.e)...|
00002160: 20 31 38 30 30 00 78 29 F4 06 8B 20 43 B1 B2 4D | 1800.x)... C..M|
00002170: 31 20 A7 20 31 38 30 30 00 A5 29 FE 06 8D 32 39 |1 . 1800..)...29|
00002180: 37 30 3A 99 22 11 20 20 20 20 20 20 20 CD 45 44 |70:.". .ED|
00002190: 49 4F 43 52 45 20 43 41 54 43 48 20 44 49 53 54 |IOCRE CATCH DIST|
000021A0: 55 52 42 45 44 00 C9 29 03 07 99 22 20 20 20 20 |URBED..)..." |
000021B0: 20 20 20 46 49 53 48 45 52 59 2E 22 3A 81 58 B2 | FISHERY.":.X.|
000021C0: 31 A4 31 30 30 30 3A 82 58 00 D4 29 08 07 8D 20 |1.1000:.X..)... |
000021D0: 32 33 36 30 00 DE 29 12 07 59 B2 59 AA 31 00 EA |2360..)..Y.Y.1..|
000021E0: 29 1C 07 43 31 B2 43 31 AA 31 00 FC 29 26 07 8B |)..C1.C1.1..)&..|
000021F0: 20 43 31 B3 35 20 A7 20 31 34 38 30 00 05 2A 30 | C1.5 . 1480..*0|
00002200: 07 43 31 B2 30 00 11 2A 3A 07 45 31 B2 45 31 AA |.C1.0..*:.E1.E1.|
00002210: 54 00 1C 2A 44 07 8D 20 32 39 37 30 00 44 2A 49 |T..*D.. 2970.D*I|
00002220: 07 99 22 11 20 20 20 20 20 20 20 D4 4F 54 41 4C |..". .OTAL|
00002230: 20 43 41 54 43 48 20 41 46 54 45 52 20 35 20 59 | CATCH AFTER 5 Y|
00002240: 45 41 52 53 00 63 2A 4B 07 99 22 20 20 20 20 20 |EARS.c*K.." |
00002250: 20 20 57 41 53 20 22 3B 3A 46 37 B2 54 3A 8D 33 | WAS ";:F7.T:.3|
00002260: 33 30 30 00 87 2A 4E 07 99 22 20 4F 52 20 22 3B |300..*N.." OR ";|
00002270: 3A 46 37 B2 54 AD 35 3A 8D 33 33 30 30 3A 99 22 |:F7.T.5:.3300:."|
00002280: 2F 59 45 41 52 2E 22 00 8F 2A 58 07 54 B2 30 00 |/YEAR."..*X.T.0.|
00002290: A3 2A 62 07 8D 38 33 35 3A 8D 38 36 35 3A 8D 32 |.*b..835:.865:.2|
000022A0: 39 37 30 00 D2 2A 67 07 99 22 11 20 20 20 20 20 |970..*g..". |
000022B0: 20 20 12 C5 92 58 49 54 2C 20 12 D2 92 45 53 54 | ...XIT, ...EST|
000022C0: 41 52 54 2C 20 12 C3 92 4F 4E 54 49 4E 55 45 20 |ART, ...ONTINUE |
000022D0: 4F 52 00 FD 2A 6C 07 99 22 20 20 20 20 20 20 20 |OR..*l.." |
000022E0: 12 C4 92 45 46 49 4E 45 20 4F 50 54 49 4D 55 4D |...EFINE OPTIMUM|
000022F0: 20 53 54 52 41 54 45 47 59 3F 20 22 3B 00 1D 2B | STRATEGY? ";..+|
00002300: 76 07 55 53 24 B2 22 45 52 43 44 48 22 3A 55 4C |v.US$."ERCDH":UL|
00002310: B2 31 3A 8D 33 35 3A 43 24 B2 55 52 24 00 2C 2B |.1:.35:C$.UR$.,+|
00002320: 80 07 43 24 B2 C8 28 43 24 2C 31 29 00 4B 2B 8A |..C$..(C$,1).K+.|
00002330: 07 8B 20 43 24 B2 22 52 22 20 A7 20 8D 38 37 35 |.. C$."R" . .875|
00002340: 3A 5A 46 B2 31 3A 89 31 32 37 30 00 5F 2B 94 07 |:ZF.1:.1270._+..|
00002350: 8B 20 43 24 B2 22 43 22 20 A7 20 31 34 31 30 00 |. C$."C" . 1410.|
00002360: 70 2B 9E 07 8B 20 43 24 B2 22 45 22 20 A7 20 8E |p+... C$."E" . .|
00002370: 00 7A 2B A8 07 8D 32 39 37 30 00 A2 2B BC 07 99 |.z+...2970..+...|
00002380: 22 11 20 20 20 20 20 20 20 D3 54 52 41 54 45 47 |". .TRATEG|
00002390: 59 3A 20 57 48 49 43 48 20 53 48 4F 55 4C 44 20 |Y: WHICH SHOULD |
000023A0: 42 45 00 CF 2B C1 07 99 22 20 20 20 20 20 20 20 |BE..+..." |
000023B0: 52 45 47 55 4C 41 54 45 44 2C 20 12 45 92 53 43 |REGULATED, .E.SC|
000023C0: 50 4D 54 2F 12 43 92 41 54 43 48 3F 20 22 3B 00 |PMT/.C.ATCH? ";.|
000023D0: ED 2B C6 07 55 53 24 B2 22 45 43 48 22 3A 55 4C |.+..US$."ECH":UL|
000023E0: B2 31 3A 8D 33 35 3A 53 24 B2 55 52 24 00 01 2C |.1:.35:S$.UR$..,|
000023F0: CB 07 8B 20 53 24 B2 22 43 22 20 A7 20 32 31 35 |... S$."C" . 215|
00002400: 30 00 2E 2C D0 07 8D 32 39 37 30 3A 99 22 11 20 |0..,...2970:.". |
00002410: 20 20 20 20 20 20 C5 53 43 41 50 45 4D 45 4E 54 | .SCAPEMENT|
00002420: 20 53 48 4F 55 4C 44 20 42 45 20 53 45 54 00 4D | SHOULD BE SET.M|
00002430: 2C D5 07 99 22 20 20 20 20 20 20 20 41 54 20 57 |,..." AT W|
00002440: 48 41 54 20 4C 45 56 45 4C 3F 20 22 3B 00 76 2C |HAT LEVEL? ";.v,|
00002450: DA 07 55 53 24 B2 22 2E 30 31 32 33 34 35 36 37 |..US$.".01234567|
00002460: 38 39 48 22 3A 55 4C B2 34 3A 8D 33 35 3A 4F B2 |89H":UL.4:.35:O.|
00002470: C5 28 55 52 24 29 00 80 2C EE 07 8D 32 39 37 30 |.(UR$)..,...2970|
00002480: 00 A5 2C F3 07 99 22 20 20 20 20 20 20 20 D7 49 |..,..." .I|
00002490: 54 48 20 45 53 43 41 50 45 4D 45 4E 54 20 41 54 |TH ESCAPEMENT AT|
000024A0: 22 4F 22 9D 2C 00 B2 2C F8 07 44 B2 B6 28 4F AB |"O".,..,..D..(O.|
000024B0: 50 29 00 C6 2C 02 08 8B 20 44 B1 2E 31 AC 50 20 |P)..,... D..1.P |
000024C0: A7 20 32 30 38 30 00 EC 2C 0C 08 99 22 20 20 20 |. 2080..,..." |
000024D0: 20 20 20 20 54 48 45 20 43 41 54 43 48 20 53 48 | THE CATCH SH|
000024E0: 4F 55 4C 44 20 41 56 45 52 41 47 45 00 14 2D 11 |OULD AVERAGE..-.|
000024F0: 08 99 22 20 20 20 20 20 20 20 41 42 4F 55 54 22 |.." ABOUT"|
00002500: 4D AB 50 22 9D 2E 20 20 C3 4C 45 41 52 4C 59 2C |M.P".. .LEARLY,|
00002510: 20 59 4F 55 00 3B 2D 13 08 99 22 20 20 20 20 20 | YOU.;-..." |
00002520: 20 20 48 41 56 45 20 4D 41 53 54 45 52 45 44 20 | HAVE MASTERED |
00002530: 54 48 49 53 20 47 41 4D 45 2E 22 00 46 2D 16 08 |THIS GAME.".F-..|
00002540: 89 20 32 32 38 30 00 5A 2D 20 08 8B 20 44 B1 2E |. 2280.Z- .. D..|
00002550: 33 AC 50 20 A7 20 32 31 31 30 00 82 2D 2A 08 99 |3.P . 2110..-*..|
00002560: 22 20 20 20 20 20 20 20 54 48 45 20 46 49 53 48 |" THE FISH|
00002570: 45 52 59 20 43 4F 55 4C 44 20 53 54 49 4C 4C 20 |ERY COULD STILL |
00002580: 44 4F 00 AB 2D 2F 08 99 22 20 20 20 20 20 20 20 |DO..-/.." |
00002590: 42 45 54 54 45 52 2E 20 20 D9 4F 55 20 52 45 41 |BETTER. .OU REA|
000025A0: 4C 4C 59 20 53 48 4F 55 4C 44 22 00 CD 2D 31 08 |LLY SHOULD"..-1.|
000025B0: 99 22 20 20 20 20 20 20 20 47 45 54 20 4D 4F 52 |." GET MOR|
000025C0: 45 20 45 58 50 45 52 49 45 4E 43 45 2E 00 D8 2D |E EXPERIENCE...-|
000025D0: 34 08 89 20 31 38 39 30 00 FD 2D 3E 08 99 22 20 |4.. 1890..->.." |
000025E0: 20 20 20 20 20 20 54 48 45 20 46 49 53 48 45 52 | THE FISHER|
000025F0: 59 20 53 4F 4F 4E 20 46 41 49 4C 53 2E 00 25 2E |Y SOON FAILS..%.|
00002600: 43 08 99 22 20 20 20 20 20 20 20 D0 4C 45 41 53 |C.." .LEAS|
00002610: 45 20 47 45 54 20 4D 4F 52 45 20 45 58 50 45 52 |E GET MORE EXPER|
00002620: 49 45 4E 43 45 00 4D 2E 48 08 99 22 20 20 20 20 |IENCE.M.H.." |
00002630: 20 20 20 54 4F 20 4D 41 4B 45 20 41 20 42 45 54 | TO MAKE A BET|
00002640: 54 45 52 20 45 53 54 49 4D 41 54 45 2E 00 58 2E |TER ESTIMATE..X.|
00002650: 5C 08 89 20 31 38 39 30 00 86 2E 66 08 8D 32 39 |\.. 1890...f..29|
00002660: 37 30 3A 99 22 11 20 20 20 20 20 20 20 C3 41 54 |70:.". .AT|
00002670: 43 48 20 4C 45 56 45 4C 20 53 48 4F 55 4C 44 20 |CH LEVEL SHOULD |
00002680: 42 45 20 53 45 54 00 A5 2E 68 08 99 22 20 20 20 |BE SET...h.." |
00002690: 20 20 20 20 41 54 20 57 48 41 54 20 4C 45 56 45 | AT WHAT LEVE|
000026A0: 4C 3F 20 22 3B 00 CE 2E 6A 08 55 53 24 B2 22 2E |L? ";...j.US$.".|
000026B0: 30 31 32 33 34 35 36 37 38 39 48 22 3A 55 4C B2 |0123456789H":UL.|
000026C0: 34 3A 8D 33 35 3A 4F B2 C5 28 55 52 24 29 00 F9 |4:.35:O..(UR$)..|
000026D0: 2E 6E 08 8D 32 39 37 30 3A 99 22 20 20 20 20 20 |.n..2970:." |
000026E0: 20 20 C6 4F 52 20 43 41 54 43 48 20 4C 45 56 45 | .OR CATCH LEVE|
000026F0: 4C 20 41 54 22 4F 22 9D 2C 00 08 2F 70 08 44 B2 |L AT"O".,../p.D.|
00002700: B6 28 4D AB 50 AB 4F 29 00 20 2F 7A 08 8B 20 44 |.(M.P.O). /z.. D|
00002710: B1 2E 31 AC 28 4D AB 50 29 20 A7 20 32 32 31 30 |..1.(M.P) . 2210|
00002720: 00 47 2F 84 08 99 22 20 20 20 20 20 20 20 46 49 |.G/..." FI|
00002730: 53 48 45 52 59 20 53 48 4F 55 4C 44 20 42 45 20 |SHERY SHOULD BE |
00002740: CF CB 2C 20 42 55 54 00 6F 2F 8E 08 99 22 20 20 |.., BUT.o/..." |
00002750: 20 20 20 20 20 53 45 54 54 49 4E 47 20 45 53 43 | SETTING ESC|
00002760: 41 50 45 4D 45 4E 54 20 49 53 20 4D 4F 52 45 00 |APEMENT IS MORE.|
00002770: 82 2F 93 08 99 22 20 20 20 20 20 20 20 53 55 52 |./..." SUR|
00002780: 45 2E 00 8C 2F 98 08 89 31 38 39 30 00 A4 2F A2 |E.../...1890../.|
00002790: 08 8B 20 44 B1 2E 33 AC 28 4D AB 50 29 20 A7 20 |.. D..3.(M.P) . |
000027A0: 32 32 33 30 00 CC 2F AC 08 99 22 20 20 20 20 20 |2230../..." |
000027B0: 20 20 54 48 45 20 46 49 53 48 45 52 59 20 43 4F | THE FISHERY CO|
000027C0: 55 4C 44 20 53 54 49 4C 4C 20 44 4F 00 F3 2F AE |ULD STILL DO../.|
000027D0: 08 99 22 20 20 20 20 20 20 20 42 45 54 54 45 52 |.." BETTER|
000027E0: 2E 20 20 28 D4 52 59 20 53 45 54 54 49 4E 47 20 |. (.RY SETTING |
000027F0: 54 48 45 00 1E 30 B0 08 99 22 20 20 20 20 20 20 |THE..0..." |
00002800: 20 54 48 45 20 45 53 43 41 50 45 4D 45 4E 54 20 | THE ESCAPEMENT |
00002810: 4C 45 56 45 4C 2E 29 22 3A 89 31 38 39 30 00 46 |LEVEL.)":.1890.F|
00002820: 30 B6 08 99 22 20 20 20 20 20 20 20 54 48 45 20 |0..." THE |
00002830: 46 49 53 48 45 52 59 20 57 49 4C 4C 20 4E 4F 54 |FISHERY WILL NOT|
00002840: 20 50 52 4F 53 2D 00 6E 30 C0 08 99 22 20 20 20 | PROS-.n0..." |
00002850: 20 20 20 20 50 45 52 2E 20 20 20 C7 45 54 20 4D | PER. .ET M|
00002860: 4F 52 45 20 45 58 50 45 52 49 45 4E 43 45 00 9C |ORE EXPERIENCE..|
00002870: 30 CA 08 99 22 20 20 20 20 20 20 20 54 4F 20 49 |0..." TO I|
00002880: 4D 50 52 4F 56 45 20 59 4F 55 52 20 53 54 52 41 |MPROVE YOUR STRA|
00002890: 54 45 47 59 2E 22 3A 89 31 38 39 30 00 A2 30 E8 |TEGY.":.1890..0.|
000028A0: 08 8F 00 B2 30 F2 08 41 B2 45 31 AD 28 59 AB 59 |....0..A.E1.(Y.Y|
000028B0: 52 29 00 E5 30 FC 08 8F 20 2D 2D 2D 41 2C 20 45 |R)..0... ---A, E|
000028C0: 31 20 41 52 45 20 53 4F 4D 45 20 50 45 52 46 4F |1 ARE SOME PERFO|
000028D0: 52 4D 45 4E 43 45 20 20 49 4E 44 49 43 41 54 4F |RMENCE INDICATO|
000028E0: 52 53 2D 2D 2D 00 EF 30 0B 09 89 31 38 39 30 00 |RS---..0...1890.|
000028F0: 18 31 38 09 52 B2 28 32 AC 4D AC 45 AD 50 29 AB |.18.R.(2.M.E.P).|
00002900: 28 4D AC 28 28 45 AD 50 29 AE 32 29 29 AA BB 28 |(M.((E.P).2))..(|
00002910: 31 29 AC 35 AB 32 2E 35 00 33 31 42 09 8B 20 52 |1).5.2.5.31B.. R|
00002920: B1 B2 4D AD 33 20 B0 20 45 B3 B2 50 20 A7 20 32 |..M.3 . E..P . 2|
00002930: 33 39 30 00 3D 31 4C 09 52 B2 4D AD 33 00 4E 31 |390.=1L.R.M.3.N1|
00002940: 56 09 8B 20 52 B1 30 20 A7 20 32 34 31 30 00 56 |V.. R.0 . 2410.V|
00002950: 31 60 09 52 B2 30 00 5C 31 6A 09 8E 00 8D 31 82 |1`.R.0.\1j....1.|
00002960: 0A 8F 20 46 4F 52 4D 41 54 20 56 41 52 49 41 42 |.. FORMAT VARIAB|
00002970: 4C 45 20 46 37 20 49 4E 54 4F 20 46 24 20 55 53 |LE F7 INTO F$ US|
00002980: 49 4E 47 20 46 38 20 41 4E 44 20 46 39 00 A2 31 |ING F8 AND F9..1|
00002990: 8C 0A 46 37 B2 46 37 AA 31 30 AE 28 AB 31 AB 46 |..F7.F7.10.(.1.F|
000029A0: 39 29 00 BB 31 96 0A 8B 20 46 37 B1 B2 31 30 AE |9)..1... F7..10.|
000029B0: 46 38 AB 31 20 A7 20 32 38 34 30 00 CE 31 A0 0A |F8.1 . 2840..1..|
000029C0: 46 24 B2 C4 28 46 37 AA 31 30 AE 46 38 29 00 E3 |F$..(F7.10.F8)..|
000029D0: 31 AA 0A 46 24 B2 C9 28 46 24 2C C3 28 46 24 29 |1..F$..(F$,.(F$)|
000029E0: AB 32 29 00 F5 31 B4 0A 81 20 46 35 B2 31 20 A4 |.2)..1... F5.1 .|
000029F0: 20 46 38 AB 31 00 0E 32 BE 0A 8B 20 C8 28 46 24 | F8.1..2... .(F$|
00002A00: 2C 31 29 B3 B1 22 30 22 A7 20 32 37 39 30 00 18 |,1).."0". 2790..|
00002A10: 32 C8 0A 99 22 20 22 3B 00 2D 32 D2 0A 46 24 B2 |2..." ";.-2..F$.|
00002A20: C9 28 46 24 2C C3 28 46 24 29 AB 31 29 00 35 32 |.(F$,.(F$).1).52|
00002A30: DC 0A 82 46 35 00 45 32 E6 0A 81 20 46 35 B2 31 |...F5.E2... F5.1|
00002A40: 20 A4 20 33 30 00 60 32 F0 0A 8B 20 CA 28 46 24 | . 30.`2... .(F$|
00002A50: 2C 46 35 2C 31 29 B2 22 2E 22 A7 20 32 38 32 30 |,F5,1).".". 2820|
00002A60: 00 69 32 FA 0A 82 20 46 35 00 7C 32 04 0B 99 20 |.i2... F5.|2... |
00002A70: C8 28 46 24 2C 46 35 AA 46 39 29 3B 00 82 32 0E |.(F$,F5.F9);..2.|
00002A80: 0B 8E 00 8F 32 18 0B 46 24 B2 C4 28 46 37 29 00 |....2..F$..(F7).|
00002A90: A6 32 22 0B 99 20 CA 28 46 24 2C 32 2C 46 38 AA |.2".. .(F$,2,F8.|
00002AA0: 31 AA 46 39 29 3B 00 AC 32 2C 0B 8E 00 B9 32 36 |1.F9);..2,....26|
00002AB0: 0B 46 24 B2 C4 28 46 37 29 00 F8 32 40 0B 8F 20 |.F$..(F7)..2@.. |
00002AC0: 53 55 42 52 20 54 4F 20 50 52 49 4E 54 20 4F 55 |SUBR TO PRINT OU|
00002AD0: 54 20 4E 45 58 54 20 59 45 41 52 53 20 45 20 41 |T NEXT YEARS E A|
00002AE0: 4E 44 20 43 20 49 4E 20 41 4E 20 4F 52 47 41 4E |ND C IN AN ORGAN|
00002AF0: 49 5A 45 44 20 57 41 59 00 19 33 4A 0B 99 C8 28 |IZED WAY..3J...(|
00002B00: 55 44 24 2C 4C 4E 29 A3 37 29 CA 28 C4 28 59 29 |UD$,LN).7).(.(Y)|
00002B10: 2C 32 29 3B 22 1D 1D 22 3B 00 28 33 54 0B 46 37 |,2);"..";.(3T.F7|
00002B20: B2 43 3A 8D 33 32 30 30 00 40 33 5E 0B 99 22 1D |.C:.3200.@3^..".|
00002B30: 1D 1D 1D 22 3B 3A 46 37 B2 45 3A 8D 33 32 30 30 |...";:F7.E:.3200|
00002B40: 00 4E 33 86 0B 4C 4E B2 4C 4E AA 31 3A 8E 00 75 |.N3..LN.LN.1:..u|
00002B50: 33 90 0B 89 33 32 30 30 3A 8F 20 53 55 42 52 4F |3...3200:. SUBRO|
00002B60: 55 54 49 4E 45 20 54 4F 20 43 4C 45 41 4E 20 53 |UTINE TO CLEAN S|
00002B70: 43 52 45 45 4E 00 98 33 9A 0B 99 22 13 11 11 22 |CREEN..3..."..."|
00002B80: 55 50 24 3A 99 55 50 24 3A 99 55 50 24 3A 99 55 |UP$:.UP$:.UP$:.U|
00002B90: 50 24 22 13 11 22 3A 8E 00 A3 33 C2 0B 99 22 13 |P$"..":...3...".|
00002BA0: 11 22 3B 00 AA 33 C7 0B 82 49 00 B0 33 CC 0B 8E |.";..3...I..3...|
00002BB0: 00 DD 33 D6 0B 46 38 B2 33 3A 46 39 B2 33 3A 85 |..3..F8.3:F9.3:.|
00002BC0: 20 46 37 3A 99 22 5E 12 22 3B 3A 8D 32 36 39 30 | F7:."^.";:.2690|
00002BD0: 3A 99 22 5E 92 11 22 3A 89 33 30 33 30 00 F6 33 |:."^..":.3030..3|
00002BE0: 1C 0C 55 50 B2 31 3A 55 48 B2 31 3A 8D 38 35 30 |..UP.1:UH.1:.850|
00002BF0: 3A 4C 4E B2 31 30 00 23 34 26 0C 99 22 11 11 11 |:LN.10.#4&.."...|
00002C00: 11 20 20 20 20 20 20 B0 C0 C0 C0 C0 B2 C0 C0 C0 |. .........|
00002C10: C0 C0 C0 C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00002C20: C0 C0 AE 00 4C 34 30 0C 99 22 20 20 20 20 20 20 |....L40.." |
00002C30: DD D9 45 41 52 DD 20 20 C3 41 54 43 48 20 20 20 |..EAR. .ATCH |
00002C40: DD C5 53 43 41 50 45 4D 45 4E 54 DD 00 75 34 3A |..SCAPEMENT..u4:|
00002C50: 0C 99 22 20 20 20 20 20 20 AB C0 C0 C0 C0 DB C0 |.." .......|
00002C60: C0 C0 C0 C0 C0 C0 C0 C0 C0 DB C0 C0 C0 C0 C0 C0 |................|
00002C70: C0 C0 C0 C0 B3 00 AC 34 44 0C 81 5A 49 B2 31 A4 |.......4D..ZI.1.|
00002C80: 31 33 3A 99 22 20 20 20 20 20 20 DD 20 20 20 20 |13:." . |
00002C90: DD 20 20 20 20 20 20 20 20 20 20 DD 20 20 20 20 |. . |
00002CA0: 20 20 20 20 20 20 DD 22 3A 82 5A 49 00 D5 34 4E | .":.ZI..4N|
00002CB0: 0C 99 22 20 20 20 20 20 20 AD C0 C0 C0 C0 B1 C0 |.." .......|
00002CC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 |................|
00002CD0: C0 C0 C0 C0 BD 00 01 35 58 0C 81 43 4F B2 31 A4 |.......5X..CO.1.|
00002CE0: 38 3A 45 B2 45 28 43 4F 29 3A 43 B2 43 28 43 4F |8:E.E(CO):C.C(CO|
00002CF0: 29 3A 8D 32 38 38 30 3A 59 B2 59 AA 31 3A 82 43 |):.2880:Y.Y.1:.C|
00002D00: 4F 00 07 35 62 0C 8E 00 16 35 80 0C 8B 46 37 B3 |O..5b....5...F7.|
00002D10: 31 A7 33 32 34 30 00 30 35 8A 0C 8B 46 37 B2 B5 |1.3240.05...F7..|
00002D20: 28 46 37 29 A7 46 37 B2 46 37 AA 2E 30 30 30 31 |(F7).F7.F7..0001|
00002D30: 00 60 35 94 0C 46 5A B2 C3 28 C4 28 B5 28 46 37 |.`5..FZ..(.(.(F7|
00002D40: 29 29 29 3A 46 24 B2 CA 28 22 20 22 AA C4 28 46 |))):F$..(" "..(F|
00002D50: 37 29 AA 22 30 30 30 22 2C 46 5A AB 31 2C 37 29 |7)."000",FZ.1,7)|
00002D60: 00 6B 35 9E 0C 99 46 24 3B 3A 8E 00 94 35 A8 0C |.k5...F$;:...5..|
00002D70: 46 24 B2 22 20 20 30 22 AA CA 28 C4 28 46 37 AA |F$." 0"..(.(F7.|
00002D80: 31 2E 30 30 30 30 30 31 29 2C 33 2C 34 29 3A 89 |1.000001),3,4):.|
00002D90: 33 32 33 30 00 C2 35 E4 0C 8B 46 37 B3 2E 31 A7 |3230..5...F7..1.|
00002DA0: 46 24 B2 22 30 22 AA CA 28 C4 28 46 37 AA 31 2E |F$."0"..(.(F7.1.|
00002DB0: 30 30 30 30 30 31 29 2C 33 2C 34 29 3A 89 33 33 |000001),3,4):.33|
00002DC0: 32 30 00 F0 35 EE 0C 46 5A B2 C3 28 C4 28 B5 28 |20..5..FZ..(.(.(|
00002DD0: 46 37 29 29 29 3A 46 24 B2 CA 28 C4 28 46 37 AA |F7))):F$..(.(F7.|
00002DE0: 2E 30 30 30 30 30 31 29 2C 32 2C 46 5A AA 33 29 |.000001),2,FZ.3)|
00002DF0: 00 FB 35 F8 0C 99 46 24 3B 3A 8E 00 22 36 A0 0F |..5...F$;:.."6..|
00002E00: 81 54 B2 31 A4 BB 28 31 29 AC 33 AA 31 3A 99 22 |.T.1..(1).3.1:."|
00002E10: 93 22 C8 28 55 44 24 2C BB 28 31 29 AC 31 30 AA |.".(UD$,.(1).10.|
00002E20: 35 29 00 3C 36 A4 0F 81 58 B2 BB 28 31 29 AC 31 |5).<6...X..(1).1|
00002E30: 35 A4 BB 28 31 29 AC 31 30 AA 32 30 00 64 36 A6 |5..(1).10.20.d6.|
00002E40: 0F 99 A3 58 29 22 20 20 20 20 DF 12 DF A9 20 2E |...X)" .... .|
00002E50: 11 9D 9D 9D 9D 9D 9D 92 20 12 A9 92 A9 DF 12 20 |........ ...... |
00002E60: BC 91 91 22 00 89 36 AA 0F 99 A3 58 29 22 20 20 |..."..6....X)" |
00002E70: 20 20 DF 12 DF A9 20 2E 11 9D 9D 9D 9D 9D 12 A9 | .... .........|
00002E80: 92 A9 DF 12 20 20 91 91 22 00 97 36 AF 0F 81 49 |.... .."..6...I|
00002E90: B2 31 A4 38 3A 82 49 00 BD 36 B0 0F 99 A3 58 29 |.1.8:.I..6....X)|
00002EA0: 22 20 20 20 20 DF 12 DF A9 20 2E 11 9D 9D 9D 9D |" .... ......|
00002EB0: 9D 12 A9 92 A9 DF 12 20 20 91 91 92 22 00 CC 36 |....... ..."..6|
00002EC0: B4 0F 82 58 3A 81 49 B2 31 A4 35 30 00 D3 36 BA |...X:.I.1.50..6.|
00002ED0: 0F 82 54 00 D9 36 BE 0F 8E 00 01 37 C0 12 99 22 |..T..6.....7..."|
00002EE0: 20 20 D9 45 41 52 20 20 20 20 C3 41 54 43 48 20 | .EAR .ATCH |
00002EF0: 20 20 C5 53 43 41 50 45 4D 45 4E 54 20 20 22 3A | .SCAPEMENT ":|
00002F00: 80 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 **.H.... **GENERAL INPUT ROUTINE **
.N...:.T...:...#.. +++ INPUT SECTION +++
...(..UO,0:UR$."":UI$.""...*..UL.0.UL.80
.+.-.." ..";:.UC,0.?.2..UI$:.UI$."".50.
I.7..UI$.G(13).C(UR$)..1..UC,1:." .";:.8
5.|.<..UI$.G(20).105...>.. C(UR$)..UL.50
...A..120:. CHECK FOR VALID CHARACTER.E.
F.UR$.UR$.UI$.O.K..UI$;.W.P..50...U.. ++
+ CHECK FOR HELP REQUEST +++.$.Z..UR$.UX
$.195:. EXIT TO HELP ROUTINE.3._..UF.1..
240.@.D.UF.0:.:..Y.F.. ++ CHECK DELETE +
+.J.I..C(UR$).1.50...N.UR$.H(UR$,C(UR$).
1)...S..". ..";:.50...X.. ++ CHECK FOR
VALID CHARACTERS ++.M.}..C(US$).0.150...
...US.1.C(US$)......UI$.J(US$,US,1).....
........UI$."":..#.... ** STANDARD INPUT
**.4....F(UI$).46...E....UI$.G(32)...B.
..F(UI$).48.F(UI$).57.170.H..........F(
UI$).65.F(UI$).90.180............F(UI$).
193.F(UI$).218.UI$."":..R....B(UT).UU%.U
I$.G(F(UI$).128):..X.........UI$."":....
C.UF.1:. +++ HELP ROUTINE EXIT +++...E..
250...H..245...M..UQ.UB.UB.915._.R.UQ%(U
Q.UB).B(UQ):.:UQ%(U4%.40.U3%.1).32:.".".
R.W.UZ.1:UV%.B(UT).{.X..300. .Y.UZ.0:US$
.UJ$:UG$.UK$:UP.UJ:UL.UK.W.Z..B(50003).0
..53281,1:.".";:.53281,6:.53280,14:.220.
.....".";.....UT$.UL$:.UT,UV%:.UQ.UB.UB.
915......UQ,UQ%(UQ.UB):.:.865.)....U1,U1
%.5....U2,U2%.A....U4,U4%.O....U3,U3%.1.
W....35.....UD%.((U2%.256.U1%.U3%).UB).4
0:.H(UD$,UD%.1):..D....H(UD$,24);"
. HELP COMING . ":.....
.U1%.B(U1):U2%.B(U2):U3%.B(U3):U4%.B(U4)
.....UJ$.US$:UK$.UG$:UL$.UT$:UJ.UP:UK.UL
......./.,.. ** MENU **.5.-.:.D....".":.
UT,UU%:.B(50003).0..53281,9:.53280,8.J./
.:...1..". MENU"...6.." -
-------------------------------------".X
.;..".. 1. BEGIN FISHERY...@..".
. 2. STUDENT INSTRUCTIONS".,.E..
".. 3. TEACHER INSTRUCTIONS".H.O
..".. 4. QUIT..".W.T.." --------
------------------------------"...Y.."..
PRESS A NUMBER KEY (1-4) ";.J.^.U
L.1:US$."1234":.35:. INPUT ROUTINE.U.`.U
S$.""...C..E(UR$).1000,400,500,396...H..
300.".... ** RE-ENABLE STOP KEY AND END
**.Q....B(50003)..1.B(50003)..160.B(5000
3)..0.399.{....UU.71:.B(50003).0..53281,
6:.53280,14......"..":.......875:.......
** STUDENT INSTRUCTIONS **......".":.UT
,UL%:.B(50003).0..53281,0:.53280,0.....U
P.0:UG$."STUDENT INST":.850.,. .."...
THIS IS A SIMULATION OF.S....".
A FISHERY WHERE YOU CAN.}....".
CONTROL THE BEST CATCH AND......".
ESCAPEMENT LEVELS..D...."..
YOUR GOAL IS TO FIND......". THE
OPTIMUM STRATEGY TO......". BE US
ED."......835:.850.?...."..... NOTE
THAT THE STRATEGY WHICH.J....". PROD
UCES THE BEST CATCH MAY BE......". D
IFFERENT (NUMERICALLY) FROM......".
THE STRATEGY WHICH PRODUCES......".
THE BEST RUN (=ESCAPE+CATCH).......835:.
850.!...."...... IN THIS SIMULATION,
WE SHALL.I....". DEFINE THE OPTIMUM
STRATEGY.S....". TO MEAN ONE THAT P
RODUCES THE...B..". CATCH....D..835:
.850...H..".. REMEMBER TO HIT <RETURN
> AFTER"...J..". TYPING YOUR ANSWER..
..P..".. TYPE <H> AT ANY TIME TO RETU
RN".7.R..". TO THE MENU FOR HELP. YO
U WILL".C.T..". BE RETURNED TO THE PL
ACE IN THE"...V..". PROGRAM WHERE YOU
LEFT OFF AS"...X..". SOON AS THE OPT
ION FROM THE MENU".S.Z..". IS COMPLET
E."......835......UZ.1..UP%:.217........
.... ** TEACHER INSTRUCTIONS **.G...."."
:.UT,UL%:.B(50003).0..53281,2:.53280,10.
H...UP.0:UG$."TEACHER INST":.850......".
. TO THE BEST OF OUR KNOWLEDGE,."..
...." THIS PROGRAM IS IN THE PUBLIC.".
....." DOMAIN. IF THIS IS NOT THE CAS
E."......" PLEASE CONTACT:...".2...."
COMMODORE BUSINESS MACHINES.".U....
" 3370 PHARMACY AVE..Y...."
AGINCOURT, ONTARIO"......"
CANADA M1W 2K4"......" (416
) 499-4292".J.@..835:.850:...B.." ..
PROGRAM NAME: FISHERY....D.." WRITTE
N BY : ZINN AND MCFADDEN..5.F.." UP
GRADED BY : ..`.H.." .THIS PROGRAM W
ILL RUN ON ANY.....N.." PET 64 C
OMPUTER....P.." COMMODORE 64 COM
PUTER...R..835.B.T..UZ.1..UP%:.217.H.V..
...X.. ** PROGRAM MODIFICATION INST **..
.Y..".":.UT,UL%...].UP.0:UG$."PROGRAM MO
D":.850.(....835.<....UZ.1..UP%:.217.B..
...G.... ** TO USE 8032 LOAD CBM4032 **.
..F..".....BEFORE RUNNING THIS PROGRAM O
N AN 8032 ...S.P.." LOAD THE 'CBM
4032' PROGRAM............."...Z..UU.71..
....... .. ** T I T L E P A G E **.8."
.."....";:.UT,UU%:.B(50003).0..53280,14:
.53281,6.N.$..I.1.38:."...";:..F.&..I.1.
22:.".....";:..~.(..I.1.37:.".....";:...
.*..I.1.22:.".....";:....,.."...........
................ ......."..............
..... . . .....0.."...................
. ......2..".................... ..D.4
.."..............C O M M O D O R E...G.6
.."...............EDUCATIONAL.....8.."..
..............SOFTWARE...:.. ** COMMODOR
E LOGO **.Y.;..H(UD$,24);"..........PRES
S SPACE BAR OR WAIT.":I.0...<..A$:.A$.."
".I.I.1:.I.250.828...>.T1$."":T2$."":T3
$."":T4$."":I.0.(.@..300.D.C.. ** SPACE
BAR PRESS **...H..UO,0:.H(UD$,24);".....
..PRESS SPACE BAR TO CONTINUE ."...L..UI
$:.UI$.." ".844...N.....R.. ** PAGE DESI
GN ROUTINE **.I.T.UP.UP.1...W.."."H(UT$.
UP$,21);I(UP$.UG$.D(UP),18).".\.." -----
---------------------------------".1.`..
UH..0.870.G.A..H(UD$,24);H(UP$,7);"HELP
- PRESS H <RETURN> ".X.F.UH.0:."..":.
...K.. ** PLEASE WAIT REMARK **.M.P..H(U
D$,24);" ONE MOMENT PLEASE...
".S.U........ ** SET UP VARIABLES **
.;...UX$."H":.UQ%(1000):UB.32768:U1.196:
U2.197:U3.198:U4.216:UC.167:UU.1024.Y...
UT.59468:UU%.12:UL%.14:UP%.1146:UM.32768
:UO.158:. 50003,0......B(50003).0.UB.102
4: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:UO.198.....UD$."...
......................".Q...UP$."
".D...UT
$." FISHERY".U....E(8),C(8):....... ** S
ET VARIABLES **......900.....SV$."FISHER
Y.C2.G.... ** CHECK FOR 8032 **......"."
:." ":. SHIFTED SPACE......B(UB.40)..96.
.700...... ** MEMORY CHECK **.).... .(0)
.2000.937.W...."....THIS MACHINE DOES NO
T HAVE ENOUGH.".{...."MEMORY TO RUN THIS
PROGRAM !"......UU.71............"..":.
B(50003).0.962.U.... ** BASIC 2.0 OR 4
.0 OR C-64 SETUP **.. ...1075,133:.107
6,144:.1077,234:.1079,4:.1080,133:.1081,
145.I ...1091,155:.1098,133:.1099,144:.1
100,234:.1103,133.K ...1104,145:.1105,23
4:.1082,234.. ...B(50003)..160.955.. ...
1093,88:.1094,228:.1097,85:.1102,228:.96
5.F ...B(50003)..1.990.. ...1093,49:.109
4,230:.1097,46:.1102,230:.965./!B..2099,
141:.2100,20:.2101,3:.2103,8:.2104,141:.
2105,21.K!C..2106,3:.2115,145:.2117,52:.
2118,234:.2121,49:.2122,141..!D..2123,20
:.2124,3:.2126,234:.2127,141:.2128,21:.2
129,3.C!E..UU.48:. DISABLE STOP KEY.T!J.
.800:. TITLE..!T..300:. MENU.."...".THE
PGM WILL NOT WORK ON THIS MACHINE!":..J"
...UZ.1..UP%:.UP%:UZ.0:. ** PROGRAM STAR
TS HERE **.U"..."..";:.:.B(50003).0..532
81,6:.53280,6.B"..YR.1983:. SET THIS VAR
IABLE TO THE PRESENT YEAR!!!!!!!!!******
**********.."L.. FISHERY MANAGEMENT SIMU
LATION.."M.. 4000..#V.. ADAPTED TO PET F
ROM HP AND MTS.7#W.. REVISED BY ROBERT E
GGLETON.H#`.. IN FEBRUARY AND MARCH OF 1
978 BY TIM BERLA..#J.. (WITH HELP FROM S
TEVE ANDRE)...#T.. MINOR MODIFICATIONS B
Y ZINN MARCH 79..#~.. ORIGINAL VERSION W
AS BY ZINN AND..$... MCFADDEN ON IBM 701
0 1965 AND.%$... PUT ON MTS (IBM 360/67)
1967.]$...".":.UT,UL%:UG$.UT$:.B(50003)
.0..53281,6:.53280,14.P$..ZF.0:UH.1:.850
..$..."...... YOU WILL BE SHOWN A R
ECORD.E$...". OF THE PAST EIGHT YEA
RS OF..$...". FISHERY OPERATION. T
HIS MAY..%...". BE USED TO PLAN YOU
R FUTURE./%...". STRATEGY..R%N.P.11
:. PEAK AT THIS VALUE OF E.S%X.M.30:. MA
X OFFSPRING, AT E=P.|%..R.18..%..E1.0 :
T.0 : C1.0..%..M1.(M.P).3..%..L.M1.2..%.
.E.P.2.B%...CO.1.8.R%(.C.M1.E..(1)..%2..
R.C . 1360..%<.C.C..3..%F.. 1330..&P.E.
R.C..&Z.C(CO).C:E(CO).E.!&D..2360.)&N..C
O.?&X.Y.YR.8:.ZF.0..835.I&...3100.X&...Y
C.1.3:C(YC).C(YC.5):E(YC).E(YC.5):.:YC.4
..&...865:.".... WOULD YOU LIKE TO
REGULATE.R&..." .E.SCAPEMENT OR .
C.ATCH? ";..&..US$."ECH":UL.1:.35:S$.UR$
:.2970..'H.. S$."E" . 1625.B'R..2970:.".
CATCH LEVEL FOR"Y".: ......
";.K'..US$.".0123456789H":UL.6:.35:C.E(U
R$).U'..E.R.C..'... E.0 . 1580..'..."
NONE ESCAPED; TRY AGAIN.":.X.1.1000:
.X:.1490..',.E(YC).E:C(YC).C:YC.YC.1:.28
80..'@.. 1740..(Y..2970:..10)".ESCAPEMEN
T LEVEL FOR".0([...9)Y".: ......";
.Y(^.US$.".0123456789H":UL.6:.35:E.E(UR$
).J(H.. E.0 . 1680..(R.." SOME
MUST ESCAPE.":.I.1.1000:.:.1625..(..C.R.
E..(... C..0 . 1720.C(..C.0.K(..E.R..(..
E(YC).E:C(YC).C:YC.YC.1:.2880..(L.T.T.C.
.)V.. C..L . 1780.4)...2970:.". LO
W CATCH MADE FISHERY.Z)..." FURIOU
S!!!":.X.1.1000:.X.E)... 1800.X)... C..M
1 . 1800..)...2970:.". MEDIOCRE CA
TCH DISTURBED.I)..." FISHERY.":.X.
1.1000:.X.T)... 2360..)..Y.Y.1..)..C1.C1
.1..)&.. C1.5 . 1480..*0.C1.0..*:.E1.E1.
T..*D.. 2970.D*I..". TOTAL CATCH A
FTER 5 YEARS.C*K.." WAS ";:F7.T:.3
300..*N.." OR ";:F7.T.5:.3300:."/YEAR.".
.*X.T.0..*B..835:.865:.2970.R*G..".
.E.XIT, .R.ESTART, .C.ONTINUE OR..*L..
" .D.EFINE OPTIMUM STRATEGY? ";..+
V.US$."ERCDH":UL.1:.35:C$.UR$.,+..C$.H(C
$,1).K+... C$."R" . .875:ZF.1:.1270._+..
. C$."C" . 1410.P+... C$."E" . ..Z+...29
70..+...". STRATEGY: WHICH SHOULD
BE.O+A.." REGULATED, .E.SCPMT/.C.A
TCH? ";..+F.US$."ECH":UL.1:.35:S$.UR$..,
K.. S$."C" . 2150..,P..2970:.". ES
CAPEMENT SHOULD BE SET.M,U.." AT W
HAT LEVEL? ";.V,Z.US$.".0123456789H":UL.
4:.35:O.E(UR$)..,...2970..,..." WI
TH ESCAPEMENT AT"O".,..,..D..(O.P).F,...
D..1.P . 2080..,..." THE CATCH SH
OULD AVERAGE..-..." ABOUT"M.P"..
CLEARLY, YOU.;-..." HAVE MASTERED
THIS GAME.".F-... 2280.Z- .. D..3.P . 21
10..-*.." THE FISHERY COULD STILL
DO..-/.." BETTER. YOU REALLY SHOU
LD".M-1.." GET MORE EXPERIENCE..X-
4.. 1890..->.." THE FISHERY SOON F
AILS..%.C.." PLEASE GET MORE EXPER
IENCE.M.H.." TO MAKE A BETTER ESTI
MATE..X.\.. 1890...F..2970:.". CAT
CH LEVEL SHOULD BE SET...H.." AT W
HAT LEVEL? ";.N.J.US$.".0123456789H":UL.
4:.35:O.E(UR$)...N..2970:." FOR CA
TCH LEVEL AT"O".,../P.D..(M.P.O). /Z.. D
..1.(M.P) . 2210.G/..." FISHERY SH
OULD BE OK, BUT.O/..." SETTING ESC
APEMENT IS MORE../..." SURE.../...
1890../... D..3.(M.P) . 2230.L/..."
THE FISHERY COULD STILL DO../..."
BETTER. (TRY SETTING THE..0..."
THE ESCAPEMENT LEVEL.)":.1890.F0..."
THE FISHERY WILL NOT PROS-.N0..."
PER. GET MORE EXPERIENCE..0J.."
TO IMPROVE YOUR STRATEGY.":.1890..0.
....0..A.E1.(Y.YR)..0... ---A, E1 ARE SO
ME PERFORMENCE INDICATORS---..0...1890.
.18.R.(2.M.E.P).(M.((E.P).2))..(1).5.2.5
.31B.. R..M.3 . E..P . 2390.=1L.R.M.3.N1
V.. R.0 . 2410.V1`.R.0.\1J....1... FORMA
T VARIABLE F7 INTO F$ USING F8 AND F9..1
..F7.F7.10.(.1.F9)..1... F7..10.F8.1 . 2
840.N1 .F$.D(F7.10.F8)..1..F$.I(F$,C(F$)
.2)..1... F5.1 . F8.1..2... H(F$,1).."0"
. 2790..2H.." ";.-2R.F$.I(F$,C(F$).1).52
...F5.E2... F5.1 . 30.`2... J(F$,F5,1)."
.". 2820.I2... F5.|2... H(F$,F5.F9);..2.
....2..F$.D(F7)..2".. J(F$,2,F8.1.F9);..
2,....26.F$.D(F7)..2@.. SUBR TO PRINT OU
T NEXT YEARS E AND C IN AN ORGANIZED WAY
..3J..H(UD$,LN).7)J(D(Y),2);"..";.(3T.F7
.C:.3200.@3^.."....";:F7.E:.3200.N3..LN.
LN.1:..U3...3200:. SUBROUTINE TO CLEAN S
CREEN..3..."..."UP$:.UP$:.UP$:.UP$"..":.
..3B.."..";..3G..I..3L....3V.F8.3:F9.3:.
F7:."^.";:.2690:."^..":.3030..3..UP.1:U
H.1:.850:LN.10.#4&..".... .........
....................L40.." .YEAR.
CATCH .ESCAPEMENT..U4:.." .......
.......................4D..ZI.1.13:."
. . . .":.ZI.U4N
.." ..............................5
X..CO.1.8:E.E(CO):C.C(CO):.2880:Y.Y.1:.C
O..5B....5...F7.1.3240.05...F7..(F7).F7.
F7..0001.`5..FZ.C(D(.(F7))):F$.J(" ".D(F
7)."000",FZ.1,7).K5...F$;:...5..F$." 0"
.J(D(F7.1.000001),3,4):.3230.B5...F7..1.
F$."0".J(D(F7.1.000001),3,4):.3320..5..F
Z.C(D(.(F7))):F$.J(D(F7..000001),2,FZ.3)
..5...F$;:.."6 ..T.1..(1).3.1:."."H(UD$,
.(1).10.5).<6...X..(1).15..(1).10.20.D6.
...X)" .... ......... ...... ..."..6.
...X)" .... ............. .."..6...I
.1.8:.I..6....X)" .... .............
...".L6...X:.I.1.50.S6...T.Y6.....7..."
YEAR CATCH ESCAPEMENT ":....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL