home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: ArcFS Archive
(archive/arcFS).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| ArcFS Archive (archive/arcFS)
| magic
| Supported |
| 100%
| file
| RISC OS archive (ArcFS format)
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Acorn ArcFS Archive
| default
| |
| 100%
| dearkID
| deark: arcfs
| default
| |
| 100%
| gt2
| Kopftext: 'Archive'
| default (weak)
| |
| 100%
| detectItEasy
| Archive: ArcFS
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | 44 01 00 00 54 03 00 00 |Archive.|D...T...|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 43 72 65 43 72 6f | 73 73 00 00 ff ff ff ff |.!CreCro|ss......|
|00000070| 44 dc fd ff fa d8 3e 57 | 33 00 00 00 ff ff ff ff |D.....>W|3.......|
|00000080| d8 00 00 80 82 21 52 75 | 6e 00 65 00 00 00 00 00 |.....!Ru|n.e.....|
|00000090| 22 00 00 00 43 eb ff ff | 7d 14 c9 2f 03 00 2b 46 |"...C...|}../..+F|
|000000a0| 22 00 00 00 59 29 00 00 | 82 21 53 70 72 69 74 65 |"...Y)..|.!Sprite|
|000000b0| 73 00 00 00 e4 03 00 00 | 43 f9 ff ff db dd 4d 1f |s.......|C.....M.|
|000000c0| 03 00 fb 14 e4 03 00 00 | 9f 29 00 00 82 43 52 4f |........|.)...CRO|
|000000d0| 53 53 00 00 00 00 00 00 | f7 79 00 00 43 fb ff ff |SS......|.y..C...|
|000000e0| 2d 51 4f 33 0b 00 8d 55 | f7 79 00 00 a7 2d 00 00 |-QO3...U|.y...-..|
|000000f0| 82 73 70 72 69 74 65 73 | 00 00 00 00 e4 62 00 00 |.sprites|.....b..|
|00000100| 43 f9 ff ff c4 5a 4e 30 | 0b 00 59 46 e4 62 00 00 |C....ZN0|..YF.b..|
|00000110| c2 a7 00 00 00 52 65 61 | 64 6d 65 00 00 00 00 00 |.....Rea|dme.....|
|00000120| a5 13 00 00 43 ff ff ff | ea 69 98 3d 03 00 ad fd |....C...|.i.=....|
|00000130| a5 13 00 00 90 15 00 00 | 82 4c 65 73 73 6f 6e 00 |........|.Lesson.|
|00000140| 00 00 00 00 48 15 00 00 | 43 ff ff ff a3 e2 54 33 |....H...|C.....T3|
|00000150| 03 00 d4 60 48 15 00 00 | 24 00 00 00 82 52 65 61 |...`H...|$....Rea|
|00000160| 64 6d 65 00 00 00 00 00 | a5 13 00 00 43 ff ff ff |dme.....|....C...|
|00000170| ea 69 98 3d 03 00 ad fd | a5 13 00 00 90 15 00 00 |.i.=....|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000350| 00 00 00 00 46 69 6c 65 | 44 61 74 61 82 4c 65 73 |....File|Data.Les|
|00000360| 73 6f 6e 00 00 00 00 00 | 48 15 00 00 43 ff ff ff |son.....|H...C...|
|00000370| a3 e2 54 33 03 00 d4 60 | 42 41 53 49 43 53 20 4f |..T3...`|BASICS O|
|00000380| 46 20 4d 45 4e 44 45 4c | 49 41 4e 20 49 4e 48 45 |F MENDEL|IAN INHE|
|00000390| 52 49 54 41 4e 43 45 0a | 3d 3d 3d 3d 3d 3d 3d 3d |RITANCE.|========|
|000003a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000003b0| 3d 3d 3d 3d 3d 3d 3d 0a | 54 68 65 20 63 68 61 72 |=======.|The char|
|000003c0| 61 63 74 65 72 69 73 74 | 69 63 73 20 6f 66 20 61 |acterist|ics of a|
|000003d0| 6e 20 6f 72 67 61 6e 69 | 73 6d 20 61 72 65 20 64 |n organi|sm are d|
|000003e0| 65 74 65 72 6d 69 6e 65 | 64 20 62 79 20 70 61 69 |etermine|d by pai|
|000003f0| 72 73 20 6f 66 20 67 65 | 6e 65 73 20 6b 6e 6f 77 |rs of ge|nes know|
|00000400| 6e 20 61 73 0a 41 4c 4c | 45 4c 45 53 2e 20 54 68 |n as.ALL|ELES. Th|
|00000410| 65 72 65 20 61 72 65 20 | 61 6c 74 65 72 6e 61 74 |ere are |alternat|
|00000420| 69 76 65 20 76 65 72 73 | 69 6f 6e 73 20 6f 66 20 |ive vers|ions of |
|00000430| 74 68 65 20 67 65 6e 65 | 73 20 69 6e 20 6d 6f 73 |the gene|s in mos|
|00000440| 74 20 70 61 69 72 73 2c | 65 67 20 69 6e 20 74 68 |t pairs,|eg in th|
|00000450| 65 0a 63 61 73 65 20 6f | 66 20 74 68 65 20 74 72 |e.case o|f the tr|
|00000460| 61 69 74 2c 68 61 69 72 | 20 63 6f 6c 6f 75 72 2c |ait,hair| colour,|
|00000470| 74 68 65 72 65 20 6d 61 | 79 20 62 65 20 67 65 6e |there ma|y be gen|
|00000480| 65 73 20 66 6f 72 20 62 | 72 6f 77 6e 20 68 61 69 |es for b|rown hai|
|00000490| 72 20 61 6e 64 20 67 65 | 6e 65 73 20 66 6f 72 0a |r and ge|nes for.|
|000004a0| 62 6c 6f 6e 64 20 68 61 | 69 72 2e 20 20 20 20 20 |blond ha|ir. |
|000004b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 0a 0a 57 | | ..W|
|000004c0| 68 65 6e 20 62 6f 74 68 | 20 67 65 6e 65 73 20 6f |hen both| genes o|
|000004d0| 66 20 61 20 70 61 69 72 | 20 61 72 65 20 69 64 65 |f a pair| are ide|
|000004e0| 6e 74 69 63 61 6c 20 74 | 68 65 20 6f 72 67 61 6e |ntical t|he organ|
|000004f0| 69 73 6d 20 69 73 20 73 | 61 69 64 20 74 6f 20 62 |ism is s|aid to b|
|00000500| 65 0a 48 4f 4d 4f 5a 59 | 47 4f 55 53 20 66 6f 72 |e.HOMOZY|GOUS for|
|00000510| 20 74 68 61 74 20 70 61 | 69 72 2e 0a 0a 57 68 65 | that pa|ir...Whe|
|00000520| 6e 20 74 68 65 20 67 65 | 6e 65 73 20 6f 66 20 61 |n the ge|nes of a|
|00000530| 20 70 61 69 72 20 61 72 | 65 20 64 69 66 66 65 72 | pair ar|e differ|
|00000540| 65 6e 74 20 74 68 65 20 | 6f 72 67 61 6e 69 73 6d |ent the |organism|
|00000550| 20 69 73 20 73 61 69 64 | 20 74 6f 20 62 65 0a 48 | is said| to be.H|
|00000560| 45 54 45 52 4f 5a 59 47 | 4f 55 53 20 66 6f 72 20 |ETEROZYG|OUS for |
|00000570| 74 68 61 74 20 70 61 69 | 72 2e 0a 0a 55 73 75 61 |that pai|r...Usua|
|00000580| 6c 6c 79 2c 20 77 68 65 | 6e 20 74 77 6f 20 64 69 |lly, whe|n two di|
|00000590| 66 66 65 72 65 6e 74 20 | 67 65 6e 65 73 20 61 72 |fferent |genes ar|
|000005a0| 65 20 70 72 65 73 65 6e | 74 20 69 6e 20 61 20 70 |e presen|t in a p|
|000005b0| 61 69 72 2c 20 6f 6e 65 | 20 6f 66 20 74 68 65 6d |air, one| of them|
|000005c0| 20 6d 61 73 6b 73 0a 74 | 68 65 20 65 66 66 65 63 | masks.t|he effec|
|000005d0| 74 20 6f 66 20 74 68 65 | 20 6f 74 68 65 72 2e 20 |t of the| other. |
|000005e0| 54 68 65 20 67 65 6e 65 | 20 77 68 69 63 68 20 69 |The gene| which i|
|000005f0| 73 20 6d 61 73 6b 65 64 | 20 69 73 20 73 61 69 64 |s masked| is said|
|00000600| 20 74 6f 20 62 65 20 52 | 45 43 45 53 53 49 56 45 | to be R|ECESSIVE|
|00000610| 0a 61 6e 64 20 74 68 65 | 20 6d 61 73 6b 69 6e 67 |.and the| masking|
|00000620| 20 67 65 6e 65 20 69 73 | 20 73 61 69 64 20 74 6f | gene is| said to|
|00000630| 20 62 65 20 44 4f 4d 49 | 4e 41 4e 54 2e 20 49 6e | be DOMI|NANT. In|
|00000640| 20 73 6f 6d 65 20 63 61 | 73 65 73 20 6e 65 69 74 | some ca|ses neit|
|00000650| 68 65 72 20 67 65 6e 65 | 20 69 73 0a 64 6f 6d 69 |her gene| is.domi|
|00000660| 6e 61 6e 74 20 74 6f 20 | 74 68 65 20 6f 74 68 65 |nant to |the othe|
|00000670| 72 20 61 6e 64 20 74 68 | 65 20 65 66 66 65 63 74 |r and th|e effect|
|00000680| 20 69 73 20 69 6e 74 65 | 72 6d 65 64 69 61 74 65 | is inte|rmediate|
|00000690| 2e 20 54 68 69 73 20 69 | 73 20 6b 6e 6f 77 6e 20 |. This i|s known |
|000006a0| 61 73 0a 63 6f 2d 64 6f | 6d 69 6e 61 6e 63 65 2e |as.co-do|minance.|
|000006b0| 0a 0a 54 68 65 20 63 68 | 61 72 61 63 74 65 72 69 |..The ch|aracteri|
|000006c0| 73 74 69 63 73 20 64 69 | 73 70 6c 61 79 65 64 20 |stics di|splayed |
|000006d0| 62 79 20 61 6e 20 6f 72 | 67 61 6e 69 73 6d 20 69 |by an or|ganism i|
|000006e0| 73 20 63 61 6c 6c 65 64 | 20 74 68 65 20 50 48 45 |s called| the PHE|
|000006f0| 4e 4f 54 59 50 45 2e 20 | 0a 0a 54 68 65 20 67 65 |NOTYPE. |..The ge|
|00000700| 6e 65 74 69 63 20 63 6f | 6e 73 74 69 74 75 74 69 |netic co|nstituti|
|00000710| 6f 6e 20 6f 66 20 74 68 | 65 20 6f 72 67 61 6e 69 |on of th|e organi|
|00000720| 73 6d 20 69 73 20 63 61 | 6c 6c 65 64 20 74 68 65 |sm is ca|lled the|
|00000730| 20 47 45 4e 4f 54 59 50 | 45 2e 0a 0a 57 68 65 6e | GENOTYP|E...When|
|00000740| 20 6f 72 67 61 6e 69 73 | 6d 73 20 72 65 70 72 6f | organis|ms repro|
|00000750| 64 75 63 65 2c 74 68 65 | 20 65 67 67 73 20 61 6e |duce,the| eggs an|
|00000760| 64 20 73 70 65 72 6d 73 | 20 6f 6e 6c 79 20 63 61 |d sperms| only ca|
|00000770| 72 72 79 20 6f 6e 65 20 | 67 65 6e 65 20 66 72 6f |rry one |gene fro|
|00000780| 6d 20 65 61 63 68 0a 70 | 61 69 72 2c 20 73 6f 20 |m each.p|air, so |
|00000790| 74 68 61 74 20 66 6f 6c | 6c 6f 77 69 6e 67 20 66 |that fol|lowing f|
|000007a0| 65 72 74 69 6c 69 7a 61 | 74 69 6f 6e 20 74 68 65 |ertiliza|tion the|
|000007b0| 20 6f 66 66 73 70 72 69 | 6e 67 20 69 6e 68 65 72 | offspri|ng inher|
|000007c0| 69 74 20 6f 6e 65 20 67 | 65 6e 65 20 66 72 6f 6d |it one g|ene from|
|000007d0| 0a 65 61 63 68 20 70 61 | 72 65 6e 74 2e 20 20 20 |.each pa|rent. |
|000007e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000007f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000810| 20 20 20 20 20 0a 0a 54 | 68 65 20 67 65 6e 65 73 | ..T|he genes|
|00000820| 20 61 72 65 20 6c 6f 63 | 61 74 65 64 20 6f 6e 20 | are loc|ated on |
|00000830| 73 74 72 75 63 74 75 72 | 65 20 63 61 6c 6c 65 64 |structur|e called|
|00000840| 20 63 68 72 6f 6d 6f 73 | 6f 6d 65 73 20 28 66 6f | chromos|omes (fo|
|00000850| 75 6e 64 20 69 6e 20 74 | 68 65 20 6e 75 63 6c 65 |und in t|he nucle|
|00000860| 75 73 0a 6f 66 20 63 65 | 6c 6c 73 29 2e 20 54 68 |us.of ce|lls). Th|
|00000870| 65 20 63 68 72 6f 6d 6f | 73 6f 6d 65 73 20 75 73 |e chromo|somes us|
|00000880| 75 61 6c 6c 79 20 6f 63 | 63 75 72 20 69 6e 20 70 |ually oc|cur in p|
|00000890| 61 69 72 73 20 28 48 6f | 6d 6f 6c 6f 67 6f 75 73 |airs (Ho|mologous|
|000008a0| 20 70 61 69 72 73 29 20 | 61 6e 64 20 74 68 65 0a | pairs) |and the.|
|000008b0| 70 61 69 72 73 20 6f 66 | 20 67 65 6e 65 73 20 77 |pairs of| genes w|
|000008c0| 69 6c 6c 20 62 65 20 6c | 6f 63 61 74 65 64 20 6f |ill be l|ocated o|
|000008d0| 6e 65 20 6f 6e 20 65 61 | 63 68 20 6f 66 20 61 20 |ne on ea|ch of a |
|000008e0| 70 61 69 72 20 6f 66 20 | 63 68 72 6f 6d 6f 73 6f |pair of |chromoso|
|000008f0| 6d 65 73 20 28 61 74 20 | 74 68 65 0a 73 61 6d 65 |mes (at |the.same|
|00000900| 20 72 65 6c 61 74 69 76 | 65 20 70 6f 73 69 74 69 | relativ|e positi|
|00000910| 6f 6e 29 2e 20 41 73 20 | 74 68 65 72 65 20 61 72 |on). As |there ar|
|00000920| 65 20 6d 61 6e 79 20 6d | 6f 72 65 20 67 65 6e 65 |e many m|ore gene|
|00000930| 73 20 74 68 61 6e 20 74 | 68 65 72 65 20 61 72 65 |s than t|here are|
|00000940| 0a 63 68 72 6f 6d 6f 73 | 6f 6d 65 73 20 67 65 6e |.chromos|omes gen|
|00000950| 65 73 20 66 6f 72 20 63 | 65 72 74 61 69 6e 20 74 |es for c|ertain t|
|00000960| 72 61 69 74 73 20 77 69 | 6c 6c 20 62 65 20 6f 6e |raits wi|ll be on|
|00000970| 20 74 68 65 20 73 61 6d | 65 20 63 68 72 6f 6d 6f | the sam|e chromo|
|00000980| 73 6f 6d 65 20 61 6e 64 | 20 74 65 6e 64 0a 74 6f |some and| tend.to|
|00000990| 20 62 65 20 69 6e 68 65 | 72 69 74 65 64 20 74 6f | be inhe|rited to|
|000009a0| 67 65 74 68 65 72 2e 20 | 54 68 65 73 65 20 67 65 |gether. |These ge|
|000009b0| 6e 65 73 20 61 72 65 20 | 73 61 69 64 20 74 6f 20 |nes are |said to |
|000009c0| 62 65 20 4c 49 4e 4b 45 | 44 2e 0a 4f 6e 65 20 6f |be LINKE|D..One o|
|000009d0| 66 20 74 68 65 20 70 61 | 69 72 73 20 6f 66 20 63 |f the pa|irs of c|
|000009e0| 68 72 6f 6d 6f 73 6f 6d | 65 73 20 61 72 65 20 63 |hromosom|es are c|
|000009f0| 61 6c 6c 65 64 20 74 68 | 65 20 73 65 78 20 63 68 |alled th|e sex ch|
|00000a00| 72 6f 6d 6f 73 6f 6d 65 | 73 2e 20 49 6e 20 74 68 |romosome|s. In th|
|00000a10| 65 20 66 65 6d 61 6c 65 | 0a 74 68 65 73 65 20 61 |e female|.these a|
|00000a20| 72 65 20 73 69 6d 69 6c | 61 72 20 61 6e 64 20 72 |re simil|ar and r|
|00000a30| 65 66 65 72 72 65 64 20 | 74 6f 20 61 73 20 58 20 |eferred |to as X |
|00000a40| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 2e 20 49 6e 20 |chromoso|mes. In |
|00000a50| 6d 61 6c 65 73 20 6f 6e | 65 20 6f 66 20 74 68 65 |males on|e of the|
|00000a60| 0a 63 68 72 6f 6d 6f 73 | 6f 6d 65 73 20 69 73 20 |.chromos|omes is |
|00000a70| 73 6d 61 6c 6c 65 72 20 | 61 6e 64 20 74 65 72 6d |smaller |and term|
|00000a80| 65 64 20 74 68 65 20 59 | 20 63 68 72 6f 6d 6f 73 |ed the Y| chromos|
|00000a90| 6f 6d 65 2e 20 28 69 65 | 20 66 65 6d 61 6c 65 73 |ome. (ie| females|
|00000aa0| 3d 58 58 20 6d 61 6c 65 | 73 20 58 59 29 20 54 68 |=XX male|s XY) Th|
|00000ab0| 65 20 59 20 63 68 72 6f | 6d 6f 73 6f 6d 65 20 6c |e Y chro|mosome l|
|00000ac0| 61 63 6b 73 20 6d 61 6e | 79 20 67 65 6e 65 73 20 |acks man|y genes |
|00000ad0| 77 68 69 63 68 20 61 72 | 65 20 6f 6e 20 74 68 65 |which ar|e on the|
|00000ae0| 20 58 20 63 68 72 6f 6d | 6f 73 6f 6d 65 20 73 6f | X chrom|osome so|
|00000af0| 20 74 68 61 74 20 61 0a | 6d 61 6c 65 20 77 69 6c | that a.|male wil|
|00000b00| 6c 20 6f 6e 6c 79 20 68 | 61 76 65 20 6f 6e 65 20 |l only h|ave one |
|00000b10| 6d 65 6d 62 65 72 20 6f | 66 20 73 75 63 68 20 67 |member o|f such g|
|00000b20| 65 6e 65 20 70 61 69 72 | 73 2e 20 54 68 65 20 6d |ene pair|s. The m|
|00000b30| 61 6c 65 73 20 74 68 75 | 73 20 61 6c 77 61 79 73 |ales thu|s always|
|00000b40| 0a 65 78 68 69 62 69 74 | 20 74 68 65 20 63 68 61 |.exhibit| the cha|
|00000b50| 72 61 63 74 65 72 69 73 | 74 69 63 73 20 64 65 74 |racteris|tics det|
|00000b60| 65 72 6d 69 6e 65 64 20 | 62 79 20 74 68 65 73 65 |ermined |by these|
|00000b70| 20 67 65 6e 65 20 61 73 | 20 74 68 65 72 65 20 69 | gene as| there i|
|00000b80| 73 20 6e 6f 0a 70 61 72 | 74 6e 65 72 69 6e 67 20 |s no.par|tnering |
|00000b90| 67 65 6e 65 20 74 6f 20 | 64 6f 6d 69 6e 61 74 65 |gene to |dominate|
|00000ba0| 20 74 68 65 6d 2e 54 68 | 65 73 65 20 67 65 6e 65 | them.Th|ese gene|
|00000bb0| 73 20 77 68 69 63 68 20 | 61 72 65 20 6f 6e 6c 79 |s which |are only|
|00000bc0| 20 70 72 65 73 65 6e 74 | 20 6f 6e 20 74 68 65 20 | present| on the |
|00000bd0| 58 0a 63 68 72 6f 6d 6f | 73 6f 6d 65 20 61 72 65 |X.chromo|some are|
|00000be0| 20 73 61 69 64 20 74 6f | 20 62 65 20 53 45 58 20 | said to| be SEX |
|00000bf0| 4c 49 4e 4b 45 44 2e 0a | 0a 45 78 61 6d 70 6c 65 |LINKED..|.Example|
|00000c00| 73 20 6f 66 20 43 72 6f | 73 73 65 73 3a 0a 49 6e |s of Cro|sses:.In|
|00000c10| 20 67 61 72 64 65 6e 20 | 70 65 61 73 20 74 68 65 | garden |peas the|
|00000c20| 72 65 20 69 73 20 61 20 | 70 61 69 72 20 6f 66 20 |re is a |pair of |
|00000c30| 67 65 6e 65 73 20 63 6f | 6e 74 72 6f 6c 69 6e 67 |genes co|ntroling|
|00000c40| 20 68 65 69 67 68 74 2e | 20 54 68 65 20 67 65 6e | height.| The gen|
|00000c50| 65 20 66 6f 72 20 74 61 | 6c 6c 0a 69 73 20 64 6f |e for ta|ll.is do|
|00000c60| 6d 69 6e 61 6e 74 20 74 | 6f 20 74 68 65 20 67 65 |minant t|o the ge|
|00000c70| 6e 65 20 66 6f 72 20 64 | 77 61 72 66 2e 0a 4c 65 |ne for d|warf..Le|
|00000c80| 74 20 74 68 65 20 63 61 | 70 69 74 61 6c 20 6c 65 |t the ca|pital le|
|00000c90| 74 74 65 72 20 27 54 27 | 20 72 65 70 72 65 73 65 |tter 'T'| represe|
|00000ca0| 6e 74 20 74 68 65 20 67 | 65 6e 65 20 66 6f 72 20 |nt the g|ene for |
|00000cb0| 74 61 6c 6c 0a 4c 65 74 | 20 74 68 65 20 73 6d 61 |tall.Let| the sma|
|00000cc0| 6c 6c 20 6c 65 74 74 65 | 72 20 27 74 27 20 72 65 |ll lette|r 't' re|
|00000cd0| 70 72 65 73 65 6e 74 20 | 74 68 65 20 67 65 6e 65 |present |the gene|
|00000ce0| 20 66 6f 72 20 64 77 61 | 72 66 0a 0a 50 75 72 65 | for dwa|rf..Pure|
|00000cf0| 20 62 72 65 65 64 69 6e | 67 20 70 6c 61 6e 74 73 | breedin|g plants|
|00000d00| 20 77 69 6c 6c 20 62 65 | 20 68 6f 6d 6f 7a 79 67 | will be| homozyg|
|00000d10| 6f 75 73 20 69 65 20 54 | 54 20 28 54 61 6c 6c 29 |ous ie T|T (Tall)|
|00000d20| 20 6f 72 20 74 74 20 28 | 44 77 61 72 66 29 20 0a | or tt (|Dwarf) .|
|00000d30| 0a 43 6f 6e 73 69 64 65 | 72 20 63 72 6f 73 73 69 |.Conside|r crossi|
|00000d40| 6e 67 20 61 20 70 75 72 | 65 20 62 72 65 65 64 69 |ng a pur|e breedi|
|00000d50| 6e 67 20 74 61 6c 6c 20 | 77 69 74 68 20 61 20 70 |ng tall |with a p|
|00000d60| 75 72 65 20 62 72 65 65 | 64 69 6e 67 20 64 77 61 |ure bree|ding dwa|
|00000d70| 72 66 0a 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |rf.. | |
|00000d80| 20 20 20 20 20 20 20 20 | 20 20 54 61 6c 6c 20 20 | | Tall |
|00000d90| 20 20 20 20 44 77 61 72 | 66 0a 20 20 20 20 20 20 | Dwar|f. |
|00000da0| 20 50 31 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | P1 | |
|00000db0| 20 54 54 20 20 20 78 20 | 20 20 20 74 74 0a 20 20 | TT x | tt. |
|00000dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000dd0| 20 20 20 20 20 20 7c 20 | 20 20 20 20 20 20 20 7c | | | ||
|00000de0| 0a 20 20 20 20 20 20 20 | 47 61 6d 65 74 65 73 20 |. |Gametes |
|00000df0| 20 20 20 20 20 20 20 20 | 20 54 20 20 20 20 20 20 | | T |
|00000e00| 20 20 54 20 20 20 28 73 | 65 78 20 63 65 6c 6c 20 | T (s|ex cell |
|00000e10| 6f 6e 6c 79 20 63 61 72 | 72 79 20 6f 6e 65 20 67 |only car|ry one g|
|00000e20| 65 6e 65 20 6f 66 20 61 | 20 70 61 69 72 29 0a 20 |ene of a| pair). |
|00000e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000e40| 20 20 20 20 20 20 20 20 | 20 5c 20 20 20 2f 20 0a | | \ / .|
|00000e50| 20 20 20 20 20 20 20 46 | 31 20 20 20 20 20 20 20 | F|1 |
|00000e60| 20 20 20 20 20 20 20 20 | 20 20 20 54 74 20 20 20 | | Tt |
|00000e70| 20 20 28 41 6c 6c 20 6f | 66 66 73 70 72 69 6e 67 | (All o|ffspring|
|00000e80| 20 61 72 65 20 74 61 6c | 6c 20 62 75 74 20 63 61 | are tal|l but ca|
|00000e90| 72 72 79 20 67 65 6e 65 | 20 27 74 27 29 0a 0a 4e |rry gene| 't')..N|
|00000ea0| 6f 77 20 69 6e 74 65 72 | 62 72 65 65 64 20 74 68 |ow inter|breed th|
|00000eb0| 65 20 46 31 20 67 65 6e | 65 72 61 74 69 6f 6e 0a |e F1 gen|eration.|
|00000ec0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00000ed0| 20 20 20 20 20 20 20 20 | 54 61 6c 6c 20 20 20 20 | |Tall |
|00000ee0| 20 54 61 6c 6c 0a 20 20 | 20 20 20 20 20 46 31 20 | Tall. | F1 |
|00000ef0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 54 74 | | Tt|
|00000f00| 20 20 20 78 20 20 20 54 | 74 0a 20 20 20 20 20 20 | x T|t. |
|00000f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f20| 20 20 2f 5c 20 20 20 20 | 20 20 20 2f 5c 0a 20 20 | /\ | /\. |
|00000f30| 20 20 20 20 20 47 61 6d | 65 74 65 73 20 20 20 20 | Gam|etes |
|00000f40| 20 20 20 20 20 54 20 20 | 74 20 20 20 20 20 54 20 | T |t T |
|00000f50| 20 74 20 20 20 20 20 20 | 28 48 61 6c 66 20 74 68 | t |(Half th|
|00000f60| 65 20 73 65 78 20 63 65 | 6c 6c 73 20 63 61 72 72 |e sex ce|lls carr|
|00000f70| 79 20 67 65 6e 65 20 66 | 6f 72 0a 20 20 20 20 20 |y gene f|or. |
|00000f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000fa0| 20 20 20 20 20 20 74 61 | 6c 6c 20 68 61 6c 66 20 | ta|ll half |
|00000fb0| 67 65 6e 65 20 66 6f 72 | 20 64 77 61 72 66 29 20 |gene for| dwarf) |
|00000fc0| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 20 20 20 | |. |
|00000fd0| 0a 20 20 20 20 46 75 73 | 69 6f 6e 20 6f 66 20 73 |. Fus|ion of s|
|00000fe0| 65 78 20 63 65 6c 6c 73 | 20 28 46 45 52 54 49 4c |ex cells| (FERTIL|
|00000ff0| 49 5a 41 54 49 4f 4e 29 | 20 6f 63 63 75 72 73 20 |IZATION)| occurs |
|00001000| 72 61 6e 64 6f 6d 6c 79 | 20 69 65 2e 0a 0a 20 20 |randomly| ie... |
|00001010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001020| 20 20 20 20 20 20 20 4d | 61 6c 65 20 67 61 6d 65 | M|ale game|
|00001030| 74 65 73 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |tes. | |
|00001040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001050| 54 20 20 20 20 74 0a 20 | 20 20 20 20 20 20 20 20 |T t. | |
|00001060| 20 20 20 20 20 20 20 46 | 65 6d 61 6c 65 20 20 20 | F|emale |
|00001070| 54 20 20 54 54 20 20 20 | 54 74 20 20 20 0a 20 20 |T TT |Tt . |
|00001080| 20 20 20 20 20 20 46 32 | 20 20 20 20 20 20 67 61 | F2| ga|
|00001090| 6d 65 74 65 73 20 20 74 | 20 20 54 74 20 20 20 74 |metes t| Tt t|
|000010a0| 74 20 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t . | |
|000010b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000010c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000010d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000010e0| 20 20 20 20 20 20 0a 20 | 54 68 72 65 65 20 71 75 | . |Three qu|
|000010f0| 61 72 74 65 72 73 20 6f | 74 20 74 68 65 20 6f 66 |arters o|t the of|
|00001100| 66 73 70 72 69 6e 67 20 | 61 72 65 20 74 61 6c 6c |fspring |are tall|
|00001110| 20 61 6e 64 20 6f 6e 65 | 20 71 75 61 72 74 65 72 | and one| quarter|
|00001120| 20 64 77 61 72 66 20 33 | 3a 31 20 72 61 74 69 6f | dwarf 3|:1 ratio|
|00001130| 2e 0a 48 6f 77 65 76 65 | 72 2c 20 6f 66 20 74 68 |..Howeve|r, of th|
|00001140| 65 20 74 61 6c 6c 20 69 | 6e 64 69 76 69 64 75 61 |e tall i|ndividua|
|00001150| 6c 73 2c 20 6f 6e 6c 79 | 20 6f 6e 65 20 74 68 69 |ls, only| one thi|
|00001160| 72 64 20 77 69 6c 6c 20 | 62 72 65 65 64 20 74 72 |rd will |breed tr|
|00001170| 75 65 20 27 54 54 27 2c | 20 74 68 65 0a 6f 74 68 |ue 'TT',| the.oth|
|00001180| 65 72 73 20 61 72 65 20 | 73 69 6d 69 6c 61 72 20 |ers are |similar |
|00001190| 74 6f 20 74 68 65 69 72 | 20 70 61 72 65 6e 74 73 |to their| parents|
|000011a0| 20 27 54 74 27 2e 0a 4e | 2e 42 20 54 68 65 20 72 | 'Tt'..N|.B The r|
|000011b0| 61 74 69 6f 73 20 61 72 | 65 20 64 75 65 20 74 6f |atios ar|e due to|
|000011c0| 20 70 72 6f 62 61 62 69 | 6c 69 74 79 20 61 6e 64 | probabi|lity and|
|000011d0| 20 77 69 6c 6c 20 6e 6f | 74 20 61 6c 77 61 79 73 | will no|t always|
|000011e0| 20 62 65 20 65 78 61 63 | 74 2e 0a 0a 49 66 20 74 | be exac|t...If t|
|000011f0| 68 65 73 65 20 67 65 6e | 65 73 20 66 6f 72 20 73 |hese gen|es for s|
|00001200| 69 7a 65 20 77 65 72 65 | 20 63 6f 2d 64 6f 6d 69 |ize were| co-domi|
|00001210| 6e 61 6e 74 20 74 68 65 | 6e 20 74 68 65 20 27 54 |nant the|n the 'T|
|00001220| 74 27 20 69 6e 64 69 76 | 69 64 75 61 6c 73 20 77 |t' indiv|iduals w|
|00001230| 6f 75 6c 64 20 62 65 0a | 6d 65 64 69 75 6d 20 68 |ould be.|medium h|
|00001240| 65 69 67 68 74 20 61 6e | 64 20 74 68 65 20 6f 66 |eight an|d the of|
|00001250| 66 73 70 72 69 6e 67 20 | 72 61 74 69 6f 20 20 20 |fspring |ratio |
|00001260| 31 20 54 61 6c 6c 3a 20 | 32 20 4d 65 64 69 75 6d |1 Tall: |2 Medium|
|00001270| 3a 20 31 20 44 77 61 72 | 66 2e 20 20 20 20 20 20 |: 1 Dwar|f. |
|00001280| 20 0a 0a 57 68 61 74 20 | 77 69 6c 6c 20 68 61 70 | ..What |will hap|
|00001290| 70 65 6e 20 69 66 20 79 | 6f 75 20 63 72 6f 73 73 |pen if y|ou cross|
|000012a0| 20 27 54 74 27 54 61 6c | 6c 20 77 69 74 68 20 61 | 'Tt'Tal|l with a|
|000012b0| 20 64 77 61 72 66 28 74 | 74 29 3f 0a 0a 45 78 61 | dwarf(t|t)?..Exa|
|000012c0| 6d 70 6c 65 20 6f 66 20 | 73 65 78 20 6c 69 6e 6b |mple of |sex link|
|000012d0| 61 67 65 3a 0a 48 61 65 | 6d 6f 70 68 69 6c 69 61 |age:.Hae|mophilia|
|000012e0| 20 69 6e 20 68 75 6d 61 | 6e 73 20 69 73 20 73 65 | in huma|ns is se|
|000012f0| 78 20 6c 69 6e 6b 65 64 | 20 61 6e 64 20 74 68 65 |x linked| and the|
|00001300| 20 63 6f 6e 64 69 74 69 | 6f 6e 20 69 73 20 72 65 | conditi|on is re|
|00001310| 63 65 73 73 69 76 65 2e | 0a 4c 65 74 20 48 3d 47 |cessive.|.Let H=G|
|00001320| 65 6e 65 20 66 6f 72 20 | 6e 6f 72 6d 61 6c 20 62 |ene for |normal b|
|00001330| 6c 6f 6f 64 20 63 6c 6f | 74 74 69 6e 67 0a 4c 65 |lood clo|tting.Le|
|00001340| 74 20 68 3d 47 65 6e 65 | 20 66 6f 72 20 68 61 65 |t h=Gene| for hae|
|00001350| 6d 6f 70 68 69 6c 69 61 | 0a 43 6f 6e 73 69 64 65 |mophilia|.Conside|
|00001360| 72 20 61 20 68 61 65 6d | 6f 70 68 69 6c 69 63 20 |r a haem|ophilic |
|00001370| 77 6f 6d 61 6e 20 28 72 | 61 72 65 29 20 61 6e 64 |woman (r|are) and|
|00001380| 20 61 20 6e 6f 72 6d 61 | 6c 20 6d 61 6e 0a 20 20 | a norma|l man. |
|00001390| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000013a0| 20 20 20 20 20 20 20 20 | 0a 20 20 20 20 20 20 20 | |. |
|000013b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000013c0| 68 20 20 68 20 20 20 20 | 20 20 20 20 20 20 20 48 |h h | H|
|000013d0| 0a 20 20 20 20 20 20 20 | 20 20 50 31 20 20 20 20 |. | P1 |
|000013e0| 20 20 20 20 20 20 20 58 | 20 20 58 20 20 20 20 20 | X| X |
|000013f0| 78 20 20 20 20 20 58 20 | 20 59 20 20 20 28 4e 2e |x X | Y (N.|
|00001400| 42 20 4e 6f 20 67 65 6e | 65 20 6f 6e 20 59 20 63 |B No gen|e on Y c|
|00001410| 68 72 6f 6d 6f 73 6f 6d | 65 29 0a 20 20 20 20 20 |hromosom|e). |
|00001420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001430| 20 20 20 7c 20 20 20 20 | 20 20 20 20 20 20 20 20 | | | |
|00001440| 20 2f 20 5c 20 0a 20 20 | 20 20 20 20 20 20 20 20 | / \ . | |
|00001450| 20 20 20 20 20 20 20 20 | 20 20 20 20 68 20 20 20 | | h |
|00001460| 20 20 68 20 20 20 20 20 | 20 20 48 20 20 20 20 20 | h | H |
|00001470| 20 20 0a 20 20 20 20 20 | 20 20 20 20 47 61 6d 65 | . | Game|
|00001480| 74 65 73 20 20 20 20 20 | 58 20 20 20 20 20 58 20 |tes |X X |
|00001490| 20 20 20 20 20 20 58 20 | 20 20 20 20 59 0a 20 20 | X | Y. |
|000014a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000014b0| 20 20 20 7c 20 20 20 20 | 20 20 20 20 5c 20 20 2f | | | \ /|
|000014c0| 20 20 20 20 20 20 20 7c | 20 20 20 20 20 20 20 20 | || |
|000014d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000014e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000014f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001500| 20 48 20 68 20 20 20 20 | 20 20 20 20 20 20 20 20 | H h | |
|00001510| 20 20 20 68 0a 20 20 20 | 20 20 20 20 20 20 46 31 | h. | F1|
|00001520| 20 20 20 20 20 20 20 20 | 20 20 58 20 58 20 20 20 | | X X |
|00001530| 20 20 20 20 20 20 20 20 | 20 20 20 20 58 20 59 20 | | X Y |
|00001540| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001550| 20 20 20 20 20 46 65 6d | 61 6c 65 20 20 20 20 20 | Fem|ale |
|00001560| 20 20 20 20 20 20 20 20 | 4d 61 6c 65 0a 20 20 20 | |Male. |
|00001570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001580| 20 4e 6f 72 6d 61 6c 20 | 20 20 20 20 20 20 20 20 | Normal | |
|00001590| 20 48 61 65 6d 6f 70 68 | 69 6c 69 63 0a 0a 46 69 | Haemoph|ilic..Fi|
|000015a0| 6e 64 20 77 68 69 63 68 | 20 74 72 61 69 74 73 20 |nd which| traits |
|000015b0| 69 6e 20 74 68 65 20 70 | 72 6f 67 72 61 6d 20 61 |in the p|rogram a|
|000015c0| 72 65 20 73 65 78 20 6c | 69 6e 6b 65 64 20 61 6e |re sex l|inked an|
|000015d0| 64 20 69 6e 76 65 73 74 | 69 67 61 74 65 20 74 68 |d invest|igate th|
|000015e0| 65 20 72 65 73 75 6c 74 | 0a 6f 66 20 6f 74 68 65 |e result|.of othe|
|000015f0| 72 20 63 72 6f 73 73 65 | 73 2e 0a 0a 46 6f 72 20 |r crosse|s...For |
|00001600| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 6f 6e 20 77 |informat|ion on w|
|00001610| 68 61 74 20 68 61 70 70 | 65 6e 73 20 77 68 65 6e |hat happ|ens when|
|00001620| 20 79 6f 75 20 61 72 65 | 20 69 6e 76 65 73 74 69 | you are| investi|
|00001630| 67 61 74 69 6e 67 20 32 | 20 70 61 69 72 73 20 6f |gating 2| pairs o|
|00001640| 66 20 67 65 6e 65 73 0a | 61 74 20 74 68 65 20 73 |f genes.|at the s|
|00001650| 61 6d 65 20 74 69 6d 65 | 20 61 6e 64 20 74 68 65 |ame time| and the|
|00001660| 20 65 66 66 65 63 74 20 | 6f 66 20 61 75 74 6f 73 | effect |of autos|
|00001670| 6f 6d 61 6c 20 6c 69 6e | 6b 61 67 65 20 79 6f 75 |omal lin|kage you|
|00001680| 20 77 69 6c 6c 20 6e 65 | 65 64 20 74 6f 20 63 6f | will ne|ed to co|
|00001690| 6e 73 75 6c 74 0a 61 20 | 74 65 78 74 20 62 6f 6f |nsult.a |text boo|
|000016a0| 6b 20 61 73 20 69 74 20 | 77 6f 75 6c 64 20 74 61 |k as it |would ta|
|000016b0| 6b 65 20 75 70 20 74 6f | 6f 20 6d 75 63 68 20 73 |ke up to|o much s|
|000016c0| 70 61 63 65 20 68 65 72 | 65 2e 0a 0a 54 68 65 20 |pace her|e...The |
|000016d0| 63 68 69 2d 73 71 75 61 | 72 65 64 20 74 65 73 74 |chi-squa|red test|
|000016e0| 20 64 65 74 65 72 6d 69 | 6e 65 73 20 74 68 65 20 | determi|nes the |
|000016f0| 70 72 6f 62 61 62 69 6c | 69 74 79 20 74 68 61 74 |probabil|ity that|
|00001700| 20 61 6e 79 20 64 65 76 | 69 61 74 69 6f 6e 20 66 | any dev|iation f|
|00001710| 72 6f 6d 20 61 6e 0a 65 | 78 70 65 63 74 65 64 20 |rom an.e|xpected |
|00001720| 72 61 74 69 6f 20 69 73 | 20 64 75 65 20 74 6f 20 |ratio is| due to |
|00001730| 63 68 61 6e 63 65 20 61 | 6c 6f 6e 65 2e 0a 54 68 |chance a|lone..Th|
|00001740| 65 20 73 69 67 6e 69 66 | 69 63 61 6e 63 65 20 6c |e signif|icance l|
|00001750| 65 76 65 6c 20 69 73 20 | 75 73 75 61 6c 6c 79 20 |evel is |usually |
|00001760| 74 61 6b 65 6e 20 61 74 | 20 30 2e 30 35 20 28 35 |taken at| 0.05 (5|
|00001770| 25 29 20 62 75 74 20 66 | 6f 72 20 67 72 65 61 74 |%) but f|or great|
|00001780| 65 72 0a 63 65 72 74 61 | 69 6e 74 79 20 69 74 20 |er.certa|inty it |
|00001790| 6d 61 79 20 62 65 20 64 | 65 63 72 65 61 73 65 64 |may be d|ecreased|
|000017a0| 20 74 6f 20 30 2e 30 31 | 20 28 31 25 29 2e 20 54 | to 0.01| (1%). T|
|000017b0| 68 69 73 20 6d 65 61 6e | 73 20 74 68 61 74 20 61 |his mean|s that a|
|000017c0| 20 70 72 6f 62 61 62 69 | 6c 69 74 79 0a 6f 76 65 | probabi|lity.ove|
|000017d0| 72 20 30 2e 30 35 20 69 | 6e 64 69 63 61 74 65 73 |r 0.05 i|ndicates|
|000017e0| 20 74 68 61 74 20 74 68 | 65 20 64 65 76 69 61 74 | that th|e deviat|
|000017f0| 69 6f 6e 20 66 72 6f 6d | 20 74 68 65 20 65 78 70 |ion from| the exp|
|00001800| 65 63 74 65 64 20 63 6f | 75 6c 64 20 62 65 20 64 |ected co|uld be d|
|00001810| 75 65 20 74 6f 0a 63 68 | 61 6e 63 65 20 61 6c 6f |ue to.ch|ance alo|
|00001820| 6e 65 20 77 68 65 72 65 | 61 73 20 77 69 74 68 20 |ne where|as with |
|00001830| 61 20 70 72 6f 62 61 62 | 69 6c 69 74 79 20 62 65 |a probab|ility be|
|00001840| 6c 6f 77 20 30 2e 30 35 | 20 74 68 65 20 64 65 76 |low 0.05| the dev|
|00001850| 69 61 74 69 6f 6e 20 77 | 6f 75 6c 64 20 6f 6e 6c |iation w|ould onl|
|00001860| 79 0a 62 65 20 64 75 65 | 20 74 6f 20 63 68 61 6e |y.be due| to chan|
|00001870| 63 65 20 31 20 69 6e 20 | 65 76 65 72 79 20 32 30 |ce 1 in |every 20|
|00001880| 20 6f 63 63 75 72 72 65 | 6e 63 65 73 2c 20 69 65 | occurre|nces, ie|
|00001890| 20 74 68 65 20 64 65 76 | 69 61 74 69 6f 6e 20 66 | the dev|iation f|
|000018a0| 72 6f 6d 20 74 68 65 20 | 65 78 70 65 63 74 65 64 |rom the |expected|
|000018b0| 0a 69 73 20 73 69 67 6e | 69 66 69 63 61 6e 74 2e |.is sign|ificant.|
|000018c0| 46 69 6c 65 44 61 74 61 | 82 52 65 61 64 6d 65 00 |FileData|.Readme.|
|000018d0| 00 00 00 00 a5 13 00 00 | 43 ff ff ff ea 69 98 3d |........|C....i.=|
|000018e0| 03 00 ad fd 43 52 45 41 | 54 55 52 45 20 43 52 4f |....CREA|TURE CRO|
|000018f0| 53 53 20 28 56 65 72 73 | 69 6f 6e 20 31 29 0a 3d |SS (Vers|ion 1).=|
|00001900| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00001910| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 0a 50 75 62 6c 69 63 |========|=.Public|
|00001920| 20 44 6f 6d 61 69 6e 20 | 42 79 20 4c 61 6e 63 65 | Domain |By Lance|
|00001930| 20 50 65 74 65 72 73 0a | 0a 52 65 71 75 69 72 65 | Peters.|.Require|
|00001940| 73 20 31 36 30 6b 20 66 | 6f 72 20 53 63 72 65 65 |s 160k f|or Scree|
|00001950| 6e 20 4d 65 6d 6f 72 79 | 20 61 6e 64 20 33 32 6b |n Memory| and 32k|
|00001960| 20 66 6f 72 20 53 79 73 | 74 65 6d 20 73 70 72 69 | for Sys|tem spri|
|00001970| 74 65 73 0a 20 0a 41 20 | 62 61 73 69 63 20 6b 6e |tes. .A |basic kn|
|00001980| 6f 77 6c 65 64 67 65 20 | 6f 66 20 69 6e 68 65 72 |owledge |of inher|
|00001990| 69 74 61 6e 63 65 2c 20 | 61 73 20 66 6f 75 6e 64 |itance, |as found|
|000019a0| 20 69 6e 20 6d 6f 73 74 | 20 73 63 68 6f 6f 6c 20 | in most| school |
|000019b0| 62 69 6f 6c 6f 67 79 20 | 74 65 78 74 20 62 6f 6f |biology |text boo|
|000019c0| 6b 73 2c 0a 69 73 20 72 | 65 71 75 69 72 65 64 20 |ks,.is r|equired |
|000019d0| 74 6f 20 6d 61 6b 65 20 | 70 72 6f 70 65 72 20 75 |to make |proper u|
|000019e0| 73 65 20 6f 66 20 74 68 | 69 73 20 70 72 6f 67 72 |se of th|is progr|
|000019f0| 61 6d 2e 20 48 6f 77 65 | 76 65 72 20 66 6f 72 20 |am. Howe|ver for |
|00001a00| 74 68 6f 73 65 20 77 69 | 74 68 20 6e 6f 0a 62 69 |those wi|th no.bi|
|00001a10| 6f 6c 6f 67 69 63 61 6c | 20 62 61 63 6b 67 72 6f |ological| backgro|
|00001a20| 75 6e 64 20 49 20 68 61 | 76 65 20 69 6e 63 6c 75 |und I ha|ve inclu|
|00001a30| 64 65 64 20 73 6f 6d 65 | 20 62 61 73 69 63 20 69 |ded some| basic i|
|00001a40| 6e 66 6f 72 6d 61 74 69 | 6f 6e 20 6f 6e 20 74 68 |nformati|on on th|
|00001a50| 65 20 66 69 6c 65 0a 6e | 61 6d 65 64 20 22 4c 65 |e file.n|amed "Le|
|00001a60| 73 73 6f 6e 22 2e 0a 0a | 54 68 65 20 70 72 6f 67 |sson"...|The prog|
|00001a70| 72 61 6d 20 73 69 6d 75 | 6c 61 74 65 73 20 62 72 |ram simu|lates br|
|00001a80| 65 65 64 69 6e 67 20 65 | 78 70 65 72 69 6d 65 6e |eeding e|xperimen|
|00001a90| 74 73 20 77 68 69 63 68 | 20 77 6f 75 6c 64 20 6e |ts which| would n|
|00001aa0| 6f 72 6d 61 6c 6c 79 20 | 62 65 20 63 61 72 72 69 |ormally |be carri|
|00001ab0| 65 64 0a 6f 75 74 20 75 | 73 69 6e 67 20 6f 72 67 |ed.out u|sing org|
|00001ac0| 61 6e 69 73 6d 73 20 73 | 75 63 68 20 61 73 20 66 |anisms s|uch as f|
|00001ad0| 72 75 69 74 20 66 6c 69 | 65 73 20 28 44 72 6f 73 |ruit fli|es (Dros|
|00001ae0| 6f 70 68 69 6c 61 29 2e | 20 48 6f 77 65 76 65 72 |ophila).| However|
|00001af0| 20 61 6c 74 68 6f 75 67 | 68 20 74 68 65 72 65 0a | althoug|h there.|
|00001b00| 69 73 20 6e 6f 20 73 75 | 62 73 74 69 74 75 74 65 |is no su|bstitute|
|00001b10| 20 66 6f 72 20 73 75 63 | 68 20 72 65 61 6c 20 65 | for suc|h real e|
|00001b20| 78 70 65 72 69 6d 65 6e | 74 73 20 74 68 65 79 20 |xperimen|ts they |
|00001b30| 61 72 65 20 76 65 72 79 | 20 74 69 6d 65 20 63 6f |are very| time co|
|00001b40| 6e 73 75 6d 69 6e 67 20 | 61 6e 64 0a 6f 6e 6c 79 |nsuming |and.only|
|00001b50| 20 61 20 6c 69 6d 69 74 | 65 64 20 6e 75 6d 62 65 | a limit|ed numbe|
|00001b60| 72 20 6f 66 20 63 72 6f | 73 73 65 73 20 61 72 65 |r of cro|sses are|
|00001b70| 20 70 72 61 63 74 69 63 | 61 6c 2e 20 55 73 69 6e | practic|al. Usin|
|00001b80| 67 20 61 20 73 69 6d 75 | 6c 61 74 69 6f 6e 20 79 |g a simu|lation y|
|00001b90| 6f 75 20 63 61 6e 0a 62 | 72 65 65 64 20 74 6f 20 |ou can.b|reed to |
|00001ba0| 79 6f 75 72 20 68 65 61 | 72 74 73 20 63 6f 6e 74 |your hea|rts cont|
|00001bb0| 65 6e 74 2e 20 42 79 20 | 73 65 6c 65 63 74 69 6e |ent. By |selectin|
|00001bc0| 67 20 74 68 65 20 74 72 | 61 69 74 73 20 66 6f 72 |g the tr|aits for|
|00001bd0| 20 69 6e 76 65 73 74 69 | 67 61 74 69 6f 6e 20 74 | investi|gation t|
|00001be0| 68 65 0a 70 72 6f 67 72 | 61 6d 20 63 61 6e 20 64 |he.progr|am can d|
|00001bf0| 65 6d 6f 6e 73 74 72 61 | 74 65 20 61 73 70 65 63 |emonstra|te aspec|
|00001c00| 74 73 20 6f 66 20 69 6e | 68 65 72 69 74 61 6e 63 |ts of in|heritanc|
|00001c10| 65 20 66 72 6f 6d 20 73 | 69 6d 70 6c 65 20 6d 6f |e from s|imple mo|
|00001c20| 6e 6f 68 79 62 72 69 64 | 0a 63 72 6f 73 73 65 73 |nohybrid|.crosses|
|00001c30| 20 75 70 20 74 6f 20 67 | 65 6e 65 20 6d 61 70 70 | up to g|ene mapp|
|00001c40| 69 6e 67 20 75 73 69 6e | 67 20 74 72 69 70 6c 65 |ing usin|g triple|
|00001c50| 20 74 65 73 74 20 63 72 | 6f 73 73 65 73 2e 20 54 | test cr|osses. T|
|00001c60| 68 69 73 20 76 65 72 73 | 69 6f 6e 20 64 6f 65 73 |his vers|ion does|
|00001c70| 20 6e 6f 74 0a 69 6e 63 | 6c 75 64 65 20 61 73 70 | not.inc|lude asp|
|00001c80| 65 63 74 73 20 73 75 63 | 68 20 61 73 20 6c 65 74 |ects suc|h as let|
|00001c90| 68 61 6c 20 67 65 6e 65 | 73 2c 20 6d 75 6c 74 69 |hal gene|s, multi|
|00001ca0| 70 6c 65 20 61 6c 6c 65 | 6c 65 73 2c 63 6f 6e 74 |ple alle|les,cont|
|00001cb0| 69 6e 75 6f 75 73 20 76 | 61 72 69 61 74 69 6f 6e |inuous v|ariation|
|00001cc0| 2c 0a 65 70 69 73 74 61 | 73 69 73 20 6f 72 20 6f |,.epista|sis or o|
|00001cd0| 74 68 65 72 20 65 66 66 | 65 63 74 73 20 6f 66 20 |ther eff|ects of |
|00001ce0| 67 65 6e 65 20 69 6e 74 | 65 72 61 63 74 69 6f 6e |gene int|eraction|
|00001cf0| 2e 20 54 68 65 73 65 20 | 6d 69 67 68 74 20 62 65 |. These |might be|
|00001d00| 20 70 6f 73 73 69 62 6c | 65 20 6f 6e 20 61 6e 0a | possibl|e on an.|
|00001d10| 65 78 74 65 6e 64 65 64 | 20 76 65 72 73 69 6f 6e |extended| version|
|00001d20| 2e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00001d30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 0a 0a | | ..|
|00001d50| 54 68 65 20 63 72 65 61 | 74 75 72 65 73 20 61 72 |The crea|tures ar|
|00001d60| 65 20 63 61 6c 6c 65 64 | 20 53 6c 79 67 72 6f 6e |e called| Slygron|
|00001d70| 73 20 61 6e 64 20 63 6f | 6d 65 20 66 72 6f 6d 20 |s and co|me from |
|00001d80| 74 68 65 20 70 6c 61 6e | 65 74 20 45 69 70 61 33 |the plan|et Eipa3|
|00001d90| 2e 20 54 68 65 79 20 61 | 72 65 0a 75 73 65 66 75 |. They a|re.usefu|
|00001da0| 6c 20 66 6f 72 20 73 74 | 75 64 79 69 6e 67 20 74 |l for st|udying t|
|00001db0| 68 65 20 70 72 69 6e 63 | 69 70 61 6c 73 20 6f 66 |he princ|ipals of|
|00001dc0| 20 4d 65 6e 64 65 6c 69 | 61 6e 20 49 6e 68 65 72 | Mendeli|an Inher|
|00001dd0| 69 74 61 6e 63 65 20 73 | 69 6e 63 65 20 74 68 65 |itance s|ince the|
|00001de0| 79 20 61 72 65 0a 73 6d | 61 6c 6c 20 28 31 63 6d |y are.sm|all (1cm|
|00001df0| 20 74 61 6c 6c 29 20 61 | 6e 64 20 65 61 73 69 6c | tall) a|nd easil|
|00001e00| 79 20 6b 65 70 74 2e 20 | 54 68 65 79 20 62 72 65 |y kept. |They bre|
|00001e10| 65 64 20 76 65 72 79 20 | 72 61 70 69 64 6c 79 20 |ed very |rapidly |
|00001e20| 77 69 74 68 20 75 70 20 | 74 6f 20 34 30 0a 6f 66 |with up |to 40.of|
|00001e30| 66 73 70 72 69 6e 67 20 | 66 72 6f 6d 20 65 61 63 |fspring |from eac|
|00001e40| 68 20 6d 61 74 69 6e 67 | 2e 20 54 68 65 69 72 20 |h mating|. Their |
|00001e50| 6d 65 63 68 61 6e 69 73 | 6d 20 6f 66 20 69 6e 68 |mechanis|m of inh|
|00001e60| 65 72 69 74 61 6e 63 65 | 20 69 73 20 72 65 6d 61 |eritance| is rema|
|00001e70| 72 6b 61 62 6c 79 0a 73 | 69 6d 69 6c 61 72 20 74 |rkably.s|imilar t|
|00001e80| 6f 20 6d 61 6d 6d 61 6c | 73 20 6f 66 20 45 61 72 |o mammal|s of Ear|
|00001e90| 74 68 2e 20 54 68 65 79 | 20 68 61 76 65 20 36 20 |th. They| have 6 |
|00001ea0| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 20 28 32 20 70 |chromoso|mes (2 p|
|00001eb0| 61 69 72 20 6f 66 20 61 | 75 74 6f 73 6f 6d 65 73 |air of a|utosomes|
|00001ec0| 20 61 6e 64 0a 61 20 70 | 61 69 72 20 6f 66 20 73 | and.a p|air of s|
|00001ed0| 65 78 20 63 68 72 6f 6d | 6f 73 6f 6d 65 73 29 2e |ex chrom|osomes).|
|00001ee0| 20 54 68 65 20 6d 61 6c | 65 20 69 73 20 74 68 65 | The mal|e is the|
|00001ef0| 20 68 65 74 65 72 6f 67 | 61 6d 65 74 69 63 20 73 | heterog|ametic s|
|00001f00| 65 78 20 28 69 65 2e 58 | 59 29 20 61 6e 64 20 68 |ex (ie.X|Y) and h|
|00001f10| 65 0a 63 61 6e 20 62 65 | 20 72 65 63 6f 67 6e 69 |e.can be| recogni|
|00001f20| 73 65 64 20 62 79 20 74 | 68 65 20 73 65 78 75 61 |sed by t|he sexua|
|00001f30| 6c 20 73 70 75 72 73 20 | 6f 6e 20 68 69 73 20 68 |l spurs |on his h|
|00001f40| 65 65 6c 73 20 28 75 73 | 65 64 20 69 6e 20 66 69 |eels (us|ed in fi|
|00001f50| 67 68 74 69 6e 67 29 2e | 0a 54 68 65 72 65 20 61 |ghting).|.There a|
|00001f60| 72 65 20 39 20 65 61 73 | 69 6c 79 20 6f 62 73 65 |re 9 eas|ily obse|
|00001f70| 72 76 61 62 6c 65 20 74 | 72 61 69 74 73 20 77 68 |rvable t|raits wh|
|00001f80| 69 63 68 20 73 68 6f 77 | 20 64 69 73 63 6f 6e 74 |ich show| discont|
|00001f90| 69 6e 75 6f 75 73 20 76 | 61 72 69 61 74 69 6f 6e |inuous v|ariation|
|00001fa0| 20 61 6e 64 0a 79 6f 75 | 20 63 61 6e 20 73 65 6c | and.you| can sel|
|00001fb0| 65 63 74 20 74 68 65 20 | 70 68 65 6e 6f 74 79 70 |ect the |phenotyp|
|00001fc0| 65 20 6f 66 20 65 61 63 | 68 20 6f 66 20 74 68 65 |e of eac|h of the|
|00001fd0| 20 69 6e 69 74 69 61 6c | 20 70 61 72 65 6e 74 73 | initial| parents|
|00001fe0| 20 28 54 68 65 20 50 31 | 20 6d 61 6c 65 20 61 6e | (The P1| male an|
|00001ff0| 64 0a 66 65 6d 61 6c 65 | 20 77 69 6c 6c 20 62 65 |d.female| will be|
|00002000| 20 68 6f 6d 6f 7a 79 67 | 6f 75 73 20 66 6f 72 20 | homozyg|ous for |
|00002010| 61 6c 6c 20 39 20 70 61 | 69 72 73 20 6f 66 20 61 |all 9 pa|irs of a|
|00002020| 6c 6c 65 6c 65 73 29 2e | 0a 41 20 62 72 65 65 64 |lleles).|.A breed|
|00002030| 69 6e 67 20 70 72 6f 67 | 72 61 6d 20 63 61 6e 20 |ing prog|ram can |
|00002040| 62 65 20 70 65 72 66 6f | 72 6d 65 64 20 61 73 20 |be perfo|rmed as |
|00002050| 66 61 72 20 61 73 20 74 | 68 65 20 46 33 20 67 65 |far as t|he F3 ge|
|00002060| 6e 65 72 61 74 69 6f 6e | 20 61 6e 64 20 61 20 74 |neration| and a t|
|00002070| 65 73 74 0a 63 72 6f 73 | 73 20 63 61 6e 20 62 65 |est.cros|s can be|
|00002080| 20 70 65 72 66 6f 72 6d | 65 64 20 6f 6e 20 61 6e | perform|ed on an|
|00002090| 79 20 69 6e 64 69 76 69 | 64 75 61 6c 20 61 6e 69 |y indivi|dual ani|
|000020a0| 6d 61 6c 20 69 6e 20 61 | 6e 79 20 6f 66 20 74 68 |mal in a|ny of th|
|000020b0| 65 73 65 20 67 65 6e 65 | 72 61 74 69 6f 6e 73 2e |ese gene|rations.|
|000020c0| 0a 41 20 43 68 69 2d 73 | 71 75 61 72 65 64 20 74 |.A Chi-s|quared t|
|000020d0| 65 73 74 20 63 61 6e 20 | 62 65 20 63 61 72 72 69 |est can |be carri|
|000020e0| 65 64 20 6f 75 74 20 74 | 6f 20 73 65 65 20 69 66 |ed out t|o see if|
|000020f0| 20 61 6e 20 6f 62 73 65 | 72 76 65 64 20 72 61 74 | an obse|rved rat|
|00002100| 69 6f 20 64 69 66 66 65 | 72 73 0a 73 69 67 6e 69 |io diffe|rs.signi|
|00002110| 66 69 63 61 6e 74 6c 79 | 20 66 72 6f 6d 20 74 68 |ficantly| from th|
|00002120| 65 20 65 78 70 65 63 74 | 65 64 20 72 61 74 69 6f |e expect|ed ratio|
|00002130| 73 2e 0a 53 6f 6d 65 20 | 6f 66 20 74 68 65 20 67 |s..Some |of the g|
|00002140| 65 6e 65 73 20 73 68 6f | 77 20 63 6f 6d 70 6c 65 |enes sho|w comple|
|00002150| 74 65 20 64 6f 6d 69 6e | 61 6e 63 65 2c 20 73 6f |te domin|ance, so|
|00002160| 6d 65 20 73 68 6f 77 20 | 70 61 72 74 69 61 6c 20 |me show |partial |
|00002170| 6f 72 20 63 6f 2d 64 6f | 6d 69 6e 61 6e 63 65 2c |or co-do|minance,|
|00002180| 0a 73 6f 6d 65 20 61 72 | 65 20 73 65 78 20 6c 69 |.some ar|e sex li|
|00002190| 6e 6b 65 64 20 28 70 72 | 65 73 65 6e 74 20 6f 6e |nked (pr|esent on|
|000021a0| 6c 79 20 6f 6e 20 74 68 | 65 20 59 20 63 68 72 6f |ly on th|e Y chro|
|000021b0| 6d 6f 73 6f 6d 65 29 20 | 61 6e 64 20 6d 61 6e 79 |mosome) |and many|
|000021c0| 20 74 72 61 69 74 73 20 | 77 69 6c 6c 0a 73 68 6f | traits |will.sho|
|000021d0| 77 20 61 75 74 6f 73 6f | 6d 61 6c 20 6c 69 6e 6b |w autoso|mal link|
|000021e0| 61 67 65 20 28 61 73 20 | 74 68 65 72 65 20 61 72 |age (as |there ar|
|000021f0| 65 20 33 20 70 61 69 72 | 73 20 6f 66 20 68 6f 6d |e 3 pair|s of hom|
|00002200| 6f 6c 6f 67 6f 75 73 20 | 63 68 72 6f 6d 6f 73 6f |ologous |chromoso|
|00002210| 6d 65 73 20 74 68 65 72 | 65 0a 61 72 65 20 33 20 |mes ther|e.are 3 |
|00002220| 6c 69 6e 6b 61 67 65 20 | 67 72 6f 75 70 73 29 2e |linkage |groups).|
|00002230| 20 42 79 20 70 65 72 66 | 6f 72 6d 69 6e 67 20 61 | By perf|orming a|
|00002240| 70 70 72 6f 70 72 69 61 | 74 65 20 63 72 6f 73 73 |ppropria|te cross|
|00002250| 65 73 20 69 74 20 73 68 | 6f 75 6c 64 20 62 65 0a |es it sh|ould be.|
|00002260| 70 6f 73 73 69 62 6c 65 | 20 74 6f 20 64 65 74 65 |possible| to dete|
|00002270| 72 6d 69 6e 65 20 74 68 | 65 20 6e 61 74 75 72 65 |rmine th|e nature|
|00002280| 20 6f 66 20 74 68 65 20 | 67 65 6e 65 73 20 61 6e | of the |genes an|
|00002290| 64 20 69 66 20 79 6f 75 | 20 61 72 65 20 72 65 61 |d if you| are rea|
|000022a0| 6c 6c 79 20 64 65 64 69 | 63 61 74 65 64 0a 79 6f |lly dedi|cated.yo|
|000022b0| 75 20 63 61 6e 20 6d 61 | 70 20 74 68 65 20 67 65 |u can ma|p the ge|
|000022c0| 6e 65 73 20 6f 6e 20 65 | 61 63 68 20 6f 66 20 74 |nes on e|ach of t|
|000022d0| 68 65 20 63 68 72 6f 6d | 6f 73 6f 6d 65 73 2e 20 |he chrom|osomes. |
|000022e0| 4d 61 70 70 69 6e 67 20 | 72 65 71 75 69 72 65 73 |Mapping |requires|
|000022f0| 20 74 65 73 74 0a 63 72 | 6f 73 73 65 73 20 74 6f | test.cr|osses to|
|00002300| 20 64 65 74 65 72 6d 69 | 6e 20 74 68 65 20 25 20 | determi|n the % |
|00002310| 72 65 63 6f 6d 62 69 6e | 61 74 69 6f 6e 20 69 6e |recombin|ation in|
|00002320| 20 74 68 65 20 63 61 73 | 65 20 6f 66 20 6c 69 6e | the cas|e of lin|
|00002330| 6b 65 64 20 67 65 6e 65 | 73 20 28 4e 42 0a 75 6e |ked gene|s (NB.un|
|00002340| 6c 69 6b 65 20 44 72 6f | 73 6f 70 68 69 6c 61 20 |like Dro|sophila |
|00002350| 63 72 6f 73 73 69 6e 67 | 20 6f 76 65 72 20 6f 63 |crossing| over oc|
|00002360| 63 75 72 73 20 69 6e 20 | 62 6f 74 68 20 73 65 78 |curs in |both sex|
|00002370| 65 73 29 2e 20 46 6f 72 | 20 74 68 6f 73 65 20 77 |es). For| those w|
|00002380| 68 6f 20 77 69 73 68 20 | 74 6f 0a 27 63 68 65 61 |ho wish |to.'chea|
|00002390| 74 27 20 74 68 65 20 61 | 6e 73 77 65 72 73 20 61 |t' the a|nswers a|
|000023a0| 72 65 20 67 69 76 65 6e | 20 61 74 20 74 68 65 20 |re given| at the |
|000023b0| 65 6e 64 20 6f 66 20 74 | 68 69 73 20 74 65 78 74 |end of t|his text|
|000023c0| 2e 0a 0a 52 75 6e 6e 69 | 6e 67 20 74 68 65 20 50 |...Runni|ng the P|
|000023d0| 72 6f 67 72 61 6d 3a 0a | 41 6c 6c 20 6f 70 65 72 |rogram:.|All oper|
|000023e0| 61 74 69 6f 6e 73 20 65 | 78 63 65 70 74 20 66 6f |ations e|xcept fo|
|000023f0| 72 20 74 68 65 20 43 68 | 69 2d 73 71 75 61 72 65 |r the Ch|i-square|
|00002400| 64 20 74 65 73 74 20 61 | 72 65 20 63 61 72 72 69 |d test a|re carri|
|00002410| 65 64 20 6f 75 74 20 75 | 73 69 6e 67 20 74 68 65 |ed out u|sing the|
|00002420| 0a 6d 6f 75 73 65 2e 20 | 43 6c 69 63 6b 69 6e 67 |.mouse. |Clicking|
|00002430| 20 27 73 65 6c 65 63 74 | 27 20 6f 6e 20 61 20 42 | 'select|' on a B|
|00002440| 75 66 66 20 63 6f 6c 6f | 75 72 65 64 20 6f 72 20 |uff colo|ured or |
|00002450| 6f 72 61 6e 67 65 20 62 | 6f 78 20 77 69 6c 6c 20 |orange b|ox will |
|00002460| 65 78 65 63 75 74 65 20 | 74 68 65 0a 6f 70 65 72 |execute |the.oper|
|00002470| 61 74 69 6f 6e 2e 20 54 | 6f 20 73 65 6c 65 63 74 |ation. T|o select|
|00002480| 20 6f 72 20 63 6f 75 6e | 74 20 74 68 65 20 6e 75 | or coun|t the nu|
|00002490| 6d 62 65 72 20 6f 66 20 | 69 6e 64 69 76 69 64 75 |mber of |individu|
|000024a0| 61 6c 73 2c 27 63 6c 69 | 63 6b 27 20 6f 6e 20 74 |als,'cli|ck' on t|
|000024b0| 68 65 0a 73 70 72 69 74 | 65 2e 20 54 6f 20 75 73 |he.sprit|e. To us|
|000024c0| 65 20 74 68 65 20 63 6f | 75 6e 74 65 72 2c 27 63 |e the co|unter,'c|
|000024d0| 6c 69 63 6b 27 20 6f 6e | 20 27 4f 4e 27 20 74 6f |lick' on| 'ON' to|
|000024e0| 20 61 63 74 69 76 61 74 | 65 20 69 74 2e 20 54 68 | activat|e it. Th|
|000024f0| 65 72 65 20 61 72 65 20 | 38 20 73 74 6f 72 65 0a |ere are |8 store.|
|00002500| 62 6f 78 65 73 20 66 6f | 72 20 63 6f 75 6e 74 73 |boxes fo|r counts|
|00002510| 20 61 6e 64 20 74 68 65 | 20 6f 6e 65 20 68 69 67 | and the| one hig|
|00002520| 68 6c 69 67 68 74 65 64 | 20 69 6e 20 77 68 69 74 |hlighted| in whit|
|00002530| 65 20 69 73 20 74 68 65 | 20 63 75 72 72 65 6e 74 |e is the| current|
|00002540| 20 6f 6e 65 2e 20 43 6c | 69 63 6b 0a 6f 6e 20 62 | one. Cl|ick.on b|
|00002550| 6f 78 20 74 6f 20 73 65 | 6c 65 63 74 20 61 6e 6f |ox to se|lect ano|
|00002560| 74 68 65 72 2e 20 27 43 | 27 20 63 6c 65 61 72 73 |ther. 'C|' clears|
|00002570| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 62 6f 78 | the cur|rent box|
|00002580| 2e 20 27 43 41 27 20 63 | 6c 65 61 72 73 20 61 6c |. 'CA' c|lears al|
|00002590| 6c 20 74 68 65 0a 62 6f | 78 65 73 2e 20 27 4f 46 |l the.bo|xes. 'OF|
|000025a0| 46 27 20 72 65 74 75 72 | 6e 73 20 74 6f 20 74 68 |F' retur|ns to th|
|000025b0| 65 20 6d 61 69 6e 20 6d | 65 6e 75 2e 20 4e 6f 74 |e main m|enu. Not|
|000025c0| 65 20 74 68 61 74 20 77 | 68 65 6e 20 74 68 65 20 |e that w|hen the |
|000025d0| 63 6f 75 6e 74 65 72 20 | 69 73 0a 72 65 73 65 6c |counter |is.resel|
|000025e0| 65 63 74 65 64 20 69 74 | 20 69 73 20 61 75 74 6f |ected it| is auto|
|000025f0| 6d 61 74 69 63 61 6c 6c | 79 20 63 6c 65 61 72 65 |maticall|y cleare|
|00002600| 64 2e 0a 0a 43 6f 6e 64 | 69 74 69 6f 6e 73 20 6f |d...Cond|itions o|
|00002610| 66 20 55 73 65 3a 0a 54 | 68 65 20 70 72 6f 67 72 |f Use:.T|he progr|
|00002620| 61 6d 20 6d 61 79 20 62 | 65 20 66 72 65 65 6c 79 |am may b|e freely|
|00002630| 20 64 69 73 74 72 69 62 | 75 74 65 64 20 70 72 6f | distrib|uted pro|
|00002640| 76 69 64 65 64 2e 0a 0a | 31 2e 54 68 69 73 20 66 |vided...|1.This f|
|00002650| 69 6c 65 20 69 73 20 69 | 6e 63 6c 75 64 65 64 20 |ile is i|ncluded |
|00002660| 77 69 74 68 20 74 68 65 | 20 70 72 6f 67 72 61 6d |with the| program|
|00002670| 2e 0a 0a 32 2e 4e 6f 20 | 63 68 61 72 67 65 20 69 |...2.No |charge i|
|00002680| 73 20 6d 61 64 65 20 28 | 65 78 63 65 70 74 20 66 |s made (|except f|
|00002690| 6f 72 20 6d 65 64 69 61 | 20 61 6e 64 20 70 6f 73 |or media| and pos|
|000026a0| 74 61 67 65 20 6f 72 20 | 69 6e 20 74 68 65 20 63 |tage or |in the c|
|000026b0| 61 73 65 20 6f 66 20 61 | 20 64 69 73 63 0a 73 6f |ase of a| disc.so|
|000026c0| 6c 64 20 66 6f 72 20 63 | 68 61 72 69 74 79 29 2e |ld for c|harity).|
|000026d0| 0a 0a 49 66 20 79 6f 75 | 20 66 69 6e 64 20 74 68 |..If you| find th|
|000026e0| 65 20 70 72 6f 67 72 61 | 6d 20 75 73 65 66 75 6c |e progra|m useful|
|000026f0| 20 66 6f 72 20 74 65 61 | 63 68 69 6e 67 20 70 75 | for tea|ching pu|
|00002700| 72 70 6f 73 65 73 20 61 | 6e 64 20 77 6f 75 6c 64 |rposes a|nd would|
|00002710| 20 6c 69 6b 65 20 74 6f | 20 6d 6f 64 69 66 79 0a | like to| modify.|
|00002720| 69 74 20 6f 72 20 68 61 | 76 65 20 73 75 67 67 65 |it or ha|ve sugge|
|00002730| 73 74 69 6f 6e 73 20 66 | 6f 72 20 69 6d 70 72 6f |stions f|or impro|
|00002740| 76 65 6d 65 6e 74 20 6f | 72 20 66 69 6e 64 20 61 |vement o|r find a|
|00002750| 6e 79 20 62 75 67 73 20 | 28 6f 74 68 65 72 20 74 |ny bugs |(other t|
|00002760| 68 61 6e 20 74 68 65 0a | 53 6c 79 67 72 6f 6e 73 |han the.|Slygrons|
|00002770| 29 20 70 6c 65 61 73 65 | 20 6c 65 74 20 6d 65 20 |) please| let me |
|00002780| 6b 6e 6f 77 2e 20 49 66 | 20 79 6f 75 20 73 65 6e |know. If| you sen|
|00002790| 64 20 6d 65 20 61 20 53 | 2e 41 2e 45 20 49 20 77 |d me a S|.A.E I w|
|000027a0| 69 6c 6c 20 73 65 6e 64 | 20 79 6f 75 20 61 6e 0a |ill send| you an.|
|000027b0| 65 78 70 6c 61 6e 61 74 | 69 6f 6e 20 6f 66 20 68 |explanat|ion of h|
|000027c0| 6f 77 20 69 74 20 77 6f | 72 6b 73 2e 20 41 20 64 |ow it wo|rks. A d|
|000027d0| 65 73 6b 74 6f 70 20 6d | 75 6c 74 69 74 61 73 6b |esktop m|ultitask|
|000027e0| 69 6e 67 20 76 65 72 73 | 69 6f 6e 20 77 6f 75 6c |ing vers|ion woul|
|000027f0| 64 20 62 65 20 6e 69 63 | 65 0a 62 75 74 20 49 20 |d be nic|e.but I |
|00002800| 68 61 76 65 20 6e 6f 74 | 20 67 6f 74 20 74 6f 20 |have not| got to |
|00002810| 67 72 69 70 73 20 77 69 | 74 68 20 74 68 65 20 57 |grips wi|th the W|
|00002820| 49 4d 50 20 79 65 74 21 | 0a 0a 41 64 64 72 65 73 |IMP yet!|..Addres|
|00002830| 73 3a 20 4d 72 20 4c 20 | 4d 20 50 65 74 65 72 73 |s: Mr L |M Peters|
|00002840| 2c 0a 20 20 20 20 20 20 | 20 20 20 34 20 43 6f 61 |,. | 4 Coa|
|00002850| 74 67 75 61 72 64 20 43 | 6f 74 74 61 67 65 73 2c |tguard C|ottages,|
|00002860| 0a 20 20 20 20 20 20 20 | 20 20 48 65 6c 66 6f 72 |. | Helfor|
|00002870| 64 20 50 61 73 73 61 67 | 65 2c 0a 20 20 20 20 20 |d Passag|e,. |
|00002880| 20 20 20 20 4d 61 77 6e | 61 6e 20 53 6d 69 74 68 | Mawn|an Smith|
|00002890| 2c 0a 20 20 20 20 20 20 | 20 20 20 46 61 6c 6d 6f |,. | Falmo|
|000028a0| 75 74 68 2c 0a 20 20 20 | 20 20 20 20 20 20 43 6f |uth,. | Co|
|000028b0| 72 6e 77 61 6c 6c 20 54 | 52 31 31 20 35 4c 42 20 |rnwall T|R11 5LB |
|000028c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 0a 20 20 20 | | . |
|000028d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000028e0| 20 20 20 20 20 20 20 20 | 0a 0a 41 4e 53 57 45 52 | |..ANSWER|
|000028f0| 53 20 21 21 21 21 20 0a | 0a 20 20 20 20 20 20 20 |S !!!! .|. |
|00002900| 20 20 20 20 20 20 20 20 | 20 20 54 52 41 49 54 20 | | TRAIT |
|00002910| 20 20 20 20 20 20 20 20 | 20 20 20 44 4f 4d 49 4e | | DOMIN|
|00002920| 41 4e 54 20 43 48 41 52 | 41 43 54 45 52 20 0a 20 |ANT CHAR|ACTER . |
|00002930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 48 6f | | Ho|
|00002940| 72 6e 20 74 79 70 65 20 | 20 20 20 20 20 20 20 20 |rn type | |
|00002950| 20 20 20 20 55 70 77 61 | 72 64 20 68 6f 72 6e 0a | Upwa|rd horn.|
|00002960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 42 | | B|
|00002970| 6f 64 79 20 63 6f 6c 6f | 75 72 20 20 20 20 20 20 |ody colo|ur |
|00002980| 20 20 20 20 20 50 75 72 | 70 6c 65 20 62 6f 64 79 | Pur|ple body|
|00002990| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|000029a0| 41 6e 74 65 6e 6e 61 20 | 6c 65 6e 67 74 68 20 20 |Antenna |length |
|000029b0| 20 20 20 20 20 20 43 6f | 2d 64 6f 6d 69 6e 61 6e | Co|-dominan|
|000029c0| 63 65 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ce. | |
|000029d0| 20 20 41 6e 74 65 6e 6e | 61 20 74 79 70 65 20 20 | Antenn|a type |
|000029e0| 20 20 20 20 20 20 20 20 | 48 61 69 72 79 0a 20 20 | |Hairy. |
|000029f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4c 65 67 | | Leg|
|00002a00| 20 73 69 7a 65 20 20 20 | 20 20 20 20 20 20 20 20 | size | |
|00002a10| 20 20 20 46 61 74 20 6c | 65 67 73 0a 20 20 20 20 | Fat l|egs. |
|00002a20| 20 20 20 20 20 20 20 20 | 20 20 20 4c 65 67 20 63 | | Leg c|
|00002a30| 6f 6c 6f 75 72 20 20 20 | 20 20 20 20 20 20 20 20 |olour | |
|00002a40| 20 52 65 64 20 6c 65 67 | 73 0a 20 20 20 20 20 20 | Red leg|s. |
|00002a50| 20 20 20 20 20 20 20 20 | 20 45 79 65 20 63 6f 6c | | Eye col|
|00002a60| 6f 75 72 20 20 20 20 20 | 20 20 20 20 20 20 20 44 |our | D|
|00002a70| 61 72 6b 20 62 6c 75 65 | 20 65 79 65 73 0a 20 20 |ark blue| eyes. |
|00002a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 45 79 65 | | Eye|
|00002a90| 20 73 68 61 70 65 20 20 | 20 20 20 20 20 20 20 20 | shape | |
|00002aa0| 20 20 20 43 6f 2d 64 6f | 6d 69 6e 61 6e 63 65 0a | Co-do|minance.|
|00002ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 50 | | P|
|00002ac0| 72 6f 62 6f 73 63 69 73 | 20 6c 65 6e 67 74 68 20 |roboscis| length |
|00002ad0| 20 20 20 20 20 4c 6f 6e | 67 20 70 72 6f 62 6f 73 | Lon|g probos|
|00002ae0| 63 69 73 0a 0a 53 65 78 | 20 6c 69 6e 6b 65 64 20 |cis..Sex| linked |
|00002af0| 74 72 61 69 74 73 20 3d | 20 42 6f 64 79 20 63 6f |traits =| Body co|
|00002b00| 6c 6f 75 72 20 20 61 6e | 64 20 20 41 6e 74 65 6e |lour an|d Anten|
|00002b10| 6e 61 20 74 79 70 65 0a | 0a 41 75 74 6f 73 6f 6d |na type.|.Autosom|
|00002b20| 61 6c 20 6c 69 6e 6b 61 | 67 65 20 28 4e 75 6d 62 |al linka|ge (Numb|
|00002b30| 65 72 73 20 69 6e 64 69 | 63 61 74 65 20 74 68 65 |ers indi|cate the|
|00002b40| 20 6d 61 70 20 64 69 73 | 74 61 6e 63 65 20 62 65 | map dis|tance be|
|00002b50| 74 77 65 65 6e 20 74 68 | 65 20 67 65 6e 65 73 29 |tween th|e genes)|
|00002b60| 0a 0a 20 20 20 20 4c 69 | 6e 6b 61 67 65 20 67 72 |.. Li|nkage gr|
|00002b70| 6f 75 70 20 31 0a 0a 20 | 20 20 20 3c 41 6e 74 65 |oup 1.. | <Ante|
|00002b80| 6e 6e 61 20 6c 65 6e 67 | 74 68 3e 20 31 31 20 3c |nna leng|th> 11 <|
|00002b90| 50 72 6f 62 6f 73 63 69 | 73 20 6c 65 6e 67 74 68 |Probosci|s length|
|00002ba0| 3e 20 34 20 3c 45 79 65 | 20 63 6f 6c 6f 75 72 3e |> 4 <Eye| colour>|
|00002bb0| 20 31 38 20 3c 4c 65 67 | 20 73 69 7a 65 3e 0a 20 | 18 <Leg| size>. |
|00002bc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002bd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002be0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002bf0| 20 20 0a 0a 20 20 20 20 | 4c 69 6e 6b 61 67 65 20 | .. |Linkage |
|00002c00| 67 72 6f 75 70 20 32 0a | 0a 20 20 20 20 3c 45 79 |group 2.|. <Ey|
|00002c10| 65 20 73 68 61 70 65 3e | 20 36 20 3c 48 6f 72 6e |e shape>| 6 <Horn|
|00002c20| 20 74 79 70 65 3e 20 31 | 34 20 3c 4c 65 67 20 63 | type> 1|4 <Leg c|
|00002c30| 6f 6c 6f 75 72 3e 0a 0a | 0a 20 20 20 20 4c 69 6e |olour>..|. Lin|
|00002c40| 6b 61 67 65 20 67 72 6f | 75 70 20 33 20 28 4f 6e |kage gro|up 3 (On|
|00002c50| 20 74 68 65 20 58 20 63 | 68 72 6f 6d 6f 73 6f 6d | the X c|hromosom|
|00002c60| 65 29 0a 0a 20 20 20 20 | 3c 41 6e 74 65 6e 6e 61 |e).. |<Antenna|
|00002c70| 20 74 79 70 65 3e 20 32 | 33 20 3c 42 6f 64 79 20 | type> 2|3 <Body |
|00002c80| 63 6f 6c 6f 75 72 3e 0a | 0a 46 69 6c 65 44 61 74 |colour>.|.FileDat|
|00002c90| 61 82 21 52 75 6e 00 65 | 00 00 00 00 00 22 00 00 |a.!Run.e|....."..|
|00002ca0| 00 43 eb ff ff 7d 14 c9 | 2f 03 00 2b 46 2a 7c 20 |.C...}..|/..+F*| |
|00002cb0| 43 72 65 43 72 6f 73 73 | 0a 2a 44 49 52 20 3c 4f |CreCross|.*DIR <O|
|00002cc0| 62 65 79 24 44 69 72 3e | 0a 2a 43 72 6f 73 73 46 |bey$Dir>|.*CrossF|
|00002cd0| 69 6c 65 44 61 74 61 82 | 21 53 70 72 69 74 65 73 |ileData.|!Sprites|
|00002ce0| 00 00 00 e4 03 00 00 43 | f9 ff ff db dd 4d 1f 03 |.......C|.....M..|
|00002cf0| 00 fb 14 02 00 00 00 10 | 00 00 00 e8 03 00 00 d4 |........|........|
|00002d00| 02 00 00 21 63 72 65 63 | 72 6f 73 73 00 00 00 04 |...!crec|ross....|
|00002d10| 00 00 00 10 00 00 00 00 | 00 00 00 07 00 00 00 2c |........|.......,|
|00002d20| 00 00 00 80 01 00 00 0c | 00 00 00 00 00 20 bb bb |........|..... ..|
|00002d30| bb bb bb fb ff ff ff ff | ff 04 00 00 00 00 00 00 |........|........|
|00002d40| 00 00 33 00 00 00 00 00 | 00 00 00 00 40 04 00 00 |..3.....|....@...|
|00002d50| 00 00 00 00 00 00 30 33 | aa aa aa ea ee ee ee 4e |......03|.......N|
|00002d60| 44 00 00 00 00 00 00 00 | 00 00 00 30 33 00 00 00 |D.......|...03...|
|00002d70| 00 44 44 44 00 00 00 00 | 00 00 00 00 00 00 00 00 |.DDD....|........|
|00002d80| 30 33 aa 4e 44 04 00 00 | 00 00 00 00 00 00 00 00 |03.ND...|........|
|00002d90| 00 00 00 00 00 00 44 44 | 33 03 00 00 00 00 00 00 |......DD|3.......|
|00002da0| 00 00 00 00 00 00 00 00 | 44 44 ee ee ff ff 33 33 |........|DD....33|
|00002db0| 00 00 00 00 00 00 00 00 | 00 00 40 44 04 00 00 00 |........|..@D....|
|00002dc0| 00 00 00 30 03 00 00 00 | 00 00 00 00 00 00 f4 ff |...0....|........|
|00002dd0| ff ff ff bb bb bb bb bb | 33 00 00 00 00 00 00 00 |........|3.......|
|00002de0| 00 00 04 00 00 00 00 00 | 00 00 00 00 30 00 00 00 |........|....0...|
|00002df0| 00 00 00 00 00 00 44 ee | ee ee ee ae aa aa aa aa |......D.|........|
|00002e00| 3a 00 00 00 00 00 00 00 | 00 00 40 04 00 00 00 00 |:.......|..@.....|
|00002e10| 00 00 00 00 33 00 00 00 | 00 00 00 00 00 00 00 44 |....3...|.......D|
|00002e20| b4 bb bb ff ff ff 33 33 | 03 00 00 00 00 00 00 00 |......33|........|
|00002e30| 00 00 00 00 30 33 33 33 | 33 33 00 00 00 00 00 00 |....0333|33......|
|00002e40| 00 00 00 00 00 00 30 33 | e3 ae aa 44 00 00 00 00 |......03|...D....|
|00002e50| 00 00 00 00 00 00 00 00 | 00 30 33 00 00 00 00 40 |........|.03....@|
|00002e60| 44 44 44 00 00 00 00 00 | 00 00 00 00 00 33 bb bb |DDD.....|.....3..|
|00002e70| bb bb ff ff ff ff ff 44 | 04 00 00 00 00 00 00 00 |.......D|........|
|00002e80| 00 f0 ff ff ff ff ff ff | ff ff ff ff ff 0f 00 00 |........|........|
|00002e90| ff ff ff 00 00 00 ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ea0| f0 0f 00 00 ff ff ff 00 | 00 00 f0 ff ff ff ff ff |........|........|
|00002eb0| ff ff ff ff ff 00 00 00 | ff ff ff 00 00 00 00 f0 |........|........|
|00002ec0| ff 00 00 00 00 ff ff ff | 00 00 00 00 ff ff ff 00 |........|........|
|00002ed0| 00 00 00 00 f0 ff ff ff | ff 0f 00 00 00 00 00 00 |........|........|
|00002ee0| ff ff ff 00 00 00 00 00 | 00 00 ff ff ff 0f 00 00 |........|........|
|00002ef0| 00 00 00 00 ff ff ff 00 | 00 00 00 00 ff ff ff ff |........|........|
|00002f00| ff ff ff ff 00 00 00 00 | ff ff ff 00 00 00 f0 ff |........|........|
|00002f10| 0f 00 00 00 00 00 00 f0 | 0f 00 00 00 ff ff ff 00 |........|........|
|00002f20| 00 00 ff ff ff ff ff ff | ff ff ff ff ff 00 00 00 |........|........|
|00002f30| ff ff ff 00 00 00 0f 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002f40| f0 00 00 00 ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|00002f50| ff ff ff ff ff 00 00 00 | ff ff ff 00 00 00 f0 0f |........|........|
|00002f60| 00 00 00 00 00 00 00 00 | ff 00 00 00 ff ff ff 00 |........|........|
|00002f70| 00 00 00 ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00002f80| ff ff ff 00 00 00 00 00 | f0 ff ff ff ff ff 00 00 |........|........|
|00002f90| 00 00 00 00 ff ff ff 00 | 00 00 f0 ff ff ff ff ff |........|........|
|00002fa0| 00 00 00 00 00 00 00 00 | ff ff ff 00 00 f0 ff 00 |........|........|
|00002fb0| 00 00 00 f0 ff 0f 00 00 | 00 00 00 00 ff ff ff 00 |........|........|
|00002fc0| 00 ff ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|00002fd0| ff ff ff 04 01 00 00 73 | 6d 21 63 72 65 63 72 6f |.......s|m!crecro|
|00002fe0| 73 73 00 02 00 00 00 08 | 00 00 00 00 00 00 00 0b |ss......|........|
|00002ff0| 00 00 00 2c 00 00 00 98 | 00 00 00 0c 00 00 00 44 |...,....|.......D|
|00003000| b4 bb bb fb ff ff ff 55 | 05 00 00 44 04 00 00 00 |.......U|...D....|
|00003010| 00 00 00 57 05 00 00 44 | 04 00 00 00 00 00 00 55 |...W...D|.......U|
|00003020| 05 00 00 44 a4 aa aa ea | ee ee ee 55 05 00 00 44 |...D....|...U...D|
|00003030| 04 00 00 00 00 00 00 55 | 05 00 00 44 04 00 00 00 |.......U|...D....|
|00003040| 00 00 00 55 05 00 00 44 | b4 bb bb fb ff ff ff 55 |...U...D|.......U|
|00003050| 05 00 00 44 04 00 00 00 | 00 00 00 55 05 00 00 44 |...D....|...U...D|
|00003060| 04 00 00 00 00 00 00 55 | 05 00 00 ff ff ff ff ff |.......U|........|
|00003070| ff ff ff ff ff ff ff ff | 0f 00 00 00 00 00 00 ff |........|........|
|00003080| ff ff ff ff 0f 00 00 00 | 00 00 00 ff ff ff ff ff |........|........|
|00003090| ff ff ff ff ff ff ff ff | ff ff ff ff 0f 00 00 00 |........|........|
|000030a0| 00 00 00 ff ff ff ff ff | 0f 00 00 00 00 00 00 ff |........|........|
|000030b0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000030c0| 0f 00 00 00 00 00 00 ff | ff ff ff ff 0f 00 00 00 |........|........|
|000030d0| 00 00 00 ff ff ff ff 46 | 69 6c 65 44 61 74 61 82 |.......F|ileData.|
|000030e0| 43 52 4f 53 53 00 00 00 | 00 00 00 f7 79 00 00 43 |CROSS...|....y..C|
|000030f0| fb ff ff 2d 51 4f 33 03 | 00 8d 55 0d 00 0a 19 f4 |...-QO3.|..U.....|
|00003100| 20 43 72 65 43 72 6f 73 | 73 20 20 20 56 65 72 73 | CreCros|s Vers|
|00003110| 69 6f 6e 31 0d 00 14 2b | f4 20 41 20 73 69 6d 75 |ion1...+|. A simu|
|00003120| 6c 61 74 69 6f 6e 20 6f | 66 20 4d 65 6e 64 65 6c |lation o|f Mendel|
|00003130| 69 61 6e 20 49 6e 68 65 | 72 69 74 61 6e 63 65 0d |ian Inhe|ritance.|
|00003140| 00 1e 18 f4 20 4c 20 4d | 20 50 65 74 65 72 73 20 |.... L M| Peters |
|00003150| 31 35 2f 36 2f 39 31 0d | 00 28 05 3a 0d 00 32 07 |15/6/91.|.(.:..2.|
|00003160| eb 31 35 0d 00 3c 1c 2a | 53 4c 4f 41 44 3c 4f 62 |.15..<.*|SLOAD<Ob|
|00003170| 65 79 24 44 49 52 3e 2e | 73 70 72 69 74 65 73 0d |ey$DIR>.|sprites.|
|00003180| 00 46 07 d4 20 ee 0d 00 | 50 0f f2 74 69 74 6c 65 |.F.. ...|P..title|
|00003190| 5f 70 61 67 65 0d 00 5a | 0b de 20 61 24 28 38 29 |_page..Z|.. a$(8)|
|000031a0| 0d 00 64 43 de 20 63 68 | 72 6f 6d 6f 73 6f 6d 65 |..dC. ch|romosome|
|000031b0| 73 31 24 28 35 2c 34 30 | 29 2c 63 68 72 6f 6d 6f |s1$(5,40|),chromo|
|000031c0| 73 6f 6d 65 73 32 24 28 | 35 2c 34 30 29 2c 63 68 |somes2$(|5,40),ch|
|000031d0| 72 6f 6d 6f 73 6f 6d 65 | 73 73 65 78 24 28 35 2c |romosome|ssex$(5,|
|000031e0| 34 30 29 0d 00 6e 15 de | 20 70 72 6f 62 5f 74 61 |40)..n..| prob_ta|
|000031f0| 62 6c 65 28 37 2c 39 29 | 0d 00 78 2d de 20 74 72 |ble(7,9)|..x-. tr|
|00003200| 61 69 74 24 28 39 29 2c | 77 69 6c 64 74 79 70 65 |ait$(9),|wildtype|
|00003210| 24 28 39 29 2c 61 6c 74 | 70 68 65 6e 6f 74 79 70 |$(9),alt|phenotyp|
|00003220| 65 24 28 39 29 0d 00 82 | 6a de 20 74 65 78 74 24 |e$(9)...|j. text$|
|00003230| 28 35 29 2c 46 67 65 6e | 25 28 35 29 2c 46 69 6e |(5),Fgen|%(5),Fin|
|00003240| 64 76 25 28 35 29 2c 4d | 67 65 6e 25 28 35 29 2c |dv%(5),M|gen%(5),|
|00003250| 4d 69 6e 64 76 25 28 35 | 29 2c 6e 65 78 74 67 65 |Mindv%(5|),nextge|
|00003260| 6e 25 28 35 29 3a f4 20 | 73 74 6f 72 65 20 69 6e |n%(5):. |store in|
|00003270| 66 6f 20 6f 6e 20 70 61 | 72 65 6e 74 73 20 6f 66 |fo on pa|rents of|
|00003280| 20 74 68 65 20 67 65 6e | 65 72 61 74 69 6f 6e 0d | the gen|eration.|
|00003290| 00 8c 41 de 20 6e 75 6d | 25 28 38 29 2c 65 78 70 |..A. num|%(8),exp|
|000032a0| 63 74 5f 72 61 74 69 6f | 25 28 38 29 2c 6f 62 73 |ct_ratio|%(8),obs|
|000032b0| 65 72 76 65 64 28 38 29 | 2c 65 78 70 65 63 74 65 |erved(8)|,expecte|
|000032c0| 64 28 38 29 2c 63 68 6f | 73 65 6e 25 28 34 30 29 |d(8),cho|sen%(40)|
|000032d0| 0d 00 96 43 46 62 6f 64 | 79 5f 63 6f 6c 24 3d 22 |...CFbod|y_col$="|
|000032e0| 42 42 22 3a 4d 62 6f 64 | 79 5f 63 6f 6c 24 3d 22 |BB":Mbod|y_col$="|
|000032f0| 42 4f 22 3a 46 70 72 6f | 62 5f 6c 65 6e 24 3d 22 |BO":Fpro|b_len$="|
|00003300| 50 50 22 3a 4d 70 72 6f | 62 5f 6c 65 6e 24 3d 22 |PP":Mpro|b_len$="|
|00003310| 50 50 22 0d 00 a0 41 46 | 61 6e 74 5f 6c 65 6e 24 |PP"...AF|ant_len$|
|00003320| 3d 22 41 41 22 3a 4d 61 | 6e 74 5f 6c 65 6e 24 3d |="AA":Ma|nt_len$=|
|00003330| 22 41 41 22 3a 46 61 6e | 74 5f 74 79 70 65 24 3d |"AA":Fan|t_type$=|
|00003340| 22 46 46 22 3a 4d 61 6e | 74 5f 74 79 70 65 24 3d |"FF":Man|t_type$=|
|00003350| 22 46 4f 22 0d 00 aa 41 | 46 6c 65 67 5f 74 79 70 |"FO"...A|Fleg_typ|
|00003360| 65 24 3d 22 4c 4c 22 3a | 4d 6c 65 67 5f 74 79 70 |e$="LL":|Mleg_typ|
|00003370| 65 24 3d 22 4c 4c 22 3a | 46 6c 65 67 5f 63 6f 6c |e$="LL":|Fleg_col|
|00003380| 24 3d 22 47 47 22 3a 4d | 6c 65 67 5f 63 6f 6c 24 |$="GG":M|leg_col$|
|00003390| 3d 22 47 47 22 0d 00 b4 | 3b 46 68 6f 72 6e 24 3d |="GG"...|;Fhorn$=|
|000033a0| 22 48 48 22 3a 4d 68 6f | 72 6e 24 3d 22 48 48 22 |"HH":Mho|rn$="HH"|
|000033b0| 3a 46 65 79 65 5f 74 79 | 70 65 24 3d 22 45 45 22 |:Feye_ty|pe$="EE"|
|000033c0| 3a 4d 65 79 65 5f 74 79 | 70 65 24 3d 22 45 45 22 |:Meye_ty|pe$="EE"|
|000033d0| 0d 00 be 21 46 65 79 65 | 5f 63 6f 6c 24 3d 22 63 |...!Feye|_col$="c|
|000033e0| 63 22 3a 4d 65 79 65 5f | 63 6f 6c 24 3d 22 63 63 |c":Meye_|col$="cc|
|000033f0| 22 0d 00 c8 4f 6d 61 70 | 64 69 73 74 31 25 3d 31 |"...Omap|dist1%=1|
|00003400| 31 3a 6d 61 70 64 69 73 | 74 32 25 3d 34 3a 6d 61 |1:mapdis|t2%=4:ma|
|00003410| 70 64 69 73 74 33 25 3d | 31 38 3a 6d 61 70 64 69 |pdist3%=|18:mapdi|
|00003420| 73 74 34 25 3d 36 3a 6d | 61 70 64 69 73 74 35 25 |st4%=6:m|apdist5%|
|00003430| 3d 31 34 3a 6d 61 70 64 | 69 73 74 36 25 3d 32 33 |=14:mapd|ist6%=23|
|00003440| 0d 00 d2 10 73 74 6f 72 | 65 5f 62 6f 78 25 3d 31 |....stor|e_box%=1|
|00003450| 0d 00 dc 0e e3 20 6e 25 | 3d 31 20 b8 20 39 0d 00 |..... n%|=1 . 9..|
|00003460| e6 20 20 20 f3 20 74 72 | 61 69 74 24 28 6e 25 29 |. . tr|ait$(n%)|
|00003470| 2c 77 69 6c 64 74 79 70 | 65 24 28 6e 25 29 0d 00 |,wildtyp|e$(n%)..|
|00003480| f0 08 ed 20 6e 25 0d 00 | fa 0e e3 20 6e 25 3d 31 |... n%..|... n%=1|
|00003490| 20 b8 20 37 0d 01 04 10 | 20 20 e3 20 6a 25 3d 31 | . 7....| . j%=1|
|000034a0| 20 b8 20 39 0d 01 0e 1a | 20 20 20 20 f3 70 72 6f | . 9....| .pro|
|000034b0| 62 5f 74 61 62 6c 65 28 | 6e 25 2c 6a 25 29 0d 01 |b_table(|n%,j%)..|
|000034c0| 18 0a 20 20 ed 20 6a 25 | 0d 01 22 08 ed 20 6e 25 |.. . j%|..".. n%|
|000034d0| 0d 01 2c 37 ef 32 33 2c | 31 32 38 2c 36 30 2c 31 |..,7.23,|128,60,1|
|000034e0| 39 35 2c 31 32 39 2c 31 | 39 35 2c 36 30 2c 32 34 |95,129,1|95,60,24|
|000034f0| 2c 31 32 36 2c 32 34 3a | f4 20 66 65 6d 61 6c 65 |,126,24:|. female|
|00003500| 20 73 79 6d 62 6f 6c 0d | 01 36 37 ef 32 33 2c 31 | symbol.|.67.23,1|
|00003510| 32 39 2c 33 2c 30 2c 30 | 2c 36 31 2c 31 39 35 2c |29,3,0,0|,61,195,|
|00003520| 31 32 39 2c 31 39 35 2c | 36 30 3a f4 20 6d 61 6c |129,195,|60:. mal|
|00003530| 65 20 73 79 6d 62 6f 6c | 20 70 61 72 74 31 0d 01 |e symbol| part1..|
|00003540| 40 34 ef 32 33 2c 31 33 | 30 2c 32 34 30 2c 38 30 |@4.23,13|0,240,80|
|00003550| 2c 31 33 36 2c 30 2c 30 | 2c 30 2c 30 2c 30 3a f4 |,136,0,0|,0,0,0:.|
|00003560| 20 6d 61 6c 65 20 73 79 | 6d 62 6f 6c 20 70 61 72 | male sy|mbol par|
|00003570| 74 32 0d 01 4a 05 3a 0d | 01 54 0d f2 73 65 6c 65 |t2..J.:.|.T..sele|
|00003580| 63 74 50 31 0d 01 5e 0e | 6e 65 78 74 67 65 6e 25 |ctP1..^.|nextgen%|
|00003590| 3d 31 0d 01 68 11 74 65 | 78 74 24 28 30 29 3d 22 |=1..h.te|xt$(0)="|
|000035a0| 50 31 22 0d 01 72 24 74 | 65 78 74 24 28 6e 65 78 |P1"..r$t|ext$(nex|
|000035b0| 74 67 65 6e 25 29 3d 22 | 46 31 20 47 65 6e 65 72 |tgen%)="|F1 Gener|
|000035c0| 65 61 74 69 6f 6e 22 0d | 01 7c 2b f2 6d 61 74 65 |eation".|.|+.mate|
|000035d0| 28 74 65 78 74 24 28 6e | 65 78 74 67 65 6e 25 29 |(text$(n|extgen%)|
|000035e0| 2c 30 2c 31 2c 30 2c 32 | 2c 6e 65 78 74 67 65 6e |,0,1,0,2|,nextgen|
|000035f0| 25 29 0d 01 86 15 74 68 | 69 73 67 65 6e 25 3d 6e |%)....th|isgen%=n|
|00003600| 65 78 74 67 65 6e 25 0d | 01 90 05 f5 0d 01 9a 09 |extgen%.|........|
|00003610| 20 20 e6 32 31 0d 01 a4 | 18 20 20 c8 93 20 c8 90 | .21...|. .. ..|
|00003620| 20 30 2c 30 2c 31 32 38 | 30 2c 32 35 34 0d 01 ae | 0,0,128|0,254...|
|00003630| 0f 20 20 f2 6d 65 6e 75 | 31 28 31 29 0d 01 b8 1e |. .menu|1(1)....|
|00003640| 20 20 f2 63 6f 75 6e 74 | 65 72 5f 62 61 63 6b 67 | .count|er_backg|
|00003650| 72 6f 75 6e 64 28 30 2c | 31 29 0d 01 c2 0a 20 20 |round(0,|1).... |
|00003660| c8 97 20 ee 0d 01 cc 07 | 20 20 f5 0d 01 d6 10 20 |.. .....| ..... |
|00003670| 20 20 20 ef 32 33 2c 31 | 2c 30 7c 0d 01 e0 1e 20 | .23,1|,0|.... |
|00003680| 20 20 20 c8 97 20 78 70 | 6f 73 25 2c 79 70 6f 73 | .. xp|os%,ypos|
|00003690| 25 2c 62 75 74 74 6f 6e | 25 0d 01 ea 15 20 20 20 |%,button|%.... |
|000036a0| 20 e7 20 62 75 74 74 6f | 6e 25 3d 34 20 8c 0d 01 | . butto|n%=4 ...|
|000036b0| f4 23 20 20 20 20 20 20 | f2 73 65 6c 65 63 74 5f |.# |.select_|
|000036c0| 62 6f 78 32 28 78 70 6f | 73 25 2c 79 70 6f 73 25 |box2(xpo|s%,ypos%|
|000036d0| 29 0d 01 fe 16 20 20 20 | 20 20 20 c8 8e 20 63 68 |).... | .. ch|
|000036e0| 6f 69 63 65 25 20 ca 0d | 02 08 34 20 20 20 20 20 |oice% ..|..4 |
|000036f0| 20 20 20 c9 20 31 3a f2 | 6d 65 6e 75 31 28 30 29 | . 1:.|menu1(0)|
|00003700| 3a f2 63 6f 75 6e 74 28 | 74 68 69 73 67 65 6e 25 |:.count(|thisgen%|
|00003710| 29 3a f2 6d 65 6e 75 31 | 28 31 29 0d 02 12 7b 20 |):.menu1|(1)...{ |
|00003720| 20 20 20 20 20 20 20 c9 | 20 32 3a f2 6d 61 74 65 | .| 2:.mate|
|00003730| 28 74 65 78 74 24 28 74 | 68 69 73 67 65 6e 25 29 |(text$(t|hisgen%)|
|00003740| 2c 46 67 65 6e 25 28 74 | 68 69 73 67 65 6e 25 29 |,Fgen%(t|hisgen%)|
|00003750| 2c 46 69 6e 64 76 25 28 | 74 68 69 73 67 65 6e 25 |,Findv%(|thisgen%|
|00003760| 29 2c 4d 67 65 6e 25 28 | 74 68 69 73 67 65 6e 25 |),Mgen%(|thisgen%|
|00003770| 29 2c 4d 69 6e 64 76 25 | 28 74 68 69 73 67 65 6e |),Mindv%|(thisgen|
|00003780| 25 29 2c 6e 65 78 74 67 | 65 6e 25 28 74 68 69 73 |%),nextg|en%(this|
|00003790| 67 65 6e 25 29 29 0d 02 | 1c 26 20 20 20 20 20 20 |gen%))..|.& |
|000037a0| 20 20 c9 20 33 3a f2 63 | 68 6f 6f 73 65 5f 70 61 | . 3:.c|hoose_pa|
|000037b0| 69 72 28 74 68 69 73 67 | 65 6e 25 29 0d 02 26 25 |ir(thisg|en%)..&%|
|000037c0| 20 20 20 20 20 20 20 20 | c9 20 34 3a f2 74 65 73 | |. 4:.tes|
|000037d0| 74 5f 63 72 6f 73 73 28 | 74 68 69 73 67 65 6e 25 |t_cross(|thisgen%|
|000037e0| 29 0d 02 30 26 20 20 20 | 20 20 20 20 20 c9 20 35 |)..0& | . 5|
|000037f0| 3a f2 63 68 69 5f 73 71 | 75 61 72 65 64 3a f2 6d |:.chi_sq|uared:.m|
|00003800| 65 6e 75 31 28 31 29 0d | 02 3a 20 20 20 20 20 20 |enu1(1).|.: |
|00003810| 20 20 20 c9 20 36 3a f2 | 72 65 73 65 6c 65 63 74 | . 6:.|reselect|
|00003820| 5f 67 65 6e 28 30 29 0d | 02 44 20 20 20 20 20 20 |_gen(0).|.D |
|00003830| 20 20 20 c9 20 37 3a f2 | 72 65 73 65 6c 65 63 74 | . 7:.|reselect|
|00003840| 5f 67 65 6e 28 31 29 0d | 02 4e 20 20 20 20 20 20 |_gen(1).|.N |
|00003850| 20 20 20 c9 20 38 3a f2 | 72 65 73 65 6c 65 63 74 | . 8:.|reselect|
|00003860| 5f 67 65 6e 28 32 29 0d | 02 58 20 20 20 20 20 20 |_gen(2).|.X |
|00003870| 20 20 20 c9 20 39 3a f2 | 72 65 73 65 6c 65 63 74 | . 9:.|reselect|
|00003880| 5f 67 65 6e 28 33 29 0d | 02 62 21 20 20 20 20 20 |_gen(3).|.b! |
|00003890| 20 20 20 c9 20 31 30 3a | f2 72 65 73 65 6c 65 63 | . 10:|.reselec|
|000038a0| 74 5f 67 65 6e 28 34 29 | 0d 02 6c 1d 20 20 20 20 |t_gen(4)|..l. |
|000038b0| 20 20 20 20 c9 20 31 31 | 3a f2 6e 65 77 5f 70 72 | . 11|:.new_pr|
|000038c0| 6f 67 72 61 6d 0d 02 76 | 0b 20 20 20 20 20 20 cb |ogram..v|. .|
|000038d0| 0d 02 80 09 20 20 20 20 | cd 0d 02 8a 11 20 20 fd |.... |..... .|
|000038e0| 20 62 75 74 74 6f 6e 25 | 3d 34 0d 02 94 07 fd 20 | button%|=4..... |
|000038f0| a3 0d 02 9e 05 e0 0d 02 | a8 05 3a 0d 02 b2 11 dd |........|..:.....|
|00003900| 20 f2 74 69 74 6c 65 5f | 70 61 67 65 0d 02 bc 09 | .title_|page....|
|00003910| fb 20 31 38 34 0d 02 c6 | 05 db 0d 02 d0 08 fb 20 |. 184...|....... |
|00003920| 36 33 0d 02 da 1c f1 8a | 33 32 2c 31 30 29 22 43 |63......|32,10)"C|
|00003930| 52 45 41 54 55 52 45 20 | 43 52 4f 53 53 22 0d 02 |REATURE |CROSS"..|
|00003940| e4 33 f1 8a 32 30 2c 31 | 32 29 22 41 20 73 69 6d |.3..20,1|2)"A sim|
|00003950| 75 6c 61 74 69 6f 6e 20 | 6f 66 20 4d 65 6e 64 65 |ulation |of Mende|
|00003960| 6c 69 61 6e 20 49 6e 68 | 65 72 69 74 61 6e 63 65 |lian Inh|eritance|
|00003970| 22 0d 02 ee 1d f1 8a 33 | 31 2c 31 34 29 22 42 79 |"......3|1,14)"By|
|00003980| 20 4c 61 6e 63 65 20 50 | 65 74 65 72 73 22 0d 02 | Lance P|eters"..|
|00003990| f8 3e f1 8a 31 35 2c 31 | 37 29 22 46 6f 72 20 69 |.>..15,1|7)"For i|
|000039a0| 6e 73 74 72 75 63 74 69 | 6f 6e 73 20 70 6c 65 61 |nstructi|ons plea|
|000039b0| 73 65 20 63 6f 6e 73 75 | 6c 74 20 74 68 65 20 72 |se consu|lt the r|
|000039c0| 65 61 64 6d 65 20 66 69 | 6c 65 21 22 0d 03 02 24 |eadme fi|le!"...$|
|000039d0| f1 8a 32 38 2c 31 39 29 | 22 50 72 65 73 73 20 3c |..28,19)|"Press <|
|000039e0| 53 50 41 43 45 3e 20 74 | 6f 20 73 74 61 72 74 22 |SPACE> t|o start"|
|000039f0| 0d 03 0c 0c ef 32 33 2c | 31 2c 30 7c 0d 03 16 05 |.....23,|1,0|....|
|00003a00| f5 0d 03 20 0c 20 20 67 | 65 74 24 3d be 0d 03 2a |... . g|et$=...*|
|00003a10| 0e fd 20 67 65 74 24 3d | 22 20 22 0d 03 34 05 e1 |.. get$=|" "..4..|
|00003a20| 0d 03 3e 05 3a 0d 03 48 | 0f dd 20 f2 73 65 6c 65 |..>.:..H|.. .sele|
|00003a30| 63 74 50 31 0d 03 52 0f | fb 20 31 34 39 20 c8 9c |ctP1..R.|. 149 ..|
|00003a40| 31 39 32 0d 03 5c 05 db | 0d 03 66 1e f4 20 53 65 |192..\..|..f.. Se|
|00003a50| 74 20 75 70 20 50 31 20 | 73 65 6c 65 63 74 69 6f |t up P1 |selectio|
|00003a60| 6e 20 6d 65 6e 75 0d 03 | 70 08 fb 20 36 33 0d 03 |n menu..|p.. 63..|
|00003a70| 7a 05 f1 0d 03 84 1f f1 | 8a 33 31 29 22 53 45 4c |z.......|.31)"SEL|
|00003a80| 45 43 54 49 4f 4e 20 4f | 46 20 50 41 52 45 4e 54 |ECTION O|F PARENT|
|00003a90| 53 22 0d 03 8e 05 f1 0d | 03 98 3b f1 8a 31 36 29 |S"......|..;..16)|
|00003aa0| 22 28 54 68 65 20 77 69 | 6c 64 20 74 79 70 65 20 |"(The wi|ld type |
|00003ab0| 70 68 65 6e 6f 74 79 70 | 65 20 69 73 20 73 65 6c |phenotyp|e is sel|
|00003ac0| 65 63 74 65 64 20 62 79 | 20 64 65 66 61 75 6c 74 |ected by| default|
|00003ad0| 29 22 0d 03 a2 05 f1 0d | 03 ac 28 f1 8a 31 34 29 |)"......|..(..14)|
|00003ae0| 22 54 52 41 49 54 22 3b | 8a 33 38 29 22 46 45 4d |"TRAIT";|.38)"FEM|
|00003af0| 41 4c 45 22 3b 8a 36 31 | 29 22 4d 41 4c 45 22 0d |ALE";.61|)"MALE".|
|00003b00| 03 b6 06 ef 35 0d 03 c0 | 07 e6 34 37 0d 03 ca 16 |....5...|..47....|
|00003b10| f0 34 2c 39 32 2c 38 35 | 34 3a f1 20 bd 28 31 32 |.4,92,85|4:. .(12|
|00003b20| 38 29 0d 03 d4 1f f0 34 | 2c 31 31 37 32 2c 38 35 |8).....4|,1172,85|
|00003b30| 34 3a f1 20 bd 28 31 32 | 39 29 3b bd 28 31 33 30 |4:. .(12|9);.(130|
|00003b40| 29 0d 03 de 06 ef 34 0d | 03 e8 11 78 25 3d 31 30 |).....4.|...x%=10|
|00003b50| 30 3a 79 25 3d 37 34 38 | 0d 03 f2 0e e3 20 6e 25 |0:y%=748|..... n%|
|00003b60| 3d 31 20 b8 20 39 0d 03 | fc 0e 20 20 f0 34 2c 78 |=1 . 9..|.. .4,x|
|00003b70| 25 2c 79 25 0d 04 06 32 | 20 20 f2 63 68 6f 69 63 |%,y%...2| .choic|
|00003b80| 65 5f 62 6f 78 28 74 72 | 61 69 74 24 28 6e 25 29 |e_box(tr|ait$(n%)|
|00003b90| 2c 78 25 2c 79 25 2c 33 | 32 30 2c 36 34 2c 36 33 |,x%,y%,3|20,64,63|
|00003ba0| 2c 32 31 2c 30 29 0d 04 | 10 38 20 20 f2 63 68 6f |,21,0)..|.8 .cho|
|00003bb0| 69 63 65 5f 62 6f 78 28 | 77 69 6c 64 74 79 70 65 |ice_box(|wildtype|
|00003bc0| 24 28 6e 25 29 2c 78 25 | 2b 33 38 30 2c 79 25 2c |$(n%),x%|+380,y%,|
|00003bd0| 33 32 30 2c 36 34 2c 30 | 2c 34 37 2c 30 29 0d 04 |320,64,0|,47,0)..|
|00003be0| 1a 38 20 20 f2 63 68 6f | 69 63 65 5f 62 6f 78 28 |.8 .cho|ice_box(|
|00003bf0| 77 69 6c 64 74 79 70 65 | 24 28 6e 25 29 2c 78 25 |wildtype|$(n%),x%|
|00003c00| 2b 37 36 30 2c 79 25 2c | 33 32 30 2c 36 34 2c 30 |+760,y%,|320,64,0|
|00003c10| 2c 34 37 2c 30 29 0d 04 | 24 0e 20 20 79 25 3d 79 |,47,0)..|$. y%=y|
|00003c20| 25 2d 38 30 0d 04 2e 08 | ed 20 6e 25 0d 04 38 3d |%-80....|. n%..8=|
|00003c30| f2 63 68 6f 69 63 65 5f | 62 6f 78 28 22 53 65 6c |.choice_|box("Sel|
|00003c40| 65 63 74 69 6f 6e 20 43 | 6f 6d 70 6c 65 74 65 22 |ection C|omplete"|
|00003c50| 2c 78 25 2b 33 38 30 2c | 79 25 2c 33 32 30 2c 36 |,x%+380,|y%,320,6|
|00003c60| 34 2c 30 2c 32 37 2c 30 | 29 0d 04 42 0c ef 32 33 |4,0,27,0|)..B..23|
|00003c70| 2c 31 2c 30 7c 0d 04 4c | 08 c8 97 20 ee 0d 04 56 |,1,0|..L|... ...V|
|00003c80| 0b 66 6c 61 67 25 3d 30 | 0d 04 60 17 f2 73 65 74 |.flag%=0|..`..set|
|00003c90| 5f 46 67 65 6e 6f 74 79 | 70 65 28 30 2c 31 29 0d |_Fgenoty|pe(0,1).|
|00003ca0| 04 6a 17 f2 73 65 74 5f | 4d 67 65 6e 6f 74 79 70 |.j..set_|Mgenotyp|
|00003cb0| 65 28 30 2c 32 29 0d 04 | 74 1f f2 73 70 72 69 74 |e(0,2)..|t..sprit|
|00003cc0| 65 5f 64 69 73 70 6c 61 | 79 28 33 30 2c 38 36 30 |e_displa|y(30,860|
|00003cd0| 2c 30 2c 31 29 0d 04 7e | 21 f2 73 70 72 69 74 65 |,0,1)..~|!.sprite|
|00003ce0| 5f 64 69 73 70 6c 61 79 | 28 31 31 31 30 2c 38 36 |_display|(1110,86|
|00003cf0| 30 2c 30 2c 32 29 0d 04 | 88 05 f5 0d 04 92 1c 20 |0,0,2)..|....... |
|00003d00| 20 c8 97 20 78 70 6f 73 | 25 2c 79 70 6f 73 25 2c | .. xpos|%,ypos%,|
|00003d10| 62 75 74 74 6f 6e 25 0d | 04 9c 13 20 20 e7 20 62 |button%.|... . b|
|00003d20| 75 74 74 6f 6e 25 3d 34 | 20 8c 0d 04 a6 21 20 20 |utton%=4| ....! |
|00003d30| 20 20 f2 73 65 6c 65 63 | 74 5f 62 6f 78 31 28 78 | .selec|t_box1(x|
|00003d40| 70 6f 73 25 2c 79 70 6f | 73 25 29 0d 04 b0 1b 20 |pos%,ypo|s%).... |
|00003d50| 20 20 20 f2 73 65 74 5f | 46 67 65 6e 6f 74 79 70 | .set_|Fgenotyp|
|00003d60| 65 28 30 2c 31 29 0d 04 | ba 1b 20 20 20 20 f2 73 |e(0,1)..|.. .s|
|00003d70| 65 74 5f 4d 67 65 6e 6f | 74 79 70 65 28 30 2c 32 |et_Mgeno|type(0,2|
|00003d80| 29 0d 04 c4 23 20 20 20 | 20 f2 73 70 72 69 74 65 |)...# | .sprite|
|00003d90| 5f 64 69 73 70 6c 61 79 | 28 33 30 2c 38 36 30 2c |_display|(30,860,|
|00003da0| 30 2c 31 29 0d 04 ce 25 | 20 20 20 20 f2 73 70 72 |0,1)...%| .spr|
|00003db0| 69 74 65 5f 64 69 73 70 | 6c 61 79 28 31 31 31 30 |ite_disp|lay(1110|
|00003dc0| 2c 38 36 30 2c 30 2c 32 | 29 0d 04 d8 14 20 20 20 |,860,0,2|).... |
|00003dd0| 20 64 65 6c 61 79 25 3d | a6 28 32 35 29 0d 04 e2 | delay%=|.(25)...|
|00003de0| 07 20 20 cd 0d 04 ec 0d | fd 20 66 6c 61 67 25 3d |. .....|. flag%=|
|00003df0| 31 0d 04 f6 08 c8 97 20 | 87 0d 05 00 3d 63 68 72 |1...... |....=chr|
|00003e00| 6f 6d 6f 73 6f 6d 65 73 | 31 24 28 30 2c 30 29 3d |omosomes|1$(0,0)=|
|00003e10| 22 32 22 3a f4 20 32 20 | 69 6e 64 69 76 69 64 75 |"2":. 2 |individu|
|00003e20| 61 6c 73 20 69 6e 20 74 | 68 69 73 20 67 65 6e 65 |als in t|his gene|
|00003e30| 72 61 74 69 6f 6e 0d 05 | 0a 05 e1 0d 05 14 05 3a |ration..|.......:|
|00003e40| 0d 05 1e 35 dd 20 f2 6d | 61 74 65 28 74 65 78 74 |...5. .m|ate(text|
|00003e50| 24 2c 46 67 65 6e 25 2c | 46 69 6e 64 76 25 2c 4d |$,Fgen%,|Findv%,M|
|00003e60| 67 65 6e 25 2c 4d 69 6e | 64 76 25 2c 6e 65 78 74 |gen%,Min|dv%,next|
|00003e70| 67 65 6e 25 29 0d 05 28 | 0e fb 31 34 39 20 c8 9c |gen%)..(|..149 ..|
|00003e80| 31 39 32 0d 05 32 05 db | 0d 05 3c 51 f2 63 68 6f |192..2..|..<Q.cho|
|00003e90| 69 63 65 5f 62 6f 78 28 | 22 54 68 65 20 63 72 65 |ice_box(|"The cre|
|00003ea0| 61 74 75 72 65 73 20 61 | 72 65 20 62 72 65 65 64 |atures a|re breed|
|00003eb0| 69 6e 67 2e 20 50 6c 65 | 61 73 65 20 77 61 69 74 |ing. Ple|ase wait|
|00003ec0| 2e 22 2c 33 30 32 2c 35 | 30 30 2c 36 37 35 2c 36 |.",302,5|00,675,6|
|00003ed0| 34 2c 30 2c 34 32 2c 30 | 29 0d 05 46 0c ef 32 33 |4,0,42,0|)..F..23|
|00003ee0| 2c 31 2c 30 7c 0d 05 50 | 0d 72 6e 64 25 3d b3 28 |,1,0|..P|.rnd%=.(|
|00003ef0| 36 29 0d 05 5a 0d c8 8e | 20 72 6e 64 25 20 ca 0d |6)..Z...| rnd% ..|
|00003f00| 05 64 1a 20 20 c9 20 31 | 3a 6d 69 6e 5f 6f 66 66 |.d. . 1|:min_off|
|00003f10| 73 70 72 69 6e 67 25 3d | 31 0d 05 6e 1a 20 20 c9 |spring%=|1..n. .|
|00003f20| 20 32 3a 6d 69 6e 5f 6f | 66 66 73 70 72 69 6e 67 | 2:min_o|ffspring|
|00003f30| 25 3d 35 0d 05 78 1b 20 | 20 c9 20 33 3a 6d 69 6e |%=5..x. | . 3:min|
|00003f40| 5f 6f 66 66 73 70 72 69 | 6e 67 25 3d 31 30 0d 05 |_offspri|ng%=10..|
|00003f50| 82 1b 20 20 c9 20 34 3a | 6d 69 6e 5f 6f 66 66 73 |.. . 4:|min_offs|
|00003f60| 70 72 69 6e 67 25 3d 31 | 35 0d 05 8c 1b 20 20 c9 |pring%=1|5.... .|
|00003f70| 20 35 3a 6d 69 6e 5f 6f | 66 66 73 70 72 69 6e 67 | 5:min_o|ffspring|
|00003f80| 25 3d 32 30 0d 05 96 1b | 20 20 c9 20 36 3a 6d 69 |%=20....| . 6:mi|
|00003f90| 6e 5f 6f 66 66 73 70 72 | 69 6e 67 25 3d 32 30 0d |n_offspr|ing%=20.|
|00003fa0| 05 a0 05 cb 0d 05 aa 27 | 6e 75 6d 5f 6f 66 66 73 |.......'|num_offs|
|00003fb0| 70 72 69 6e 67 25 3d b3 | 28 32 30 29 2b 6d 69 6e |pring%=.|(20)+min|
|00003fc0| 5f 6f 66 66 73 70 72 69 | 6e 67 25 0d 05 b4 7d 63 |_offspri|ng%...}c|
|00003fd0| 68 72 6f 6d 6f 73 6f 6d | 65 73 31 24 28 6e 65 78 |hromosom|es1$(nex|
|00003fe0| 74 67 65 6e 25 2c 30 29 | 3d c3 28 6e 75 6d 5f 6f |tgen%,0)|=.(num_o|
|00003ff0| 66 66 73 70 72 69 6e 67 | 25 29 3a f4 20 73 74 6f |ffspring|%):. sto|
|00004000| 72 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 69 6e 64 |re numbe|r of ind|
|00004010| 69 76 69 64 75 61 6c 73 | 20 69 6e 20 74 68 65 20 |ividuals| in the |
|00004020| 67 65 6e 65 72 61 74 69 | 6f 6e 20 69 6e 20 74 68 |generati|on in th|
|00004030| 65 20 66 69 72 73 74 20 | 65 6c 65 6d 65 6e 74 20 |e first |element |
|00004040| 6f 66 20 61 72 72 61 79 | 0d 05 be 22 e3 20 6e 65 |of array|...". ne|
|00004050| 78 74 69 6e 64 76 25 3d | 31 20 b8 20 6e 75 6d 5f |xtindv%=|1 . num_|
|00004060| 6f 66 66 73 70 72 69 6e | 67 25 0d 05 c8 3a 20 20 |offsprin|g%...: |
|00004070| f2 62 72 65 65 64 28 46 | 67 65 6e 25 2c 46 69 6e |.breed(F|gen%,Fin|
|00004080| 64 76 25 2c 4d 67 65 6e | 25 2c 4d 69 6e 64 76 25 |dv%,Mgen|%,Mindv%|
|00004090| 2c 6e 65 78 74 67 65 6e | 25 2c 6e 65 78 74 69 6e |,nextgen|%,nextin|
|000040a0| 64 76 25 29 0d 05 d2 0f | ed 20 6e 65 78 74 69 6e |dv%)....|. nextin|
|000040b0| 64 76 25 0d 05 dc 96 46 | 67 65 6e 25 28 6e 65 78 |dv%....F|gen%(nex|
|000040c0| 74 67 65 6e 25 29 3d 46 | 67 65 6e 25 3a 46 69 6e |tgen%)=F|gen%:Fin|
|000040d0| 64 76 25 28 6e 65 78 74 | 67 65 6e 25 29 3d 46 69 |dv%(next|gen%)=Fi|
|000040e0| 6e 64 76 25 3a 4d 67 65 | 6e 25 28 6e 65 78 74 67 |ndv%:Mge|n%(nextg|
|000040f0| 65 6e 25 29 3d 4d 67 65 | 6e 25 3a 4d 69 6e 64 76 |en%)=Mge|n%:Mindv|
|00004100| 25 28 6e 65 78 74 67 65 | 6e 25 29 3d 4d 69 6e 64 |%(nextge|n%)=Mind|
|00004110| 76 25 3a 6e 65 78 74 67 | 65 6e 25 28 6e 65 78 74 |v%:nextg|en%(next|
|00004120| 67 65 6e 25 29 3d 6e 65 | 78 74 67 65 6e 25 3a f4 |gen%)=ne|xtgen%:.|
|00004130| 20 73 61 76 65 20 69 64 | 65 6e 74 69 74 79 20 6f | save id|entity o|
|00004140| 66 20 70 61 72 65 6e 74 | 73 0d 05 e6 26 f2 64 69 |f parent|s...&.di|
|00004150| 73 70 6c 61 79 5f 6f 66 | 66 73 70 72 69 6e 67 28 |splay_of|fspring(|
|00004160| 74 65 78 74 24 2c 6e 65 | 78 74 67 65 6e 25 29 0d |text$,ne|xtgen%).|
|00004170| 05 f0 05 e1 0d 05 fa 05 | 3a 0d 06 04 18 dd 20 f2 |........|:..... .|
|00004180| 63 68 6f 6f 73 65 5f 70 | 61 69 72 28 67 65 6e 25 |choose_p|air(gen%|
|00004190| 29 0d 06 0e 15 4d 66 6c | 61 67 25 3d 30 3a 46 66 |)....Mfl|ag%=0:Ff|
|000041a0| 6c 61 67 25 3d 30 0d 06 | 18 37 6a 25 3d bb 28 63 |lag%=0..|.7j%=.(c|
|000041b0| 68 72 6f 6d 6f 73 6f 6d | 65 73 31 24 28 67 65 6e |hromosom|es1$(gen|
|000041c0| 25 2c 30 29 29 3a f4 20 | 6e 75 6d 62 65 72 20 6f |%,0)):. |number o|
|000041d0| 66 20 69 6e 64 69 76 69 | 64 75 61 6c 73 0d 06 22 |f indivi|duals.."|
|000041e0| 0f e3 20 6e 25 3d 31 20 | b8 20 6a 25 0d 06 2c 33 |.. n%=1 |. j%..,3|
|000041f0| 20 20 e7 20 c2 63 68 72 | 6f 6d 6f 73 6f 6d 65 73 | . .chr|omosomes|
|00004200| 73 65 78 24 28 67 65 6e | 25 2c 6e 25 29 2c 31 29 |sex$(gen|%,n%),1)|
|00004210| 3d 22 4f 22 20 8c 20 4d | 66 6c 61 67 25 3d 31 0d |="O" . M|flag%=1.|
|00004220| 06 36 34 20 20 e7 20 c2 | 63 68 72 6f 6d 6f 73 6f |.64 . .|chromoso|
|00004230| 6d 65 73 73 65 78 24 28 | 67 65 6e 25 2c 6e 25 29 |messex$(|gen%,n%)|
|00004240| 2c 31 29 3c 3e 22 4f 22 | 20 8c 20 46 66 6c 61 67 |,1)<>"O"| . Fflag|
|00004250| 25 3d 31 0d 06 40 08 ed | 20 6e 25 0d 06 4a 1b e7 |%=1..@..| n%..J..|
|00004260| 20 4d 66 6c 61 67 25 3d | 30 20 84 20 46 66 6c 61 | Mflag%=|0 . Ffla|
|00004270| 67 25 3d 30 20 8c 0d 06 | 54 09 20 20 e6 32 31 0d |g%=0 ...|T. .21.|
|00004280| 06 5e 18 20 20 c8 93 20 | c8 90 20 30 2c 30 2c 31 |.^. .. |.. 0,0,1|
|00004290| 32 38 30 2c 32 35 34 0d | 06 68 0f 20 20 e3 6e 25 |280,254.|.h. .n%|
|000042a0| 3d 31 20 b8 20 36 0d 06 | 72 5f 20 20 20 20 f2 63 |=1 . 6..|r_ .c|
|000042b0| 68 6f 69 63 65 5f 62 6f | 78 28 22 41 6c 6c 20 74 |hoice_bo|x("All t|
|000042c0| 68 69 73 20 67 65 6e 65 | 72 61 74 69 6f 6e 20 74 |his gene|ration t|
|000042d0| 68 65 20 73 61 6d 65 20 | 73 65 78 21 20 42 72 65 |he same |sex! Bre|
|000042e0| 65 64 20 73 6f 6d 65 20 | 6d 6f 72 65 2e 22 2c 32 |ed some |more.",2|
|000042f0| 31 36 2c 31 32 38 2c 38 | 34 38 2c 36 34 2c 33 2c |16,128,8|48,64,3,|
|00004300| 36 33 2c 30 29 0d 06 7c | 14 20 20 20 20 64 65 6c |63,0)..||. del|
|00004310| 61 79 25 3d a6 28 32 35 | 29 0d 06 86 5f 20 20 20 |ay%=.(25|)..._ |
|00004320| 20 f2 63 68 6f 69 63 65 | 5f 62 6f 78 28 22 41 6c | .choice|_box("Al|
|00004330| 6c 20 74 68 69 73 20 67 | 65 6e 65 72 61 74 69 6f |l this g|eneratio|
|00004340| 6e 20 74 68 65 20 73 61 | 6d 65 20 73 65 78 21 20 |n the sa|me sex! |
|00004350| 42 72 65 65 64 20 73 6f | 6d 65 20 6d 6f 72 65 2e |Breed so|me more.|
|00004360| 22 2c 32 31 36 2c 31 32 | 38 2c 38 34 38 2c 36 34 |",216,12|8,848,64|
|00004370| 2c 36 33 2c 33 2c 30 29 | 0d 06 90 14 20 20 20 20 |,63,3,0)|.... |
|00004380| 64 65 6c 61 79 25 3d a6 | 28 32 35 29 0d 06 9a 0a |delay%=.|(25)....|
|00004390| 20 20 ed 20 6e 25 0d 06 | a4 07 20 20 e1 0d 06 ae | . n%..|.. ....|
|000043a0| 05 cd 0d 06 b8 07 e6 32 | 31 0d 06 c2 16 c8 93 20 |.......2|1...... |
|000043b0| c8 90 20 30 2c 30 2c 31 | 32 38 30 2c 32 35 34 0d |.. 0,0,1|280,254.|
|000043c0| 06 cc 58 f2 63 68 6f 69 | 63 65 5f 62 6f 78 28 22 |..X.choi|ce_box("|
|000043d0| 27 43 6c 69 63 6b 27 20 | 6f 6e 20 74 68 65 20 70 |'Click' |on the p|
|000043e0| 61 69 72 20 6f 66 20 61 | 6e 69 6d 61 6c 73 20 79 |air of a|nimals y|
|000043f0| 6f 75 20 77 69 73 68 20 | 74 6f 20 6d 61 74 65 22 |ou wish |to mate"|
|00004400| 2c 32 36 34 2c 31 32 38 | 2c 37 38 34 2c 36 34 2c |,264,128|,784,64,|
|00004410| 30 2c 34 32 2c 30 29 0d | 06 d6 0c ef 32 33 2c 31 |0,42,0).|....23,1|
|00004420| 2c 30 7c 0d 06 e0 10 64 | 65 6c 61 79 25 3d a6 28 |,0|....d|elay%=.(|
|00004430| 35 30 29 0d 06 ea 0b 66 | 6c 61 67 25 3d 30 0d 06 |50)....f|lag%=0..|
|00004440| f4 05 f5 0d 06 fe 1c 20 | 20 c8 97 20 78 70 6f 73 |....... | .. xpos|
|00004450| 25 2c 79 70 6f 73 25 2c | 62 75 74 74 6f 6e 25 0d |%,ypos%,|button%.|
|00004460| 07 08 13 20 20 e7 20 62 | 75 74 74 6f 6e 25 3d 34 |... . b|utton%=4|
|00004470| 20 8c 0d 07 12 2a 20 20 | 20 20 e7 20 66 6c 61 67 | ....* | . flag|
|00004480| 25 3d 30 20 8c 20 e6 32 | 31 3a c8 93 20 c8 90 20 |%=0 . .2|1:.. .. |
|00004490| 30 2c 30 2c 31 32 38 30 | 2c 32 35 34 0d 07 1c 14 |0,0,1280|,254....|
|000044a0| 20 20 20 20 78 25 3d 32 | 30 3a 79 25 3d 38 33 32 | x%=2|0:y%=832|
|000044b0| 0d 07 26 13 20 20 20 20 | e3 20 6e 25 3d 31 20 b8 |..&. |. n%=1 .|
|000044c0| 20 6a 25 0d 07 30 40 20 | 20 20 20 20 20 e7 20 78 | j%..0@ | . x|
|000044d0| 70 6f 73 25 3e 78 25 20 | 80 20 78 70 6f 73 25 3c |pos%>x% |. xpos%<|
|000044e0| 78 25 2b 31 32 30 20 20 | 80 20 79 70 6f 73 25 3e |x%+120 |. ypos%>|
|000044f0| 79 25 20 80 20 79 70 6f | 73 25 3c 79 25 2b 31 32 |y% . ypo|s%<y%+12|
|00004500| 30 20 8c 0d 07 3a 19 20 | 20 20 20 20 20 20 20 66 |0 ...:. | f|
|00004510| 6c 61 67 25 3d 66 6c 61 | 67 25 2b 31 0d 07 44 45 |lag%=fla|g%+1..DE|
|00004520| 20 20 20 20 20 20 20 20 | e7 20 66 6c 61 67 25 3d | |. flag%=|
|00004530| 31 20 8c 20 74 65 6d 70 | 69 6e 64 76 31 25 3d 6e |1 . temp|indv1%=n|
|00004540| 25 3a f2 73 70 72 69 74 | 65 5f 64 69 73 70 6c 61 |%:.sprit|e_displa|
|00004550| 79 28 34 38 30 2c 39 30 | 2c 67 65 6e 25 2c 6e 25 |y(480,90|,gen%,n%|
|00004560| 29 0d 07 4e 45 20 20 20 | 20 20 20 20 20 e7 20 66 |)..NE | . f|
|00004570| 6c 61 67 25 3d 32 20 8c | 20 74 65 6d 70 69 6e 64 |lag%=2 .| tempind|
|00004580| 76 32 25 3d 6e 25 3a f2 | 73 70 72 69 74 65 5f 64 |v2%=n%:.|sprite_d|
|00004590| 69 73 70 6c 61 79 28 36 | 36 30 2c 39 30 2c 67 65 |isplay(6|60,90,ge|
|000045a0| 6e 25 2c 6e 25 29 0d 07 | 58 0b 20 20 20 20 20 20 |n%,n%)..|X. |
|000045b0| cd 0d 07 62 13 20 20 20 | 20 20 20 78 25 3d 78 25 |...b. | x%=x%|
|000045c0| 2b 31 36 30 0d 07 6c 1a | 20 20 20 20 20 20 e7 78 |+160..l.| .x|
|000045d0| 25 3e 31 31 34 30 20 8c | 20 78 25 3d 32 30 0d 07 |%>1140 .| x%=20..|
|000045e0| 76 1d 20 20 20 20 20 20 | e7 20 78 25 3d 32 30 20 |v. |. x%=20 |
|000045f0| 8c 20 79 25 3d 79 25 2d | 31 34 30 0d 07 80 0c 20 |. y%=y%-|140.... |
|00004600| 20 20 20 ed 20 6e 25 0d | 07 8a 07 20 20 cd 0d 07 | . n%.|... ...|
|00004610| 94 12 20 20 64 65 6c 61 | 79 25 3d a6 28 32 35 29 |.. dela|y%=.(25)|
|00004620| 0d 07 9e 0d fd 20 66 6c | 61 67 25 3d 32 0d 07 a8 |..... fl|ag%=2...|
|00004630| 5b e7 20 c2 63 68 72 6f | 6d 6f 73 6f 6d 65 73 73 |[. .chro|mosomess|
|00004640| 65 78 24 28 67 65 6e 25 | 2c 74 65 6d 70 69 6e 64 |ex$(gen%|,tempind|
|00004650| 76 31 25 29 2c 31 29 3d | 22 4f 22 20 80 20 c2 63 |v1%),1)=|"O" . .c|
|00004660| 68 72 6f 6d 6f 73 6f 6d | 65 73 73 65 78 24 28 67 |hromosom|essex$(g|
|00004670| 65 6e 25 2c 74 65 6d 70 | 69 6e 64 76 32 25 29 2c |en%,temp|indv2%),|
|00004680| 31 29 3d 22 4f 22 20 8c | 0d 07 b2 09 20 20 e6 32 |1)="O" .|.... .2|
|00004690| 31 0d 07 bc 18 20 20 c8 | 93 20 c8 90 20 30 2c 30 |1.... .|. .. 0,0|
|000046a0| 2c 31 32 38 30 2c 32 35 | 34 0d 07 c6 0f 20 20 e3 |,1280,25|4.... .|
|000046b0| 6e 25 3d 31 20 b8 20 34 | 0d 07 d0 57 20 20 20 20 |n%=1 . 4|...W |
|000046c0| f2 63 68 6f 69 63 65 5f | 62 6f 78 28 22 59 6f 75 |.choice_|box("You|
|000046d0| 20 68 61 76 65 20 73 65 | 6c 65 63 74 65 64 20 54 | have se|lected T|
|000046e0| 57 4f 20 4d 41 4c 45 53 | 21 20 43 68 6f 6f 73 65 |WO MALES|! Choose|
|000046f0| 20 61 67 61 69 6e 2e 22 | 2c 32 36 34 2c 31 32 38 | again."|,264,128|
|00004700| 2c 37 30 34 2c 36 34 2c | 33 2c 36 33 2c 30 29 0d |,704,64,|3,63,0).|
|00004710| 07 da 14 20 20 20 20 64 | 65 6c 61 79 25 3d a6 28 |... d|elay%=.(|
|00004720| 32 35 29 0d 07 e4 57 20 | 20 20 20 f2 63 68 6f 69 |25)...W | .choi|
|00004730| 63 65 5f 62 6f 78 28 22 | 59 6f 75 20 68 61 76 65 |ce_box("|You have|
|00004740| 20 73 65 6c 65 63 74 65 | 64 20 54 57 4f 20 4d 41 | selecte|d TWO MA|
|00004750| 4c 45 53 21 20 43 68 6f | 6f 73 65 20 61 67 61 69 |LES! Cho|ose agai|
|00004760| 6e 2e 22 2c 32 36 34 2c | 31 32 38 2c 37 30 34 2c |n.",264,|128,704,|
|00004770| 36 34 2c 36 33 2c 33 2c | 30 29 0d 07 ee 14 20 20 |64,63,3,|0).... |
|00004780| 20 20 64 65 6c 61 79 25 | 3d a6 28 32 35 29 0d 07 | delay%|=.(25)..|
|00004790| f8 0a 20 20 ed 20 6e 25 | 0d 08 02 0c 20 20 e5 20 |.. . n%|.... . |
|000047a0| 8d 54 58 46 0d 08 0c 05 | cd 0d 08 16 5d e7 20 c2 |.TXF....|....]. .|
|000047b0| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 73 65 78 24 28 |chromoso|messex$(|
|000047c0| 67 65 6e 25 2c 74 65 6d | 70 69 6e 64 76 31 25 29 |gen%,tem|pindv1%)|
|000047d0| 2c 31 29 3c 3e 22 4f 22 | 20 80 20 c2 63 68 72 6f |,1)<>"O"| . .chro|
|000047e0| 6d 6f 73 6f 6d 65 73 73 | 65 78 24 28 67 65 6e 25 |mosomess|ex$(gen%|
|000047f0| 2c 74 65 6d 70 69 6e 64 | 76 32 25 29 2c 31 29 3c |,tempind|v2%),1)<|
|00004800| 3e 22 4f 22 20 8c 0d 08 | 20 09 20 20 e6 32 31 0d |>"O" ...| . .21.|
|00004810| 08 2a 18 20 20 c8 93 20 | c8 90 20 30 2c 30 2c 31 |.*. .. |.. 0,0,1|
|00004820| 32 38 30 2c 32 35 34 0d | 08 34 10 20 20 e3 20 6e |280,254.|.4. . n|
|00004830| 25 3d 31 20 b8 20 34 0d | 08 3e 59 20 20 20 20 f2 |%=1 . 4.|.>Y .|
|00004840| 63 68 6f 69 63 65 5f 62 | 6f 78 28 22 59 6f 75 20 |choice_b|ox("You |
|00004850| 68 61 76 65 20 73 65 6c | 65 63 74 65 64 20 54 57 |have sel|ected TW|
|00004860| 4f 20 46 45 4d 41 4c 45 | 53 21 20 43 68 6f 6f 73 |O FEMALE|S! Choos|
|00004870| 65 20 61 67 61 69 6e 2e | 22 2c 32 36 34 2c 31 32 |e again.|",264,12|
|00004880| 38 2c 37 33 36 2c 36 34 | 2c 33 2c 36 33 2c 30 29 |8,736,64|,3,63,0)|
|00004890| 0d 08 48 14 20 20 20 20 | 64 65 6c 61 79 25 3d a6 |..H. |delay%=.|
|000048a0| 28 32 35 29 0d 08 52 59 | 20 20 20 20 f2 63 68 6f |(25)..RY| .cho|
|000048b0| 69 63 65 5f 62 6f 78 28 | 22 59 6f 75 20 68 61 76 |ice_box(|"You hav|
|000048c0| 65 20 73 65 6c 65 63 74 | 65 64 20 54 57 4f 20 46 |e select|ed TWO F|
|000048d0| 45 4d 41 4c 45 53 21 20 | 43 68 6f 6f 73 65 20 61 |EMALES! |Choose a|
|000048e0| 67 61 69 6e 2e 22 2c 32 | 36 34 2c 31 32 38 2c 37 |gain.",2|64,128,7|
|000048f0| 33 36 2c 36 34 2c 36 33 | 2c 33 2c 30 29 0d 08 5c |36,64,63|,3,0)..\|
|00004900| 14 20 20 20 20 64 65 6c | 61 79 25 3d a6 28 32 35 |. del|ay%=.(25|
|00004910| 29 0d 08 66 0a 20 20 ed | 20 6e 25 0d 08 70 0c 20 |)..f. .| n%..p. |
|00004920| 20 e5 20 8d 54 58 46 0d | 08 7a 05 cd 0d 08 84 7a | . .TXF.|.z.....z|
|00004930| e7 20 c2 63 68 72 6f 6d | 6f 73 6f 6d 65 73 73 65 |. .chrom|osomesse|
|00004940| 78 24 28 67 65 6e 25 2c | 74 65 6d 70 69 6e 64 76 |x$(gen%,|tempindv|
|00004950| 31 25 29 2c 31 29 3d 22 | 4f 22 20 8c 20 4d 69 6e |1%),1)="|O" . Min|
|00004960| 64 76 25 3d 74 65 6d 70 | 69 6e 64 76 31 25 3a 46 |dv%=temp|indv1%:F|
|00004970| 69 6e 64 76 25 3d 74 65 | 6d 70 69 6e 64 76 32 25 |indv%=te|mpindv2%|
|00004980| 20 8b 20 4d 69 6e 64 76 | 25 3d 74 65 6d 70 69 6e | . Mindv|%=tempin|
|00004990| 64 76 32 25 3a 46 69 6e | 64 76 25 3d 74 65 6d 70 |dv2%:Fin|dv%=temp|
|000049a0| 69 6e 64 76 31 25 0d 08 | 8e 3f f2 63 68 6f 69 63 |indv1%..|.?.choic|
|000049b0| 65 5f 62 6f 78 28 22 4d | 41 54 45 20 54 48 45 53 |e_box("M|ATE THES|
|000049c0| 45 20 43 52 45 41 54 55 | 52 45 53 3f 22 2c 33 36 |E CREATU|RES?",36|
|000049d0| 30 2c 32 32 2c 33 36 38 | 2c 34 38 2c 36 33 2c 32 |0,22,368|,48,63,2|
|000049e0| 31 2c 32 31 29 0d 08 98 | 2a f2 63 68 6f 69 63 65 |1,21)...|*.choice|
|000049f0| 5f 62 6f 78 28 22 59 45 | 53 22 2c 37 32 38 2c 32 |_box("YE|S",728,2|
|00004a00| 32 2c 36 34 2c 34 38 2c | 30 2c 34 37 2c 30 29 0d |2,64,48,|0,47,0).|
|00004a10| 08 a2 29 f2 63 68 6f 69 | 63 65 5f 62 6f 78 28 22 |..).choi|ce_box("|
|00004a20| 4e 4f 22 2c 38 32 34 2c | 32 32 2c 36 34 2c 34 38 |NO",824,|22,64,48|
|00004a30| 2c 30 2c 34 37 2c 30 29 | 0d 08 ac 0c ef 32 33 2c |,0,47,0)|.....23,|
|00004a40| 31 2c 30 7c 0d 08 b6 0b | 66 6c 61 67 25 3d 30 0d |1,0|....|flag%=0.|
|00004a50| 08 c0 05 f5 0d 08 ca 1c | 20 20 c8 97 20 78 70 6f |........| .. xpo|
|00004a60| 73 25 2c 79 70 6f 73 25 | 2c 62 75 74 74 6f 6e 25 |s%,ypos%|,button%|
|00004a70| 0d 08 d4 13 20 20 e7 20 | 62 75 74 74 6f 6e 25 3d |.... . |button%=|
|00004a80| 34 20 8c 0d 08 de 3f 20 | 20 20 20 e7 20 78 70 6f |4 ....? | . xpo|
|00004a90| 73 25 3e 37 32 38 20 80 | 20 78 70 6f 73 25 3c 37 |s%>728 .| xpos%<7|
|00004aa0| 39 32 20 80 20 79 70 6f | 73 25 3e 32 32 20 80 20 |92 . ypo|s%>22 . |
|00004ab0| 79 70 6f 73 25 3c 37 30 | 20 8c 20 66 6c 61 67 25 |ypos%<70| . flag%|
|00004ac0| 3d 31 0d 08 e8 3f 20 20 | 20 20 e7 20 78 70 6f 73 |=1...? | . xpos|
|00004ad0| 25 3e 38 32 34 20 80 20 | 78 70 6f 73 25 3c 38 38 |%>824 . |xpos%<88|
|00004ae0| 38 20 80 20 79 70 6f 73 | 25 3e 32 32 20 80 20 79 |8 . ypos|%>22 . y|
|00004af0| 70 6f 73 25 3c 37 30 20 | 8c 20 66 6c 61 67 25 3d |pos%<70 |. flag%=|
|00004b00| 32 0d 08 f2 07 20 20 cd | 0d 08 fc 0e fd 20 66 6c |2.... .|..... fl|
|00004b10| 61 67 25 3c 3e 30 0d 09 | 06 11 e7 20 66 6c 61 67 |ag%<>0..|... flag|
|00004b20| 25 3d 32 20 8c 20 e1 0d | 09 10 39 e7 20 67 65 6e |%=2 . ..|..9. gen|
|00004b30| 25 3d 31 20 8c 20 6e 65 | 78 74 67 65 6e 25 3d 32 |%=1 . ne|xtgen%=2|
|00004b40| 3a 74 65 78 74 24 28 6e | 65 78 74 67 65 6e 25 29 |:text$(n|extgen%)|
|00004b50| 3d 22 46 32 20 47 65 6e | 65 72 61 74 69 6f 6e 22 |="F2 Gen|eration"|
|00004b60| 0d 09 1a 39 e7 20 67 65 | 6e 25 3d 32 20 8c 20 6e |...9. ge|n%=2 . n|
|00004b70| 65 78 74 67 65 6e 25 3d | 33 3a 74 65 78 74 24 28 |extgen%=|3:text$(|
|00004b80| 6e 65 78 74 67 65 6e 25 | 29 3d 22 46 33 20 47 65 |nextgen%|)="F3 Ge|
|00004b90| 6e 65 72 61 74 69 6f 6e | 22 0d 09 24 3b f2 6d 61 |neration|"..$;.ma|
|00004ba0| 74 65 28 74 65 78 74 24 | 28 6e 65 78 74 67 65 6e |te(text$|(nextgen|
|00004bb0| 25 29 2c 67 65 6e 25 2c | 46 69 6e 64 76 25 2c 67 |%),gen%,|Findv%,g|
|00004bc0| 65 6e 25 2c 4d 69 6e 64 | 76 25 2c 6e 65 78 74 67 |en%,Mind|v%,nextg|
|00004bd0| 65 6e 25 29 0d 09 2e 15 | 74 68 69 73 67 65 6e 25 |en%)....|thisgen%|
|00004be0| 3d 6e 65 78 74 67 65 6e | 25 0d 09 38 05 e1 0d 09 |=nextgen|%..8....|
|00004bf0| 42 05 3a 0d 09 4c 17 dd | 20 f2 74 65 73 74 5f 63 |B.:..L..| .test_c|
|00004c00| 72 6f 73 73 28 67 65 6e | 25 29 0d 09 56 15 4d 66 |ross(gen|%)..V.Mf|
|00004c10| 6c 61 67 25 3d 30 3a 46 | 66 6c 61 67 25 3d 30 0d |lag%=0:F|flag%=0.|
|00004c20| 09 60 37 6a 25 3d bb 28 | 63 68 72 6f 6d 6f 73 6f |.`7j%=.(|chromoso|
|00004c30| 6d 65 73 31 24 28 67 65 | 6e 25 2c 30 29 29 3a f4 |mes1$(ge|n%,0)):.|
|00004c40| 20 6e 75 6d 62 65 72 20 | 6f 66 20 69 6e 64 69 76 | number |of indiv|
|00004c50| 69 64 75 61 6c 73 0d 09 | 6a 07 e6 32 31 0d 09 74 |iduals..|j..21..t|
|00004c60| 16 c8 93 20 c8 90 20 30 | 2c 30 2c 31 32 38 30 2c |... .. 0|,0,1280,|
|00004c70| 32 35 34 0d 09 7e 4f f2 | 63 68 6f 69 63 65 5f 62 |254..~O.|choice_b|
|00004c80| 6f 78 28 22 27 43 6c 69 | 63 6b 27 20 6f 6e 20 74 |ox("'Cli|ck' on t|
|00004c90| 68 65 20 61 6e 69 6d 61 | 6c 20 79 6f 75 20 77 69 |he anima|l you wi|
|00004ca0| 73 68 20 74 6f 20 74 65 | 73 74 22 2c 33 32 30 2c |sh to te|st",320,|
|00004cb0| 31 32 38 2c 36 34 30 2c | 36 34 2c 30 2c 34 32 2c |128,640,|64,0,42,|
|00004cc0| 30 29 0d 09 88 4e f2 63 | 68 6f 69 63 65 5f 62 6f |0)...N.c|hoice_bo|
|00004cd0| 78 28 22 41 6e 20 61 70 | 70 72 6f 70 72 69 61 74 |x("An ap|propriat|
|00004ce0| 65 20 6d 61 74 65 20 77 | 69 6c 6c 20 62 65 20 73 |e mate w|ill be s|
|00004cf0| 65 6c 65 63 74 65 64 22 | 2c 33 32 30 2c 36 34 2c |elected"|,320,64,|
|00004d00| 36 34 30 2c 34 38 2c 34 | 32 2c 32 31 2c 32 31 29 |640,48,4|2,21,21)|
|00004d10| 0d 09 92 0c ef 32 33 2c | 31 2c 30 7c 0d 09 9c 10 |.....23,|1,0|....|
|00004d20| 64 65 6c 61 79 25 3d a6 | 28 35 30 29 0d 09 a6 0b |delay%=.|(50)....|
|00004d30| 66 6c 61 67 25 3d 30 0d | 09 b0 05 f5 0d 09 ba 1c |flag%=0.|........|
|00004d40| 20 20 c8 97 20 78 70 6f | 73 25 2c 79 70 6f 73 25 | .. xpo|s%,ypos%|
|00004d50| 2c 62 75 74 74 6f 6e 25 | 0d 09 c4 13 20 20 e7 20 |,button%|.... . |
|00004d60| 62 75 74 74 6f 6e 25 3d | 34 20 8c 0d 09 ce 2a 20 |button%=|4 ....* |
|00004d70| 20 20 20 e7 20 66 6c 61 | 67 25 3d 30 20 8c 20 e6 | . fla|g%=0 . .|
|00004d80| 32 31 3a c8 93 20 c8 90 | 20 30 2c 30 2c 31 32 38 |21:.. ..| 0,0,128|
|00004d90| 30 2c 32 35 34 0d 09 d8 | 14 20 20 20 20 78 25 3d |0,254...|. x%=|
|00004da0| 32 30 3a 79 25 3d 38 33 | 32 0d 09 e2 13 20 20 20 |20:y%=83|2.... |
|00004db0| 20 e3 20 6e 25 3d 31 20 | b8 20 6a 25 0d 09 ec 40 | . n%=1 |. j%...@|
|00004dc0| 20 20 20 20 20 20 e7 20 | 78 70 6f 73 25 3e 78 25 | . |xpos%>x%|
|00004dd0| 20 80 20 78 70 6f 73 25 | 3c 78 25 2b 31 32 30 20 | . xpos%|<x%+120 |
|00004de0| 20 80 20 79 70 6f 73 25 | 3e 79 25 20 80 20 79 70 | . ypos%|>y% . yp|
|00004df0| 6f 73 25 3c 79 25 2b 31 | 32 30 20 8c 0d 09 f6 19 |os%<y%+1|20 .....|
|00004e00| 20 20 20 20 20 20 20 20 | 66 6c 61 67 25 3d 66 6c | |flag%=fl|
|00004e10| 61 67 25 2b 31 0d 0a 00 | 39 20 20 20 20 20 20 20 |ag%+1...|9 |
|00004e20| 20 74 65 6d 70 69 6e 64 | 76 31 25 3d 6e 25 3a f2 | tempind|v1%=n%:.|
|00004e30| 73 70 72 69 74 65 5f 64 | 69 73 70 6c 61 79 28 34 |sprite_d|isplay(4|
|00004e40| 38 30 2c 39 30 2c 67 65 | 6e 25 2c 6e 25 29 0d 0a |80,90,ge|n%,n%)..|
|00004e50| 0a 0b 20 20 20 20 20 20 | cd 0d 0a 14 11 20 20 20 |.. |..... |
|00004e60| 20 78 25 3d 78 25 2b 31 | 36 30 0d 0a 1e 18 20 20 | x%=x%+1|60.... |
|00004e70| 20 20 e7 78 25 3e 31 31 | 34 30 20 8c 20 78 25 3d | .x%>11|40 . x%=|
|00004e80| 32 30 0d 0a 28 1b 20 20 | 20 20 e7 20 78 25 3d 32 |20..(. | . x%=2|
|00004e90| 30 20 8c 20 79 25 3d 79 | 25 2d 31 34 30 0d 0a 32 |0 . y%=y|%-140..2|
|00004ea0| 0a 20 20 ed 20 6e 25 0d | 0a 3c 05 cd 0d 0a 46 10 |. . n%.|.<....F.|
|00004eb0| 64 65 6c 61 79 25 3d a6 | 28 32 35 29 0d 0a 50 0d |delay%=.|(25)..P.|
|00004ec0| fd 20 66 6c 61 67 25 3d | 31 0d 0a 5a d7 e7 20 c2 |. flag%=|1..Z.. .|
|00004ed0| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 73 65 78 24 28 |chromoso|messex$(|
|00004ee0| 67 65 6e 25 2c 74 65 6d | 70 69 6e 64 76 31 25 29 |gen%,tem|pindv1%)|
|00004ef0| 2c 31 29 3d 22 4f 22 20 | 8c 20 4d 66 6c 61 67 25 |,1)="O" |. Mflag%|
|00004f00| 3d 31 3a 4d 69 6e 64 76 | 25 3d 74 65 6d 70 69 6e |=1:Mindv|%=tempin|
|00004f10| 64 76 31 25 3a 4d 67 65 | 6e 25 3d 67 65 6e 25 3a |dv1%:Mge|n%=gen%:|
|00004f20| 46 69 6e 64 76 25 3d 31 | 3a 46 67 65 6e 25 3d 35 |Findv%=1|:Fgen%=5|
|00004f30| 3a 8b 20 46 69 6e 64 76 | 25 3d 74 65 6d 70 69 6e |:. Findv|%=tempin|
|00004f40| 64 76 31 25 3a 46 67 65 | 6e 25 3d 67 65 6e 25 3a |dv1%:Fge|n%=gen%:|
|00004f50| 4d 66 6c 61 67 25 3d 30 | 3a 4d 69 6e 64 76 25 3d |Mflag%=0|:Mindv%=|
|00004f60| 31 3a 4d 67 65 6e 25 3d | 35 3a f4 20 6d 61 74 65 |1:Mgen%=|5:. mate|
|00004f70| 20 66 6f 72 20 74 65 73 | 74 20 63 72 6f 73 73 20 | for tes|t cross |
|00004f80| 73 74 6f 72 65 64 20 69 | 6e 20 61 72 72 61 79 20 |stored i|n array |
|00004f90| 66 6f 72 20 67 65 6e 65 | 72 61 74 69 6f 6e 20 35 |for gene|ration 5|
|00004fa0| 0d 0a 64 23 f2 73 65 74 | 5f 74 65 73 74 5f 6d 61 |..d#.set|_test_ma|
|00004fb0| 74 65 5f 67 65 6e 6f 74 | 79 70 65 28 4d 66 6c 61 |te_genot|ype(Mfla|
|00004fc0| 67 25 29 0d 0a 6e 1f f2 | 73 70 72 69 74 65 5f 64 |g%)..n..|sprite_d|
|00004fd0| 69 73 70 6c 61 79 28 36 | 36 30 2c 39 30 2c 35 2c |isplay(6|60,90,5,|
|00004fe0| 31 29 0d 0a 78 3f f2 63 | 68 6f 69 63 65 5f 62 6f |1)..x?.c|hoice_bo|
|00004ff0| 78 28 22 4d 41 54 45 20 | 54 48 45 53 45 20 43 52 |x("MATE |THESE CR|
|00005000| 45 41 54 55 52 45 53 3f | 22 2c 33 36 30 2c 32 32 |EATURES?|",360,22|
|00005010| 2c 33 36 38 2c 34 38 2c | 36 33 2c 32 31 2c 32 31 |,368,48,|63,21,21|
|00005020| 29 0d 0a 82 2a f2 63 68 | 6f 69 63 65 5f 62 6f 78 |)...*.ch|oice_box|
|00005030| 28 22 59 45 53 22 2c 37 | 32 38 2c 32 32 2c 36 34 |("YES",7|28,22,64|
|00005040| 2c 34 38 2c 30 2c 34 37 | 2c 30 29 0d 0a 8c 29 f2 |,48,0,47|,0)...).|
|00005050| 63 68 6f 69 63 65 5f 62 | 6f 78 28 22 4e 4f 22 2c |choice_b|ox("NO",|
|00005060| 38 32 34 2c 32 32 2c 36 | 34 2c 34 38 2c 30 2c 34 |824,22,6|4,48,0,4|
|00005070| 37 2c 30 29 0d 0a 96 0c | ef 32 33 2c 31 2c 30 7c |7,0)....|.23,1,0||
|00005080| 0d 0a a0 0b 66 6c 61 67 | 25 3d 30 0d 0a aa 05 f5 |....flag|%=0.....|
|00005090| 0d 0a b4 1c 20 20 c8 97 | 20 78 70 6f 73 25 2c 79 |.... ..| xpos%,y|
|000050a0| 70 6f 73 25 2c 62 75 74 | 74 6f 6e 25 0d 0a be 13 |pos%,but|ton%....|
|000050b0| 20 20 e7 20 62 75 74 74 | 6f 6e 25 3d 34 20 8c 0d | . butt|on%=4 ..|
|000050c0| 0a c8 3f 20 20 20 20 e7 | 20 78 70 6f 73 25 3e 37 |..? .| xpos%>7|
|000050d0| 32 38 20 80 20 78 70 6f | 73 25 3c 37 39 32 20 80 |28 . xpo|s%<792 .|
|000050e0| 20 79 70 6f 73 25 3e 32 | 32 20 80 20 79 70 6f 73 | ypos%>2|2 . ypos|
|000050f0| 25 3c 37 30 20 8c 20 66 | 6c 61 67 25 3d 31 0d 0a |%<70 . f|lag%=1..|
|00005100| d2 3f 20 20 20 20 e7 20 | 78 70 6f 73 25 3e 38 32 |.? . |xpos%>82|
|00005110| 34 20 80 20 78 70 6f 73 | 25 3c 38 38 38 20 80 20 |4 . xpos|%<888 . |
|00005120| 79 70 6f 73 25 3e 32 32 | 20 80 20 79 70 6f 73 25 |ypos%>22| . ypos%|
|00005130| 3c 37 30 20 8c 20 66 6c | 61 67 25 3d 32 0d 0a dc |<70 . fl|ag%=2...|
|00005140| 07 20 20 cd 0d 0a e6 0e | fd 20 66 6c 61 67 25 3c |. .....|. flag%<|
|00005150| 3e 30 0d 0a f0 11 e7 20 | 66 6c 61 67 25 3d 32 20 |>0..... |flag%=2 |
|00005160| 8c 20 e1 0d 0a fa 2b 6e | 65 78 74 67 65 6e 25 3d |. ....+n|extgen%=|
|00005170| 34 3a 74 65 78 74 24 28 | 6e 65 78 74 67 65 6e 25 |4:text$(|nextgen%|
|00005180| 29 3d 22 54 65 73 74 20 | 43 72 6f 73 73 22 0d 0b |)="Test |Cross"..|
|00005190| 04 3d f2 6d 61 74 65 28 | 74 65 78 74 24 28 6e 65 |.=.mate(|text$(ne|
|000051a0| 78 74 67 65 6e 25 29 2c | 46 67 65 6e 25 2c 46 69 |xtgen%),|Fgen%,Fi|
|000051b0| 6e 64 76 25 2c 4d 67 65 | 6e 25 2c 4d 69 6e 64 76 |ndv%,Mge|n%,Mindv|
|000051c0| 25 2c 6e 65 78 74 67 65 | 6e 25 29 0d 0b 0e 15 74 |%,nextge|n%)....t|
|000051d0| 68 69 73 67 65 6e 25 3d | 6e 65 78 74 67 65 6e 25 |hisgen%=|nextgen%|
|000051e0| 0d 0b 18 05 e1 0d 0b 22 | 05 3a 0d 0b 2c 25 dd 20 |......."|.:..,%. |
|000051f0| f2 73 65 74 5f 74 65 73 | 74 5f 6d 61 74 65 5f 67 |.set_tes|t_mate_g|
|00005200| 65 6e 6f 74 79 70 65 28 | 4d 66 6c 61 67 25 29 0d |enotype(|Mflag%).|
|00005210| 0b 36 1e 6c 65 6e 25 3d | a9 28 63 68 72 6f 6d 6f |.6.len%=|.(chromo|
|00005220| 73 6f 6d 65 73 31 24 28 | 30 2c 31 29 29 0d 0b 40 |somes1$(|0,1))..@|
|00005230| 29 63 68 72 6f 6d 6f 73 | 6f 6d 65 73 31 24 28 35 |)chromos|omes1$(5|
|00005240| 2c 31 29 3d 63 68 72 6f | 6d 6f 73 6f 6d 65 73 31 |,1)=chro|mosomes1|
|00005250| 24 28 30 2c 31 29 0d 0b | 4a 11 e3 20 6e 25 3d 31 |$(0,1)..|J.. n%=1|
|00005260| 20 b8 20 37 20 88 32 0d | 0b 54 3e 20 20 e7 20 c1 | . 7 .2.|.T> . .|
|00005270| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 31 24 28 30 2c |chromoso|mes1$(0,|
|00005280| 31 29 2c 6e 25 2c 32 29 | 3c 3e c1 63 68 72 6f 6d |1),n%,2)|<>.chrom|
|00005290| 6f 73 6f 6d 65 73 31 24 | 28 30 2c 32 29 2c 6e 25 |osomes1$|(0,2),n%|
|000052a0| 2c 32 29 20 8c 0d 0b 5e | 2a 20 20 20 20 61 6c 6c |,2) ...^|* all|
|000052b0| 65 6c 65 73 24 3d c1 63 | 68 72 6f 6d 6f 73 6f 6d |eles$=.c|hromosom|
|000052c0| 65 73 31 24 28 35 2c 31 | 29 2c 6e 25 2c 32 29 0d |es1$(5,1|),n%,2).|
|000052d0| 0b 68 1d 20 20 20 20 4c | 61 6c 6c 65 6c 65 24 3d |.h. L|allele$=|
|000052e0| c0 61 6c 6c 65 6c 65 73 | 24 2c 31 29 0d 0b 72 47 |.alleles|$,1)..rG|
|000052f0| 20 20 20 20 e7 20 97 28 | 4c 61 6c 6c 65 6c 65 24 | . .(|Lallele$|
|00005300| 29 3c 39 37 20 8c 20 4c | 61 6c 6c 65 6c 65 24 3d |)<97 . L|allele$=|
|00005310| bd 28 97 28 4c 61 6c 6c | 65 6c 65 24 29 2b 33 32 |.(.(Lall|ele$)+32|
|00005320| 29 3a f4 20 6d 61 6b 65 | 20 6c 6f 77 65 72 20 63 |):. make| lower c|
|00005330| 61 73 65 0d 0b 7c 1d 20 | 20 20 20 52 61 6c 6c 65 |ase..|. | Ralle|
|00005340| 6c 65 24 3d c2 61 6c 6c | 65 6c 65 73 24 2c 31 29 |le$=.all|eles$,1)|
|00005350| 0d 0b 86 47 20 20 20 20 | e7 20 97 28 52 61 6c 6c |...G |. .(Rall|
|00005360| 65 6c 65 24 29 3c 39 37 | 20 8c 20 52 61 6c 6c 65 |ele$)<97| . Ralle|
|00005370| 6c 65 24 3d bd 28 97 28 | 52 61 6c 6c 65 6c 65 24 |le$=.(.(|Rallele$|
|00005380| 29 2b 33 32 29 3a f4 20 | 6d 61 6b 65 20 6c 6f 77 |)+32):. |make low|
|00005390| 65 72 20 63 61 73 65 0d | 0b 90 85 20 20 20 20 63 |er case.|... c|
|000053a0| 68 72 6f 6d 6f 73 6f 6d | 65 73 31 24 28 35 2c 31 |hromosom|es1$(5,1|
|000053b0| 29 3d c0 63 68 72 6f 6d | 6f 73 6f 6d 65 73 31 24 |)=.chrom|osomes1$|
|000053c0| 28 35 2c 31 29 2c 6e 25 | 2d 31 29 2b 4c 61 6c 6c |(5,1),n%|-1)+Lall|
|000053d0| 65 6c 65 24 2b 52 61 6c | 6c 65 6c 65 24 2b c2 63 |ele$+Ral|lele$+.c|
|000053e0| 68 72 6f 6d 6f 73 6f 6d | 65 73 31 24 28 35 2c 31 |hromosom|es1$(5,1|
|000053f0| 29 2c 6c 65 6e 25 2d 28 | 6e 25 2b 31 29 29 3a f4 |),len%-(|n%+1)):.|
|00005400| 20 74 65 73 74 20 6d 61 | 74 65 20 73 74 6f 72 65 | test ma|te store|
|00005410| 64 20 69 6e 20 61 72 72 | 61 79 20 35 0d 0b 9a 07 |d in arr|ay 5....|
|00005420| 20 20 cd 0d 0b a4 08 ed | 20 6e 25 0d 0b ae 1e 6c | ......| n%....l|
|00005430| 65 6e 25 3d a9 28 63 68 | 72 6f 6d 6f 73 6f 6d 65 |en%=.(ch|romosome|
|00005440| 73 32 24 28 30 2c 31 29 | 29 0d 0b b8 29 63 68 72 |s2$(0,1)|)...)chr|
|00005450| 6f 6d 6f 73 6f 6d 65 73 | 32 24 28 35 2c 31 29 3d |omosomes|2$(5,1)=|
|00005460| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 32 24 28 30 2c |chromoso|mes2$(0,|
|00005470| 31 29 0d 0b c2 11 e3 20 | 6e 25 3d 31 20 b8 20 35 |1)..... |n%=1 . 5|
|00005480| 20 88 32 0d 0b cc 3e 20 | 20 e7 20 c1 63 68 72 6f | .2...> | . .chro|
|00005490| 6d 6f 73 6f 6d 65 73 32 | 24 28 30 2c 31 29 2c 6e |mosomes2|$(0,1),n|
|000054a0| 25 2c 32 29 3c 3e c1 63 | 68 72 6f 6d 6f 73 6f 6d |%,2)<>.c|hromosom|
|000054b0| 65 73 32 24 28 30 2c 32 | 29 2c 6e 25 2c 32 29 20 |es2$(0,2|),n%,2) |
|000054c0| 8c 0d 0b d6 2a 20 20 20 | 20 61 6c 6c 65 6c 65 73 |....* | alleles|
|000054d0| 24 3d c1 63 68 72 6f 6d | 6f 73 6f 6d 65 73 32 24 |$=.chrom|osomes2$|
|000054e0| 28 35 2c 31 29 2c 6e 25 | 2c 32 29 0d 0b e0 1d 20 |(5,1),n%|,2).... |
|000054f0| 20 20 20 4c 61 6c 6c 65 | 6c 65 24 3d c0 61 6c 6c | Lalle|le$=.all|
|00005500| 65 6c 65 73 24 2c 31 29 | 0d 0b ea 1d 20 20 20 20 |eles$,1)|.... |
|00005510| 52 61 6c 6c 65 6c 65 24 | 3d c2 61 6c 6c 65 6c 65 |Rallele$|=.allele|
|00005520| 73 24 2c 31 29 0d 0b f4 | 47 20 20 20 20 e7 20 97 |s$,1)...|G . .|
|00005530| 28 4c 61 6c 6c 65 6c 65 | 24 29 3c 39 37 20 8c 20 |(Lallele|$)<97 . |
|00005540| 4c 61 6c 6c 65 6c 65 24 | 3d bd 28 97 28 4c 61 6c |Lallele$|=.(.(Lal|
|00005550| 6c 65 6c 65 24 29 2b 33 | 32 29 3a f4 20 6d 61 6b |lele$)+3|2):. mak|
|00005560| 65 20 6c 6f 77 65 72 20 | 63 61 73 65 0d 0b fe 47 |e lower |case...G|
|00005570| 20 20 20 20 e7 20 97 28 | 52 61 6c 6c 65 6c 65 24 | . .(|Rallele$|
|00005580| 29 3c 39 37 20 8c 20 52 | 61 6c 6c 65 6c 65 24 3d |)<97 . R|allele$=|
|00005590| bd 28 97 28 52 61 6c 6c | 65 6c 65 24 29 2b 33 32 |.(.(Rall|ele$)+32|
|000055a0| 29 3a f4 20 6d 61 6b 65 | 20 6c 6f 77 65 72 20 63 |):. make| lower c|
|000055b0| 61 73 65 0d 0c 08 85 20 | 20 20 20 63 68 72 6f 6d |ase.... | chrom|
|000055c0| 6f 73 6f 6d 65 73 32 24 | 28 35 2c 31 29 3d c0 63 |osomes2$|(5,1)=.c|
|000055d0| 68 72 6f 6d 6f 73 6f 6d | 65 73 32 24 28 35 2c 31 |hromosom|es2$(5,1|
|000055e0| 29 2c 6e 25 2d 31 29 2b | 4c 61 6c 6c 65 6c 65 24 |),n%-1)+|Lallele$|
|000055f0| 2b 52 61 6c 6c 65 6c 65 | 24 2b c2 63 68 72 6f 6d |+Rallele|$+.chrom|
|00005600| 6f 73 6f 6d 65 73 32 24 | 28 35 2c 31 29 2c 6c 65 |osomes2$|(5,1),le|
|00005610| 6e 25 2d 28 6e 25 2b 31 | 29 29 3a f4 20 74 65 73 |n%-(n%+1|)):. tes|
|00005620| 74 20 6d 61 74 65 20 73 | 74 6f 72 65 64 20 69 6e |t mate s|tored in|
|00005630| 20 61 72 72 61 79 20 35 | 0d 0c 12 07 20 20 cd 0d | array 5|.... ..|
|00005640| 0c 1c 08 ed 20 6e 25 0d | 0c 26 20 6c 65 6e 25 3d |.... n%.|.& len%=|
|00005650| a9 28 63 68 72 6f 6d 6f | 73 6f 6d 65 73 73 65 78 |.(chromo|somessex|
|00005660| 24 28 30 2c 31 29 29 0d | 0c 30 66 e7 20 4d 66 6c |$(0,1)).|.0f. Mfl|
|00005670| 61 67 25 3d 31 20 8c 20 | 63 68 72 6f 6d 6f 73 6f |ag%=1 . |chromoso|
|00005680| 6d 65 73 73 65 78 24 28 | 35 2c 31 29 3d 63 68 72 |messex$(|5,1)=chr|
|00005690| 6f 6d 6f 73 6f 6d 65 73 | 73 65 78 24 28 30 2c 31 |omosomes|sex$(0,1|
|000056a0| 29 20 8b 20 63 68 72 6f | 6d 6f 73 6f 6d 65 73 73 |) . chro|mosomess|
|000056b0| 65 78 24 28 35 2c 31 29 | 3d 63 68 72 6f 6d 6f 73 |ex$(5,1)|=chromos|
|000056c0| 6f 6d 65 73 73 65 78 24 | 28 30 2c 32 29 0d 0c 3a |omessex$|(0,2)..:|
|000056d0| 11 e3 20 6e 25 3d 31 20 | b8 20 33 20 88 32 0d 0c |.. n%=1 |. 3 .2..|
|000056e0| 44 4f 20 20 e7 20 97 28 | c1 63 68 72 6f 6d 6f 73 |DO . .(|.chromos|
|000056f0| 6f 6d 65 73 73 65 78 24 | 28 30 2c 31 29 2c 6e 25 |omessex$|(0,1),n%|
|00005700| 2c 31 29 29 3e 39 36 20 | 84 20 97 28 c1 63 68 72 |,1))>96 |. .(.chr|
|00005710| 6f 6d 6f 73 6f 6d 65 73 | 73 65 78 24 28 30 2c 32 |omosomes|sex$(0,2|
|00005720| 29 2c 6e 25 2c 31 29 29 | 3e 39 36 20 8c 0d 0c 4e |),n%,1))|>96 ...N|
|00005730| 2c 20 20 20 20 61 6c 6c | 65 6c 65 73 24 3d c1 63 |, all|eles$=.c|
|00005740| 68 72 6f 6d 6f 73 6f 6d | 65 73 73 65 78 24 28 35 |hromosom|essex$(5|
|00005750| 2c 31 29 2c 6e 25 2c 32 | 29 0d 0c 58 1d 20 20 20 |,1),n%,2|)..X. |
|00005760| 20 4c 61 6c 6c 65 6c 65 | 24 3d c0 61 6c 6c 65 6c | Lallele|$=.allel|
|00005770| 65 73 24 2c 31 29 0d 0c | 62 1d 20 20 20 20 52 61 |es$,1)..|b. Ra|
|00005780| 6c 6c 65 6c 65 24 3d c2 | 61 6c 6c 65 6c 65 73 24 |llele$=.|alleles$|
|00005790| 2c 31 29 0d 0c 6c 14 20 | 20 20 20 e7 20 4d 66 6c |,1)..l. | . Mfl|
|000057a0| 61 67 25 3d 31 20 8c 0d | 0c 76 49 20 20 20 20 20 |ag%=1 ..|.vI |
|000057b0| 20 e7 20 97 28 4c 61 6c | 6c 65 6c 65 24 29 3c 39 | . .(Lal|lele$)<9|
|000057c0| 37 20 8c 20 4c 61 6c 6c | 65 6c 65 24 3d bd 28 97 |7 . Lall|ele$=.(.|
|000057d0| 28 4c 61 6c 6c 65 6c 65 | 24 29 2b 33 32 29 3a f4 |(Lallele|$)+32):.|
|000057e0| 20 6d 61 6b 65 20 6c 6f | 77 65 72 20 63 61 73 65 | make lo|wer case|
|000057f0| 0d 0c 80 49 20 20 20 20 | 20 20 e7 20 97 28 52 61 |...I | . .(Ra|
|00005800| 6c 6c 65 6c 65 24 29 3c | 39 37 20 8c 20 52 61 6c |llele$)<|97 . Ral|
|00005810| 6c 65 6c 65 24 3d bd 28 | 97 28 52 61 6c 6c 65 6c |lele$=.(|.(Rallel|
|00005820| 65 24 29 2b 33 32 29 3a | f4 20 6d 61 6b 65 20 6c |e$)+32):|. make l|
|00005830| 6f 77 65 72 20 63 61 73 | 65 0d 0c 8a 8d 20 20 20 |ower cas|e.... |
|00005840| 20 20 20 63 68 72 6f 6d | 6f 73 6f 6d 65 73 73 65 | chrom|osomesse|
|00005850| 78 24 28 35 2c 31 29 3d | c0 63 68 72 6f 6d 6f 73 |x$(5,1)=|.chromos|
|00005860| 6f 6d 65 73 73 65 78 24 | 28 35 2c 31 29 2c 6e 25 |omessex$|(5,1),n%|
|00005870| 2d 31 29 2b 4c 61 6c 6c | 65 6c 65 24 2b 52 61 6c |-1)+Lall|ele$+Ral|
|00005880| 6c 65 6c 65 24 2b c2 63 | 68 72 6f 6d 6f 73 6f 6d |lele$+.c|hromosom|
|00005890| 65 73 73 65 78 24 28 35 | 2c 31 29 2c 6c 65 6e 25 |essex$(5|,1),len%|
|000058a0| 2d 28 6e 25 2b 31 29 29 | 3a f4 20 74 65 73 74 20 |-(n%+1))|:. test |
|000058b0| 6d 61 74 65 20 73 74 6f | 72 65 64 20 69 6e 20 61 |mate sto|red in a|
|000058c0| 72 72 61 79 20 35 0d 0c | 94 09 20 20 20 20 cc 0d |rray 5..|.. ..|
|000058d0| 0c 9e 44 20 20 20 20 20 | 20 e7 20 97 28 4c 61 6c |..D | . .(Lal|
|000058e0| 6c 65 6c 65 24 29 3c 39 | 37 20 8c 20 4c 61 6c 6c |lele$)<9|7 . Lall|
|000058f0| 65 6c 65 24 3d bd 28 97 | 28 4c 61 6c 6c 65 6c 65 |ele$=.(.|(Lallele|
|00005900| 24 29 2b 33 32 29 3a 52 | 61 6c 6c 65 6c 65 24 3d |$)+32):R|allele$=|
|00005910| 22 4f 22 0d 0c a8 8d 20 | 20 20 20 20 20 63 68 72 |"O".... | chr|
|00005920| 6f 6d 6f 73 6f 6d 65 73 | 73 65 78 24 28 35 2c 31 |omosomes|sex$(5,1|
|00005930| 29 3d c0 63 68 72 6f 6d | 6f 73 6f 6d 65 73 73 65 |)=.chrom|osomesse|
|00005940| 78 24 28 35 2c 31 29 2c | 6e 25 2d 31 29 2b 4c 61 |x$(5,1),|n%-1)+La|
|00005950| 6c 6c 65 6c 65 24 2b 52 | 61 6c 6c 65 6c 65 24 2b |llele$+R|allele$+|
|00005960| c2 63 68 72 6f 6d 6f 73 | 6f 6d 65 73 73 65 78 24 |.chromos|omessex$|
|00005970| 28 35 2c 31 29 2c 6c 65 | 6e 25 2d 28 6e 25 2b 31 |(5,1),le|n%-(n%+1|
|00005980| 29 29 3a f4 20 74 65 73 | 74 20 6d 61 74 65 20 73 |)):. tes|t mate s|
|00005990| 74 6f 72 65 64 20 69 6e | 20 61 72 72 61 79 20 35 |tored in| array 5|
|000059a0| 0d 0c b2 09 20 20 20 20 | cd 0d 0c bc 07 20 20 cd |.... |..... .|
|000059b0| 0d 0c c6 08 ed 20 6e 25 | 0d 0c d0 05 e1 0d 0c da |..... n%|........|
|000059c0| 05 3a 0d 0c e4 19 dd 20 | f2 72 65 73 65 6c 65 63 |.:..... |.reselec|
|000059d0| 74 5f 67 65 6e 28 67 65 | 6e 25 29 0d 0c ee 28 f2 |t_gen(ge|n%)...(.|
|000059e0| 64 69 73 70 6c 61 79 5f | 6f 66 66 73 70 72 69 6e |display_|offsprin|
|000059f0| 67 28 74 65 78 74 24 28 | 67 65 6e 25 29 2c 67 65 |g(text$(|gen%),ge|
|00005a00| 6e 25 29 0d 0c f8 11 74 | 68 69 73 67 65 6e 25 3d |n%)....t|hisgen%=|
|00005a10| 67 65 6e 25 0d 0d 02 05 | e1 0d 0d 0c 05 3a 0d 0d |gen%....|.....:..|
|00005a20| 16 12 dd 20 f2 6e 65 77 | 5f 70 72 6f 67 72 61 6d |... .new|_program|
|00005a30| 0d 0d 20 07 e6 32 31 0d | 0d 2a 16 c8 93 20 c8 90 |.. ..21.|.*... ..|
|00005a40| 20 30 2c 30 2c 31 32 38 | 30 2c 32 35 34 0d 0d 34 | 0,0,128|0,254..4|
|00005a50| 59 f2 63 68 6f 69 63 65 | 5f 62 6f 78 28 22 41 72 |Y.choice|_box("Ar|
|00005a60| 65 20 79 6f 75 20 73 75 | 72 65 20 79 6f 75 20 77 |e you su|re you w|
|00005a70| 61 6e 74 20 74 6f 20 66 | 69 6e 69 73 68 20 74 68 |ant to f|inish th|
|00005a80| 69 73 20 65 78 70 65 72 | 69 6d 65 6e 74 3f 22 2c |is exper|iment?",|
|00005a90| 32 34 30 2c 31 32 38 2c | 37 38 34 2c 36 34 2c 30 |240,128,|784,64,0|
|00005aa0| 2c 34 32 2c 30 29 0d 0d | 3e 2a f2 63 68 6f 69 63 |,42,0)..|>*.choic|
|00005ab0| 65 5f 62 6f 78 28 22 59 | 45 53 22 2c 35 36 30 2c |e_box("Y|ES",560,|
|00005ac0| 34 38 2c 36 34 2c 34 38 | 2c 30 2c 34 37 2c 30 29 |48,64,48|,0,47,0)|
|00005ad0| 0d 0d 48 29 f2 63 68 6f | 69 63 65 5f 62 6f 78 28 |..H).cho|ice_box(|
|00005ae0| 22 4e 4f 22 2c 36 35 36 | 2c 34 38 2c 36 34 2c 34 |"NO",656|,48,64,4|
|00005af0| 38 2c 30 2c 34 37 2c 30 | 29 0d 0d 52 0b 66 6c 61 |8,0,47,0|)..R.fla|
|00005b00| 67 25 3d 30 0d 0d 5c 05 | f5 0d 0d 66 1a c8 97 20 |g%=0..\.|...f... |
|00005b10| 78 70 6f 73 25 2c 79 70 | 6f 73 25 2c 62 75 74 74 |xpos%,yp|os%,butt|
|00005b20| 6f 6e 25 0d 0d 70 11 e7 | 20 62 75 74 74 6f 6e 25 |on%..p..| button%|
|00005b30| 3d 34 20 8c 0d 0d 7a 3d | 20 20 e7 20 78 70 6f 73 |=4 ...z=| . xpos|
|00005b40| 25 3e 35 36 30 20 80 20 | 78 70 6f 73 25 3c 36 32 |%>560 . |xpos%<62|
|00005b50| 34 20 80 20 79 70 6f 73 | 25 3e 34 38 20 80 20 79 |4 . ypos|%>48 . y|
|00005b60| 70 6f 73 25 3c 39 36 20 | 8c 20 66 6c 61 67 25 3d |pos%<96 |. flag%=|
|00005b70| 31 0d 0d 84 3d 20 20 e7 | 20 78 70 6f 73 25 3e 36 |1...= .| xpos%>6|
|00005b80| 35 36 20 80 20 78 70 6f | 73 25 3c 37 32 30 20 80 |56 . xpo|s%<720 .|
|00005b90| 20 79 70 6f 73 25 3e 34 | 38 20 80 20 79 70 6f 73 | ypos%>4|8 . ypos|
|00005ba0| 25 3c 39 36 20 8c 20 66 | 6c 61 67 25 3d 32 0d 0d |%<96 . f|lag%=2..|
|00005bb0| 8e 05 cd 0d 0d 98 0e fd | 20 66 6c 61 67 25 3c 3e |........| flag%<>|
|00005bc0| 30 0d 0d a2 29 e7 20 66 | 6c 61 67 25 3d 31 20 8c |0...). f|lag%=1 .|
|00005bd0| 20 db 3a d8 3a e5 8d 44 | 5a 40 3a f4 20 72 65 72 | .:.:..D|Z@:. rer|
|00005be0| 75 6e 20 70 72 6f 67 72 | 61 6d 0d 0d ac 05 e1 0d |un progr|am......|
|00005bf0| 0d b6 05 3a 0d 0d c0 3a | dd 20 f2 63 68 6f 69 63 |...:...:|. .choic|
|00005c00| 65 5f 62 6f 78 28 74 65 | 78 74 24 2c 78 25 2c 79 |e_box(te|xt$,x%,y|
|00005c10| 25 2c 77 25 2c 68 25 2c | 74 78 63 6f 6c 25 2c 62 |%,w%,h%,|txcol%,b|
|00005c20| 6b 63 6f 6c 25 2c 6f 75 | 74 63 6f 6c 25 29 0d 0d |kcol%,ou|tcol%)..|
|00005c30| ca 0c e6 20 62 6b 63 6f | 6c 25 0d 0d d4 15 c8 93 |... bkco|l%......|
|00005c40| 20 c8 90 20 78 25 2c 79 | 25 2c 77 25 2c 68 25 0d | .. x%,y|%,w%,h%.|
|00005c50| 0d de 0d e6 20 6f 75 74 | 63 6f 6c 25 0d 0d e8 12 |.... out|col%....|
|00005c60| c8 93 20 78 25 2c 79 25 | 2c 77 25 2c 68 25 0d 0d |.. x%,y%|,w%,h%..|
|00005c70| f2 21 69 6e 73 65 74 25 | 3d 28 28 77 25 2d 28 a9 |.!inset%|=((w%-(.|
|00005c80| 28 74 65 78 74 24 29 2a | 31 36 29 29 2f 32 29 0d |(text$)*|16))/2).|
|00005c90| 0d fc 19 75 70 73 65 74 | 25 3d 28 28 68 25 2d 33 |...upset|%=((h%-3|
|00005ca0| 32 29 2f 32 2b 33 32 29 | 0d 0e 06 06 ef 35 0d 0e |2)/2+32)|.....5..|
|00005cb0| 10 0c e6 20 74 78 63 6f | 6c 25 0d 0e 1a 1a f0 34 |... txco|l%.....4|
|00005cc0| 2c 78 25 2b 69 6e 73 65 | 74 25 2c 79 25 2b 75 70 |,x%+inse|t%,y%+up|
|00005cd0| 73 65 74 25 0d 0e 24 0b | f1 20 74 65 78 74 24 0d |set%..$.|. text$.|
|00005ce0| 0e 2e 06 ef 34 0d 0e 38 | 05 e1 0d 0e 42 05 3a 0d |....4..8|....B.:.|
|00005cf0| 0e 4c 27 dd 20 f2 73 70 | 72 69 74 65 5f 64 69 73 |.L'. .sp|rite_dis|
|00005d00| 70 6c 61 79 28 78 25 2c | 79 25 2c 67 65 6e 25 2c |play(x%,|y%,gen%,|
|00005d10| 69 6e 64 76 25 29 0d 0e | 56 0d e6 32 39 20 c8 9c |indv%)..|V..29 ..|
|00005d20| 31 39 32 0d 0e 60 13 c8 | 93 20 c8 90 20 78 25 2c |192..`..|. .. x%,|
|00005d30| 79 25 2c 31 34 30 0d 0e | 6a 08 e6 38 2c 30 0d 0e |y%,140..|j..8,0..|
|00005d40| 74 20 f2 64 65 63 6f 64 | 65 5f 67 65 6e 6f 74 79 |t .decod|e_genoty|
|00005d50| 70 65 28 67 65 6e 25 2c | 69 6e 64 76 25 29 0d 0e |pe(gen%,|indv%)..|
|00005d60| 7e 1d f2 70 6c 6f 74 5f | 73 70 72 69 74 65 28 78 |~..plot_|sprite(x|
|00005d70| 25 2b 31 30 2c 79 25 2b | 31 30 29 0d 0e 88 05 e1 |%+10,y%+|10).....|
|00005d80| 0d 0e 92 05 3a 0d 0e 9c | 15 dd 20 f2 6d 65 6e 75 |....:...|.. .menu|
|00005d90| 31 28 6f 6e 5f 6f 66 66 | 25 29 0d 0e a6 27 e7 20 |1(on_off|%)...'. |
|00005da0| 6f 6e 5f 6f 66 66 25 3d | 31 20 8c 20 62 6b 63 6f |on_off%=|1 . bkco|
|00005db0| 6c 25 3d 34 37 20 8b 20 | 62 6b 63 6f 6c 25 3d 34 |l%=47 . |bkcol%=4|
|00005dc0| 32 0d 0e b0 40 f2 63 68 | 6f 69 63 65 5f 62 6f 78 |2...@.ch|oice_box|
|00005dd0| 28 22 4e 45 57 20 42 52 | 45 45 44 49 4e 47 20 50 |("NEW BR|EEDING P|
|00005de0| 52 4f 47 52 41 4d 22 2c | 32 36 34 2c 32 32 2c 33 |ROGRAM",|264,22,3|
|00005df0| 36 32 2c 34 38 2c 30 2c | 62 6b 63 6f 6c 25 2c 30 |62,48,0,|bkcol%,0|
|00005e00| 29 0d 0e ba 41 f2 63 68 | 6f 69 63 65 5f 62 6f 78 |)...A.ch|oice_box|
|00005e10| 28 22 44 6f 20 61 20 63 | 68 69 2d 73 71 75 61 72 |("Do a c|hi-squar|
|00005e20| 65 64 20 74 65 73 74 22 | 2c 34 35 36 2c 37 38 2c |ed test"|,456,78,|
|00005e30| 34 31 36 2c 34 38 2c 30 | 2c 62 6b 63 6f 6c 25 2c |416,48,0|,bkcol%,|
|00005e40| 30 29 0d 0e c4 2a e7 20 | 6f 6e 5f 6f 66 66 25 3d |0)...*. |on_off%=|
|00005e50| 31 20 8c 20 74 65 78 74 | 63 6f 6c 25 3d 36 33 20 |1 . text|col%=63 |
|00005e60| 8b 20 74 65 78 74 63 6f | 6c 25 3d 30 0d 0e ce 44 |. textco|l%=0...D|
|00005e70| f2 63 68 6f 69 63 65 5f | 62 6f 78 28 22 52 65 73 |.choice_|box("Res|
|00005e80| 65 6c 65 63 74 20 47 65 | 6e 65 72 61 74 69 6f 6e |elect Ge|neration|
|00005e90| 3a 22 2c 32 30 2c 31 39 | 34 2c 33 32 30 2c 34 38 |:",20,19|4,320,48|
|00005ea0| 2c 74 65 78 74 63 6f 6c | 25 2c 32 31 2c 32 31 29 |,textcol|%,21,21)|
|00005eb0| 0d 0e d8 0a 78 25 3d 32 | 39 32 0d 0e e2 4e e7 20 |....x%=2|92...N. |
|00005ec0| 63 68 72 6f 6d 6f 73 6f | 6d 65 73 31 24 28 30 2c |chromoso|mes1$(0,|
|00005ed0| 30 29 3c 3e 22 22 20 80 | 20 74 68 69 73 67 65 6e |0)<>"" .| thisgen|
|00005ee0| 25 3c 3e 30 20 80 20 6f | 6e 5f 6f 66 66 25 3d 31 |%<>0 . o|n_off%=1|
|00005ef0| 20 8c 20 62 6b 63 6f 6c | 25 3d 34 37 20 8b 20 62 | . bkcol|%=47 . b|
|00005f00| 6b 63 6f 6c 25 3d 34 32 | 0d 0e ec 34 78 25 2b 3d |kcol%=42|...4x%+=|
|00005f10| 36 34 3a f2 63 68 6f 69 | 63 65 5f 62 6f 78 28 22 |64:.choi|ce_box("|
|00005f20| 50 31 22 2c 78 25 2c 31 | 39 34 2c 34 38 2c 34 38 |P1",x%,1|94,48,48|
|00005f30| 2c 30 2c 62 6b 63 6f 6c | 25 2c 30 29 0d 0e f6 4e |,0,bkcol|%,0)...N|
|00005f40| e7 20 63 68 72 6f 6d 6f | 73 6f 6d 65 73 31 24 28 |. chromo|somes1$(|
|00005f50| 31 2c 30 29 3c 3e 22 22 | 20 80 20 74 68 69 73 67 |1,0)<>""| . thisg|
|00005f60| 65 6e 25 3c 3e 31 20 80 | 20 6f 6e 5f 6f 66 66 25 |en%<>1 .| on_off%|
|00005f70| 3d 31 20 8c 20 62 6b 63 | 6f 6c 25 3d 34 37 20 8b |=1 . bkc|ol%=47 .|
|00005f80| 20 62 6b 63 6f 6c 25 3d | 34 32 0d 0f 00 34 78 25 | bkcol%=|42...4x%|
|00005f90| 2b 3d 36 34 3a f2 63 68 | 6f 69 63 65 5f 62 6f 78 |+=64:.ch|oice_box|
|00005fa0| 28 22 46 31 22 2c 78 25 | 2c 31 39 34 2c 34 38 2c |("F1",x%|,194,48,|
|00005fb0| 34 38 2c 30 2c 62 6b 63 | 6f 6c 25 2c 30 29 0d 0f |48,0,bkc|ol%,0)..|
|00005fc0| 0a 4e e7 20 63 68 72 6f | 6d 6f 73 6f 6d 65 73 31 |.N. chro|mosomes1|
|00005fd0| 24 28 32 2c 30 29 3c 3e | 22 22 20 80 20 74 68 69 |$(2,0)<>|"" . thi|
|00005fe0| 73 67 65 6e 25 3c 3e 32 | 20 80 20 6f 6e 5f 6f 66 |sgen%<>2| . on_of|
|00005ff0| 66 25 3d 31 20 8c 20 62 | 6b 63 6f 6c 25 3d 34 37 |f%=1 . b|kcol%=47|
|00006000| 20 8b 20 62 6b 63 6f 6c | 25 3d 34 32 0d 0f 14 34 | . bkcol|%=42...4|
|00006010| 78 25 2b 3d 36 34 3a f2 | 63 68 6f 69 63 65 5f 62 |x%+=64:.|choice_b|
|00006020| 6f 78 28 22 46 32 22 2c | 78 25 2c 31 39 34 2c 34 |ox("F2",|x%,194,4|
|00006030| 38 2c 34 38 2c 30 2c 62 | 6b 63 6f 6c 25 2c 30 29 |8,48,0,b|kcol%,0)|
|00006040| 0d 0f 1e 4e e7 20 63 68 | 72 6f 6d 6f 73 6f 6d 65 |...N. ch|romosome|
|00006050| 73 31 24 28 33 2c 30 29 | 3c 3e 22 22 20 80 20 74 |s1$(3,0)|<>"" . t|
|00006060| 68 69 73 67 65 6e 25 3c | 3e 33 20 80 20 6f 6e 5f |hisgen%<|>3 . on_|
|00006070| 6f 66 66 25 3d 31 20 8c | 20 62 6b 63 6f 6c 25 3d |off%=1 .| bkcol%=|
|00006080| 34 37 20 8b 20 62 6b 63 | 6f 6c 25 3d 34 32 0d 0f |47 . bkc|ol%=42..|
|00006090| 28 34 78 25 2b 3d 36 34 | 3a f2 63 68 6f 69 63 65 |(4x%+=64|:.choice|
|000060a0| 5f 62 6f 78 28 22 46 33 | 22 2c 78 25 2c 31 39 34 |_box("F3|",x%,194|
|000060b0| 2c 34 38 2c 34 38 2c 30 | 2c 62 6b 63 6f 6c 25 2c |,48,48,0|,bkcol%,|
|000060c0| 30 29 0d 0f 32 4e e7 20 | 63 68 72 6f 6d 6f 73 6f |0)..2N. |chromoso|
|000060d0| 6d 65 73 31 24 28 34 2c | 30 29 3c 3e 22 22 20 80 |mes1$(4,|0)<>"" .|
|000060e0| 20 74 68 69 73 67 65 6e | 25 3c 3e 34 20 80 20 6f | thisgen|%<>4 . o|
|000060f0| 6e 5f 6f 66 66 25 3d 31 | 20 8c 20 62 6b 63 6f 6c |n_off%=1| . bkcol|
|00006100| 25 3d 34 37 20 8b 20 62 | 6b 63 6f 6c 25 3d 34 32 |%=47 . b|kcol%=42|
|00006110| 0d 0f 3c 39 78 25 2b 3d | 36 34 3a f2 63 68 6f 69 |..<9x%+=|64:.choi|
|00006120| 63 65 5f 62 6f 78 28 22 | 54 65 73 74 20 58 22 2c |ce_box("|Test X",|
|00006130| 78 25 2c 31 39 34 2c 31 | 31 32 2c 34 38 2c 30 2c |x%,194,1|12,48,0,|
|00006140| 62 6b 63 6f 6c 25 2c 30 | 29 0d 0f 46 34 e7 20 74 |bkcol%,0|)..F4. t|
|00006150| 68 69 73 67 65 6e 25 3c | 34 20 80 20 6f 6e 5f 6f |hisgen%<|4 . on_o|
|00006160| 66 66 25 3d 31 20 8c 20 | 62 6b 63 6f 6c 25 3d 34 |ff%=1 . |bkcol%=4|
|00006170| 37 20 8b 20 62 6b 63 6f | 6c 25 3d 34 32 0d 0f 50 |7 . bkco|l%=42..P|
|00006180| 43 f2 63 68 6f 69 63 65 | 5f 62 6f 78 28 22 54 65 |C.choice|_box("Te|
|00006190| 73 74 20 63 72 6f 73 73 | 20 61 6e 20 69 6e 64 69 |st cross| an indi|
|000061a0| 76 69 64 75 61 6c 22 2c | 32 30 2c 37 38 2c 34 31 |vidual",|20,78,41|
|000061b0| 36 2c 34 38 2c 30 2c 62 | 6b 63 6f 6c 25 2c 30 29 |6,48,0,b|kcol%,0)|
|000061c0| 0d 0f 5a 35 e7 20 74 68 | 69 73 67 65 6e 25 3c 3e |..Z5. th|isgen%<>|
|000061d0| 30 20 80 20 6f 6e 5f 6f | 66 66 25 3d 31 20 8c 20 |0 . on_o|ff%=1 . |
|000061e0| 62 6b 63 6f 6c 25 3d 34 | 37 20 8b 20 62 6b 63 6f |bkcol%=4|7 . bkco|
|000061f0| 6c 25 3d 34 32 0d 0f 64 | 41 f2 63 68 6f 69 63 65 |l%=42..d|A.choice|
|00006200| 5f 62 6f 78 28 22 52 65 | 70 65 61 74 20 74 68 65 |_box("Re|peat the|
|00006210| 20 6c 61 73 74 20 63 72 | 6f 73 73 22 2c 32 30 2c | last cr|oss",20,|
|00006220| 31 33 34 2c 34 31 36 2c | 34 38 2c 30 2c 62 6b 63 |134,416,|48,0,bkc|
|00006230| 6f 6c 25 2c 30 29 0d 0f | 6e 34 e7 20 74 68 69 73 |ol%,0)..|n4. this|
|00006240| 67 65 6e 25 3c 33 20 80 | 20 6f 6e 5f 6f 66 66 25 |gen%<3 .| on_off%|
|00006250| 3d 31 20 8c 20 62 6b 63 | 6f 6c 25 3d 34 37 20 8b |=1 . bkc|ol%=47 .|
|00006260| 20 62 6b 63 6f 6c 25 3d | 34 32 0d 0f 78 42 f2 63 | bkcol%=|42..xB.c|
|00006270| 68 6f 69 63 65 5f 62 6f | 78 28 22 43 72 6f 73 73 |hoice_bo|x("Cross|
|00006280| 20 74 77 6f 20 69 6e 64 | 69 76 69 64 75 61 6c 73 | two ind|ividuals|
|00006290| 22 2c 34 35 36 2c 31 33 | 34 2c 34 31 36 2c 34 38 |",456,13|4,416,48|
|000062a0| 2c 30 2c 62 6b 63 6f 6c | 25 2c 30 29 0d 0f 82 05 |,0,bkcol|%,0)....|
|000062b0| e1 0d 0f 8c 05 3a 0d 0f | 96 20 dd 20 f2 73 65 74 |.....:..|. . .set|
|000062c0| 5f 46 67 65 6e 6f 74 79 | 70 65 28 67 65 6e 25 2c |_Fgenoty|pe(gen%,|
|000062d0| 69 6e 64 76 25 29 0d 0f | a0 47 63 68 72 6f 6d 6f |indv%)..|.Gchromo|
|000062e0| 73 6f 6d 65 73 31 24 28 | 67 65 6e 25 2c 69 6e 64 |somes1$(|gen%,ind|
|000062f0| 76 25 29 3d 46 61 6e 74 | 5f 6c 65 6e 24 2b 46 70 |v%)=Fant|_len$+Fp|
|00006300| 72 6f 62 5f 6c 65 6e 24 | 2b 46 65 79 65 5f 63 6f |rob_len$|+Feye_co|
|00006310| 6c 24 2b 46 6c 65 67 5f | 74 79 70 65 24 0d 0f aa |l$+Fleg_|type$...|
|00006320| 39 63 68 72 6f 6d 6f 73 | 6f 6d 65 73 32 24 28 67 |9chromos|omes2$(g|
|00006330| 65 6e 25 2c 69 6e 64 76 | 25 29 3d 46 65 79 65 5f |en%,indv|%)=Feye_|
|00006340| 74 79 70 65 24 2b 46 68 | 6f 72 6e 24 2b 46 6c 65 |type$+Fh|orn$+Fle|
|00006350| 67 5f 63 6f 6c 24 0d 0f | b4 35 63 68 72 6f 6d 6f |g_col$..|.5chromo|
|00006360| 73 6f 6d 65 73 73 65 78 | 24 28 67 65 6e 25 2c 69 |somessex|$(gen%,i|
|00006370| 6e 64 76 25 29 3d 46 61 | 6e 74 5f 74 79 70 65 24 |ndv%)=Fa|nt_type$|
|00006380| 2b 46 62 6f 64 79 5f 63 | 6f 6c 24 0d 0f be 05 e1 |+Fbody_c|ol$.....|
|00006390| 0d 0f c8 20 dd 20 f2 73 | 65 74 5f 4d 67 65 6e 6f |... . .s|et_Mgeno|
|000063a0| 74 79 70 65 28 67 65 6e | 25 2c 69 6e 64 76 25 29 |type(gen|%,indv%)|
|000063b0| 0d 0f d2 47 63 68 72 6f | 6d 6f 73 6f 6d 65 73 31 |...Gchro|mosomes1|
|000063c0| 24 28 67 65 6e 25 2c 69 | 6e 64 76 25 29 3d 4d 61 |$(gen%,i|ndv%)=Ma|
|000063d0| 6e 74 5f 6c 65 6e 24 2b | 4d 70 72 6f 62 5f 6c 65 |nt_len$+|Mprob_le|
|000063e0| 6e 24 2b 4d 65 79 65 5f | 63 6f 6c 24 2b 4d 6c 65 |n$+Meye_|col$+Mle|
|000063f0| 67 5f 74 79 70 65 24 0d | 0f dc 39 63 68 72 6f 6d |g_type$.|..9chrom|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
