Multiple names: LIFE.C, LIFE
FILE INFORMATION
FILENAME(S):
• LIFE.C<br>• LIFE
FILE TYPE(S): PRG
FILE SIZE: 18.6K
FIRST SEEN: 2025-11-30 21:07:09
APPEARS ON: 3 disk(s)
FILE HASH
ee6c2b674d018e32bfa91ec6f8c28560b0cb164b7cb09a8ff11cdc4eaea5e4f3
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG FEB 84 C | LIFE.C | PRG | DuncanTwain | 25 | 7 | DOWNLOAD FILE |
| CCS 64 5 | LIFE | PRG | hedning, Mattias H00r | 13 | 0 | DOWNLOAD FILE |
| SPEL 1 | LIFE | PRG | hedning, Mattias H00r | 9 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 26 08 8C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..&.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 00 5C 08 96 00 8F 20 41 20 53 |******.\.... A S|
00000030: 49 4D 55 4C 41 54 49 4F 4E 20 4F 46 20 22 8D 11 |IMULATION OF "..|
00000040: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 05 |................|
00000050: 4C 20 49 20 46 20 45 9A 8D 11 92 22 00 81 08 A0 |L I F E...."....|
00000060: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000080: 2A 00 9D 08 AA 00 8F 20 57 52 49 54 54 45 4E 20 |*...... WRITTEN |
00000090: 42 59 20 47 4C 45 4E 20 42 4F 44 49 45 00 C2 08 |BY GLEN BODIE...|
000000A0: B4 00 8F 20 20 20 20 20 20 20 20 20 20 20 20 39 |... 9|
000000B0: 30 20 4B 49 4E 47 53 4D 4F 55 4E 54 20 50 4B 20 |0 KINGSMOUNT PK |
000000C0: 52 44 00 E4 08 BE 00 8F 20 20 20 20 20 20 20 20 |RD...... |
000000D0: 20 20 20 20 54 4F 52 4F 4E 54 4F 2C 20 4F 4E 54 | TORONTO, ONT|
000000E0: 41 52 49 4F 00 04 09 C8 00 8F 20 20 20 20 20 20 |ARIO...... |
000000F0: 20 20 20 20 20 20 28 34 31 36 29 20 34 36 31 2D | (416) 461-|
00000100: 33 34 38 33 00 29 09 D2 00 8F 20 2A 2A 2A 2A 2A |3483.).... *****|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 76 09 DC 00 8F 20 |*********.v.... |
00000130: 59 4F 55 20 41 52 45 20 41 4C 4C 4F 57 45 44 20 |YOU ARE ALLOWED |
00000140: 54 4F 20 43 4F 50 59 20 41 4E 44 20 20 20 20 20 |TO COPY AND |
00000150: 20 20 20 20 44 49 53 54 52 49 42 55 54 45 20 54 | DISTRIBUTE T|
00000160: 48 49 53 20 50 52 4F 47 52 41 4D 20 54 4F 20 41 |HIS PROGRAM TO A|
00000170: 4E 59 4F 4E 45 2C 00 AC 09 E6 00 8F 20 42 55 54 |NYONE,...... BUT|
00000180: 20 4D 41 59 20 4E 4F 54 20 55 53 45 20 49 54 20 | MAY NOT USE IT |
00000190: 49 4E 20 41 4E 59 20 57 41 59 20 20 20 20 20 20 |IN ANY WAY |
000001A0: 20 46 4F 52 20 50 52 4F 46 49 54 2E 00 F9 09 F0 | FOR PROFIT.....|
000001B0: 00 8F 20 49 46 20 59 4F 55 20 48 41 56 45 20 41 |.. IF YOU HAVE A|
000001C0: 4E 59 20 51 55 45 53 54 49 4F 4E 53 20 4F 52 20 |NY QUESTIONS OR |
000001D0: 20 20 20 20 20 20 20 53 55 47 47 45 53 54 49 4F | SUGGESTIO|
000001E0: 4E 53 20 4F 52 20 57 49 53 48 20 54 4F 20 44 49 |NS OR WISH TO DI|
000001F0: 53 43 55 53 53 20 54 48 45 00 3C 0A FA 00 8F 20 |SCUSS THE.<.... |
00000200: 50 52 4F 47 52 41 4D 2C 20 50 4C 45 41 53 45 20 |PROGRAM, PLEASE |
00000210: 57 52 49 54 45 20 4F 52 20 43 41 4C 4C 20 20 20 |WRITE OR CALL |
00000220: 20 20 20 20 4D 45 20 41 54 20 54 48 45 20 41 42 | ME AT THE AB|
00000230: 4F 56 45 20 41 44 44 52 45 53 53 2E 00 61 0A 04 |OVE ADDRESS..a..|
00000240: 01 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000250: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000260: 2A 00 AC 0A 0E 01 8F 20 54 48 49 53 20 49 53 20 |*...... THIS IS |
00000270: 41 20 53 49 4D 55 4C 41 54 49 4F 4E 20 4F 46 20 |A SIMULATION OF |
00000280: 54 48 45 20 20 20 20 20 20 20 20 20 47 52 4F 57 |THE GROW|
00000290: 54 48 2C 20 42 49 52 54 48 20 41 4E 44 20 44 45 |TH, BIRTH AND DE|
000002A0: 41 54 48 20 4F 46 20 43 45 4C 4C 53 00 F7 0A 18 |ATH OF CELLS....|
000002B0: 01 8F 20 49 4E 20 41 20 43 4C 4F 53 45 44 20 43 |.. IN A CLOSED C|
000002C0: 4F 4C 4F 4E 59 2E 20 20 49 54 20 49 53 20 42 41 |OLONY. IT IS BA|
000002D0: 53 45 44 20 20 20 20 4F 4E 20 41 20 53 43 49 45 |SED ON A SCIE|
000002E0: 4E 54 49 46 49 43 20 41 4D 45 52 49 43 41 4E 20 |NTIFIC AMERICAN |
000002F0: 41 52 54 49 43 4C 45 00 41 0B 22 01 8F 20 57 52 |ARTICLE.A.".. WR|
00000300: 49 54 54 45 4E 20 42 59 20 4A 4F 48 4E 20 43 4F |ITTEN BY JOHN CO|
00000310: 4E 57 41 59 20 46 52 4F 4D 20 20 20 20 20 20 20 |NWAY FROM |
00000320: 20 20 43 41 4D 42 52 49 44 47 45 20 55 4E 49 56 | CAMBRIDGE UNIV|
00000330: 45 52 53 49 54 59 2C 20 4C 4F 4E 44 4F 4E 20 49 |ERSITY, LONDON I|
00000340: 4E 00 55 0B 2C 01 8F 20 4F 43 54 4F 42 45 52 20 |N.U.,.. OCTOBER |
00000350: 31 39 37 30 2E 00 A0 0B 36 01 8F 20 54 48 45 20 |1970....6.. THE |
00000360: 53 4F 55 52 43 45 20 46 4F 52 20 54 48 49 53 20 |SOURCE FOR THIS |
00000370: 50 52 4F 47 52 41 4D 20 49 53 20 20 20 20 20 20 |PROGRAM IS |
00000380: 49 4E 20 41 20 43 4F 4D 42 49 4E 41 54 49 4F 4E |IN A COMBINATION|
00000390: 20 4F 46 20 42 41 53 49 43 20 41 4E 44 20 4D 4C | OF BASIC AND ML|
000003A0: 00 B7 0B 40 01 8F 20 43 4F 44 45 20 41 53 20 46 |...@.. CODE AS F|
000003B0: 4F 4C 4C 4F 57 53 3A 00 DB 0B 4A 01 8F 20 22 4C |OLLOWS:...J.. "L|
000003C0: 49 46 45 2E 42 41 53 22 20 2D 20 42 41 53 49 43 |IFE.BAS" - BASIC|
000003D0: 20 53 54 41 54 45 4D 45 4E 54 53 00 FC 0B 54 01 | STATEMENTS...T.|
000003E0: 8F 20 22 4C 49 46 45 2E 41 53 4D 22 20 2D 20 4D |. "LIFE.ASM" - M|
000003F0: 4C 20 53 54 41 54 45 4D 45 4E 54 53 00 49 0C 5E |L STATEMENTS.I.^|
00000400: 01 8F 20 54 48 45 20 46 49 4E 41 4C 20 50 52 4F |.. THE FINAL PRO|
00000410: 47 52 41 4D 20 57 41 53 20 47 45 4E 45 52 41 54 |GRAM WAS GENERAT|
00000420: 45 44 20 20 20 20 20 42 59 20 50 41 4C 2D 36 34 |ED BY PAL-64|
00000430: 20 46 52 4F 4D 20 50 52 4F 2D 4C 49 4E 45 2E 20 | FROM PRO-LINE. |
00000440: 20 49 4E 20 4F 52 44 45 52 00 96 0C 68 01 8F 20 | IN ORDER...h.. |
00000450: 54 4F 20 52 45 43 52 45 41 54 45 20 54 48 45 20 |TO RECREATE THE |
00000460: 4F 42 4A 45 43 54 20 43 4F 44 45 2C 20 20 20 20 |OBJECT CODE, |
00000470: 20 20 20 20 4C 4F 41 44 20 50 41 4C 2D 36 34 20 | LOAD PAL-64 |
00000480: 49 4E 54 4F 20 59 4F 55 52 20 4D 41 43 48 49 4E |INTO YOUR MACHIN|
00000490: 45 20 54 48 45 4E 00 E0 0C 72 01 8F 20 4C 4F 41 |E THEN...r.. LOA|
000004A0: 44 20 41 4E 44 20 52 55 4E 20 22 4C 49 46 45 2E |D AND RUN "LIFE.|
000004B0: 42 41 53 22 2E 20 20 54 48 45 20 20 20 20 20 20 |BAS". THE |
000004C0: 20 41 53 53 45 4D 42 4C 59 20 54 41 4B 45 53 20 | ASSEMBLY TAKES |
000004D0: 41 42 4F 55 54 20 38 20 4D 49 4E 55 54 45 53 2E |ABOUT 8 MINUTES.|
000004E0: 00 1E 0D 7C 01 8F 20 54 48 45 20 52 45 53 55 4C |...|.. THE RESUL|
000004F0: 54 20 4F 46 20 54 48 45 20 41 53 53 45 4D 42 4C |T OF THE ASSEMBL|
00000500: 59 20 49 53 20 32 20 20 20 20 20 46 49 4C 45 53 |Y IS 2 FILES|
00000510: 20 4F 4E 20 59 4F 55 52 20 44 49 53 4B 3A 00 44 | ON YOUR DISK:.D|
00000520: 0D 86 01 8F 20 22 4C 49 46 45 22 20 2D 20 54 48 |.... "LIFE" - TH|
00000530: 45 20 45 58 45 43 55 54 41 42 4C 45 20 50 52 4F |E EXECUTABLE PRO|
00000540: 47 52 41 4D 00 68 0D 90 01 8F 20 22 4C 49 46 45 |GRAM.h.... "LIFE|
00000550: 2E 53 59 4D 22 20 2D 20 54 48 45 20 53 59 4D 42 |.SYM" - THE SYMB|
00000560: 4F 4C 20 54 41 42 4C 45 00 8D 0D 9A 01 8F 20 2A |OL TABLE...... *|
00000570: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000580: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B2 0D |*************...|
00000590: A4 01 8F 20 22 8D 11 1D 1D 1D 1D 1D 1D 1D 1D 1D |... "...........|
000005A0: 1D 1D 1D 1D 05 50 52 4F 54 45 43 54 45 44 9A 11 |.....PROTECTED..|
000005B0: 22 CC 00 D7 0D AE 01 8F 20 2A 2A 2A 2A 2A 2A 2A |"....... *******|
000005C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005D0: 2A 2A 2A 2A 2A 2A 2A 00 E7 0D B8 01 8F 20 2A 2A |*******...... **|
000005E0: 2A 20 53 45 54 55 50 00 0C 0E C2 01 8F 20 2A 2A |* SETUP...... **|
000005F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 17 0E CC |************....|
00000610: 01 99 20 22 93 22 3B 00 32 0E D6 01 97 20 35 33 |.. ".";.2.... 53|
00000620: 32 38 30 2C 36 20 3A 20 97 20 35 33 32 38 31 2C |280,6 : . 53281,|
00000630: 31 32 00 51 0E E0 01 49 B2 31 30 AC 34 30 39 36 |12.Q...I.10.4096|
00000640: AB 33 AC 28 34 30 AC 36 30 29 AB 32 AC 31 30 32 |.3.(40.60).2.102|
00000650: 34 00 6D 0E EA 01 97 20 35 32 2C 49 AD 32 35 36 |4.m.... 52,I.256|
00000660: 20 3A 20 97 20 35 36 2C C2 28 35 32 29 00 82 0E | : . 56,.(52)...|
00000670: F4 01 97 20 35 31 2C 49 AB C2 28 35 32 29 AC 32 |... 51,I..(52).2|
00000680: 35 36 00 91 0E FE 01 97 20 35 35 2C C2 28 35 31 |56...... 55,.(51|
00000690: 29 00 B6 0E 08 02 54 24 B2 22 93 20 20 20 20 20 |).....T$.". |
000006A0: 20 20 20 20 20 20 20 20 20 20 20 90 12 4C 20 49 | ..L I|
000006B0: 20 46 20 45 92 22 00 D7 0E 12 02 49 24 B2 22 49 | F E.".....I$."I|
000006C0: 4E 49 54 49 41 4C 49 5A 41 54 49 4F 4E 3A 20 50 |NITIALIZATION: P|
000006D0: 48 41 53 45 20 12 22 00 FB 0E 1C 02 4D 53 24 B2 |HASE .".....MS$.|
000006E0: 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |"...............|
000006F0: 11 11 11 11 11 11 11 11 11 1F 22 00 0E 0F 26 02 |.........."...&.|
00000700: 99 20 54 24 4D 53 24 49 24 22 31 92 22 3B 00 2B |. T$MS$I$"1.";.+|
00000710: 0F 30 02 86 20 5A 5A 25 28 32 35 35 2C 31 29 20 |.0.. ZZ%(255,1) |
00000720: 3A 20 86 20 44 45 24 28 31 35 29 00 4C 0F 3A 02 |: . DE$(15).L.:.|
00000730: 53 4B 49 50 B2 30 20 3A 20 50 41 52 4D B2 32 35 |SKIP.0 : PARM.25|
00000740: 35 20 3A 20 42 55 46 46 B2 37 30 34 00 5D 0F 3F |5 : BUFF.704.].?|
00000750: 02 53 43 25 B2 30 20 3A 20 5A B2 AB 31 00 82 0F |.SC%.0 : Z..1...|
00000760: 44 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |D.. ************|
00000770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000780: 2A 2A 00 A3 0F 4E 02 8F 20 2A 2A 2A 20 54 52 41 |**...N.. *** TRA|
00000790: 4E 53 46 45 52 20 43 48 41 52 41 43 54 45 52 20 |NSFER CHARACTER |
000007A0: 53 45 54 00 C8 0F 58 02 8F 20 2A 2A 2A 2A 2A 2A |SET...X.. ******|
000007B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007C0: 2A 2A 2A 2A 2A 2A 2A 2A 00 E3 0F 62 02 97 20 35 |********...b.. 5|
000007D0: 36 33 33 34 2C C2 28 35 36 33 33 34 29 20 AF 20 |6334,.(56334) . |
000007E0: 32 35 34 00 F6 0F 6C 02 97 20 31 2C C2 28 31 29 |254...l.. 1,.(1)|
000007F0: 20 AF 20 32 35 31 00 0C 10 76 02 81 20 49 B2 35 | . 251...v.. I.5|
00000800: 33 32 34 38 20 A4 20 35 35 32 39 36 00 22 10 80 |3248 . 55296."..|
00000810: 02 97 20 49 AB 32 30 34 38 2C C2 28 49 29 20 3A |.. I.2048,.(I) :|
00000820: 20 82 00 33 10 8A 02 97 20 31 2C C2 28 31 29 20 | ..3.... 1,.(1) |
00000830: B0 20 34 00 4C 10 94 02 97 20 35 36 33 33 34 2C |. 4.L.... 56334,|
00000840: C2 28 35 36 33 33 34 29 20 B0 20 31 00 71 10 9E |.(56334) . 1.q..|
00000850: 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000870: 2A 00 92 10 A8 02 8F 20 2A 2A 2A 20 43 48 41 4E |*...... *** CHAN|
00000880: 47 45 20 53 43 52 45 45 4E 20 50 4F 49 4E 54 45 |GE SCREEN POINTE|
00000890: 52 53 00 B7 10 B2 02 8F 20 2A 2A 2A 2A 2A 2A 2A |RS...... *******|
000008A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008B0: 2A 2A 2A 2A 2A 2A 2A 00 C2 10 BC 02 99 20 C7 28 |*******...... .(|
000008C0: 38 29 00 DB 10 C6 02 97 20 35 36 35 37 38 2C C2 |8)...... 56578,.|
000008D0: 28 35 36 35 37 38 29 20 B0 20 33 00 F5 10 D0 02 |(56578) . 3.....|
000008E0: 97 20 35 36 35 37 36 2C C2 28 35 36 35 37 36 29 |. 56576,.(56576)|
000008F0: AF 20 32 35 32 00 14 11 DA 02 97 20 35 33 32 37 |. 252...... 5327|
00000900: 32 2C 28 C2 28 35 33 32 37 32 29 AF 20 32 34 30 |2,(.(53272). 240|
00000910: 29 B0 20 32 00 22 11 E4 02 97 20 36 34 38 2C 31 |). 2.".... 648,1|
00000920: 39 36 00 35 11 EE 02 99 20 54 24 4D 53 24 49 24 |96.5.... T$MS$I$|
00000930: 22 32 92 22 3B 00 56 11 F8 02 56 49 43 32 B2 31 |"2.";.V...VIC2.1|
00000940: 32 AC 34 30 39 36 20 3A 20 8F 20 56 49 43 2D 49 |2.4096 : . VIC-I|
00000950: 49 20 43 48 49 50 00 79 11 02 03 53 4D B2 56 49 |I CHIP.y...SM.VI|
00000960: 43 32 AA 31 30 32 34 20 3A 20 8F 20 53 43 52 45 |C2.1024 : . SCRE|
00000970: 45 4E 20 4D 45 4D 4F 52 59 00 9C 11 0C 03 43 48 |EN MEMORY.....CH|
00000980: B2 56 49 43 32 AA 32 30 34 38 20 3A 20 8F 20 43 |.VIC2.2048 : . C|
00000990: 48 41 52 41 43 54 45 52 20 53 45 54 00 BF 11 16 |HARACTER SET....|
000009A0: 03 43 4D B2 35 35 32 39 36 20 20 20 20 20 3A 20 |.CM.55296 : |
000009B0: 8F 20 43 4F 4C 4F 55 52 20 4D 45 4D 4F 52 59 00 |. COLOUR MEMORY.|
000009C0: E4 11 20 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. .. **********|
000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009E0: 2A 2A 2A 2A 00 04 12 2A 03 8F 20 2A 2A 2A 20 44 |****...*.. *** D|
000009F0: 45 46 49 4E 45 20 4E 45 57 20 43 48 41 52 41 43 |EFINE NEW CHARAC|
00000A00: 54 45 52 53 00 29 12 34 03 8F 20 2A 2A 2A 2A 2A |TERS.).4.. *****|
00000A10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4D 12 3E 03 4E 43 |*********.M.>.NC|
00000A30: 25 B2 37 30 20 3A 20 8F 20 4E 45 57 20 43 48 41 |%.70 : . NEW CHA|
00000A40: 52 41 43 54 45 52 27 53 20 43 4F 44 45 00 68 12 |RACTER'S CODE.h.|
00000A50: 48 03 81 20 49 B2 30 20 A4 20 31 35 20 3A 20 81 |H.. I.0 . 15 : .|
00000A60: 20 4A B2 30 20 A4 20 37 00 87 12 52 03 87 20 49 | J.0 . 7...R.. I|
00000A70: 25 20 3A 20 97 20 43 48 AA 38 AC 28 49 AA 4E 43 |% : . CH.8.(I.NC|
00000A80: 25 29 AA 4A 2C 49 25 00 95 12 5C 03 82 20 4A 20 |%).J,I%...\.. J |
00000A90: 3A 20 82 20 49 00 AB 12 66 03 83 20 30 2C 30 2C |: . I...f.. 0,0,|
00000AA0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 C9 12 70 03 |0,0,0,0,0,0...p.|
00000AB0: 83 20 32 34 30 2C 32 34 30 2C 32 34 30 2C 32 34 |. 240,240,240,24|
00000AC0: 30 2C 30 2C 30 2C 30 2C 30 00 E3 12 7A 03 83 20 |0,0,0,0,0...z.. |
00000AD0: 31 35 2C 31 35 2C 31 35 2C 31 35 2C 30 2C 30 2C |15,15,15,15,0,0,|
00000AE0: 30 2C 30 00 01 13 84 03 83 20 32 35 35 2C 32 35 |0,0...... 255,25|
00000AF0: 35 2C 32 35 35 2C 32 35 35 2C 30 2C 30 2C 30 2C |5,255,255,0,0,0,|
00000B00: 30 00 1F 13 8E 03 83 20 30 2C 30 2C 30 2C 30 2C |0...... 0,0,0,0,|
00000B10: 32 34 30 2C 32 34 30 2C 32 34 30 2C 32 34 30 00 |240,240,240,240.|
00000B20: 45 13 98 03 83 20 32 34 30 2C 32 34 30 2C 32 34 |E.... 240,240,24|
00000B30: 30 2C 32 34 30 2C 32 34 30 2C 32 34 30 2C 32 34 |0,240,240,240,24|
00000B40: 30 2C 32 34 30 00 67 13 A2 03 83 20 31 35 2C 31 |0,240.g.... 15,1|
00000B50: 35 2C 31 35 2C 31 35 2C 32 34 30 2C 32 34 30 2C |5,15,15,240,240,|
00000B60: 32 34 30 2C 32 34 30 00 8D 13 AC 03 83 20 32 35 |240,240...... 25|
00000B70: 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 2C 32 34 |5,255,255,255,24|
00000B80: 30 2C 32 34 30 2C 32 34 30 2C 32 34 30 00 A7 13 |0,240,240,240...|
00000B90: B6 03 83 20 30 2C 30 2C 30 2C 30 2C 31 35 2C 31 |... 0,0,0,0,15,1|
00000BA0: 35 2C 31 35 2C 31 35 00 C9 13 C0 03 83 20 32 34 |5,15,15...... 24|
00000BB0: 30 2C 32 34 30 2C 32 34 30 2C 32 34 30 2C 31 35 |0,240,240,240,15|
00000BC0: 2C 31 35 2C 31 35 2C 31 35 00 E7 13 CA 03 83 20 |,15,15,15...... |
00000BD0: 31 35 2C 31 35 2C 31 35 2C 31 35 2C 31 35 2C 31 |15,15,15,15,15,1|
00000BE0: 35 2C 31 35 2C 31 35 00 09 14 D4 03 83 20 32 35 |5,15,15...... 25|
00000BF0: 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 2C 31 35 |5,255,255,255,15|
00000C00: 2C 31 35 2C 31 35 2C 31 35 00 27 14 DE 03 83 20 |,15,15,15.'.... |
00000C10: 30 2C 30 2C 30 2C 30 2C 32 35 35 2C 32 35 35 2C |0,0,0,0,255,255,|
00000C20: 32 35 35 2C 32 35 35 00 4D 14 E8 03 83 20 32 34 |255,255.M.... 24|
00000C30: 30 2C 32 34 30 2C 32 34 30 2C 32 34 30 2C 32 35 |0,240,240,240,25|
00000C40: 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 00 6F 14 |5,255,255,255.o.|
00000C50: F2 03 83 20 31 35 2C 31 35 2C 31 35 2C 31 35 2C |... 15,15,15,15,|
00000C60: 32 35 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 00 |255,255,255,255.|
00000C70: 95 14 FC 03 83 20 32 35 35 2C 32 35 35 2C 32 35 |..... 255,255,25|
00000C80: 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 2C 32 35 |5,255,255,255,25|
00000C90: 35 2C 32 35 35 00 BA 14 06 04 8F 20 2A 2A 2A 2A |5,255...... ****|
00000CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DE 14 10 04 8F |**********......|
00000CC0: 20 2A 2A 2A 20 44 45 46 49 4E 45 20 53 50 52 49 | *** DEFINE SPRI|
00000CD0: 54 45 53 20 46 4F 52 20 43 55 52 53 4F 52 00 03 |TES FOR CURSOR..|
00000CE0: 15 1A 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00000CF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D00: 2A 2A 2A 00 24 15 24 04 81 20 49 B2 31 32 20 A4 |***.$.$.. I.12 .|
00000D10: 20 36 33 20 3A 97 20 56 49 43 32 AA 36 34 AC 31 | 63 :. VIC2.64.1|
00000D20: AA 49 2C 30 00 3C 15 2E 04 97 20 56 49 43 32 AA |.I,0.<.... VIC2.|
00000D30: 36 34 AC 32 AA 49 2C 30 20 3A 20 82 00 52 15 38 |64.2.I,0 : ..R.8|
00000D40: 04 81 20 49 B2 30 20 A4 20 31 31 20 3A 20 87 20 |.. I.0 . 11 : . |
00000D50: 49 25 00 6B 15 42 04 97 20 56 49 43 32 AA 36 34 |I%.k.B.. VIC2.64|
00000D60: AC 31 AA 49 2C 49 25 20 3A 20 82 00 81 15 4C 04 |.1.I,I% : ....L.|
00000D70: 81 20 49 B2 30 20 A4 20 31 31 20 3A 20 87 20 49 |. I.0 . 11 : . I|
00000D80: 25 00 9A 15 56 04 97 20 56 49 43 32 AA 36 34 AC |%...V.. VIC2.64.|
00000D90: 32 AA 49 2C 49 25 20 3A 20 82 00 B4 15 60 04 97 |2.I,I% : ....`..|
00000DA0: 20 35 33 32 36 39 2C 30 20 3A 20 97 20 35 33 32 | 53269,0 : . 532|
00000DB0: 37 35 2C 30 00 D0 15 6A 04 97 20 35 33 32 38 37 |75,0...j.. 53287|
00000DC0: 2C 37 20 3A 20 97 20 53 4D AA 31 30 31 36 2C 31 |,7 : . SM.1016,1|
00000DD0: 00 EA 15 74 04 97 20 35 33 32 37 31 2C 30 20 3A |...t.. 53271,0 :|
00000DE0: 20 97 20 35 33 32 37 37 2C 30 00 10 16 7E 04 83 | . 53277,0...~..|
00000DF0: 20 32 34 30 2C 30 2C 30 2C 31 34 34 2C 30 2C 30 | 240,0,0,144,0,0|
00000E00: 2C 31 34 34 2C 30 2C 30 2C 32 34 30 2C 30 2C 30 |,144,0,0,240,0,0|
00000E10: 00 30 16 88 04 83 20 30 2C 30 2C 30 2C 39 36 2C |.0.... 0,0,0,96,|
00000E20: 30 2C 30 2C 39 36 2C 30 2C 30 2C 30 2C 30 2C 30 |0,0,96,0,0,0,0,0|
00000E30: 00 55 16 92 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.U.... *********|
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E50: 2A 2A 2A 2A 2A 00 71 16 9C 04 8F 20 2A 2A 2A 20 |*****.q.... *** |
00000E60: 44 45 46 49 4E 45 20 4D 45 4E 55 20 49 54 45 4D |DEFINE MENU ITEM|
00000E70: 53 00 96 16 A6 04 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |S...... ********|
00000E80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E90: 2A 2A 2A 2A 2A 2A 00 E2 16 B0 04 46 4B 24 28 31 |******.....FK$(1|
00000EA0: 29 B2 22 13 11 11 90 12 46 31 92 20 45 44 49 54 |).".....F1. EDIT|
00000EB0: 20 9D 9D 9D 9D 9D 9D 9D 9D 11 12 46 32 92 20 52 | ..........F2. R|
00000EC0: 45 52 55 4E 9D 9D 9D 9D 9D 9D 9D 9D 11 11 12 46 |ERUN...........F|
00000ED0: 33 92 20 52 55 4E 20 20 9D 9D 9D 9D 9D 9D 9D 9D |3. RUN ........|
00000EE0: 11 22 00 30 17 BA 04 46 4B 24 28 31 29 B2 46 4B |.".0...FK$(1).FK|
00000EF0: 24 28 31 29 AA 22 12 46 34 92 20 53 4B 49 50 20 |$(1).".F4. SKIP |
00000F00: 9D 9D 9D 9D 9D 9D 9D 9D 11 11 12 46 35 92 20 53 |...........F5. S|
00000F10: 43 52 4F 4C 9D 9D 9D 9D 9D 9D 9D 9D 11 12 46 36 |CROL..........F6|
00000F20: 92 20 43 45 4E 54 52 9D 9D 9D 9D 9D 9D 9D 9D 22 |. CENTR........"|
00000F30: 00 7F 17 C4 04 46 4B 24 28 31 29 B2 46 4B 24 28 |.....FK$(1).FK$(|
00000F40: 31 29 AA 22 11 11 12 46 37 92 20 45 58 49 54 20 |1)."...F7. EXIT |
00000F50: 9D 9D 9D 9D 9D 9D 9D 9D 11 12 46 38 92 20 48 45 |..........F8. HE|
00000F60: 4C 50 20 9D 9D 9D 9D 9D 9D 9D 9D 11 11 11 53 4B |LP ...........SK|
00000F70: 49 50 3A 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 22 00 |IP: ........".|
00000F80: 9F 17 CE 04 46 4B 24 28 31 29 B2 46 4B 24 28 31 |....FK$(1).FK$(1|
00000F90: 29 AA 22 11 11 47 45 4E 3A 20 20 20 20 13 22 00 |)."..GEN: .".|
00000FA0: EB 17 D8 04 46 4B 24 28 32 29 B2 22 13 11 11 90 |....FK$(2)."....|
00000FB0: 12 46 31 92 20 4C 4F 41 44 20 9D 9D 9D 9D 9D 9D |.F1. LOAD ......|
00000FC0: 9D 9D 11 12 46 32 92 20 52 45 53 45 54 9D 9D 9D |....F2. RESET...|
00000FD0: 9D 9D 9D 9D 9D 11 11 12 46 33 92 20 53 41 56 45 |........F3. SAVE|
00000FE0: 20 9D 9D 9D 9D 9D 9D 9D 9D 11 22 00 39 18 E2 04 | .........".9...|
00000FF0: 46 4B 24 28 32 29 B2 46 4B 24 28 32 29 AA 22 12 |FK$(2).FK$(2).".|
00001000: 46 34 92 20 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D |F4. .......|
00001010: 9D 11 11 12 46 35 92 20 43 4C 45 41 52 9D 9D 9D |....F5. CLEAR...|
00001020: 9D 9D 9D 9D 9D 11 12 46 36 92 20 20 20 20 20 20 |.......F6. |
00001030: 9D 9D 9D 9D 9D 9D 9D 9D 22 00 88 18 EC 04 46 4B |........".....FK|
00001040: 24 28 32 29 B2 46 4B 24 28 32 29 AA 22 11 11 12 |$(2).FK$(2)."...|
00001050: 46 37 92 20 52 45 54 52 4E 9D 9D 9D 9D 9D 9D 9D |F7. RETRN.......|
00001060: 9D 11 12 46 38 92 20 48 45 4C 50 20 9D 9D 9D 9D |...F8. HELP ....|
00001070: 9D 9D 9D 9D 11 11 11 20 20 20 20 20 20 20 20 9D |....... .|
00001080: 9D 9D 9D 9D 9D 9D 9D 22 00 A8 18 F6 04 46 4B 24 |.......".....FK$|
00001090: 28 32 29 B2 46 4B 24 28 32 29 AA 22 11 11 20 20 |(2).FK$(2).".. |
000010A0: 20 20 20 20 20 20 13 22 00 CD 18 00 05 8F 20 2A | ."...... *|
000010B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E7 18 |*************...|
000010D0: 0A 05 8F 20 2A 2A 2A 20 44 45 46 49 4E 45 20 4D |... *** DEFINE M|
000010E0: 45 53 53 41 47 45 53 00 0C 19 14 05 8F 20 2A 2A |ESSAGES...... **|
000010F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001100: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2E 19 1E |************....|
00001110: 05 53 47 24 B2 22 13 11 11 11 11 11 11 11 11 11 |.SG$."..........|
00001120: 11 11 11 11 11 11 1D 1D 1D 1D 1D 90 20 22 00 62 |............ ".b|
00001130: 19 28 05 4D 53 24 28 30 29 B2 22 52 45 41 44 59 |.(.MS$(0)."READY|
00001140: 2E 2E 2E 2E 2E 20 20 20 20 20 20 20 20 20 20 20 |..... |
00001150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001160: 20 22 00 96 19 32 05 4D 53 24 28 31 29 B2 22 43 | "...2.MS$(1)."C|
00001170: 55 52 53 4F 52 53 20 54 4F 20 4D 4F 56 45 2C 20 |URSORS TO MOVE, |
00001180: 53 50 41 43 45 20 42 41 52 20 54 4F 20 41 44 44 |SPACE BAR TO ADD|
00001190: 2F 44 45 4C A0 22 00 CA 19 3C 05 4D 53 24 28 32 |/DEL."...<.MS$(2|
000011A0: 29 B2 22 55 50 44 41 54 45 20 42 59 20 31 20 47 |)."UPDATE BY 1 G|
000011B0: 45 4E 45 52 41 54 49 4F 4E 20 20 20 20 20 20 20 |ENERATION |
000011C0: 20 20 20 20 20 20 20 20 20 22 00 04 1A 46 05 4D | "...F.M|
000011D0: 53 24 28 33 29 B2 22 45 4E 54 45 52 20 23 20 4F |S$(3)."ENTER # O|
000011E0: 46 20 47 45 4E 45 52 41 54 49 4F 4E 53 20 54 4F |F GENERATIONS TO|
000011F0: 20 53 4B 49 50 3A 20 20 20 20 20 20 20 9D 9D 9D | SKIP: ...|
00001200: 9D 9D 9D 22 00 38 1A 50 05 4D 53 24 28 34 29 B2 |...".8.P.MS$(4).|
00001210: 22 43 55 52 53 4F 52 53 20 41 52 45 20 4E 4F 57 |"CURSORS ARE NOW|
00001220: 20 41 43 54 49 56 45 20 46 4F 52 20 53 43 52 4F | ACTIVE FOR SCRO|
00001230: 4C 4C 49 4E 47 20 20 22 00 6C 1A 5A 05 4D 53 24 |LLING ".l.Z.MS$|
00001240: 28 35 29 B2 22 43 45 4E 54 52 45 20 54 48 45 20 |(5)."CENTRE THE |
00001250: 50 41 54 54 45 52 4E 20 20 20 20 20 20 20 20 20 |PATTERN |
00001260: 20 20 20 20 20 20 20 20 20 20 20 22 00 B2 1A 64 | "...d|
00001270: 05 4D 53 24 28 36 29 B2 22 45 4E 54 45 52 20 46 |.MS$(6)."ENTER F|
00001280: 49 4C 45 20 54 4F 20 4C 4F 41 44 3A 20 20 20 20 |ILE TO LOAD: |
00001290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 9D | .|
000012A0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
000012B0: 9D 22 00 F8 1A 6E 05 4D 53 24 28 37 29 B2 22 45 |."...n.MS$(7)."E|
000012C0: 4E 54 45 52 20 46 49 4C 45 20 54 4F 20 53 41 56 |NTER FILE TO SAV|
000012D0: 45 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |E: |
000012E0: 20 20 20 20 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ...........|
000012F0: 9D 9D 9D 9D 9D 9D 9D 22 00 2C 1B 78 05 4D 53 24 |.......".,.x.MS$|
00001300: 28 38 29 B2 22 54 48 45 20 43 4F 4C 4F 4E 59 20 |(8)."THE COLONY |
00001310: 57 49 4C 4C 20 42 45 20 44 45 53 54 52 4F 59 45 |WILL BE DESTROYE|
00001320: 44 20 20 20 20 20 20 20 20 20 20 22 00 60 1B 82 |D ".`..|
00001330: 05 4D 53 24 28 39 29 B2 22 53 43 52 4F 4C 4C 49 |.MS$(9)."SCROLLI|
00001340: 4E 47 2E 2E 2E 2E 2E 20 20 20 20 20 20 20 20 20 |NG..... |
00001350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001360: 00 95 1B 8C 05 4D 53 24 28 31 30 29 B2 22 52 45 |.....MS$(10)."RE|
00001370: 52 55 4E 4E 49 4E 47 20 53 45 51 55 45 4E 43 45 |RUNNING SEQUENCE|
00001380: 20 46 52 4F 4D 20 54 48 45 20 53 54 41 52 54 2E | FROM THE START.|
00001390: 20 20 20 20 22 00 C5 1B 96 05 43 24 B2 22 90 50 | ".....C$.".P|
000013A0: 52 45 53 53 20 1F 12 53 48 49 46 54 92 90 20 54 |RESS ..SHIFT.. T|
000013B0: 4F 20 43 4F 4E 54 49 4E 55 45 2E 2E 2E 2E 2E 20 |O CONTINUE..... |
000013C0: 20 20 20 20 22 00 EA 1B A0 05 8F 20 2A 2A 2A 2A | "...... ****|
000013D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000013E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 08 1C AA 05 8F |**********......|
000013F0: 20 2A 2A 2A 20 44 49 53 4B 20 45 52 52 4F 52 20 | *** DISK ERROR |
00001400: 4D 45 53 53 41 47 45 53 00 2D 1C B4 05 8F 20 2A |MESSAGES.-.... *|
00001410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001420: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 45 1C |*************.E.|
00001430: BE 05 44 45 24 B2 22 1C 44 49 53 4B 20 45 52 52 |..DE$.".DISK ERR|
00001440: 4F 52 3A 20 22 00 5B 1C C8 05 44 45 24 28 30 29 |OR: ".[...DE$(0)|
00001450: B2 22 4E 4F 20 45 52 52 4F 52 22 00 7C 1C D2 05 |."NO ERROR".|...|
00001460: 44 45 24 28 31 29 B2 22 54 4F 4F 20 4D 41 4E 59 |DE$(1)."TOO MANY|
00001470: 20 4F 50 45 4E 20 46 49 4C 45 53 22 00 9B 1C DC | OPEN FILES"....|
00001480: 05 44 45 24 28 32 29 B2 22 46 49 4C 45 20 41 4C |.DE$(2)."FILE AL|
00001490: 52 45 41 44 59 20 4F 50 45 4E 22 00 B6 1C E6 05 |READY OPEN".....|
000014A0: 44 45 24 28 33 29 B2 22 46 49 4C 45 20 4E 4F 54 |DE$(3)."FILE NOT|
000014B0: 20 4F 50 45 4E 22 00 D4 1C EB 05 44 45 24 28 31 | OPEN".....DE$(1|
000014C0: 34 29 B2 22 45 4E 44 20 4F 52 20 49 44 45 4E 54 |4)."END OR IDENT|
000014D0: 49 46 59 22 00 F0 1C F0 05 44 45 24 28 34 29 B2 |IFY".....DE$(4).|
000014E0: 22 46 49 4C 45 20 4E 4F 54 20 46 4F 55 4E 44 22 |"FILE NOT FOUND"|
000014F0: 00 10 1D FA 05 44 45 24 28 35 29 B2 22 44 45 56 |.....DE$(5)."DEV|
00001500: 49 43 45 20 4E 4F 54 20 50 52 45 53 45 4E 54 22 |ICE NOT PRESENT"|
00001510: 00 31 1D 04 06 44 45 24 28 36 29 B2 22 46 49 4C |.1...DE$(6)."FIL|
00001520: 45 20 4E 4F 54 20 49 4E 50 55 54 20 54 59 50 45 |E NOT INPUT TYPE|
00001530: 22 00 53 1D 0E 06 44 45 24 28 37 29 B2 22 46 49 |".S...DE$(7)."FI|
00001540: 4C 45 20 4E 4F 54 20 4F 55 54 50 55 54 20 54 59 |LE NOT OUTPUT TY|
00001550: 50 45 22 00 72 1D 18 06 44 45 24 28 38 29 B2 22 |PE".r...DE$(8)."|
00001560: 46 49 4C 45 20 4E 41 4D 45 20 4D 49 53 53 49 4E |FILE NAME MISSIN|
00001570: 47 22 00 90 1D 22 06 44 45 24 28 39 29 B2 22 49 |G"...".DE$(9)."I|
00001580: 4C 4C 45 47 41 4C 20 44 45 56 49 43 45 20 23 22 |LLEGAL DEVICE #"|
00001590: 00 AF 1D 2C 06 44 45 24 28 31 30 29 B2 22 53 54 |...,.DE$(10)."ST|
000015A0: 4F 50 20 4B 45 59 20 50 52 45 53 53 45 44 22 00 |OP KEY PRESSED".|
000015B0: D1 1D 36 06 44 45 24 28 31 31 29 B2 22 52 53 2D |..6.DE$(11)."RS-|
000015C0: 32 33 32 20 42 55 46 46 45 52 20 41 4C 4C 4F 43 |232 BUFFER ALLOC|
000015D0: 22 00 ED 1D 40 06 44 45 24 28 31 32 29 B2 22 54 |"...@.DE$(12)."T|
000015E0: 49 4D 45 4F 55 54 20 57 52 49 54 45 22 00 08 1E |IMEOUT WRITE"...|
000015F0: 4A 06 44 45 24 28 31 33 29 B2 22 54 49 4D 45 4F |J.DE$(13)."TIMEO|
00001600: 55 54 20 52 45 41 44 22 00 28 1E 54 06 44 45 24 |UT READ".(.T.DE$|
00001610: 28 31 34 29 B2 22 45 4E 44 20 4F 52 20 49 44 45 |(14)."END OR IDE|
00001620: 4E 54 20 4C 49 4E 45 22 00 49 1E 5E 06 44 45 24 |NT LINE".I.^.DE$|
00001630: 28 31 35 29 B2 22 44 45 56 49 43 45 20 4E 4F 54 |(15)."DEVICE NOT|
00001640: 20 50 52 45 53 45 4E 54 22 00 6E 1E 68 06 8F 20 | PRESENT".n.h.. |
00001650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 89 |**************..|
00001670: 1E 72 06 8F 20 2A 2A 2A 20 43 52 45 41 54 45 20 |.r.. *** CREATE |
00001680: 54 48 45 20 46 49 45 4C 44 00 AE 1E 7C 06 8F 20 |THE FIELD...|.. |
00001690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000016A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C1 |**************..|
000016B0: 1E 86 06 99 20 54 24 4D 53 24 49 24 22 33 92 13 |.... T$MS$I$"3..|
000016C0: 22 00 DD 1E 90 06 81 20 49 B2 32 20 A4 20 32 31 |"...... I.2 . 21|
000016D0: 20 3A 20 81 20 4A B2 39 20 A4 20 33 38 00 EF 1E | : . J.9 . 38...|
000016E0: 9A 06 97 20 43 4D AA 49 AC 34 30 AA 4A 2C 30 00 |... CM.I.40.J,0.|
000016F0: 03 1F A4 06 97 20 53 4D AA 49 AC 34 30 AA 4A 2C |..... SM.I.40.J,|
00001700: 4E 43 25 00 11 1F AE 06 82 20 4A 20 3A 20 82 20 |NC%...... J : . |
00001710: 49 00 3D 1F B8 06 99 20 A3 38 29 22 1F AC A2 A2 |I.=.... .8)"....|
00001720: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00001730: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 22 00 4C 1F |............".L.|
00001740: C2 06 81 20 49 B2 32 20 A4 20 32 31 00 5E 1F CC |... I.2 . 21.^..|
00001750: 06 99 20 A3 38 29 22 12 A1 22 20 3A 20 82 00 8A |.. .8)".." : ...|
00001760: 1F D6 06 99 20 A3 38 29 22 BC 12 A2 A2 A2 A2 A2 |.... .8)".......|
00001770: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00001780: A2 A2 A2 A2 A2 A2 A2 A2 A2 22 00 A6 1F E0 06 97 |........."......|
00001790: 20 53 4D AA 37 39 2C 31 32 33 20 3A 20 97 20 43 | SM.79,123 : . C|
000017A0: 4D AA 37 39 2C 36 00 C4 1F EA 06 97 20 53 4D AA |M.79,6...... SM.|
000017B0: 39 31 39 2C 31 32 36 20 3A 20 97 20 43 4D AA 39 |919,126 : . CM.9|
000017C0: 31 39 2C 36 00 DB 1F F4 06 81 20 49 B2 31 31 39 |19,6...... I.119|
000017D0: 20 A4 20 38 37 39 20 A9 20 34 30 00 F8 1F FE 06 | . 879 . 40.....|
000017E0: 97 20 53 4D AA 49 2C 39 37 20 3A 20 97 20 43 4D |. SM.I,97 : . CM|
000017F0: AA 49 2C 36 20 3A 20 82 00 1D 20 08 07 8F 20 2A |.I,6 : ... ... *|
00001800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 40 20 |*************.@ |
00001820: 12 07 8F 20 2A 2A 2A 20 4D 41 49 4E 20 4D 45 4E |... *** MAIN MEN|
00001830: 55 20 2B 20 4B 45 59 20 44 45 43 4F 44 49 4E 47 |U + KEY DECODING|
00001840: 00 65 20 1C 07 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.e ... *********|
00001850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001860: 2A 2A 2A 2A 2A 00 7B 20 26 07 97 20 50 41 52 4D |*****.{ &.. PARM|
00001870: 2C 31 20 3A 20 9E 31 38 36 33 35 00 91 20 30 07 |,1 : .18635.. 0.|
00001880: 97 20 50 41 52 4D 2C 31 20 3A 20 9E 32 30 35 37 |. PARM,1 : .2057|
00001890: 34 00 AF 20 3A 07 50 47 25 B2 31 20 3A 20 53 43 |4.. :.PG%.1 : SC|
000018A0: 25 B2 30 20 3A 20 97 20 35 33 32 36 39 2C 30 00 |%.0 : . 53269,0.|
000018B0: BF 20 44 07 99 20 46 4B 24 28 50 47 25 29 3B 00 |. D.. FK$(PG%);.|
000018C0: DA 20 4E 07 97 20 31 39 38 2C 30 20 3A 20 99 20 |. N.. 198,0 : . |
000018D0: 4D 53 24 4D 53 24 28 30 29 3B 00 E5 20 58 07 8D |MS$MS$(0);.. X..|
000018E0: 20 32 30 32 30 00 03 21 62 07 A1 20 4B 24 20 3A | 2020..!b.. K$ :|
000018F0: 20 8B 20 4B 24 20 B2 20 22 22 20 A7 20 89 20 31 | . K$ . "" . . 1|
00001900: 38 39 30 00 0F 21 6C 07 4B B2 C6 28 4B 24 29 00 |890..!l.K..(K$).|
00001910: 24 21 76 07 8B 20 4B B3 31 33 33 20 A7 20 89 20 |$!v.. K.133 . . |
00001920: 31 39 33 30 00 5A 21 80 07 91 20 4B AB 31 33 32 |1930.Z!... K.132|
00001930: 20 89 20 32 39 38 30 2C 32 33 34 30 2C 32 36 30 | . 2980,2340,260|
00001940: 30 2C 32 37 35 30 2C 32 30 37 30 2C 32 34 35 30 |0,2750,2070,2450|
00001950: 2C 32 36 36 30 2C 34 32 37 30 00 6F 21 8A 07 8B |,2660,4270.o!...|
00001960: 20 53 43 25 B2 30 20 A7 20 89 20 31 38 39 30 00 | SC%.0 . . 1890.|
00001970: 8F 21 94 07 8B 20 4B B2 31 34 35 20 A7 20 97 20 |.!... K.145 . . |
00001980: 50 41 52 4D 2C 31 20 3A 20 89 20 32 38 39 30 00 |PARM,1 : . 2890.|
00001990: AF 21 9E 07 8B 20 4B B2 30 31 37 20 A7 20 97 20 |.!... K.017 . . |
000019A0: 50 41 52 4D 2C 32 20 3A 20 89 20 32 38 39 30 00 |PARM,2 : . 2890.|
000019B0: CF 21 A8 07 8B 20 4B B2 31 35 37 20 A7 20 97 20 |.!... K.157 . . |
000019C0: 50 41 52 4D 2C 33 20 3A 20 89 20 32 38 39 30 00 |PARM,3 : . 2890.|
000019D0: EF 21 B2 07 8B 20 4B B2 30 32 39 20 A7 20 97 20 |.!... K.029 . . |
000019E0: 50 41 52 4D 2C 34 20 3A 20 89 20 32 38 39 30 00 |PARM,4 : . 2890.|
000019F0: FA 21 BC 07 89 20 31 38 39 30 00 1F 22 C6 07 8F |.!... 1890.."...|
00001A00: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00001A10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001A20: 42 22 D0 07 8F 20 2A 2A 2A 20 55 50 44 41 54 45 |B"... *** UPDATE|
00001A30: 20 54 48 45 20 47 45 4E 2F 53 4B 49 50 20 44 41 | THE GEN/SKIP DA|
00001A40: 54 41 00 67 22 DA 07 8F 20 2A 2A 2A 2A 2A 2A 2A |TA.g"... *******|
00001A50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A60: 2A 2A 2A 2A 2A 2A 2A 00 9D 22 E4 07 99 20 53 47 |*******.."... SG|
00001A70: 24 C9 28 C4 28 53 4B 49 50 29 2C 32 29 22 9D 9D |$.(.(SKIP),2)"..|
00001A80: 9D 9D 9D 9D 9D 9D 11 11 1D 1D 1D 1D 20 22 C9 28 |............ ".(|
00001A90: 22 20 22 AA C4 28 47 45 4E 29 2C 33 29 00 A3 22 |" "..(GEN),3).."|
00001AA0: EE 07 8E 00 C8 22 F8 07 8F 20 2A 2A 2A 2A 2A 2A |....."... ******|
00001AB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001AC0: 2A 2A 2A 2A 2A 2A 2A 2A 00 E8 22 02 08 8F 20 2A |********.."... *|
00001AD0: 2A 2A 20 52 45 52 55 4E 20 54 48 45 20 57 48 4F |** RERUN THE WHO|
00001AE0: 4C 45 20 54 48 49 4E 47 00 0D 23 0C 08 8F 20 2A |LE THING..#... *|
00001AF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001B00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2D 23 |*************.-#|
00001B10: 16 08 92 20 36 35 33 2C 31 2C 31 20 3A 20 8F 20 |... 653,1,1 : . |
00001B20: 54 49 4C 4C 20 4E 4F 20 53 48 49 46 54 00 3F 23 |TILL NO SHIFT.?#|
00001B30: 20 08 99 20 4D 53 24 4D 53 24 28 31 30 29 3B 00 | .. MS$MS$(10);.|
00001B40: 55 23 2A 08 97 20 50 41 52 4D 2C 32 20 3A 20 9E |U#*.. PARM,2 : .|
00001B50: 32 30 35 37 34 00 60 23 34 08 9E 31 38 37 31 32 |20574.`#4..18712|
00001B60: 00 73 23 3E 08 47 45 4E B2 30 20 3A 20 8D 20 32 |.s#>.GEN.0 : . 2|
00001B70: 30 32 30 00 8D 23 48 08 81 20 49 B2 30 20 A4 20 |020..#H.. I.0 . |
00001B80: 5A 20 3A 20 49 25 B2 C2 28 36 35 33 29 00 A7 23 |Z : I%..(653)..#|
00001B90: 52 08 8B 20 28 49 25 20 AF 20 31 29 B2 31 20 A7 |R.. (I% . 1).1 .|
00001BA0: 20 89 20 32 33 30 30 00 C1 23 5C 08 8B 20 28 49 | . 2300..#\.. (I|
00001BB0: 25 20 AF 20 34 29 B2 30 20 A7 20 89 20 32 31 36 |% . 4).0 . . 216|
00001BC0: 30 00 D7 23 66 08 81 20 4B B2 31 20 A4 20 36 30 |0..#f.. K.1 . 60|
00001BD0: 30 20 3A 20 82 20 4B 00 F7 23 70 08 91 20 5A 5A |0 : . K..#p.. ZZ|
00001BE0: 25 28 49 2C 30 29 20 89 20 32 31 38 30 2C 32 32 |%(I,0) . 2180,22|
00001BF0: 35 30 2C 32 32 37 30 00 02 24 7A 08 89 20 32 32 |50,2270..$z.. 22|
00001C00: 39 30 00 23 24 84 08 81 20 4A B2 31 20 A4 20 5A |90.#$... J.1 . Z|
00001C10: 5A 25 28 49 2C 31 29 20 3A 20 49 25 B2 C2 28 36 |Z%(I,1) : I%..(6|
00001C20: 35 33 29 00 3D 24 8E 08 8B 20 28 49 25 20 AF 20 |53).=$... (I% . |
00001C30: 31 29 B2 31 20 A7 20 89 20 32 33 30 30 00 57 24 |1).1 . . 2300.W$|
00001C40: 98 08 8B 20 28 49 25 20 AF 20 34 29 B2 30 20 A7 |... (I% . 4).0 .|
00001C50: 20 89 20 32 32 32 30 00 6D 24 A2 08 81 20 4B B2 | . 2220.m$... K.|
00001C60: 31 20 A4 20 36 30 30 20 3A 20 82 20 4B 00 81 24 |1 . 600 : . K..$|
00001C70: AC 08 9E 31 39 30 34 35 20 3A 20 9E 31 38 37 31 |...19045 : .1871|
00001C80: 32 00 98 24 B6 08 47 45 4E B2 47 45 4E AA 31 20 |2..$..GEN.GEN.1 |
00001C90: 3A 20 8D 20 32 30 32 30 00 A9 24 C0 08 82 20 4A |: . 2020..$... J|
00001CA0: 20 3A 20 89 20 32 32 39 30 00 C6 24 CA 08 97 20 | : . 2290..$... |
00001CB0: 50 41 52 4D 2C 5A 5A 25 28 49 2C 31 29 20 3A 20 |PARM,ZZ%(I,1) : |
00001CC0: 9E 31 39 38 38 33 00 D1 24 D4 08 89 20 32 32 38 |.19883..$... 228|
00001CD0: 30 00 DC 24 DE 08 9E 32 30 33 38 31 00 E7 24 E8 |0..$...20381..$.|
00001CE0: 08 9E 31 38 37 31 32 00 EF 24 F2 08 82 20 49 00 |..18712..$... I.|
00001CF0: 02 25 FC 08 53 43 25 B2 30 20 3A 20 89 20 31 38 |.%..SC%.0 : . 18|
00001D00: 37 30 00 27 25 06 09 8F 20 2A 2A 2A 2A 2A 2A 2A |70.'%... *******|
00001D10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D20: 2A 2A 2A 2A 2A 2A 2A 00 46 25 10 09 8F 20 2A 2A |*******.F%... **|
00001D30: 2A 20 52 55 4E 20 46 4F 52 20 31 20 47 45 4E 45 |* RUN FOR 1 GENE|
00001D40: 52 41 54 49 4F 4E 00 6B 25 1A 09 8F 20 2A 2A 2A |RATION.k%... ***|
00001D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 88 25 24 09 |***********..%$.|
00001D70: 99 20 4D 53 24 4D 53 24 28 32 29 3B 20 3A 20 47 |. MS$MS$(2); : G|
00001D80: 45 4E B2 47 45 4E AA 31 00 93 25 2E 09 9E 31 39 |EN.GEN.1..%...19|
00001D90: 30 34 35 00 9E 25 38 09 9E 31 38 37 31 32 00 B2 |045..%8..18712..|
00001DA0: 25 42 09 8B 20 5A B2 AB 31 20 A7 20 89 20 32 34 |%B.. Z..1 . . 24|
00001DB0: 30 30 00 E2 25 4C 09 8B 20 5A 5A 25 28 5A 2C 30 |00..%L.. ZZ%(Z,0|
00001DC0: 29 B2 31 20 A7 20 5A 5A 25 28 5A 2C 31 29 B2 5A |).1 . ZZ%(Z,1).Z|
00001DD0: 5A 25 28 5A 2C 31 29 AA 31 20 3A 20 89 20 32 34 |Z%(Z,1).1 : . 24|
00001DE0: 31 30 00 F7 25 56 09 8B 20 5A B2 32 35 35 20 A7 |10..%V.. Z.255 .|
00001DF0: 20 89 20 32 34 31 30 00 1B 26 60 09 5A B2 5A AA | . 2410..&`.Z.Z.|
00001E00: 31 20 3A 20 5A 5A 25 28 5A 2C 30 29 B2 31 20 3A |1 : ZZ%(Z,0).1 :|
00001E10: 20 5A 5A 25 28 5A 2C 31 29 B2 31 00 2E 26 6A 09 | ZZ%(Z,1).1..&j.|
00001E20: 53 43 25 B2 30 20 3A 20 89 20 31 38 37 30 00 53 |SC%.0 : . 1870.S|
00001E30: 26 74 09 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |&t.. ***********|
00001E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E50: 2A 2A 2A 00 73 26 7E 09 8F 20 2A 2A 2A 20 53 4B |***.s&~.. *** SK|
00001E60: 49 50 20 23 20 4F 46 20 47 45 4E 45 52 41 54 49 |IP # OF GENERATI|
00001E70: 4F 4E 53 00 98 26 88 09 8F 20 2A 2A 2A 2A 2A 2A |ONS..&... ******|
00001E80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E90: 2A 2A 2A 2A 2A 2A 2A 2A 00 B1 26 92 09 99 20 4D |********..&... M|
00001EA0: 53 24 4D 53 24 28 33 29 3B 20 3A 20 53 43 25 B2 |S$MS$(3); : SC%.|
00001EB0: 30 00 C7 26 9C 09 85 20 4E 20 3A 20 8B 20 4E B3 |0..&... N : . N.|
00001EC0: 31 20 A7 20 4E B2 31 00 D9 26 A6 09 8B 20 4E B1 |1 . N.1..&... N.|
00001ED0: 39 39 20 A7 20 4E B2 39 39 00 ED 26 B0 09 8B 20 |99 . N.99..&... |
00001EE0: 5A B2 AB 31 20 A7 20 89 20 32 35 31 30 00 1D 27 |Z..1 . . 2510..'|
00001EF0: BA 09 8B 20 5A 5A 25 28 5A 2C 30 29 B2 31 20 A7 |... ZZ%(Z,0).1 .|
00001F00: 20 5A 5A 25 28 5A 2C 31 29 B2 5A 5A 25 28 5A 2C | ZZ%(Z,1).ZZ%(Z,|
00001F10: 31 29 AA 4E 20 3A 20 89 20 32 35 32 30 00 32 27 |1).N : . 2520.2'|
00001F20: C4 09 8B 20 5A B2 32 35 35 20 A7 20 89 20 32 35 |... Z.255 . . 25|
00001F30: 32 30 00 56 27 CE 09 5A B2 5A AA 31 20 3A 20 5A |20.V'..Z.Z.1 : Z|
00001F40: 5A 25 28 5A 2C 30 29 B2 31 20 3A 20 5A 5A 25 28 |Z%(Z,0).1 : ZZ%(|
00001F50: 5A 2C 31 29 B2 4E 00 6C 27 D8 09 81 20 53 4B 49 |Z,1).N.l'... SKI|
00001F60: 50 B2 4E 20 A4 20 31 20 A9 20 AB 31 00 80 27 E2 |P.N . 1 . .1..'.|
00001F70: 09 9E 31 39 30 34 35 20 3A 20 9E 31 38 37 31 32 |..19045 : .18712|
00001F80: 00 97 27 EC 09 47 45 4E B2 47 45 4E AA 31 20 3A |..'..GEN.GEN.1 :|
00001F90: 20 8D 20 32 30 32 30 00 9D 27 F6 09 82 00 B1 27 | . 2020..'.....'|
00001FA0: 00 0A 9E 31 38 37 31 32 20 3A 20 89 20 31 38 37 |...18712 : . 187|
00001FB0: 30 00 D6 27 0A 0A 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |0..'... ********|
00001FC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001FD0: 2A 2A 2A 2A 2A 2A 00 F3 27 14 0A 8F 20 2A 2A 2A |******..'... ***|
00001FE0: 20 53 43 52 4F 4C 4C 20 54 48 45 20 50 41 54 54 | SCROLL THE PATT|
00001FF0: 45 52 4E 00 18 28 1E 0A 8F 20 2A 2A 2A 2A 2A 2A |ERN..(... ******|
00002000: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002010: 2A 2A 2A 2A 2A 2A 2A 2A 00 29 28 28 0A 99 20 4D |********.)((.. M|
00002020: 53 24 4D 53 24 28 34 29 3B 00 3D 28 32 0A 81 20 |S$MS$(4);.=(2.. |
00002030: 54 B2 31 20 A4 20 36 30 30 20 3A 20 82 00 50 28 |T.1 . 600 : ..P(|
00002040: 3C 0A 53 43 25 B2 31 20 3A 20 89 20 31 38 37 30 |<.SC%.1 : . 1870|
00002050: 00 75 28 46 0A 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |.u(F.. *********|
00002060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002070: 2A 2A 2A 2A 2A 00 92 28 50 0A 8F 20 2A 2A 2A 20 |*****..(P.. *** |
00002080: 43 45 4E 54 52 45 20 54 48 45 20 50 41 54 54 45 |CENTRE THE PATTE|
00002090: 52 4E 00 B7 28 5A 0A 8F 20 2A 2A 2A 2A 2A 2A 2A |RN..(Z.. *******|
000020A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000020B0: 2A 2A 2A 2A 2A 2A 2A 00 D0 28 64 0A 99 20 4D 53 |*******..(d.. MS|
000020C0: 24 4D 53 24 28 35 29 3B 20 3A 20 53 43 25 B2 30 |$MS$(5); : SC%.0|
000020D0: 00 DB 28 6E 0A 9E 32 30 33 38 31 00 E6 28 78 0A |..(n..20381..(x.|
000020E0: 9E 31 38 37 31 32 00 FB 28 82 0A 8B 20 5A B2 32 |.18712..(... Z.2|
000020F0: 35 35 20 A7 20 89 20 32 37 31 30 00 1F 29 8C 0A |55 . . 2710..)..|
00002100: 5A B2 5A AA 31 20 3A 20 5A 5A 25 28 5A 2C 30 29 |Z.Z.1 : ZZ%(Z,0)|
00002110: B2 33 20 3A 20 5A 5A 25 28 5A 2C 31 29 B2 30 00 |.3 : ZZ%(Z,1).0.|
00002120: 2A 29 96 0A 89 20 31 38 37 30 00 4F 29 A0 0A 8F |*)... 1870.O)...|
00002130: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00002140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00002150: 65 29 AA 0A 8F 20 2A 2A 2A 20 50 52 4F 47 52 41 |e)... *** PROGRA|
00002160: 4D 20 45 4E 44 00 8A 29 B4 0A 8F 20 2A 2A 2A 2A |M END..)... ****|
00002170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A8 29 BE 0A 97 |**********..)...|
00002190: 20 35 33 32 37 32 2C 28 C2 28 35 33 32 37 32 29 | 53272,(.(53272)|
000021A0: AF 20 32 34 30 29 B0 35 00 C1 29 C8 0A 97 20 35 |. 240).5..)... 5|
000021B0: 36 35 37 36 2C C2 28 35 36 35 37 36 29 20 B0 20 |6576,.(56576) . |
000021C0: 33 00 DA 29 D2 0A 97 20 35 36 35 37 38 2C C2 28 |3..)... 56578,.(|
000021D0: 35 36 35 37 38 29 20 B0 20 33 00 E6 29 DC 0A 97 |56578) . 3..)...|
000021E0: 20 36 34 38 2C 34 00 0B 2A E6 0A 49 B2 31 30 AC | 648,4..*..I.10.|
000021F0: 34 30 39 36 20 3A 20 8F 20 52 45 53 45 54 20 54 |4096 : . RESET T|
00002200: 4F 50 20 4F 46 20 4D 45 4D 52 59 00 27 2A F0 0A |OP OF MEMRY.'*..|
00002210: 97 20 35 32 2C 49 AD 32 35 36 20 3A 20 97 20 35 |. 52,I.256 : . 5|
00002220: 36 2C C2 28 35 32 29 00 3C 2A FA 0A 97 20 35 31 |6,.(52).<*... 51|
00002230: 2C 49 AB C2 28 35 32 29 AC 32 35 36 00 4F 2A 04 |,I..(52).256.O*.|
00002240: 0B 97 20 35 35 2C C2 28 35 31 29 20 3A 20 9C 00 |.. 55,.(51) : ..|
00002250: 6A 2A 0E 0B 97 20 35 33 32 38 30 2C 31 34 20 3A |j*... 53280,14 :|
00002260: 20 97 20 35 33 32 38 31 2C 36 00 85 2A 18 0B 99 | . 53281,6..*...|
00002270: 20 22 93 9A 4C 49 46 45 20 49 53 20 4F 56 45 52 | "..LIFE IS OVER|
00002280: 22 C7 28 39 29 00 90 2A 22 0B 89 20 35 33 37 30 |".(9)..*".. 5370|
00002290: 00 B5 2A 2C 0B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..*,.. *********|
000022A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022B0: 2A 2A 2A 2A 2A 00 D7 2A 36 0B 8F 20 2A 2A 2A 20 |*****..*6.. *** |
000022C0: 4D 4F 56 45 20 54 48 45 20 50 41 54 54 45 52 4E |MOVE THE PATTERN|
000022D0: 20 41 52 4F 55 4E 44 00 FC 2A 40 0B 8F 20 2A 2A | AROUND..*@.. **|
000022E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0D 2B 4A |************..+J|
00002300: 0B 99 20 4D 53 24 4D 53 24 28 39 29 3B 00 18 2B |.. MS$MS$(9);..+|
00002310: 54 0B 9E 31 39 38 38 33 00 23 2B 5E 0B 9E 31 38 |T..19883.#+^..18|
00002320: 37 31 32 00 38 2B 68 0B 8B 20 5A B2 32 35 35 20 |712.8+h.. Z.255 |
00002330: A7 20 89 20 32 39 34 30 00 62 2B 72 0B 5A B2 5A |. . 2940.b+r.Z.Z|
00002340: AA 31 20 3A 20 5A 5A 25 28 5A 2C 30 29 B2 32 20 |.1 : ZZ%(Z,0).2 |
00002350: 3A 20 5A 5A 25 28 5A 2C 31 29 B2 C2 28 50 41 52 |: ZZ%(Z,1)..(PAR|
00002360: 4D 29 00 6D 2B 7C 0B 89 20 31 38 37 30 00 92 2B |M).m+|.. 1870..+|
00002370: 86 0B 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00002380: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002390: 2A 2A 00 B5 2B 90 0B 8F 20 2A 2A 2A 20 45 44 49 |**..+... *** EDI|
000023A0: 54 20 4D 45 4E 55 20 2B 20 4B 45 59 20 44 45 43 |T MENU + KEY DEC|
000023B0: 4F 44 49 4E 47 00 DA 2B 9A 0B 8F 20 2A 2A 2A 2A |ODING..+... ****|
000023C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000023D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F4 2B A4 0B 50 |**********..+..P|
000023E0: 47 25 B2 32 20 3A 20 53 50 25 B2 31 20 3A 20 52 |G%.2 : SP%.1 : R|
000023F0: 45 25 B2 30 00 12 2C AE 0B 97 20 53 4D AA 31 30 |E%.0..,... SM.10|
00002400: 31 36 2C 53 50 25 20 3A 20 97 20 35 33 32 36 39 |16,SP% : . 53269|
00002410: 2C 31 00 2E 2C B8 0B 97 20 35 33 32 34 38 2C 39 |,1..,... 53248,9|
00002420: 36 20 3A 20 97 20 35 33 32 34 39 2C 36 36 00 3C |6 : . 53249,66.<|
00002430: 2C C2 0B 97 20 35 33 32 36 34 2C 30 00 54 2C CC |,... 53264,0.T,.|
00002440: 0B 99 20 46 4B 24 28 50 47 25 29 3B 20 3A 20 53 |.. FK$(PG%); : S|
00002450: 43 25 B2 30 00 6F 2C D6 0B 97 20 31 39 38 2C 30 |C%.0.o,... 198,0|
00002460: 20 3A 20 99 20 4D 53 24 4D 53 24 28 31 29 3B 00 | : . MS$MS$(1);.|
00002470: 8B 2C E0 0B A1 20 4B 24 20 3A 20 8B 20 4B 24 B2 |.,... K$ : . K$.|
00002480: 22 22 20 A7 20 89 20 33 31 34 30 00 97 2C EA 0B |"" . . 3140..,..|
00002490: 4B B2 C6 28 4B 24 29 00 AC 2C F4 0B 8B 20 4B B3 |K..(K$)..,... K.|
000024A0: 31 33 33 20 A7 20 89 20 33 30 38 30 00 E2 2C FE |133 . . 3080..,.|
000024B0: 0B 91 20 4B AB 31 33 32 20 89 20 33 33 35 30 2C |.. K.132 . 3350,|
000024C0: 33 36 33 30 2C 34 30 34 30 2C 34 31 32 30 2C 33 |3630,4040,4120,3|
000024D0: 35 37 30 2C 33 31 34 30 2C 33 31 34 30 2C 34 32 |570,3140,3140,42|
000024E0: 37 30 00 13 2D 08 0C 58 25 B2 C2 28 35 33 32 34 |70..-..X%..(5324|
000024F0: 38 29 AA 32 35 36 AC 28 C2 28 35 33 32 36 34 29 |8).256.(.(53264)|
00002500: 20 AF 20 31 29 20 3A 20 59 25 B2 C2 28 35 33 32 | . 1) : Y%..(532|
00002510: 34 39 29 00 28 2D 12 0C 8B 20 4B B2 30 33 32 20 |49).(-... K.032 |
00002520: A7 20 89 20 34 32 32 30 00 3D 2D 1C 0C 8B 20 4B |. . 4220.=-... K|
00002530: B2 31 34 35 20 A7 20 89 20 33 32 31 30 00 52 2D |.145 . . 3210.R-|
00002540: 26 0C 8B 20 4B B2 30 31 37 20 A7 20 89 20 33 32 |&.. K.017 . . 32|
00002550: 33 30 00 67 2D 30 0C 8B 20 4B B2 31 35 37 20 A7 |30.g-0.. K.157 .|
00002560: 20 89 20 33 32 35 30 00 7C 2D 3A 0C 8B 20 4B B2 | . 3250.|-:.. K.|
00002570: 30 32 39 20 A7 20 89 20 33 32 37 30 00 8F 2D 44 |029 . . 3270..-D|
00002580: 0C 81 20 54 B2 31 20 A4 20 32 35 20 3A 20 82 00 |.. T.1 . 25 : ..|
00002590: AB 2D 4E 0C 53 50 25 B2 53 50 25 AB 28 53 50 25 |.-N.SP%.SP%.(SP%|
000025A0: B2 31 29 AA 28 53 50 25 B2 32 29 00 BD 2D 58 0C |.1).(SP%.2)..-X.|
000025B0: 97 20 53 4D AA 31 30 31 36 2C 53 50 25 00 C8 2D |. SM.1016,SP%..-|
000025C0: 62 0C 89 20 33 30 34 30 00 ED 2D 6C 0C 8F 20 2A |b.. 3040..-l.. *|
000025D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000025E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0E 2E |*************...|
000025F0: 76 0C 8F 20 2A 2A 2A 20 4D 4F 56 45 20 54 48 45 |v.. *** MOVE THE|
00002600: 20 43 55 52 53 4F 52 20 41 52 4F 55 4E 44 00 33 | CURSOR AROUND.3|
00002610: 2E 80 0C 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.... ***********|
00002620: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002630: 2A 2A 2A 00 52 2E 8A 0C 59 25 B2 59 25 AB 34 20 |***.R...Y%.Y%.4 |
00002640: 3A 20 8B 20 59 25 B3 36 36 20 A7 20 59 25 B2 32 |: . Y%.66 . Y%.2|
00002650: 32 32 00 5D 2E 94 0C 89 20 33 32 34 30 00 7C 2E |22.].... 3240.|.|
00002660: 9E 0C 59 25 B2 59 25 AA 34 20 3A 20 8B 20 59 25 |..Y%.Y%.4 : . Y%|
00002670: B1 32 32 32 20 A7 20 59 25 B2 36 36 00 94 2E A8 |.222 . Y%.66....|
00002680: 0C 97 20 35 33 32 34 39 2C 59 25 20 3A 20 89 20 |.. 53249,Y% : . |
00002690: 33 31 34 30 00 B3 2E B2 0C 58 25 B2 58 25 AB 34 |3140.....X%.X%.4|
000026A0: 20 3A 20 8B 20 58 25 B3 39 36 20 A7 20 58 25 B2 | : . X%.96 . X%.|
000026B0: 33 33 32 00 BE 2E BC 0C 89 20 33 32 38 30 00 DD |332...... 3280..|
000026C0: 2E C6 0C 58 25 B2 58 25 AA 34 20 3A 20 8B 20 58 |...X%.X%.4 : . X|
000026D0: 25 B1 33 33 32 20 A7 20 58 25 B2 39 36 00 F0 2E |%.332 . X%.96...|
000026E0: D0 0C 97 20 35 33 32 36 34 2C 58 25 AD 32 35 36 |... 53264,X%.256|
000026F0: 00 0C 2F DA 0C 97 20 35 33 32 34 38 2C 58 25 AB |../... 53248,X%.|
00002700: 32 35 36 AC C2 28 35 33 32 36 34 29 00 1F 2F E4 |256..(53264)../.|
00002710: 0C 81 20 54 B2 31 20 A4 20 31 30 20 3A 20 82 00 |.. T.1 . 10 : ..|
00002720: 2A 2F EE 0C 89 20 33 31 35 30 00 4F 2F F8 0C 8F |*/... 3150.O/...|
00002730: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00002740: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00002750: 6C 2F 02 0D 8F 20 2A 2A 2A 20 4C 4F 41 44 20 41 |l/... *** LOAD A|
00002760: 20 4E 45 57 20 50 41 54 54 45 52 4E 00 91 2F 0C | NEW PATTERN../.|
00002770: 0D 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00002780: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002790: 2A 00 9F 2F 16 0D 97 20 35 33 32 36 39 2C 30 00 |*../... 53269,0.|
000027A0: B0 2F 20 0D 99 20 4D 53 24 4D 53 24 28 36 29 3B |./ .. MS$MS$(6);|
000027B0: 00 C9 2F 2A 0D 8D 20 33 39 30 30 20 3A 20 46 4C |../*.. 3900 : FL|
000027C0: 24 B2 46 4C 24 AA 22 52 22 00 DD 2F 34 0D 97 20 |$.FL$."R"../4.. |
000027D0: 42 55 46 46 AA 30 2C C3 28 46 4C 24 29 00 F0 2F |BUFF.0,.(FL$)../|
000027E0: 3E 0D 81 20 49 B2 31 20 A4 20 C3 28 46 4C 24 29 |>.. I.1 . .(FL$)|
000027F0: 00 0B 30 48 0D 97 20 42 55 46 46 AA 49 2C C6 28 |..0H.. BUFF.I,.(|
00002800: CA 28 46 4C 24 2C 49 2C 31 29 29 00 11 30 52 0D |.(FL$,I,1))..0R.|
00002810: 82 00 1F 30 5C 0D 9F 20 31 35 2C 38 2C 31 35 00 |...0\.. 15,8,15.|
00002820: 36 30 66 0D 9E 32 30 37 31 35 20 3A 20 49 B2 C2 |60f..20715 : I..|
00002830: 28 50 41 52 4D 29 00 46 30 70 0D 84 31 35 2C 45 |(PARM).F0p..15,E|
00002840: 4E 24 2C 45 4D 24 00 5F 30 7A 0D 8B 20 C5 28 45 |N$,EM$._0z.. .(E|
00002850: 4E 24 29 B3 B1 30 20 A7 20 89 20 33 34 38 30 00 |N$)..0 . . 3480.|
00002860: 81 30 84 0D 8B 20 49 B2 30 20 B0 20 49 B2 31 34 |.0... I.0 . I.14|
00002870: 20 A7 20 52 45 25 B2 31 20 3A 20 89 20 33 35 31 | . RE%.1 : . 351|
00002880: 30 00 90 30 8E 0D 45 4D 24 B2 44 45 24 28 49 29 |0..0..EM$.DE$(I)|
00002890: 00 C8 30 98 0D 99 20 4D 53 24 44 45 24 C8 28 45 |..0... MS$DE$.(E|
000028A0: 4D 24 AA 22 20 20 20 20 20 20 20 20 20 20 20 20 |M$." |
000028B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000028C0: 20 20 22 2C 32 36 29 3B 00 DD 30 A2 0D 81 20 54 | ",26);..0... T|
000028D0: B2 31 20 A4 20 31 30 30 30 20 3A 20 82 00 F3 30 |.1 . 1000 : ...0|
000028E0: AC 0D 97 20 50 41 52 4D 2C 32 20 3A 20 9E 32 30 |... PARM,2 : .20|
000028F0: 35 37 34 00 FE 30 B6 0D 9E 31 38 37 31 32 00 0D |574..0...18712..|
00002900: 31 C0 0D A0 20 32 20 3A 20 A0 20 31 35 00 24 31 |1... 2 : . 15.$1|
00002910: CA 0D 97 20 35 33 32 36 39 2C 31 20 3A 20 89 20 |... 53269,1 : . |
00002920: 33 30 33 30 00 49 31 D4 0D 8F 20 2A 2A 2A 2A 2A |3030.I1... *****|
00002930: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 69 31 DE 0D 8F 20 |*********.i1... |
00002950: 2A 2A 2A 20 52 45 53 45 54 20 54 4F 20 54 48 45 |*** RESET TO THE|
00002960: 20 4F 52 49 47 49 4E 41 4C 00 8E 31 E8 0D 8F 20 | ORIGINAL..1... |
00002970: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A4 |**************..|
00002990: 31 F2 0D 97 20 50 41 52 4D 2C 32 20 3A 20 9E 32 |1... PARM,2 : .2|
000029A0: 30 35 37 34 00 AF 31 FC 0D 9E 31 38 37 31 32 00 |0574..1...18712.|
000029B0: C2 31 06 0E 52 45 25 B2 31 20 3A 20 89 20 33 31 |.1..RE%.1 : . 31|
000029C0: 34 30 00 E7 31 10 0E 8F 20 2A 2A 2A 2A 2A 2A 2A |40..1... *******|
000029D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000029E0: 2A 2A 2A 2A 2A 2A 2A 00 0A 32 1A 0E 8F 20 2A 2A |*******..2... **|
000029F0: 2A 20 53 41 56 45 20 54 48 45 20 43 55 52 52 45 |* SAVE THE CURRE|
00002A00: 4E 54 20 50 41 54 54 45 52 4E 00 2F 32 24 0E 8F |NT PATTERN./2$..|
00002A10: 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ***************|
00002A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00002A30: 3D 32 2E 0E 97 20 35 33 32 36 39 2C 30 00 4E 32 |=2... 53269,0.N2|
00002A40: 38 0E 99 20 4D 53 24 4D 53 24 28 37 29 3B 00 67 |8.. MS$MS$(7);.g|
00002A50: 32 42 0E 8D 20 33 39 30 30 20 3A 20 46 4C 24 B2 |2B.. 3900 : FL$.|
00002A60: 46 4C 24 AA 22 57 22 00 75 32 4C 0E 9F 20 31 35 |FL$."W".u2L.. 15|
00002A70: 2C 38 2C 31 35 00 89 32 56 0E 97 20 42 55 46 46 |,8,15..2V.. BUFF|
00002A80: AA 30 2C C3 28 46 4C 24 29 00 9C 32 60 0E 81 20 |.0,.(FL$)..2`.. |
00002A90: 49 B2 31 20 A4 20 C3 28 46 4C 24 29 00 B7 32 6A |I.1 . .(FL$)..2j|
00002AA0: 0E 97 20 42 55 46 46 AA 49 2C C6 28 CA 28 46 4C |.. BUFF.I,.(.(FL|
00002AB0: 24 2C 49 2C 31 29 29 00 BD 32 74 0E 82 00 D4 32 |$,I,1))..2t....2|
00002AC0: 7E 0E 9E 32 30 38 36 37 20 3A 20 49 B2 C2 28 50 |~..20867 : I..(P|
00002AD0: 41 52 4D 29 00 E4 32 88 0E 84 31 35 2C 45 4E 24 |ARM)..2...15,EN$|
00002AE0: 2C 45 4D 24 00 FC 32 92 0E 8B 20 C5 28 45 4E 24 |,EM$..2... .(EN$|
00002AF0: 29 B2 30 20 A7 20 89 20 33 38 31 30 00 16 33 9C |).0 . . 3810..3.|
00002B00: 0E 8B 20 C5 28 45 4E 24 29 B3 B1 36 33 20 A7 20 |.. .(EN$)..63 . |
00002B10: 89 20 33 38 33 30 00 50 33 A6 0E 99 20 4D 53 24 |. 3830.P3... MS$|
00002B20: 22 1C 46 49 4C 45 20 45 58 49 53 54 53 2E 20 20 |".FILE EXISTS. |
00002B30: 52 45 50 4C 41 43 45 20 28 59 45 53 20 4F 52 20 |REPLACE (YES OR |
00002B40: 4E 4F 29 3F 1F 20 20 20 20 20 9D 9D 9D 9D 22 3B |NO)?. ....";|
00002B50: 00 6C 33 B0 0E A1 20 4B 24 20 3A 20 8B 20 4B 24 |.l3... K$ : . K$|
00002B60: B2 22 22 20 A7 20 89 20 33 37 36 30 00 8D 33 BA |."" . . 3760..3.|
00002B70: 0E 8B 20 4B 24 B3 B1 22 59 22 20 AF 20 4B 24 B3 |.. K$.."Y" . K$.|
00002B80: B1 22 4E 22 20 A7 20 89 20 33 37 36 30 00 97 33 |."N" . . 3760..3|
00002B90: C4 0E 99 20 4B 24 3B 00 AD 33 CE 0E 8B 20 4B 24 |... K$;..3... K$|
00002BA0: B2 22 4E 22 20 A7 20 89 20 33 38 35 30 00 C6 33 |."N" . . 3850..3|
00002BB0: D8 0E 46 4C 24 B2 22 40 22 AA 46 4C 24 20 3A 20 |..FL$."@".FL$ : |
00002BC0: 89 20 33 36 37 30 00 D9 33 E2 0E 8B 20 49 B2 30 |. 3670..3... I.0|
00002BD0: 20 A7 20 89 20 33 38 35 30 00 E8 33 EC 0E 45 4D | . . 3850..3..EM|
00002BE0: 24 B2 44 45 24 28 49 29 00 20 34 F6 0E 99 20 4D |$.DE$(I). 4... M|
00002BF0: 53 24 44 45 24 C8 28 45 4D 24 AA 22 20 20 20 20 |S$DE$.(EM$." |
00002C00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002C10: 20 20 20 20 20 20 20 20 20 20 22 2C 32 36 29 3B | ",26);|
00002C20: 00 35 34 00 0F 81 20 54 B2 31 20 A4 20 31 30 30 |.54... T.1 . 100|
00002C30: 30 20 3A 20 82 00 44 34 0A 0F A0 20 32 20 3A 20 |0 : ..D4... 2 : |
00002C40: A0 20 31 35 00 5B 34 14 0F 97 20 35 33 32 36 39 |. 15.[4... 53269|
00002C50: 2C 31 20 3A 20 89 20 33 30 33 30 00 80 34 1E 0F |,1 : . 3030..4..|
00002C60: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00002C70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002C80: 00 A5 34 28 0F 8F 20 2A 2A 2A 20 47 45 54 20 54 |..4(.. *** GET T|
00002C90: 48 45 20 46 49 4C 45 4E 41 4D 45 20 46 52 4F 4D |HE FILENAME FROM|
00002CA0: 20 55 53 45 52 00 CA 34 32 0F 8F 20 2A 2A 2A 2A | USER..42.. ****|
00002CB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002CC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DB 34 3C 0F 46 |**********..4<.F|
00002CD0: 4C 24 B2 22 22 20 3A 20 4E B2 30 00 F7 34 41 0F |L$."" : N.0..4A.|
00002CE0: A1 20 4B 24 20 3A 20 8B 20 4B 24 B2 22 22 20 A7 |. K$ : . K$."" .|
00002CF0: 20 89 20 33 39 30 35 00 0F 35 46 0F 8B 20 4B 24 | . 3905..5F.. K$|
00002D00: B2 C7 28 31 33 29 20 A7 20 89 20 33 39 34 35 00 |..(13) . . 3945.|
00002D10: 33 35 4B 0F 8B 20 4B 24 B3 C7 28 33 32 29 20 B0 |35K.. K$..(32) .|
00002D20: 20 4B 24 B1 C7 28 32 32 31 29 20 A7 20 89 20 33 | K$..(221) . . 3|
00002D30: 39 33 30 00 57 35 50 0F 8B 20 4B 24 B1 C7 28 39 |930.W5P.. K$..(9|
00002D40: 33 29 20 AF 20 4B 24 B3 C7 28 31 36 30 29 20 A7 |3) . K$..(160) .|
00002D50: 20 89 20 33 39 33 30 00 7F 35 55 0F 99 20 4B 24 | . 3930..5U.. K$|
00002D60: 3B 20 3A 20 46 4C 24 B2 46 4C 24 AA 4B 24 20 3A |; : FL$.FL$.K$ :|
00002D70: 20 4E B2 4E AA 31 20 3A 20 89 20 33 39 30 35 00 | N.N.1 : . 3905.|
00002D80: 92 35 5A 0F 8B 20 4E B2 30 20 A7 20 89 20 33 39 |.5Z.. N.0 . . 39|
00002D90: 30 30 00 A2 35 5F 0F 81 20 49 B2 30 20 A4 20 4E |00..5_.. I.0 . N|
00002DA0: AB 31 00 BC 35 64 0F 99 20 22 9D 20 9D 22 3B 20 |.1..5d.. ". ."; |
00002DB0: 3A 20 82 20 3A 20 89 20 33 39 30 30 00 D4 35 69 |: . : . 3900..5i|
00002DC0: 0F 8B 20 4E B2 30 20 A7 20 46 4C 24 B2 22 53 41 |.. N.0 . FL$."SA|
00002DD0: 56 45 44 22 00 EE 35 6E 0F 49 24 B2 C8 28 46 4C |VED"..5n.I$..(FL|
00002DE0: 24 2C 31 29 20 3A 20 4B 24 B2 22 30 3A 22 00 28 |$,1) : K$."0:".(|
00002DF0: 36 78 0F 8B 20 49 24 B2 22 30 22 20 B0 20 49 24 |6x.. I$."0" . I$|
00002E00: B2 22 31 22 20 A7 20 4B 24 B2 C8 28 46 4C 24 2C |."1" . K$..(FL$,|
00002E10: 32 29 20 3A 20 46 4C 24 B2 C9 28 46 4C 24 2C C3 |2) : FL$..(FL$,.|
00002E20: 28 46 4C 24 29 AB 32 29 00 59 36 82 0F 8B 20 49 |(FL$).2).Y6... I|
00002E30: 24 B2 22 40 22 20 A7 20 4B 24 B2 C8 28 46 4C 24 |$."@" . K$..(FL$|
00002E40: 2C 33 29 20 3A 20 46 4C 24 B2 C9 28 46 4C 24 2C |,3) : FL$..(FL$,|
00002E50: C3 28 46 4C 24 29 AB 33 29 00 79 36 8C 0F 8B 20 |.(FL$).3).y6... |
00002E60: C3 28 46 4C 24 29 B1 31 31 20 A7 20 46 4C 24 B2 |.(FL$).11 . FL$.|
00002E70: C8 28 46 4C 24 2C 31 31 29 00 93 36 96 0F 46 4C |.(FL$,11)..6..FL|
00002E80: 24 B2 4B 24 AA 46 4C 24 AA 22 2E 4C 49 46 45 2C |$.K$.FL$.".LIFE,|
00002E90: 53 2C 22 00 99 36 A0 0F 8E 00 BE 36 AA 0F 8F 20 |S,"..6.....6... |
00002EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002EB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DD |**************..|
00002EC0: 36 B4 0F 8F 20 2A 2A 2A 20 57 49 50 45 20 4F 55 |6... *** WIPE OU|
00002ED0: 54 20 54 48 45 20 50 41 54 54 45 52 4E 00 02 37 |T THE PATTERN..7|
00002EE0: BE 0F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00002EF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002F00: 2A 2A 00 13 37 C8 0F 99 20 4D 53 24 4D 53 24 28 |**..7... MS$MS$(|
00002F10: 38 29 3B 00 27 37 D2 0F 81 20 54 B2 31 20 A4 20 |8);.'7... T.1 . |
00002F20: 34 30 30 20 3A 20 82 00 46 37 DC 0F 97 20 50 41 |400 : ..F7... PA|
00002F30: 52 4D 2C 31 20 3A 20 8F 20 43 55 52 52 45 4E 54 |RM,1 : . CURRENT|
00002F40: 20 41 52 52 41 59 00 5A 37 E6 0F 9E 31 38 36 33 | ARRAY.Z7...1863|
00002F50: 35 20 3A 20 9E 31 38 37 31 32 00 6D 37 F0 0F 52 |5 : .18712.m7..R|
00002F60: 45 25 B2 31 20 3A 20 89 20 33 30 33 30 00 92 37 |E%.1 : . 3030..7|
00002F70: FA 0F 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00002F80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002F90: 2A 2A 00 B0 37 04 10 8F 20 2A 2A 2A 20 52 45 54 |**..7... *** RET|
00002FA0: 55 52 4E 20 54 4F 20 4D 41 49 4E 20 4D 45 4E 55 |URN TO MAIN MENU|
00002FB0: 00 D5 37 0E 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..7... *********|
00002FC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002FD0: 2A 2A 2A 2A 2A 00 EA 37 18 10 8B 20 52 45 25 B2 |*****..7... RE%.|
00002FE0: 30 20 A7 20 89 20 34 31 38 30 00 00 38 22 10 97 |0 . . 4180..8"..|
00002FF0: 20 50 41 52 4D 2C 31 20 3A 20 9E 32 30 35 37 34 | PARM,1 : .20574|
00003000: 00 14 38 2C 10 8B 20 5A B2 AB 31 20 A7 20 89 20 |..8,.. Z..1 . . |
00003010: 34 31 38 30 00 22 38 36 10 81 20 49 B2 30 20 A4 |4180."86.. I.0 .|
00003020: 20 5A 00 42 38 40 10 5A 5A 25 28 49 2C 30 29 B2 | Z.B8@.ZZ%(I,0).|
00003030: 30 20 3A 20 5A 5A 25 28 49 2C 31 29 B2 30 20 3A |0 : ZZ%(I,1).0 :|
00003040: 20 82 00 53 38 4A 10 47 45 4E B2 30 20 3A 20 5A | ..S8J.GEN.0 : Z|
00003050: B2 AB 31 00 5E 38 54 10 89 20 31 38 35 30 00 83 |..1.^8T.. 1850..|
00003060: 38 5E 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |8^.. ***********|
00003070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003080: 2A 2A 2A 00 9E 38 68 10 8F 20 2A 2A 2A 20 41 44 |***..8h.. *** AD|
00003090: 44 2F 44 45 4C 45 54 45 20 41 20 44 4F 54 00 C3 |D/DELETE A DOT..|
000030A0: 38 72 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |8r.. ***********|
000030B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000030C0: 2A 2A 2A 00 CE 38 7C 10 9E 31 38 38 34 37 00 E1 |***..8|..18847..|
000030D0: 38 86 10 52 45 25 B2 31 20 3A 20 89 20 33 31 34 |8..RE%.1 : . 314|
000030E0: 30 00 06 39 90 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |0..9... ********|
000030F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003100: 2A 2A 2A 2A 2A 2A 00 21 39 9A 10 8F 20 2A 2A 2A |******.!9... ***|
00003110: 20 48 45 4C 50 20 49 4E 46 4F 52 4D 41 54 49 4F | HELP INFORMATIO|
00003120: 4E 00 46 39 A4 10 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |N.F9... ********|
00003130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003140: 2A 2A 2A 2A 2A 2A 00 54 39 AE 10 97 20 35 33 32 |******.T9... 532|
00003150: 36 39 2C 30 00 6A 39 B8 10 97 20 50 41 52 4D 2C |69,0.j9... PARM,|
00003160: 31 20 3A 20 9E 32 30 34 35 37 00 7A 39 C2 10 99 |1 : .20457.z9...|
00003170: 20 54 24 22 11 11 11 11 11 22 00 98 39 CC 10 99 | T$"....."..9...|
00003180: 20 A3 35 29 22 12 46 31 92 20 47 45 4E 45 52 41 | .5)".F1. GENERA|
00003190: 4C 20 49 4E 46 4F 11 22 00 B7 39 D6 10 99 20 A3 |L INFO."..9... .|
000031A0: 35 29 22 12 46 33 92 20 46 55 4E 43 54 49 4F 4E |5)".F3. FUNCTION|
000031B0: 20 4B 45 59 53 11 22 00 CE 39 E0 10 99 20 A3 35 | KEYS."..9... .5|
000031C0: 29 22 12 46 35 92 20 52 45 54 55 52 4E 22 00 F9 |)".F5. RETURN"..|
000031D0: 39 EA 10 99 20 22 11 11 11 22 A3 35 29 22 50 52 |9... "...".5)"PR|
000031E0: 45 53 53 20 54 48 45 20 46 55 4E 43 54 49 4F 4E |ESS THE FUNCTION|
000031F0: 20 4B 45 59 2E 2E 2E 2E 22 00 13 3A F4 10 A1 20 | KEY...."..:... |
00003200: 4B 24 20 3A 20 8B 20 4B 24 B2 22 22 20 A7 20 34 |K$ : . K$."" . 4|
00003210: 33 34 30 00 38 3A FE 10 8B 20 C6 28 4B 24 29 B3 |340.8:... .(K$).|
00003220: 31 33 33 20 B0 20 C6 28 4B 24 29 B1 31 33 35 20 |133 . .(K$).135 |
00003230: A7 20 89 20 34 33 34 30 00 59 3A 08 11 91 20 C6 |. . 4340.Y:... .|
00003240: 28 4B 24 29 AB 31 33 32 20 89 20 34 34 33 30 2C |(K$).132 . 4430,|
00003250: 34 38 39 30 2C 34 33 37 30 00 6F 3A 12 11 97 20 |4890,4370.o:... |
00003260: 50 41 52 4D 2C 32 20 3A 20 9E 32 30 34 35 37 00 |PARM,2 : .20457.|
00003270: 84 3A 1C 11 8B 20 50 47 25 B2 31 20 A7 20 89 20 |.:... PG%.1 . . |
00003280: 31 38 37 30 00 9B 3A 26 11 97 20 35 33 32 36 39 |1870..:&.. 53269|
00003290: 2C 31 20 3A 20 89 20 33 31 34 30 00 C0 3A 30 11 |,1 : . 3140..:0.|
000032A0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000032B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000032C0: 00 DE 3A 3A 11 8F 20 2A 2A 2A 20 47 45 4E 45 52 |..::.. *** GENER|
000032D0: 41 4C 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 00 03 |AL INFORMATION..|
000032E0: 3B 44 11 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;D.. ***********|
000032F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003300: 2A 2A 2A 00 0F 3B 4E 11 99 20 54 24 22 11 22 00 |***..;N.. T$".".|
00003310: 3C 3B 58 11 99 20 22 1F 4C 49 46 45 90 20 49 53 |<;X.. ".LIFE. IS|
00003320: 20 41 20 53 49 4D 55 4C 41 54 49 4F 4E 20 4F 46 | A SIMULATION OF|
00003330: 20 54 48 45 20 42 49 52 54 48 2C 22 00 6A 3B 62 | THE BIRTH,".j;b|
00003340: 11 99 20 22 44 45 41 54 48 20 41 4E 44 20 47 52 |.. "DEATH AND GR|
00003350: 4F 57 54 48 20 4F 46 20 43 45 4C 4C 53 20 49 4E |OWTH OF CELLS IN|
00003360: 20 41 20 43 4C 4F 53 45 44 22 00 99 3B 6C 11 99 | A CLOSED"..;l..|
00003370: 20 22 45 4E 56 49 52 4F 4E 4D 45 4E 54 2E 20 20 | "ENVIRONMENT. |
00003380: 45 41 43 48 20 47 45 4E 45 52 41 54 49 4F 4E 20 |EACH GENERATION |
00003390: 44 45 56 45 4C 4F 50 53 22 00 C8 3B 76 11 99 20 |DEVELOPS"..;v.. |
000033A0: 22 42 59 20 4C 4F 4F 4B 49 4E 47 20 41 54 20 54 |"BY LOOKING AT T|
000033B0: 48 45 20 38 20 4E 45 49 47 48 42 4F 55 52 49 4E |HE 8 NEIGHBOURIN|
000033C0: 47 20 43 45 4C 4C 53 22 00 F8 3B 80 11 99 20 22 |G CELLS"..;... "|
000033D0: 4F 46 20 45 41 43 48 20 43 45 4C 4C 20 49 4E 20 |OF EACH CELL IN |
000033E0: 54 48 45 20 43 55 52 52 45 4E 54 20 47 45 4E 45 |THE CURRENT GENE|
000033F0: 52 41 54 49 4F 4E 2E 22 00 27 3C 8A 11 99 20 22 |RATION.".'<... "|
00003400: 54 48 45 20 52 55 4C 45 53 20 55 53 45 44 20 49 |THE RULES USED I|
00003410: 4E 20 54 48 49 53 20 45 56 41 4C 55 41 54 49 4F |N THIS EVALUATIO|
00003420: 4E 20 41 52 45 3A 22 00 4E 3C 94 11 99 20 22 11 |N ARE:".N<... ".|
00003430: 1F 20 20 47 45 4E 20 4E 20 20 4E 45 49 47 48 42 |. GEN N NEIGHB|
00003440: 4F 55 52 53 20 20 47 45 4E 20 4E 2B 31 22 00 7E |OURS GEN N+1".~|
00003450: 3C 9E 11 99 20 22 90 20 20 41 4C 49 56 45 20 20 |<... ". ALIVE |
00003460: 30 2C 31 2E 2E 2E 2E 2E 2E 2E 20 20 44 45 41 54 |0,1....... DEAT|
00003470: 48 20 28 49 53 4F 4C 41 54 49 4F 4E 29 22 00 A7 |H (ISOLATION)"..|
00003480: 3C A8 11 99 20 22 20 20 20 20 20 20 20 20 20 32 |<... " 2|
00003490: 2C 33 2E 2E 2E 2E 2E 2E 2E 20 20 53 54 41 59 53 |,3....... STAYS|
000034A0: 20 41 4C 49 56 45 22 00 D4 3C B2 11 99 20 22 20 | ALIVE"..<... " |
000034B0: 20 20 20 20 20 20 20 20 34 2C 35 2C 36 2C 37 2C | 4,5,6,7,|
000034C0: 38 2E 20 20 44 45 41 54 48 20 28 43 52 4F 57 44 |8. DEATH (CROWD|
000034D0: 45 44 29 22 00 FB 3C BC 11 99 20 22 20 20 45 4D |ED)"..<... " EM|
000034E0: 50 54 59 20 20 30 2C 31 2C 32 2E 2E 2E 2E 2E 20 |PTY 0,1,2..... |
000034F0: 20 4E 4F 20 43 48 41 4E 47 45 22 00 29 3D C6 11 | NO CHANGE".)=..|
00003500: 99 20 22 20 20 20 20 20 20 20 20 20 33 2E 2E 2E |. " 3...|
00003510: 2E 2E 2E 2E 2E 2E 20 20 4E 45 57 20 43 45 4C 4C |...... NEW CELL|
00003520: 20 49 53 20 42 4F 52 4E 22 00 50 3D D0 11 99 20 | IS BORN".P=... |
00003530: 22 20 20 20 20 20 20 20 20 20 34 2C 35 2C 36 2C |" 4,5,6,|
00003540: 37 2C 38 2E 20 20 4E 4F 20 43 48 41 4E 47 45 22 |7,8. NO CHANGE"|
00003550: 00 7E 3D DA 11 99 20 22 11 54 48 55 53 20 45 41 |.~=... ".THUS EA|
00003560: 43 48 20 53 55 43 43 45 53 53 49 56 45 20 47 45 |CH SUCCESSIVE GE|
00003570: 4E 45 52 41 54 49 4F 4E 20 49 53 20 41 22 00 A9 |NERATION IS A"..|
00003580: 3D E4 11 99 20 22 44 49 52 45 43 54 20 52 45 53 |=... "DIRECT RES|
00003590: 55 4C 54 20 4F 46 20 54 48 45 20 50 52 45 56 49 |ULT OF THE PREVI|
000035A0: 4F 55 53 20 4F 4E 45 2E 22 00 B6 3D EE 11 99 20 |OUS ONE."..=... |
000035B0: 4D 53 24 43 24 3B 00 C4 3D F8 11 92 20 36 35 33 |MS$C$;..=... 653|
000035C0: 2C 31 2C 30 00 D0 3D 02 12 99 20 54 24 22 11 22 |,1,0..=... T$"."|
000035D0: 00 FE 3D 0C 12 99 20 22 4D 41 4E 59 20 4F 46 20 |..=... "MANY OF |
000035E0: 54 48 45 20 49 4E 49 54 49 41 4C 20 50 41 54 54 |THE INITIAL PATT|
000035F0: 45 52 4E 53 20 4F 46 20 43 45 4C 4C 53 22 00 2C |ERNS OF CELLS".,|
00003600: 3E 16 12 99 20 22 57 49 4C 4C 20 47 52 4F 57 20 |>... "WILL GROW |
00003610: 41 4E 44 20 43 48 41 4E 47 45 20 49 4E 20 42 49 |AND CHANGE IN BI|
00003620: 5A 41 52 52 45 20 57 41 59 53 2E 22 00 5A 3E 20 |ZARRE WAYS.".Z> |
00003630: 12 99 20 22 53 4F 4D 45 20 57 49 4C 4C 20 44 45 |.. "SOME WILL DE|
00003640: 56 4F 4C 56 45 20 49 4E 54 4F 20 53 49 4E 47 4C |VOLVE INTO SINGL|
00003650: 45 20 4F 52 20 53 45 54 53 22 00 86 3E 2A 12 99 |E OR SETS"..>*..|
00003660: 20 22 4F 46 20 53 54 41 42 4C 45 20 4F 52 20 4F | "OF STABLE OR O|
00003670: 53 43 49 4C 4C 41 54 49 4E 47 20 50 41 54 54 45 |SCILLATING PATTE|
00003680: 52 4E 53 3A 11 22 00 A4 3E 34 12 43 B2 31 30 32 |RNS:."..>4.C.102|
00003690: 20 3A 20 8F 20 46 49 52 53 54 20 43 48 41 52 41 | : . FIRST CHARA|
000036A0: 43 54 45 52 00 D8 3E 3E 12 99 20 22 1F 12 53 54 |CTER..>>.. "..ST|
000036B0: 41 42 4C 45 92 20 20 20 42 4C 4F 43 4B 20 20 90 |ABLE. BLOCK .|
000036C0: 22 C7 28 43 AA 31 35 29 22 20 20 20 20 20 1F 42 |".(C.15)" .B|
000036D0: 4F 41 54 20 20 90 22 3B 00 EB 3E 48 12 99 20 C7 |OAT .";..>H.. .|
000036E0: 28 43 AA 36 29 C7 28 43 AA 39 29 00 05 3F 52 12 |(C.6).(C.9)..?R.|
000036F0: 99 20 A3 32 38 29 C7 28 43 AA 32 29 C7 28 43 AA |. .28).(C.2).(C.|
00003700: 31 29 22 11 22 00 2E 3F 5C 12 99 20 22 1F 12 4F |1)"."..?\.. "..O|
00003710: 53 43 49 4C 4C 41 54 49 4E 47 92 20 20 53 54 52 |SCILLATING. STR|
00003720: 45 45 54 4C 49 47 48 54 53 20 20 20 90 22 00 59 |EETLIGHTS .".Y|
00003730: 3F 66 12 99 20 A3 31 33 29 C7 28 43 AA 30 29 C7 |?f.. .13).(C.0).|
00003740: 28 43 AA 38 29 C7 28 43 AA 31 32 29 C7 28 43 AA |(C.8).(C.12).(C.|
00003750: 30 29 C7 28 43 AA 30 29 3B 00 82 3F 70 12 99 20 |0).(C.0);..?p.. |
00003760: A3 32 35 29 C7 28 43 AA 30 29 C7 28 43 AA 30 29 |.25).(C.0).(C.0)|
00003770: C7 28 43 AA 35 29 C7 28 43 AA 30 29 C7 28 43 AA |.(C.5).(C.0).(C.|
00003780: 30 29 00 AC 3F 7A 12 99 20 A3 31 33 29 C7 28 43 |0)..?z.. .13).(C|
00003790: AA 38 29 C7 28 43 AA 30 29 C7 28 43 AA 30 29 C7 |.8).(C.0).(C.0).|
000037A0: 28 43 AA 38 29 C7 28 43 AA 30 29 3B 00 D5 3F 84 |(C.8).(C.0);..?.|
000037B0: 12 99 20 A3 32 35 29 C7 28 43 AA 30 29 C7 28 43 |.. .25).(C.0).(C|
000037C0: AA 30 29 C7 28 43 AA 31 29 C7 28 43 AA 30 29 C7 |.0).(C.1).(C.0).|
000037D0: 28 43 AA 30 29 00 01 40 8E 12 99 20 A3 31 33 29 |(C.0)..@... .13)|
000037E0: C7 28 43 AA 31 30 29 C7 28 43 AA 30 29 C7 28 43 |.(C.10).(C.0).(C|
000037F0: AA 30 29 C7 28 43 AA 31 30 29 C7 28 43 AA 30 29 |.0).(C.10).(C.0)|
00003800: 3B 00 2A 40 98 12 99 20 A3 32 35 29 C7 28 43 AA |;.*@... .25).(C.|
00003810: 33 29 C7 28 43 AA 31 29 C7 28 43 AA 30 29 C7 28 |3).(C.1).(C.0).(|
00003820: 43 AA 33 29 C7 28 43 AA 31 29 00 55 40 A2 12 99 |C.3).(C.1).U@...|
00003830: 20 A3 31 33 29 C7 28 43 AA 30 29 C7 28 43 AA 38 | .13).(C.0).(C.8|
00003840: 29 C7 28 43 AA 31 32 29 C7 28 43 AA 30 29 C7 28 |).(C.12).(C.0).(|
00003850: 43 AA 30 29 3B 00 7E 40 AC 12 99 20 A3 32 35 29 |C.0);.~@... .25)|
00003860: C7 28 43 AA 30 29 C7 28 43 AA 30 29 C7 28 43 AA |.(C.0).(C.0).(C.|
00003870: 35 29 C7 28 43 AA 30 29 C7 28 43 AA 30 29 00 A8 |5).(C.0).(C.0)..|
00003880: 40 B6 12 99 20 A3 31 33 29 C7 28 43 AA 30 29 C7 |@... .13).(C.0).|
00003890: 28 43 AA 30 29 C7 28 43 AA 30 29 C7 28 43 AA 30 |(C.0).(C.0).(C.0|
000038A0: 29 C7 28 43 AA 30 29 3B 00 D1 40 C0 12 99 20 A3 |).(C.0);..@... .|
000038B0: 32 35 29 C7 28 43 AA 30 29 C7 28 43 AA 30 29 C7 |25).(C.0).(C.0).|
000038C0: 28 43 AA 31 29 C7 28 43 AA 30 29 C7 28 43 AA 30 |(C.1).(C.0).(C.0|
000038D0: 29 00 FB 40 CA 12 99 20 22 11 54 48 45 52 45 20 |)..@... ".THERE |
000038E0: 41 52 45 20 4D 41 4E 59 20 4F 54 48 45 52 20 49 |ARE MANY OTHER I|
000038F0: 4E 54 45 52 45 53 54 49 4E 47 22 00 28 41 D4 12 |NTERESTING".(A..|
00003900: 99 20 22 50 41 54 54 45 52 4E 53 20 50 4F 53 53 |. "PATTERNS POSS|
00003910: 49 42 4C 45 2E 20 20 45 58 50 45 52 49 4D 45 4E |IBLE. EXPERIMEN|
00003920: 54 20 41 20 42 49 54 22 00 54 41 DE 12 99 20 22 |T A BIT".TA... "|
00003930: 41 4E 44 20 53 45 45 20 54 48 45 20 57 49 44 45 |AND SEE THE WIDE|
00003940: 20 56 41 52 49 45 54 59 20 4F 46 20 1F 4C 49 46 | VARIETY OF .LIF|
00003950: 45 90 2E 22 00 61 41 E8 12 99 20 4D 53 24 43 24 |E..".aA... MS$C$|
00003960: 3B 00 78 41 F2 12 92 20 36 35 33 2C 31 2C 30 20 |;.xA... 653,1,0 |
00003970: 3A 20 89 20 34 32 39 30 00 9D 41 FC 12 8F 20 2A |: . 4290..A... *|
00003980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00003990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C0 41 |*************..A|
000039A0: 06 13 8F 20 2A 2A 2A 20 46 55 4E 43 54 49 4F 4E |... *** FUNCTION|
000039B0: 20 4B 45 59 20 49 4E 46 4F 52 4D 41 54 49 4F 4E | KEY INFORMATION|
000039C0: 00 E5 41 10 13 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |..A... *********|
000039D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000039E0: 2A 2A 2A 2A 2A 00 F1 41 1A 13 99 20 54 24 22 11 |*****..A... T$".|
000039F0: 22 00 06 42 24 13 8B 20 50 47 25 B2 32 20 A7 20 |"..B$.. PG%.2 . |
00003A00: 89 20 35 31 32 30 00 3A 42 2E 13 99 20 22 90 12 |. 5120.:B... "..|
00003A10: 46 31 92 20 45 44 49 54 20 20 20 20 1F 43 52 45 |F1. EDIT .CRE|
00003A20: 41 54 45 20 41 20 4E 45 57 20 50 41 54 54 45 52 |ATE A NEW PATTER|
00003A30: 4E 20 4F 52 20 45 44 49 54 22 00 58 42 38 13 99 |N OR EDIT".XB8..|
00003A40: 20 A3 31 34 29 22 54 48 45 20 45 58 49 53 54 49 | .14)"THE EXISTI|
00003A50: 4E 47 20 4F 4E 45 2E 22 00 8B 42 42 13 99 20 22 |NG ONE."..BB.. "|
00003A60: 90 12 46 32 92 20 52 45 52 55 4E 20 20 20 1F 52 |..F2. RERUN .R|
00003A70: 45 50 4C 41 59 20 54 48 45 20 53 45 51 55 45 4E |EPLAY THE SEQUEN|
00003A80: 43 45 20 53 4F 20 46 41 52 2E 22 00 B4 42 4C 13 |CE SO FAR."..BL.|
00003A90: 99 20 A3 31 34 29 22 90 43 54 52 4C 1F 20 3D 20 |. .14)".CTRL. = |
00003AA0: 53 4C 4F 57 3B 90 53 48 49 46 54 1F 20 3D 20 48 |SLOW;.SHIFT. = H|
00003AB0: 41 4C 54 22 00 E6 42 56 13 99 20 22 90 12 46 33 |ALT"..BV.. "..F3|
00003AC0: 92 20 52 55 4E 20 20 20 20 20 1F 55 50 44 41 54 |. RUN .UPDAT|
00003AD0: 45 20 54 48 45 20 50 41 54 54 45 52 4E 20 54 48 |E THE PATTERN TH|
00003AE0: 52 4F 55 47 48 22 00 02 43 60 13 99 20 A3 31 34 |ROUGH"..C`.. .14|
00003AF0: 29 22 4F 4E 45 20 47 45 4E 45 52 41 54 49 4F 4E |)"ONE GENERATION|
00003B00: 2E 22 00 2F 43 6A 13 99 20 22 90 12 46 34 92 20 |."./Cj.. "..F4. |
00003B10: 53 4B 49 50 20 20 20 20 1F 53 4B 49 50 20 4F 56 |SKIP .SKIP OV|
00003B20: 45 52 20 41 20 53 50 45 43 49 46 49 45 44 22 00 |ER A SPECIFIED".|
00003B30: 52 43 74 13 99 20 A3 31 34 29 22 4E 55 4D 42 45 |RCt.. .14)"NUMBE|
00003B40: 52 20 4F 46 20 47 45 4E 45 52 41 54 49 4F 4E 53 |R OF GENERATIONS|
00003B50: 2E 22 00 83 43 7E 13 99 20 22 90 12 46 35 92 20 |."..C~.. "..F5. |
00003B60: 53 43 52 4F 4C 20 20 20 1F 45 4E 41 42 4C 45 20 |SCROL .ENABLE |
00003B70: 54 48 45 20 90 43 52 53 52 1F 20 4B 45 59 53 20 |THE .CRSR. KEYS |
00003B80: 54 4F 22 00 A0 43 88 13 99 20 A3 31 34 29 22 41 |TO"..C... .14)"A|
00003B90: 4C 4C 4F 57 20 53 43 52 4F 4C 4C 49 4E 47 2E 22 |LLOW SCROLLING."|
00003BA0: 00 D1 43 92 13 99 20 22 90 12 46 36 92 20 43 45 |..C... "..F6. CE|
00003BB0: 4E 54 52 20 20 20 1F 43 45 4E 54 52 45 20 54 48 |NTR .CENTRE TH|
00003BC0: 45 20 50 41 54 54 45 52 4E 20 49 4E 20 54 48 45 |E PATTERN IN THE|
00003BD0: 22 00 EB 43 9C 13 99 20 A3 31 34 29 22 44 49 53 |"..C... .14)"DIS|
00003BE0: 50 4C 41 59 20 41 52 45 41 2E 22 00 14 44 A6 13 |PLAY AREA."..D..|
00003BF0: 99 20 22 90 12 46 37 92 20 45 58 49 54 20 20 20 |. "..F7. EXIT |
00003C00: 20 1F 51 55 49 54 20 54 48 45 20 50 52 4F 47 52 | .QUIT THE PROGR|
00003C10: 41 4D 2E 22 00 1A 44 B0 13 99 00 46 44 BA 13 99 |AM."..D....FD...|
00003C20: 20 22 90 12 46 38 92 20 48 45 4C 50 20 20 20 20 | "..F8. HELP |
00003C30: 1F 43 41 4C 4C 55 50 20 41 20 4D 45 4E 55 20 54 |.CALLUP A MENU T|
00003C40: 4F 20 47 45 54 22 00 68 44 C4 13 99 20 A3 31 34 |O GET".hD... .14|
00003C50: 29 22 50 52 4F 47 52 41 4D 20 49 4E 46 4F 52 4D |)"PROGRAM INFORM|
00003C60: 41 54 49 4F 4E 2E 90 22 00 99 44 CE 13 99 20 22 |ATION.."..D... "|
00003C70: 11 90 54 48 45 20 46 49 52 53 54 20 54 48 49 4E |..THE FIRST THIN|
00003C80: 47 20 54 4F 20 44 4F 20 49 53 20 45 4E 54 45 52 |G TO DO IS ENTER|
00003C90: 20 1F 45 44 49 54 90 20 22 00 C6 44 D8 13 99 20 | .EDIT. "..D... |
00003CA0: 22 4D 4F 44 45 20 28 12 46 31 92 29 20 54 4F 20 |"MODE (.F1.) TO |
00003CB0: 43 52 45 41 54 45 20 54 48 45 20 50 41 54 54 45 |CREATE THE PATTE|
00003CC0: 52 4E 20 4F 46 22 00 EB 44 E2 13 99 20 22 43 45 |RN OF"..D... "CE|
00003CD0: 4C 4C 53 20 49 4E 20 54 48 45 20 49 4E 49 54 49 |LLS IN THE INITI|
00003CE0: 41 4C 20 43 4F 4C 4F 4E 59 2E 22 00 F8 44 EC 13 |AL COLONY."..D..|
00003CF0: 99 20 4D 53 24 43 24 3B 00 0F 45 F6 13 92 20 36 |. MS$C$;..E... 6|
00003D00: 35 33 2C 31 2C 30 20 3A 20 89 20 34 32 39 30 00 |53,1,0 : . 4290.|
00003D10: 40 45 00 14 99 20 22 90 12 46 31 92 20 4C 4F 41 |@E... "..F1. LOA|
00003D20: 44 20 20 20 20 1F 4C 4F 41 44 20 41 20 4E 45 57 |D .LOAD A NEW|
00003D30: 20 50 41 54 54 45 52 4E 20 46 52 4F 4D 20 41 22 | PATTERN FROM A"|
00003D40: 00 66 45 0A 14 99 20 A3 31 34 29 22 44 49 53 4B |.fE... .14)"DISK|
00003D50: 20 46 49 4C 45 2E 28 4E 41 4D 45 3C 31 31 20 43 | FILE.(NAME<11 C|
00003D60: 48 41 52 53 29 22 00 98 45 14 14 99 20 22 90 12 |HARS)"..E... "..|
00003D70: 46 32 92 20 52 45 53 45 54 20 20 20 1F 43 48 41 |F2. RESET .CHA|
00003D80: 4E 47 45 20 54 48 45 20 50 41 54 54 45 52 4E 20 |NGE THE PATTERN |
00003D90: 42 41 43 4B 20 54 4F 22 00 BA 45 1E 14 99 20 A3 |BACK TO"..E... .|
00003DA0: 31 34 29 22 54 48 45 20 4F 52 49 47 49 4E 41 4C |14)"THE ORIGINAL|
00003DB0: 20 50 41 54 54 45 52 4E 2E 22 00 E7 45 28 14 99 | PATTERN."..E(..|
00003DC0: 20 22 90 12 46 33 92 20 53 41 56 45 20 20 20 20 | "..F3. SAVE |
00003DD0: 1F 53 41 56 45 20 54 48 45 20 50 41 54 54 45 52 |.SAVE THE PATTER|
00003DE0: 4E 20 49 4E 20 41 22 00 0D 46 32 14 99 20 A3 31 |N IN A"..F2.. .1|
00003DF0: 34 29 22 44 49 53 4B 20 46 49 4C 45 2E 28 4E 41 |4)"DISK FILE.(NA|
00003E00: 4D 45 3C 31 31 20 43 48 41 52 53 29 22 00 31 46 |ME<11 CHARS)".1F|
00003E10: 3C 14 99 20 22 90 12 46 34 92 20 20 20 20 20 20 |<.. "..F4. |
00003E20: 20 20 20 1F 4E 4F 20 46 55 4E 43 54 49 4F 4E 2E | .NO FUNCTION.|
00003E30: 22 00 37 46 46 14 99 00 69 46 50 14 99 20 22 90 |".7FF...iFP.. ".|
00003E40: 12 46 35 92 20 43 4C 45 41 52 20 20 20 1F 45 52 |.F5. CLEAR .ER|
00003E50: 41 53 45 20 54 48 45 20 43 55 52 52 45 4E 54 20 |ASE THE CURRENT |
00003E60: 50 41 54 54 45 52 4E 2E 22 00 6F 46 5A 14 99 00 |PATTERN.".oFZ...|
00003E70: 93 46 64 14 99 20 22 90 12 46 36 92 20 20 20 20 |.Fd.. "..F6. |
00003E80: 20 20 20 20 20 1F 4E 4F 20 46 55 4E 43 54 49 4F | .NO FUNCTIO|
00003E90: 4E 2E 22 00 99 46 6E 14 99 00 CB 46 78 14 99 20 |N."..Fn....Fx.. |
00003EA0: 22 90 12 46 37 92 20 52 45 54 52 4E 20 20 20 1F |"..F7. RETRN .|
00003EB0: 52 45 54 55 52 4E 20 54 4F 20 54 48 45 20 4D 41 |RETURN TO THE MA|
00003EC0: 49 4E 20 50 52 4F 47 52 41 4D 22 00 E9 46 82 14 |IN PROGRAM"..F..|
00003ED0: 99 20 A3 31 34 29 22 44 49 53 50 4C 41 59 20 41 |. .14)"DISPLAY A|
00003EE0: 4E 44 20 4D 45 4E 55 2E 22 00 15 47 8C 14 99 20 |ND MENU."..G... |
00003EF0: 22 90 12 46 38 92 20 48 45 4C 50 20 20 20 20 1F |"..F8. HELP .|
00003F00: 43 41 4C 4C 55 50 20 41 20 4D 45 4E 55 20 54 4F |CALLUP A MENU TO|
00003F10: 20 47 45 54 22 00 37 47 96 14 99 20 A3 31 34 29 | GET".7G... .14)|
00003F20: 22 50 52 4F 47 52 41 4D 20 49 4E 46 4F 52 4D 41 |"PROGRAM INFORMA|
00003F30: 54 49 4F 4E 2E 90 22 00 67 47 A0 14 99 20 22 11 |TION..".gG... ".|
00003F40: 4E 4F 54 45 3A 20 49 46 20 54 48 45 20 50 41 54 |NOTE: IF THE PAT|
00003F50: 54 45 52 4E 20 47 45 54 53 20 43 48 41 4E 47 45 |TERN GETS CHANGE|
00003F60: 44 2C 20 54 48 45 22 00 94 47 AA 14 99 20 22 52 |D, THE"..G... "R|
00003F70: 45 52 55 4E 20 53 45 51 55 45 4E 43 45 20 47 45 |ERUN SEQUENCE GE|
00003F80: 54 53 20 45 52 41 53 45 44 2C 20 54 48 45 20 47 |TS ERASED, THE G|
00003F90: 45 4E 2E 22 00 C4 47 B4 14 99 20 22 43 4F 55 4E |EN."..G... "COUN|
00003FA0: 54 45 52 20 49 53 20 52 45 53 45 54 20 54 4F 20 |TER IS RESET TO |
00003FB0: 30 2C 20 41 4E 44 20 41 20 4E 45 57 20 53 54 41 |0, AND A NEW STA|
00003FC0: 52 54 2D 22 00 E2 47 BE 14 99 20 22 49 4E 47 20 |RT-"..G... "ING |
00003FD0: 50 41 54 54 45 52 4E 20 49 53 20 53 41 56 45 44 |PATTERN IS SAVED|
00003FE0: 2E 22 00 EF 47 C8 14 99 20 4D 53 24 43 24 3B 00 |."..G... MS$C$;.|
00003FF0: 06 48 D2 14 92 20 36 35 33 2C 31 2C 30 20 3A 20 |.H... 653,1,0 : |
00004000: 89 20 34 32 39 30 00 2B 48 DC 14 8F 20 2A 2A 2A |. 4290.+H... ***|
00004010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4D 48 E6 14 |***********.MH..|
00004030: 8F 20 2A 2A 2A 20 45 4E 44 20 41 4E 44 20 4C 49 |. *** END AND LI|
00004040: 4E 4B 20 54 4F 20 4D 4C 20 43 4F 44 45 00 72 48 |NK TO ML CODE.rH|
00004050: F0 14 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00004060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00004070: 2A 2A 00 78 48 FA 14 80 00 00 00 00 00 00 00 00 |**.xH...........|
00004080: 00 00 00 00 00 00 00 00 00 00 A0 00 B9 A0 96 99 |................|
00004090: 40 8D B9 A0 97 99 40 8E B9 A0 98 99 40 8F B9 A0 |@.....@.....@...|
000040A0: 99 99 40 90 B9 A0 9A 99 40 91 B9 A0 9B 99 40 92 |..@.....@.....@.|
000040B0: B9 A0 9C 99 40 93 B9 A0 9D 99 40 94 B9 A0 9E 99 |....@.....@.....|
000040C0: 40 95 B9 00 9F 99 A0 95 C8 D0 C1 60 A9 00 A8 A6 |@..........`....|
000040D0: FF E0 01 D0 1E 99 40 8D 99 40 8E 99 40 8F 99 40 |......@..@..@..@|
000040E0: 90 99 40 91 99 40 92 99 40 93 99 40 94 99 40 95 |..@..@..@..@..@.|
000040F0: 99 A0 95 E0 02 D0 1E 99 A0 96 99 A0 97 99 A0 98 |................|
00004100: 99 A0 99 99 A0 9A 99 A0 9B 99 A0 9C 99 A0 9D 99 |................|
00004110: A0 9E 99 00 9F C8 D0 B9 60 A9 40 85 FB A9 8D 85 |........`.@.....|
00004120: FC A9 59 85 FD A9 C4 85 FE A2 00 A0 00 8C 7D 48 |..Y...........}H|
00004130: 18 A0 3D B1 FB F0 02 A9 08 8D 80 48 A0 3C B1 FB |..=........H.<..|
00004140: F0 08 A9 04 6D 80 48 8D 80 48 A0 01 B1 FB F0 08 |....m.H..H......|
00004150: A9 02 6D 80 48 8D 80 48 A0 00 B1 FB F0 03 EE 80 |..m.H..H........|
00004160: 48 A9 46 18 6D 80 48 91 FD 18 A9 02 65 FB 85 FB |H.F.m.H.....e...|
00004170: 90 02 E6 FC E6 FD D0 02 E6 FE AC 7D 48 C8 C8 C0 |...........}H...|
00004180: 3C D0 AA 18 A9 3C 65 FB 85 FB 90 02 E6 FC 18 A9 |<....<e.........|
00004190: 0A 65 FD 85 FD 90 02 E6 FE E8 E8 E0 28 D0 8C 60 |.e..........(..`|
000041A0: A9 00 85 FC AD 01 D0 38 E9 42 4A 4A F0 0D AA A9 |.......8.BJJ....|
000041B0: 00 18 69 3C 90 02 E6 FC CA D0 F6 85 FB AD 00 D0 |..i<............|
000041C0: 4A 4A 8D 80 48 AD 10 D0 29 01 F0 02 A9 40 18 6D |JJ..H...)....@.m|
000041D0: 80 48 38 E9 18 18 65 FB 85 FB 90 02 E6 FC 18 A5 |.H8...e.........|
000041E0: FB 69 40 85 FB A5 FC 69 8D 85 FC A0 00 B1 FB 49 |.i@....i.......I|
000041F0: 01 91 FB A9 00 85 FC AD 01 D0 38 E9 32 4A 4A 4A |..........8.2JJJ|
00004200: F0 0D AA A9 00 18 69 28 90 02 E6 FC CA D0 F6 85 |......i(........|
00004210: FB AD 00 D0 4A 4A 4A 8D 80 48 AD 10 D0 29 01 F0 |....JJJ..H...)..|
00004220: 02 A9 20 18 6D 80 48 38 E9 03 18 65 FB 85 FB 90 |.. .m.H8...e....|
00004230: 02 E6 FC 18 A9 C4 65 FC 85 FC A0 00 B1 FB 38 E9 |......e.......8.|
00004240: 46 8D 80 48 AD 00 D0 A0 01 29 04 F0 02 A0 02 AD |F..H.....)......|
00004250: 01 D0 29 04 F0 04 98 0A 0A A8 98 4D 80 48 18 69 |..)........M.H.i|
00004260: 46 A0 00 91 FB 60 A2 02 86 FF 20 CB 48 20 B8 4E |F....`.... .H .N|
00004270: 38 AD 81 48 E9 78 8D 81 48 B0 03 CE 82 48 A9 40 |8..H.x..H....H.@|
00004280: 85 FB A9 8D 85 FC CD 82 48 F0 04 B0 15 90 09 A5 |........H.......|
00004290: FB CD 81 48 F0 0C B0 0A AD 81 48 85 FB AD 82 48 |...H......H....H|
000042A0: 85 FC 18 AC 85 48 88 88 10 02 A0 00 98 65 FB 85 |.....H.......e..|
000042B0: FB 8D 81 48 A9 00 65 FC 85 FC 8D 82 48 18 A5 FB |...H..e.....H...|
000042C0: 69 60 85 FD A5 FC 69 09 85 FE 38 AD 85 48 E9 02 |i`....i...8..H..|
000042D0: F0 0E B0 04 A9 00 F0 08 C9 39 F0 04 90 02 A9 39 |.........9.....9|
000042E0: 8D 7E 48 38 A9 3B ED 86 48 F0 0E B0 04 A9 00 F0 |.~H8.;..H.......|
000042F0: 08 C9 39 F0 04 90 02 A9 39 8D 7F 48 38 AD 83 48 |..9.....9..H8..H|
00004300: E9 02 F0 0E B0 04 A9 00 F0 08 C9 25 F0 04 90 02 |...........%....|
00004310: A9 25 8D 7B 48 38 A9 27 ED 84 48 F0 0E B0 04 A9 |.%.{H8.'..H.....|
00004320: 00 F0 08 C9 25 F0 04 90 02 A9 25 8D 7C 48 AE 7B |....%.....%.|H.{|
00004330: 48 AC 7E 48 8E 7A 48 8C 7D 48 18 A9 00 A0 00 71 |H.~H.zH.}H.....q|
00004340: FB A0 01 71 FB A0 02 71 FB A0 3C 71 FB A0 3E 71 |...q...q..<q..>q|
00004350: FB A0 78 71 FB A0 79 71 FB A0 7A 71 FB A0 3D 20 |..xq..yq..zq..= |
00004360: 8D 4D E6 FB D0 02 E6 FC E6 FD D0 08 E6 FE D0 04 |.M..............|
00004370: A9 00 F0 BD AE 7A 48 AC 7D 48 C8 CC 7F 48 F0 B4 |.....zH.}H...H..|
00004380: 90 B2 18 A9 3C 6D 81 48 8D 81 48 90 03 EE 82 48 |....<m.H..H....H|
00004390: 18 AD 81 48 85 FB AD 82 48 85 FC 18 AD 81 48 69 |...H....H.....Hi|
000043A0: 60 85 FD AD 82 48 69 09 85 FE E8 EC 7C 48 F0 C0 |`....Hi.....|H..|
000043B0: 90 BE AD 85 48 C9 02 B0 4D A9 40 85 FB A9 8D 85 |....H...M.@.....|
000043C0: FC A9 A0 85 FD A9 96 85 FE A2 26 8E 7A 48 18 A9 |..........&.zH..|
000043D0: 00 A0 00 71 FB A0 01 71 FB A0 3D 71 FB A0 78 71 |...q...q..=q..xq|
000043E0: FB A0 79 71 FB A0 3C 20 8D 4D 18 A9 3C 65 FB 85 |..yq..< .M..<e..|
000043F0: FB 90 02 E6 FC 18 A9 3C 65 FD 85 FD 90 02 E6 FE |.......<e.......|
00004400: AE 7A 48 CA D0 C5 AD 86 48 C9 02 B0 4D A9 7A 85 |.zH.....H...M.z.|
00004410: FB A9 8D 85 FC A9 DA 85 FD A9 96 85 FE A2 26 8E |..............&.|
00004420: 7A 48 18 A9 00 A0 00 71 FB A0 01 71 FB A0 3C 71 |zH.....q...q..<q|
00004430: FB A0 78 71 FB A0 79 71 FB A0 3D 20 8D 4D 18 A9 |..xq..yq..= .M..|
00004440: 3C 65 FB 85 FB 90 02 E6 FC 18 A9 3C 65 FD 85 FD |<e.........<e...|
00004450: 90 02 E6 FE AE 7A 48 CA D0 C5 AD 83 48 C9 02 B0 |.....zH.....H...|
00004460: 43 A9 40 85 FB A9 8D 85 FC A9 A0 85 FD A9 96 85 |C.@.............|
00004470: FE A2 3A 8E 7A 48 18 A9 00 A0 00 71 FB A0 02 71 |..:.zH.....q...q|
00004480: FB A0 3C 71 FB A0 3D 71 FB A0 3E 71 FB A0 01 20 |..<q..=q..>q... |
00004490: 8D 4D E6 FB D0 02 E6 FC E6 FD D0 02 E6 FE AE 7A |.M.............z|
000044A0: 48 CA D0 CF AD 84 48 C9 02 B0 43 A9 28 85 FB A9 |H.....H...C.(...|
000044B0: 96 85 FC A9 88 85 FD A9 9F 85 FE A2 3A 8E 7A 48 |............:.zH|
000044C0: 18 A9 00 A0 00 71 FB A0 01 71 FB A0 02 71 FB A0 |.....q...q...q..|
000044D0: 3C 71 FB A0 3E 71 FB A0 3D 20 8D 4D E6 FB D0 02 |<q..>q..= .M....|
000044E0: E6 FC E6 FD D0 02 E6 FE AE 7A 48 CA D0 CF A9 40 |.........zH....@|
000044F0: 85 FB A9 8D 85 FC A9 A0 85 FD A9 96 85 FE 18 A9 |................|
00004500: 00 A0 01 71 FB A0 3C 71 FB A0 3D 71 FB A0 00 20 |...q..<q..=q... |
00004510: 8D 4D 18 A9 3A 65 FB 85 FB 90 02 E6 FC 18 A9 3A |.M..:e.........:|
00004520: 65 FD 85 FD 90 02 E6 FE 18 A9 00 A0 00 71 FB A0 |e............q..|
00004530: 3C 71 FB A0 3D 71 FB A0 01 20 8D 4D A9 28 85 FB |<q..=q... .M.(..|
00004540: A9 96 85 FC A9 88 85 FD A9 9F 85 FE 18 A9 00 A0 |................|
00004550: 00 71 FB A0 01 71 FB A0 3D 71 FB A0 3C 20 8D 4D |.q...q..=q..< .M|
00004560: 18 A9 3A 65 FB 85 FB 90 02 E6 FC 18 A9 3A 65 FD |..:e.........:e.|
00004570: 85 FD 90 02 E6 FE 18 A9 00 A0 00 71 FB A0 01 71 |...........q...q|
00004580: FB A0 3C 71 FB A0 3D 20 8D 4D 20 89 48 60 AA B1 |..<q..= .M .H`..|
00004590: FB F0 10 E0 02 F0 08 E0 03 F0 04 A9 00 F0 0A A9 |................|
000045A0: 01 D0 06 E0 03 F0 F8 A9 00 91 FD 60 A5 FF C9 01 |...........`....|
000045B0: F0 0D C9 02 F0 58 C9 03 F0 50 C9 04 F0 4E 60 A9 |.....X...P...N`.|
000045C0: 40 85 FD A9 8D 85 FE A9 7C 85 FB A9 8D 85 FC A2 |@.......|.......|
000045D0: 00 A0 00 B1 FB 91 FD C8 C0 3C D0 F7 E8 E0 27 F0 |.........<....'.|
000045E0: 15 A5 FB 85 FD A5 FC 85 FE 18 A9 3C 65 FB 85 FB |...........<e...|
000045F0: 90 DF E6 FC B0 DB 18 A9 64 85 FB A9 96 85 FC A9 |........d.......|
00004600: 00 A8 91 FB C8 C0 3C D0 F9 60 F0 4E F0 4A A9 28 |......<..`.N.J.(|
00004610: 85 FB A9 96 85 FC A9 64 85 FD A9 96 85 FE A2 00 |.......d........|
00004620: A0 00 B1 FB 91 FD C8 C0 3C D0 F7 E8 E0 27 F0 15 |........<....'..|
00004630: A5 FB 85 FD A5 FC 85 FE 38 A5 FB E9 3C 85 FB B0 |........8...<...|
00004640: DF C6 FC 90 DB A9 40 85 FB A9 8D 85 FC A9 00 A8 |......@.........|
00004650: 91 FB C8 C0 3C D0 F9 60 F0 30 A9 40 85 FB A9 8D |....<..`.0.@....|
00004660: 85 FC A2 00 A0 00 C8 B1 FB 88 91 FB C8 C0 3B D0 |..............;.|
00004670: F5 A9 00 A0 3B 91 FB E8 E0 28 F0 0D 18 A9 3C 65 |....;....(....<e|
00004680: FB 85 FB 90 DF E6 FC B0 DB 60 A9 40 85 FB A9 8D |.........`.@....|
00004690: 85 FC A2 00 A0 3A B1 FB C8 91 FB 88 88 C0 FF D0 |.....:..........|
000046A0: F5 A9 00 A8 91 FB E8 E0 28 F0 0D 18 A9 3C 65 FB |........(....<e.|
000046B0: 85 FB 90 E0 E6 FC B0 DC 60 A9 40 85 FB A9 8D 85 |........`.@.....|
000046C0: FC A2 00 A0 00 B1 FB D0 17 C8 C0 3C D0 F7 E8 E0 |...........<....|
000046D0: 28 F0 0D 18 A9 3C 65 FB 85 FB 90 E7 E6 FC B0 E3 |(....<e.........|
000046E0: 8E 83 48 18 A9 64 85 FB A9 96 85 FC A2 00 A0 00 |..H..d..........|
000046F0: B1 FB D0 17 C8 C0 3C D0 F7 E8 E0 28 F0 0D 38 A5 |......<....(..8.|
00004700: FB E9 3C 85 FB B0 E7 C6 FC 90 E3 8E 84 48 A9 00 |..<..........H..|
00004710: 85 FC AE 83 48 8A F0 0C A9 00 18 69 3C 90 02 E6 |....H......i<...|
00004720: FC CA D0 F6 18 69 40 8D 81 48 A5 FC 69 8D 8D 82 |.....i@..H..i...|
00004730: 48 38 A9 28 ED 83 48 38 ED 84 48 8D 7A 48 A0 00 |H8.(..H8..H.zH..|
00004740: AD 81 48 85 FB AD 82 48 85 FC AE 7A 48 B1 FB D0 |..H....H...zH...|
00004750: 15 CA F0 0D 18 A9 3C 65 FB 85 FB 90 F0 E6 FC B0 |......<e........|
00004760: EC C8 C0 3C D0 DA 8C 85 48 A0 3B AD 81 48 85 FB |...<....H.;..H..|
00004770: AD 82 48 85 FC AE 7A 48 B1 FB D0 15 CA F0 0D 18 |..H...zH........|
00004780: A9 3C 65 FB 85 FB 90 F0 E6 FC B0 EC 88 C0 FF D0 |.<e.............|
00004790: DA 8C 7D 48 38 A9 3B ED 7D 48 8D 86 48 60 20 B8 |..}H8.;.}H..H` .|
000047A0: 4E 38 A2 01 AD 83 48 ED 84 48 F0 19 B0 07 49 FF |N8....H..H....I.|
000047B0: 18 69 01 A2 02 86 FF 4A F0 0B 8D 83 48 20 AB 4D |.i.....J....H .M|
000047C0: CE 83 48 D0 F8 38 A2 04 AD 86 48 ED 85 48 F0 19 |..H..8....H..H..|
000047D0: B0 07 49 FF 18 69 01 A2 03 86 FF 4A F0 0B 8D 86 |..I..i.....J....|
000047E0: 48 20 AB 4D CE 86 48 D0 F8 60 A6 FF A0 00 E0 01 |H .M..H..`......|
000047F0: F0 05 E0 02 F0 35 60 B9 00 C4 99 E0 7F B9 00 C5 |.....5`.........|
00004800: 99 E0 80 B9 00 C6 99 E0 81 B9 00 C7 99 E0 82 B9 |................|
00004810: 00 D8 99 E0 7B B9 00 D9 99 E0 7C B9 00 DA 99 E0 |....{.....|.....|
00004820: 7D B9 00 DB 99 E0 7E C8 D0 CD 60 B9 E0 7F 99 00 |}.....~...`.....|
00004830: C4 B9 E0 80 99 00 C5 B9 E0 81 99 00 C6 B9 E0 82 |................|
00004840: 99 00 C7 B9 E0 7B 99 00 D8 B9 E0 7C 99 00 D9 B9 |.....{.....|....|
00004850: E0 7D 99 00 DA B9 E0 7E 99 00 DB C8 D0 CD 60 A5 |.}.....~......`.|
00004860: FF A0 00 C9 01 F0 05 C9 02 F0 41 60 B9 40 8D 99 |..........A`.@..|
00004870: E0 83 B9 40 8E 99 E0 84 B9 40 8F 99 E0 85 B9 40 |...@.....@.....@|
00004880: 90 99 E0 86 B9 40 91 99 E0 87 B9 40 92 99 E0 88 |.....@.....@....|
00004890: B9 40 93 99 E0 89 B9 40 94 99 E0 8A B9 40 95 99 |.@.....@.....@..|
000048A0: E0 8B B9 A0 95 99 40 8C C8 D0 C1 60 B9 E0 83 99 |......@....`....|
000048B0: 40 8D B9 E0 84 99 40 8E B9 E0 85 99 40 8F B9 E0 |@.....@.....@...|
000048C0: 86 99 40 90 B9 E0 87 99 40 91 B9 E0 88 99 40 92 |..@.....@.....@.|
000048D0: B9 E0 89 99 40 93 B9 E0 8A 99 40 94 B9 E0 8B 99 |....@.....@.....|
000048E0: 40 95 B9 40 8C 99 A0 95 C8 D0 C1 60 A9 02 A2 08 |@..@.......`....|
000048F0: A0 02 20 BA FF AD C0 02 A2 C1 A0 02 20 BD FF 20 |.. ......... .. |
00004900: C0 FF 20 45 52 B0 6F A2 02 20 C6 FF 20 45 52 B0 |.. ER.o.. .. ER.|
00004910: 65 A9 40 85 FB A9 8D 85 FC A2 00 8E 7A 48 A0 00 |e.@.........zH..|
00004920: 8C 7D 48 20 CF FF 8D 87 48 20 45 52 B0 48 20 CF |.}H ....H ER.H .|
00004930: FF 8D 88 48 20 45 52 B0 3D AC 7D 48 AE 7A 48 AD |...H ER.=.}H.zH.|
00004940: 87 48 91 FB C8 C0 3C D0 12 E8 E0 28 F0 1A A0 00 |.H....<....(....|
00004950: 18 A5 FB 69 3C 85 FB 90 02 E6 FC 8E 7A 48 8C 7D |...i<.......zH.}|
00004960: 48 CE 88 48 F0 BD D0 D1 A9 02 20 C3 FF 20 45 52 |H..H...... .. ER|
00004970: B0 04 A9 00 F0 0B 8D 80 48 A9 02 20 C3 FF AD 80 |........H.. ....|
00004980: 48 85 FF 60 A9 02 A2 08 A0 02 20 BA FF AD C0 02 |H..`...... .....|
00004990: A2 C1 A0 02 20 BD FF 20 C0 FF 20 45 52 B0 64 A2 |.... .. .. ER.d.|
000049A0: 02 20 C9 FF 20 45 52 B0 5A A9 40 85 FB A9 8D 85 |. .. ER.Z.@.....|
000049B0: FC A9 00 8D 88 48 A9 FF 8D 87 48 A2 00 A0 00 8E |.....H....H.....|
000049C0: 7A 48 8C 7D 48 B1 FB CD 87 48 F0 1F AD 88 48 F0 |zH.}H....H....H.|
000049D0: 08 20 D2 FF 20 45 52 B0 5F AC 7D 48 B1 FB 8D 87 |. .. ER._.}H....|
000049E0: 48 20 D2 FF 20 45 52 B0 4F 90 1A AD 88 48 C9 FF |H .. ER.O....H..|
000049F0: D0 18 20 D2 FF 20 45 52 B0 3E AD 87 48 20 D2 FF |.. .. ER.>..H ..|
00004A00: 20 45 52 B0 33 A9 00 8D 88 48 EE 88 48 AE 7A 48 | ER.3....H..H.zH|
00004A10: AC 7D 48 C8 C0 3C D0 A7 E8 E0 28 F0 0D 18 A5 FB |.}H..<....(.....|
00004A20: 69 3C 85 FB 90 97 E6 FC B0 93 A9 02 20 C3 FF 20 |i<.......... .. |
00004A30: 45 52 B0 04 A9 00 F0 0B 8D 80 48 A9 02 20 C3 FF |ER........H.. ..|
00004A40: AD 80 48 85 FF 60 B0 35 20 B7 FF F0 3C 8D 7B 48 |..H..`.5 ...<.{H|
00004A50: 29 01 F0 04 A9 0C D0 31 AD 7B 48 29 02 F0 04 A9 |)......1.{H)....|
00004A60: 0D D0 26 AD 7B 48 29 40 F0 04 A9 0E D0 1B AD 7B |..&.{H)@.......{|
00004A70: 48 29 80 F0 04 A9 0F D0 10 A9 00 F0 0C D0 04 A9 |H)..............|
00004A80: 0A D0 06 C9 F0 D0 02 A9 0B 18 F0 01 38 60 |............8` |
..&.... ******************************.\
.... A SIMULATION OF "..................
L I F E...."... .. *********************
*********...... WRITTEN BY GLEN BODIE.B.
... 90 KINGSMOUNT PK RD......
TORONTO, ONTARIO...H..
(416) 461-3483.).R.. *************
*****************.V.... YOU ARE ALLOWED
TO COPY AND DISTRIBUTE THIS PROG
RAM TO ANYONE,...... BUT MAY NOT USE IT
IN ANY WAY FOR PROFIT....... IF YO
U HAVE ANY QUESTIONS OR SUGGESTIO
NS OR WISH TO DISCUSS THE.<.... PROGRAM,
PLEASE WRITE OR CALL ME AT THE AB
OVE ADDRESS..A.... *********************
*********...... THIS IS A SIMULATION OF
THE GROWTH, BIRTH AND DEATH OF C
ELLS...... IN A CLOSED COLONY. IT IS BA
SED ON A SCIENTIFIC AMERICAN ARTICLE.
A.".. WRITTEN BY JOHN CONWAY FROM
CAMBRIDGE UNIVERSITY, LONDON IN.U.,..
OCTOBER 1970.. .6.. THE SOURCE FOR THIS
PROGRAM IS IN A COMBINATION OF BASI
C AND ML...@.. CODE AS FOLLOWS:...J.. "L
IFE.BAS" - BASIC STATEMENTS...T.. "LIFE.
ASM" - ML STATEMENTS.I.^.. THE FINAL PRO
GRAM WAS GENERATED BY PAL-64 FROM PR
O-LINE. IN ORDER...H.. TO RECREATE THE
OBJECT CODE, LOAD PAL-64 INTO YOU
R MACHINE THEN...R.. LOAD AND RUN "LIFE.
BAS". THE ASSEMBLY TAKES ABOUT 8
MINUTES....|.. THE RESULT OF THE ASSEMBL
Y IS 2 FILES ON YOUR DISK:.D.... "LI
FE" - THE EXECUTABLE PROGRAM.H.... "LIFE
.SYM" - THE SYMBOL TABLE...... *********
*********************...... "...........
.....PROTECTED.."L.W.... ***************
***************...... *** SETUP...B.. **
****************************...L.. ".";.
2.V.. 53280,6 : . 53281,12.Q...I.10.4096
.3.(40.60).2.1024.M.... 52,I.256 : . 56,
B(52)...... 51,I.B(52).256...... 55,B(51
).....T$.". ..L I F E.".W
...I$."INITIALIZATION: PHASE .".....MS$.
"........................."...&.. T$MS$I
$"1.";.+.0.. ZZ%(255,1) : . DE$(15).L.:.
SKIP.0 : PARM.255 : BUFF.704.].?.SC%.0 :
Z..1...D.. ****************************
**...N.. *** TRANSFER CHARACTER SET.H.X.
. ******************************...B.. 5
6334,B(56334) . 254...L.. 1,B(1) . 251..
.V.. I.53248 . 55296.".... I.2048,B(I) :
..3.... 1,B(1) . 4.L.... 56334,B(56334)
. 1.Q.... *****************************
*...... *** CHANGE SCREEN POINTERS......
******************************.B.... G(
8)...F.. 56578,B(56578) . 3...P.. 56576,
B(56576). 252...Z.. 53272,(B(53272). 240
). 2.".... 648,196.5.... T$MS$I$"2.";.V.
..VIC2.12.4096 : . VIC-II CHIP.Y...SM.VI
C2.1024 : . SCREEN MEMORY.....CH.VIC2.20
48 : . CHARACTER SET.....CM.55296 :
. COLOUR MEMORY... .. ******************
************...*.. *** DEFINE NEW CHARAC
TERS.).4.. *****************************
*.M.>.NC%.70 : . NEW CHARACTER'S CODE.H.
H.. I.0 . 15 : . J.0 . 7...R.. I% : . CH
.8.(I.NC%).J,I%...\.. J : . I...F.. 0,0,
0,0,0,0,0,0.I.P.. 240,240,240,240,0,0,0,
0...Z.. 15,15,15,15,0,0,0,0...... 255,25
5,255,255,0,0,0,0...... 0,0,0,0,240,240,
240,240.E.... 240,240,240,240,240,240,24
0,240.G.... 15,15,15,15,240,240,240,240.
..... 255,255,255,255,240,240,240,240...
... 0,0,0,0,15,15,15,15.I.... 240,240,24
0,240,15,15,15,15...J.. 15,15,15,15,15,1
5,15,15...T.. 255,255,255,255,15,15,15,1
5.'.... 0,0,0,0,255,255,255,255.M.... 24
0,240,240,240,255,255,255,255.O.... 15,1
5,15,15,255,255,255,255...... 255,255,25
5,255,255,255,255,255...... ************
******************...... *** DEFINE SPRI
TES FOR CURSOR...... *******************
***********.$.$.. I.12 . 63 :. VIC2.64.1
.I,0.<.... VIC2.64.2.I,0 : ..R.8.. I.0 .
11 : . I%.K.B.. VIC2.64.1.I,I% : ....L.
. I.0 . 11 : . I%...V.. VIC2.64.2.I,I% :
....`.. 53269,0 : . 53275,0.P.J.. 53287
,7 : . SM.1016,1...T.. 53271,0 : . 53277
,0...~.. 240,0,0,144,0,0,144,0,0,240,0,0
.0.... 0,0,0,96,0,0,96,0,0,0,0,0.U.... *
*****************************.Q.... ***
DEFINE MENU ITEMS...... ****************
**************.....FK$(1).".....F1. EDIT
..........F2. RERUN...........F3. RUN
.........".0...FK$(1).FK$(1).".F4. SKIP
...........F5. SCROL..........F6. CENTR.
......."..D.FK$(1).FK$(1)."...F7. EXIT
..........F8. HELP ...........SKIP: ..
......"...N.FK$(1).FK$(1)."..GEN: .".
..X.FK$(2).".....F1. LOAD ..........F2.
RESET...........F3. SAVE .........".9...
FK$(2).FK$(2).".F4. ...........F5.
CLEAR..........F6. ........".....FK
$(2).FK$(2)."...F7. RETRN..........F8. H
ELP ........... ........".....FK$
(2).FK$(2).".. .".M.... *********
*********************...... *** DEFINE M
ESSAGES...... **************************
****.....SG$."...................... ".B
.(.MS$(0)."READY.....
"...2.MS$(1)."CURSORS TO MOVE,
SPACE BAR TO ADD/DEL ".J.<.MS$(2)."UPDAT
E BY 1 GENERATION "...F.M
S$(3)."ENTER # OF GENERATIONS TO SKIP:
......".8.P.MS$(4)."CURSORS ARE NOW
ACTIVE FOR SCROLLING ".L.Z.MS$(5)."CEN
TRE THE PATTERN "...D
.MS$(6)."ENTER FILE TO LOAD:
.................."...N.MS$(7)."E
NTER FILE TO SAVE: ...
...............".,.X.MS$(8)."THE COLONY
WILL BE DESTROYED ".`...MS$(9).
"SCROLLING..... "
.....MS$(10)."RERUNNING SEQUENCE FROM TH
E START. ".E...C$.".PRESS ..SHIFT.. T
O CONTINUE..... "... .. ************
******************...... *** DISK ERROR
MESSAGES.-.... *************************
*****.E...DE$.".DISK ERROR: ".[.H.DE$(0)
."NO ERROR".|.R.DE$(1)."TOO MANY OPEN FI
LES".....DE$(2)."FILE ALREADY OPEN".....
DE$(3)."FILE NOT OPEN".T...DE$(14)."END
OR IDENTIFY".....DE$(4)."FILE NOT FOUND"
.....DE$(5)."DEVICE NOT PRESENT".1...DE$
(6)."FILE NOT INPUT TYPE".S...DE$(7)."FI
LE NOT OUTPUT TYPE".R...DE$(8)."FILE NAM
E MISSING"...".DE$(9)."ILLEGAL DEVICE #"
...,.DE$(10)."STOP KEY PRESSED".Q.6.DE$(
11)."RS-232 BUFFER ALLOC"...@.DE$(12)."T
IMEOUT WRITE"...J.DE$(13)."TIMEOUT READ"
.(.T.DE$(14)."END OR IDENT LINE".I.^.DE$
(15)."DEVICE NOT PRESENT".N.H.. ********
**********************...R.. *** CREATE
THE FIELD...|.. ************************
******.A.... T$MS$I$"3.."...... I.2 . 21
: . J.9 . 38...... CM.I.40.J,0...... SM
.I.40.J,NC%...... J : . I.=.... .8)"....
............................".L.B.. I.2
. 21.^.L.. .8)".." : ....V.. .8)".......
........................."...... SM.79,1
23 : . CM.79,6.D.... SM.919,126 : . CM.9
19,6...... I.119 . 879 . 40...... SM.I,9
7 : . CM.I,6 : ... ... *****************
*************.@ ... *** MAIN MENU + KEY
DECODING.E ... *************************
*****.{ &.. PARM,1 : .18635.. 0.. PARM,1
: .20574.. :.PG%.1 : SC%.0 : . 53269,0.
. D.. FK$(PG%);.Z N.. 198,0 : . MS$MS$(0
);.. X.. 2020..!B.. K$ : . K$ . "" . . 1
890..!L.K.F(K$).$!V.. K.133 . . 1930.Z!.
.. K.132 . 2980,2340,2600,2750,2070,2450
,2660,4270.O!... SC%.0 . . 1890..!... K.
145 . . PARM,1 : . 2890..!... K.017 . .
PARM,2 : . 2890.O!... K.157 . . PARM,3 :
. 2890..!... K.029 . . PARM,4 : . 2890.
.!... 1890.."F.. ***********************
*******.B"P.. *** UPDATE THE GEN/SKIP DA
TA.G"Z.. ******************************.
."... SG$I(D(SKIP),2)".............. "I(
" ".D(GEN),3).."....H"... **************
****************.."... *** RERUN THE WHO
LE THING..#... *************************
*****.-#... 653,1,1 : . TILL NO SHIFT.?#
.. MS$MS$(10);.U#*.. PARM,2 : .20574.`#
4..18712.S#>.GEN.0 : . 2020..#H.. I.0 .
Z : I%.B(653)..#R.. (I% . 1).1 . . 2300.
A#\.. (I% . 4).0 . . 2160.W#F.. K.1 . 60
0 : . K..#P.. ZZ%(I,0) . 2180,2250,2270.
.$Z.. 2290.#$... J.1 . ZZ%(I,1) : I%.B(6
53).=$... (I% . 1).1 . . 2300.W$... (I%
. 4).0 . . 2220.M$... K.1 . 600 : . K..$
...19045 : .18712..$..GEN.GEN.1 : . 2020
..$... J : . 2290.F$J.. PARM,ZZ%(I,1) :
.19883.Q$T.. 2280..$...20381..$...18712.
.$... I..%..SC%.0 : . 1870.'%... *******
***********************.F%... *** RUN FO
R 1 GENERATION.K%... *******************
***********..%$.. MS$MS$(2); : GEN.GEN.1
..%...19045..%8..18712..%B.. Z..1 . . 24
00..%L.. ZZ%(Z,0).1 . ZZ%(Z,1).ZZ%(Z,1).
1 : . 2410..%V.. Z.255 . . 2410..&`.Z.Z.
1 : ZZ%(Z,0).1 : ZZ%(Z,1).1..&J.SC%.0 :
. 1870.S&T.. ***************************
***.S&~.. *** SKIP # OF GENERATIONS..&..
. ******************************..&... M
S$MS$(3); : SC%.0.G&... N : . N.1 . N.1.
Y&... N.99 . N.99..&... Z..1 . . 2510..'
... ZZ%(Z,0).1 . ZZ%(Z,1).ZZ%(Z,1).N : .
2520.2'D.. Z.255 . . 2520.V'N.Z.Z.1 : Z
Z%(Z,0).1 : ZZ%(Z,1).N.L'X.. SKIP.N . 1
. .1..'...19045 : .18712..'..GEN.GEN.1 :
. 2020..'.....'...18712 : . 1870.V'...
******************************..'... ***
SCROLL THE PATTERN..(... **************
****************.)((.. MS$MS$(4);.=(2..
T.1 . 600 : ..P(<.SC%.1 : . 1870.U(F.. *
*****************************..(P.. ***
CENTRE THE PATTERN..(Z.. ***************
***************.P(D.. MS$MS$(5); : SC%.0
..(N..20381..(X..18712..(... Z.255 . . 2
710..)..Z.Z.1 : ZZ%(Z,0).3 : ZZ%(Z,1).0.
*)... 1870.O) .. ***********************
*******.E)... *** PROGRAM END..)... ****
**************************..)... 53272,(
B(53272). 240).5.A)H.. 56576,B(56576) .
3.Z)R.. 56578,B(56578) . 3..)... 648,4..
*..I.10.4096 : . RESET TOP OF MEMRY.'*..
. 52,I.256 : . 56,B(52).<*... 51,I.B(52)
.256.O*... 55,B(51) : ..J*... 53280,14 :
. 53281,6..*... "..LIFE IS OVER"G(9)..*
".. 5370..*,.. *************************
*****.W*6.. *** MOVE THE PATTERN AROUND.
.*@.. ******************************..+J
.. MS$MS$(9);..+T..19883.#+^..18712.8+H.
. Z.255 . . 2940.B+R.Z.Z.1 : ZZ%(Z,0).2
: ZZ%(Z,1).B(PARM).M+|.. 1870..+... ****
**************************..+... *** EDI
T MENU + KEY DECODING.Z+... ************
******************..+..PG%.2 : SP%.1 : R
E%.0..,... SM.1016,SP% : . 53269,1..,...
53248,96 : . 53249,66.<,B.. 53264,0.T,L
.. FK$(PG%); : SC%.0.O,V.. 198,0 : . MS$
MS$(1);..,... K$ : . K$."" . . 3140..,..
K.F(K$)..,... K.133 . . 3080..,... K.132
. 3350,3630,4040,4120,3570,3140,3140,42
70..-..X%.B(53248).256.(B(53264) . 1) :
Y%.B(53249).(-... K.032 . . 4220.=-... K
.145 . . 3210.R-&.. K.017 . . 3230.G-0..
K.157 . . 3250.|-:.. K.029 . . 3270..-D
.. T.1 . 25 : ...-N.SP%.SP%.(SP%.1).(SP%
.2)..-X.. SM.1016,SP%.H-B.. 3040..-L.. *
*****************************...V.. ***
MOVE THE CURSOR AROUND.3.... ***********
*******************.R...Y%.Y%.4 : . Y%.6
6 . Y%.222.].... 3240.|...Y%.Y%.4 : . Y%
.222 . Y%.66...... 53249,Y% : . 3140....
.X%.X%.4 : . X%.96 . X%.332...... 3280..
.F.X%.X%.4 : . X%.332 . X%.96...P.. 5326
4,X%.256../Z.. 53248,X%.256.B(53264)../.
.. T.1 . 10 : ..*/... 3150.O/... *******
***********************.L/... *** LOAD A
NEW PATTERN../... *********************
*********../... 53269,0../ .. MS$MS$(6);
.I/*.. 3900 : FL$.FL$."R"../4.. BUFF.0,C
(FL$)../>.. I.1 . C(FL$)..0H.. BUFF.I,F(
J(FL$,I,1))..0R....0\.. 15,8,15.60F..207
15 : I.B(PARM).F0P..15,EN$,EM$._0Z.. E(E
N$)..0 . . 3480..0... I.0 . I.14 . RE%.1
: . 3510..0..EM$.DE$(I).H0... MS$DE$H(E
M$." ",26);
..0... T.1 . 1000 : ...0... PARM,2 : .20
574..0...18712..1.. 2 : 15.$1J.. 5326
9,1 : . 3030.I1T.. *********************
*********.I1... *** RESET TO THE ORIGINA
L..1... ******************************..
1... PARM,2 : .20574..1...18712.B1..RE%.
1 : . 3140..1... ***********************
*******..2... *** SAVE THE CURRENT PATTE
RN./2$.. ******************************.
=2... 53269,0.N28.. MS$MS$(7);.G2B.. 390
0 : FL$.FL$."W".U2L.. 15,8,15..2V.. BUFF
.0,C(FL$)..2`.. I.1 . C(FL$)..2J.. BUFF.
I,F(J(FL$,I,1))..2T...T2~..20867 : I.B(P
ARM)..2...15,EN$,EM$..2... E(EN$).0 . .
3810..3... E(EN$)..63 . . 3830.P3... MS$
".FILE EXISTS. REPLACE (YES OR NO)?.
....";.L3... K$ : . K$."" . . 3760..3.
.. K$.."Y" . K$.."N" . . 3760..3D.. K$;.
.3N.. K$."N" . . 3850.F3X.FL$."@".FL$ :
. 3670.Y3... I.0 . . 3850..3..EM$.DE$(I)
. 4... MS$DE$H(EM$."
",26);.54... T.1 . 1000 : ..D4
.. 2 : 15.[4... 53269,1 : . 3030..4..
. ******************************..4(.. *
** GET THE FILENAME FROM USER.J42.. ****
**************************..4<.FL$."" :
N.0..4A.. K$ : . K$."" . . 3905..5F.. K$
.G(13) . . 3945.35K.. K$.G(32) . K$.G(22
1) . . 3930.W5P.. K$.G(93) . K$.G(160) .
. 3930.5U.. K$; : FL$.FL$.K$ : N.N.1 :
. 3905..5Z.. N.0 . . 3900..5_.. I.0 . N
.1..5D.. ". ."; : . : . 3900.T5I.. N.0 .
FL$."SAVED"..5N.I$.H(FL$,1) : K$."0:".(
6X.. I$."0" . I$."1" . K$.H(FL$,2) : FL$
.I(FL$,C(FL$).2).Y6... I$."@" . K$.H(FL$
,3) : FL$.I(FL$,C(FL$).3).Y6... C(FL$).1
1 . FL$.H(FL$,11)..6..FL$.K$.FL$.".LIFE,
S,"..6 ....6... ************************
******..6... *** WIPE OUT THE PATTERN..7
... ******************************..7H..
MS$MS$(8);.'7R.. T.1 . 400 : ..F7... PA
RM,1 : . CURRENT ARRAY.Z7...18635 : .187
12.M7..RE%.1 : . 3030..7... ************
******************..7... *** RETURN TO M
AIN MENU.U7... *************************
*****..7... RE%.0 . . 4180..8".. PARM,1
: .20574..8,.. Z..1 . . 4180."86.. I.0 .
Z.B8@.ZZ%(I,0).0 : ZZ%(I,1).0 : ..S8J.G
EN.0 : Z..1.^8T.. 1850..8^.. ***********
*******************..8H.. *** ADD/DELETE
A DOT.C8R.. ***************************
***.N8|..18847..8..RE%.1 : . 3140..9...
******************************.!9... ***
HELP INFORMATION.F9... ****************
**************.T9... 53269,0.J9... PARM,
1 : .20457.Z9B.. T$"....."..9L.. .5)".F1
. GENERAL INFO."..9V.. .5)".F3. FUNCTION
KEYS.".N9... .5)".F5. RETURN"..9... "..
.".5)"PRESS THE FUNCTION KEY...."..:...
K$ : . K$."" . 4340.8:... F(K$).133 . F(
K$).135 . . 4340.Y:... F(K$).132 . 4430,
4890,4370.O:... PARM,2 : .20457..:... PG
%.1 . . 1870..:&.. 53269,1 : . 3140..:0.
. ******************************..::.. *
** GENERAL INFORMATION..;D.. ***********
*******************..;N.. T$".".<;X.. ".
LIFE. IS A SIMULATION OF THE BIRTH,".J;B
.. "DEATH AND GROWTH OF CELLS IN A CLOSE
D"..;L.. "ENVIRONMENT. EACH GENERATION
DEVELOPS".H;V.. "BY LOOKING AT THE 8 NEI
GHBOURING CELLS"..;... "OF EACH CELL IN
THE CURRENT GENERATION.".'<... "THE RULE
S USED IN THIS EVALUATION ARE:".N<... ".
. GEN N NEIGHBOURS GEN N+1".~<... ".
ALIVE 0,1....... DEATH (ISOLATION)"..
<... " 2,3....... STAYS ALIVE".
T<... " 4,5,6,7,8. DEATH (CROWD
ED)"..<... " EMPTY 0,1,2..... NO CHAN
GE".)=F.. " 3......... NEW CELL
IS BORN".P=P.. " 4,5,6,7,8. NO
CHANGE".~=Z.. ".THUS EACH SUCCESSIVE GE
NERATION IS A"..=... "DIRECT RESULT OF T
HE PREVIOUS ONE."..=... MS$C$;.D=... 653
,1,0.P=... T$"."..=... "MANY OF THE INIT
IAL PATTERNS OF CELLS".,>... "WILL GROW
AND CHANGE IN BIZARRE WAYS.".Z> .. "SOME
WILL DEVOLVE INTO SINGLE OR SETS"..>*..
"OF STABLE OR OSCILLATING PATTERNS:."..
>4.C.102 : . FIRST CHARACTER.X>>.. "..ST
ABLE. BLOCK ."G(C.15)" .BOAT .";
..>H.. G(C.6)G(C.9)..?R.. .28)G(C.2)G(C.
1)"."..?\.. "..OSCILLATING. STREETLIGHT
S .".Y?F.. .13)G(C.0)G(C.8)G(C.12)G(C.
0)G(C.0);..?P.. .25)G(C.0)G(C.0)G(C.5)G(
C.0)G(C.0)..?Z.. .13)G(C.8)G(C.0)G(C.0)G
(C.8)G(C.0);.U?... .25)G(C.0)G(C.0)G(C.1
)G(C.0)G(C.0)..@... .13)G(C.10)G(C.0)G(C
.0)G(C.10)G(C.0);.*@... .25)G(C.3)G(C.1)
G(C.0)G(C.3)G(C.1).U@... .13)G(C.0)G(C.8
)G(C.12)G(C.0)G(C.0);.~@... .25)G(C.0)G(
C.0)G(C.5)G(C.0)G(C.0)..@... .13)G(C.0)G
(C.0)G(C.0)G(C.0)G(C.0);.Q@... .25)G(C.0
)G(C.0)G(C.1)G(C.0)G(C.0)..@J.. ".THERE
ARE MANY OTHER INTERESTING".(AT.. "PATTE
RNS POSSIBLE. EXPERIMENT A BIT".TA... "
AND SEE THE WIDE VARIETY OF .LIFE..".AA.
.. MS$C$;.XA... 653,1,0 : . 4290..A... *
*****************************..A... ***
FUNCTION KEY INFORMATION..A... *********
*********************..A... T$"."..B$..
PG%.2 . . 5120.:B... "..F1. EDIT .CRE
ATE A NEW PATTERN OR EDIT".XB8.. .14)"TH
E EXISTING ONE."..BB.. "..F2. RERUN .R
EPLAY THE SEQUENCE SO FAR."..BL.. .14)".
CTRL. = SLOW;.SHIFT. = HALT"..BV.. "..F3
. RUN .UPDATE THE PATTERN THROUGH"..
C`.. .14)"ONE GENERATION."./CJ.. "..F4.
SKIP .SKIP OVER A SPECIFIED".RCT.. .1
4)"NUMBER OF GENERATIONS."..C~.. "..F5.
SCROL .ENABLE THE .CRSR. KEYS TO". C..
. .14)"ALLOW SCROLLING.".QC... "..F6. CE
NTR .CENTRE THE PATTERN IN THE"..C...
.14)"DISPLAY AREA."..D... "..F7. EXIT
.QUIT THE PROGRAM."..D....FD... "..F8.
HELP .CALLUP A MENU TO GET".HDD.. .14
)"PROGRAM INFORMATION.."..DN.. "..THE FI
RST THING TO DO IS ENTER .EDIT. ".FDX..
"MODE (.F1.) TO CREATE THE PATTERN OF"..
D... "CELLS IN THE INITIAL COLONY."..D..
. MS$C$;..E... 653,1,0 : . 4290.@E... ".
.F1. LOAD .LOAD A NEW PATTERN FROM A"
.FE... .14)"DISK FILE.(NAME<11 CHARS)"..
E... "..F2. RESET .CHANGE THE PATTERN
BACK TO"..E... .14)"THE ORIGINAL PATTERN
."..E(.. "..F3. SAVE .SAVE THE PATTER
N IN A"..F2.. .14)"DISK FILE.(NAME<11 CH
ARS)".1F<.. "..F4. .NO FUNCTION.
".7FF...IFP.. "..F5. CLEAR .ERASE THE
CURRENT PATTERN.".OFZ....FD.. "..F6.
.NO FUNCTION."..FN...KFX.. "..F7. R
ETRN .RETURN TO THE MAIN PROGRAM"..F..
. .14)"DISPLAY AND MENU."..G... "..F8. H
ELP .CALLUP A MENU TO GET".7G... .14)
"PROGRAM INFORMATION..".GG .. ".NOTE: IF
THE PATTERN GETS CHANGED, THE"..G... "R
ERUN SEQUENCE GETS ERASED, THE GEN.".DG.
.. "COUNTER IS RESET TO 0, AND A NEW STA
RT-"..G... "ING PATTERN IS SAVED."..GH..
MS$C$;..HR.. 653,1,0 : . 4290.+H... ***
***************************.MH... *** EN
D AND LINK TO ML CODE.RH... ************
******************.XH...................
.. .. ..@.. ..@.. ..@.. ..@.. ..@.. ..@.
. ..@.. ..@.. ..@..... .HPA`.......P..@.
.@..@..@..@..@..@..@..@.. ...P.. .. .. .
. .. .. .. .. .. ....HP.`.@.......Y...D.
... ..}H. =........H <......M.H..H .....
..M.H..H .......H.F.M.H.....E.........P.
...}HHH.<P...<E..........E..........(P.`
......P8.BJJ......I<....JP.....PJJ..H..P
)....@.M.H8...E..........I@....I... ...I
.........P8.2JJJ......I(....JP.....PJJJ.
.H..P).... .M.H8...E.........DE... ...8.
F..H..P .)... ...P)........M.H.IF ...`..
.. KH .N8..H.X..H..N.H.@......M.H.......
.M.H......H....H.....H.... ..E.....H..E.
....H...I`....I...8..H..........I9.....9
.~H8.;..H........I9.....9.H8..H........
..I%.....%.{H8.'..H........I%.....%.|H.{
H.~H.ZH.}H... .Q. .Q. .Q. <Q. >Q. XQ. YQ
. ZQ. = .M..P.....P...P......ZH.}HHLH..
....<M.H..H....H...H....H.....HI`....HI.
....|H......HI..M.@....... .......&.ZH..
. .Q. .Q. =Q. XQ. YQ. < .M..<E.........<
E........ZHJPE..HI..M.Z.......Z.......&.
ZH... .Q. .Q. <Q. XQ. YQ. = .M..<E......
...<E........ZHJPE..HI..C.@....... .....
..:.ZH... .Q. .Q. <Q. =Q. >Q. . .M..P...
..P....ZHJPO..HI..C.(...............:.ZH
... .Q. .Q. .Q. <Q. >Q. = .M..P.....P...
.ZHJPO.@....... ......... .Q. <Q. =Q. .
.M..:E.........:E.......... .Q. <Q. =Q.
. .M.(................. .Q. .Q. =Q. < .M
..:E.........:E.......... .Q. .Q. <Q. =
.M .H`...................P.........`..I.
..I..XI..PI..N`.@.......|........ .....H
.<P...'............<E...........D.......
....H.<P.`.N.J.(.......D........ .....H.
<P...'..........8...<....F....@.........
..H.<P.`.0.@........ .H.....H.;P... ;...
.(....<E.........`.@........ :..H......P
........(....<E.........`.@........ ...P
.H.<P...(....<E...........H..D........ .
..P.H.<P...(..8...<....F.....H......H...
...I<....JP..I@..H..I...H8.(..H8..H.ZH .
..H....H...ZH..P.J....<E.........H.<PZ..
H ;..H....H...ZH..P.J....<E............P
Z.}H8.;.}H..H` .N8....H..H....I..I.....J
....H .MN.HP.8....H..H....I..I.....J....
H .MN.HP.`.. ........5`..D....E.....F..
...G.....X..{..Y..|..Z..}.....~HPM`....
D.....E.....F.....G..{..X..|..Y..}..Z..~
...HPM`.. .I...I..A`.@.....@.....@.....@
.....@.....@.....@.....@.....@..... ..@.
HPA`....@.....@.....@.....@.....@.....@.
....@.....@.....@..@.. .HPA`.... . .....
.A . .. .. ER.O.. F. ER.E.@.........ZH .
.}H O...H ER.H O...H ER.=.}H.ZH..H..H.<P
...(.. ....I<.......ZH.}HN.H..PQ.. C. ER
........H.. C...H..`.... . ......A . ..
.. ER.D.. I. ER.Z.@..........H....H.. ..
ZH.}H..M.H....H.. R. ER._.}H....H R. ER.
O....HI.P. R. ER.>..H R. ER.3....H..H.ZH
.}HH.<P...(.....I<.......... C. ER......
..H.. C...H..`.5 ...<.{H).....P1.{H)....
.P&.{H)@....P..{H).....P.....P...P.I.P..
....8`
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL