PEDIGREE
FILE INFORMATION
FILENAME(S): PEDIGREE
FILE TYPE(S): PRG
FILE SIZE: 16.1K
FIRST SEEN: 2025-11-30 21:23:03
APPEARS ON: 1 disk(s)
FILE HASH
fd17974aba7a634de337e63799604c8feb30a19caba00d05d60fa726f6a7ee70
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 60 2 | PEDIGREE | PRG | DuncanTwain | 14 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 0A 00 86 46 42 24 28 31 39 29 3A 46 |.. ....FB$(19):F|
00000010: 44 B2 30 3A 46 58 B2 31 39 3A 55 24 B2 22 2C 22 |D.0:FX.19:U$.","|
00000020: 00 61 08 14 00 86 4E 28 36 33 29 2C 4E 24 28 36 |.a....N(63),N$(6|
00000030: 33 29 2C 47 4E 24 28 36 33 29 2C 42 24 28 31 35 |3),GN$(63),B$(15|
00000040: 29 2C 42 50 24 28 31 35 29 2C 4E 46 24 28 36 33 |),BP$(15),NF$(63|
00000050: 29 2C 4D 4E 24 28 36 33 29 2C 43 42 24 28 32 30 |),MN$(63),CB$(20|
00000060: 29 00 86 08 1E 00 86 53 46 24 28 33 31 29 2C 47 |)......SF$(31),G|
00000070: 46 24 28 33 31 29 2C 53 4D 24 28 33 31 29 2C 47 |F$(31),SM$(31),G|
00000080: 4D 24 28 33 31 29 00 A5 08 32 00 99 22 93 11 90 |M$(31)...2.."...|
00000090: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
000000A0: C6 C6 C6 C6 22 00 C2 08 3C 00 99 22 12 20 20 50 |...."...<..". P|
000000B0: 52 49 4E 54 20 50 45 44 49 47 52 45 45 20 20 20 |RINT PEDIGREE |
000000C0: 20 22 00 DE 08 46 00 99 22 C4 C4 C4 C4 C4 C4 C4 | "...F..".......|
000000D0: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 22 00 0D |............."..|
000000E0: 09 50 00 99 22 4F 55 54 50 55 54 20 54 4F 3A 22 |.P.."OUTPUT TO:"|
000000F0: 3A 99 22 54 48 45 20 53 43 52 45 45 4E 22 3A 99 |:."THE SCREEN":.|
00000100: 22 54 48 45 20 50 52 49 4E 54 45 52 22 00 28 09 |"THE PRINTER".(.|
00000110: 5A 00 99 3A 99 22 45 4E 54 45 52 20 28 53 29 20 |Z..:."ENTER (S) |
00000120: 4F 52 20 28 50 29 22 3B 00 3A 09 5F 00 A1 59 24 |OR (P)";.:._..Y$|
00000130: 3A 8B 59 24 B2 22 22 A7 39 35 00 52 09 61 00 8B |:.Y$."".95.R.a..|
00000140: 59 24 B3 B1 22 53 22 AF 59 24 B3 B1 22 50 22 A7 |Y$.."S".Y$.."P".|
00000150: 39 35 00 62 09 64 00 8B 59 24 B2 22 50 22 A7 39 |95.b.d..Y$."P".9|
00000160: 36 30 00 80 09 6E 00 99 22 93 11 4E 55 4D 42 45 |60...n.."..NUMBE|
00000170: 52 20 4F 46 20 54 48 45 20 50 45 52 53 4F 4E 22 |R OF THE PERSON"|
00000180: 00 9B 09 78 00 99 22 57 48 4F 53 45 20 50 45 44 |...x.."WHOSE PED|
00000190: 49 47 52 45 45 20 59 4F 55 20 22 00 AE 09 82 00 |IGREE YOU ".....|
000001A0: 99 22 57 41 4E 54 20 54 52 41 43 45 44 22 00 CB |."WANT TRACED"..|
000001B0: 09 8C 00 99 3A 99 22 28 49 4E 50 55 54 20 30 20 |....:."(INPUT 0 |
000001C0: 54 4F 20 45 58 49 54 29 22 3A 99 00 D2 09 96 00 |TO EXIT)":......|
000001D0: 85 46 00 E0 09 A0 00 8B 46 B2 30 A7 34 32 36 30 |.F......F.0.4260|
000001E0: 00 E9 09 AA 00 8D 35 38 30 00 04 0A B4 00 99 22 |......580......"|
000001F0: 93 12 22 3B 46 42 24 28 31 29 3B 55 24 3B 46 42 |..";FB$(1);U$;FB|
00000200: 24 28 32 29 00 1F 0A BE 00 99 22 B7 B7 B7 B7 B7 |$(2)......".....|
00000210: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 |..............".|
00000220: 43 0A C8 00 99 22 13 11 11 11 11 11 11 11 22 3B |C...."........";|
00000230: 3A 81 58 B2 31 A4 31 31 3A 99 A3 32 29 22 C2 9D |:.X.1.11:..2)"..|
00000240: 22 3A 82 00 63 0A D2 00 99 22 13 11 11 11 11 22 |":..c...."....."|
00000250: 3B 3A 81 58 B2 31 A4 35 3A 99 A3 34 29 22 C2 9D |;:.X.1.5:..4)"..|
00000260: 22 3A 82 00 84 0A DC 00 99 22 11 11 11 11 11 11 |":......."......|
00000270: 22 3B 3A 81 58 B2 31 A4 35 3A 99 A3 34 29 22 C2 |";:.X.1.5:..4)".|
00000280: 9D 22 3A 82 00 AF 0A E6 00 99 22 13 11 11 11 11 |.":.......".....|
00000290: 11 11 11 11 11 11 11 22 3B C8 28 46 42 24 28 31 |.......";.(FB$(1|
000002A0: 29 AA 55 24 AA 46 42 24 28 32 29 2C 31 35 29 00 |).U$.FB$(2),15).|
000002B0: CF 0A F0 00 99 22 28 22 3B C8 28 4D 41 24 28 31 |....."(";.(MA$(1|
000002C0: 29 AA 55 24 AA 4D 42 24 28 31 29 2C 31 35 29 00 |).U$.MB$(1),15).|
000002D0: DF 0A FA 00 99 22 13 11 11 11 11 11 11 22 3B 00 |.....".......";.|
000002E0: EF 0A 04 01 99 22 20 20 20 C0 C0 C0 C0 22 3B 00 |....." ....";.|
000002F0: 0F 0B 0E 01 99 22 20 22 3B C8 28 46 42 24 28 35 |....." ";.(FB$(5|
00000300: 29 AA 55 24 AA 46 42 24 28 36 29 2C 31 35 29 00 |).U$.FB$(6),15).|
00000310: 22 0B 18 01 99 22 11 11 11 11 11 11 11 11 11 11 |"...."..........|
00000320: 22 3B 00 32 0B 22 01 99 22 20 20 20 C0 C0 C0 C0 |";.2.".." ....|
00000330: 22 3B 00 52 0B 2C 01 99 22 20 22 3B C8 28 46 42 |";.R.,.." ";.(FB|
00000340: 24 28 38 29 AA 55 24 AA 46 42 24 28 39 29 2C 31 |$(8).U$.FB$(9),1|
00000350: 35 29 00 6E 0B 36 01 46 B2 C5 28 46 42 24 28 37 |5).n.6.F..(FB$(7|
00000360: 29 29 3A 46 50 24 B2 46 42 24 28 31 30 29 00 77 |)):FP$.FB$(10).w|
00000370: 0B 40 01 8D 35 38 30 00 9D 0B 4A 01 99 22 13 11 |.@..580...J.."..|
00000380: 11 11 22 3B A3 33 29 C8 28 46 42 24 28 35 29 AA |..";.3).(FB$(5).|
00000390: 55 24 AA 46 42 24 28 36 29 2C 31 35 29 00 C3 0B |U$.FB$(6),15)...|
000003A0: 54 01 99 22 11 11 11 11 22 3B A3 33 29 C8 28 46 |T.."....";.3).(F|
000003B0: 42 24 28 38 29 AA 55 24 AA 46 42 24 28 39 29 2C |B$(8).U$.FB$(9),|
000003C0: 31 35 29 00 DE 0B 5E 01 46 41 24 B2 46 42 24 28 |15)...^.FA$.FB$(|
000003D0: 37 29 3A 46 43 24 B2 46 42 24 28 31 30 29 00 EB |7):FC$.FB$(10)..|
000003E0: 0B 68 01 46 B2 C5 28 46 50 24 29 00 F4 0B 72 01 |.h.F..(FP$)...r.|
000003F0: 8D 35 38 30 00 1C 0C 7C 01 99 22 11 11 11 11 11 |.580...|..".....|
00000400: 11 22 3B A3 33 29 C8 28 46 42 24 28 35 29 AA 55 |.";.3).(FB$(5).U|
00000410: 24 AA 46 42 24 28 36 29 2C 31 35 29 00 42 0C 86 |$.FB$(6),15).B..|
00000420: 01 99 22 11 11 11 11 22 3B A3 33 29 C8 28 46 42 |.."....";.3).(FB|
00000430: 24 28 38 29 AA 55 24 AA 46 42 24 28 39 29 2C 31 |$(8).U$.FB$(9),1|
00000440: 35 29 00 5D 0C 90 01 46 57 24 B2 46 42 24 28 37 |5).]...FW$.FB$(7|
00000450: 29 3A 46 56 24 B2 46 42 24 28 31 30 29 00 6A 0C |):FV$.FB$(10).j.|
00000460: 9A 01 46 B2 C5 28 46 41 24 29 00 73 0C A4 01 8D |..F..(FA$).s....|
00000470: 35 38 30 00 9C 0C AE 01 99 22 13 11 11 22 3B A3 |580......"...";.|
00000480: 36 29 22 CF 22 3B C8 28 46 42 24 28 35 29 AA 55 |6)".";.(FB$(5).U|
00000490: 24 AA 46 42 24 28 36 29 2C 31 33 29 00 C3 0C B8 |$.FB$(6),13)....|
000004A0: 01 99 22 11 22 3B A3 36 29 22 CC 22 3B C8 28 46 |..".";.6)".";.(F|
000004B0: 42 24 28 38 29 AA 55 24 AA 46 42 24 28 39 29 2C |B$(8).U$.FB$(9),|
000004C0: 31 33 29 00 EC 0C C2 01 46 58 24 B2 46 42 24 28 |13).....FX$.FB$(|
000004D0: 37 29 3A 46 59 24 B2 46 42 24 28 31 30 29 3A 46 |7):FY$.FB$(10):F|
000004E0: B2 C5 28 46 43 24 29 3A 8D 35 38 30 00 14 0D CC |..(FC$):.580....|
000004F0: 01 99 22 11 11 22 3B A3 36 29 22 CF 22 3B C8 28 |.."..";.6)".";.(|
00000500: 46 42 24 28 35 29 AA 55 24 AA 46 42 24 28 36 29 |FB$(5).U$.FB$(6)|
00000510: 2C 31 33 29 00 3B 0D D6 01 99 22 11 22 3B A3 36 |,13).;....".";.6|
00000520: 29 22 CC 22 3B C8 28 46 42 24 28 38 29 AA 55 24 |)".";.(FB$(8).U$|
00000530: AA 46 42 24 28 39 29 2C 31 33 29 00 64 0D E0 01 |.FB$(9),13).d...|
00000540: 46 54 24 B2 46 42 24 28 37 29 3A 46 50 24 B2 46 |FT$.FB$(7):FP$.F|
00000550: 42 24 28 31 30 29 3A 46 B2 C5 28 46 57 24 29 3A |B$(10):F..(FW$):|
00000560: 8D 35 38 30 00 8E 0D EA 01 99 22 11 11 11 11 22 |.580......"...."|
00000570: 3B A3 36 29 22 CF 22 3B C8 28 46 42 24 28 35 29 |;.6)".";.(FB$(5)|
00000580: AA 55 24 AA 46 42 24 28 36 29 2C 31 33 29 00 B5 |.U$.FB$(6),13)..|
00000590: 0D F4 01 99 22 11 22 3B A3 36 29 22 CC 22 3B C8 |....".";.6)".";.|
000005A0: 28 46 42 24 28 38 29 AA 55 24 AA 46 42 24 28 39 |(FB$(8).U$.FB$(9|
000005B0: 29 2C 31 33 29 00 C7 0D FE 01 46 B2 C5 28 46 56 |),13).....F..(FV|
000005C0: 24 29 3A 8D 35 38 30 00 EF 0D 08 02 99 22 11 11 |$):.580......"..|
000005D0: 22 3B A3 36 29 22 CF 22 3B C8 28 46 42 24 28 35 |";.6)".";.(FB$(5|
000005E0: 29 AA 55 24 AA 46 42 24 28 36 29 2C 31 33 29 00 |).U$.FB$(6),13).|
000005F0: 16 0E 12 02 99 22 11 22 3B A3 36 29 22 CC 22 3B |.....".";.6)".";|
00000600: C8 28 46 42 24 28 38 29 AA 55 24 AA 46 42 24 28 |.(FB$(8).U$.FB$(|
00000610: 39 29 2C 31 33 29 00 3A 0E 1C 02 46 44 24 B2 46 |9),13).:...FD$.F|
00000620: 42 24 28 37 29 3A 46 45 24 B2 46 42 24 28 31 30 |B$(7):FE$.FB$(10|
00000630: 29 3A 46 B2 C5 28 46 58 24 29 00 4D 0E 26 02 A1 |):F..(FX$).M.&..|
00000640: 41 24 3A 8B 41 24 B2 22 22 A7 35 35 30 00 55 0E |A$:.A$."".550.U.|
00000650: 30 02 89 35 30 00 5F 0E 3A 02 97 56 2C 39 30 00 |0..50._.:..V,90.|
00000660: 7D 0E 44 02 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |}.D.. **********|
00000670: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9B 0E |*************...|
00000680: 4E 02 8F 20 2A 20 46 44 44 20 42 4C 4F 43 4B 20 |N.. * FDD BLOCK |
00000690: 52 45 41 44 20 20 20 20 20 20 2A 00 B9 0E 58 02 |READ *...X.|
000006A0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
000006B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D6 0E 5D 02 9F 31 |*********...]..1|
000006C0: 35 2C 38 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 |5,8,15,"I0":.2,8|
000006D0: 2C 32 2C 22 23 22 00 DF 0E 62 02 8D 38 39 30 00 |,2,"#"...b..890.|
000006E0: F9 0E 6C 02 98 31 35 2C 22 42 2D 52 3A 22 3B 32 |..l..15,"B-R:";2|
000006F0: 3B 46 44 3B 46 54 3B 46 53 00 02 0F 76 02 8D 37 |;FD;FT;FS...v..7|
00000700: 38 30 00 0F 0F 80 02 81 46 49 B2 31 A4 31 30 00 |80......FI.1.10.|
00000710: 20 0F 8A 02 84 32 2C 46 42 24 28 46 49 29 3A 82 | ....2,FB$(FI):.|
00000720: 00 3B 0F 94 02 84 32 2C 58 24 3A 58 B2 C5 28 58 |.;....2,X$:X..(X|
00000730: 24 29 3A 8B 58 B2 30 A7 37 33 30 00 46 0F 9E 02 |$):.X.0.730.F...|
00000740: 81 49 B2 31 A4 58 00 55 0F A8 02 84 32 2C 4D 41 |.I.1.X.U....2,MA|
00000750: 24 28 49 29 3A 00 64 0F B2 02 84 32 2C 4D 42 24 |$(I):.d....2,MB$|
00000760: 28 49 29 3A 00 73 0F BC 02 84 32 2C 4D 43 24 28 |(I):.s....2,MC$(|
00000770: 49 29 3A 00 82 0F C6 02 84 32 2C 4D 44 24 28 49 |I):......2,MD$(I|
00000780: 29 3A 00 92 0F D0 02 84 32 2C 4D 45 24 28 49 29 |):......2,ME$(I)|
00000790: 3A 82 00 A0 0F DA 02 81 46 49 B2 31 36 A4 31 37 |:.......FI.16.17|
000007A0: 00 C8 0F E4 02 84 32 2C 46 42 24 28 46 49 29 3A |......2,FB$(FI):|
000007B0: 82 3A 84 32 2C 59 24 3A 59 B2 C5 28 59 24 29 3A |.:.2,Y$:Y..(Y$):|
000007C0: 8B 59 B2 30 A7 37 36 30 00 DF 0F EE 02 81 49 B2 |.Y.0.760......I.|
000007D0: 31 A4 59 3A 84 32 2C 43 42 24 28 49 29 3A 82 00 |1.Y:.2,CB$(I):..|
000007E0: EF 0F F8 02 84 32 2C 46 42 24 28 31 39 29 3A 00 |.....2,FB$(19):.|
000007F0: FC 0F 02 03 A0 32 3A A0 31 35 3A 8E 00 1A 10 0C |.....2:.15:.....|
00000800: 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 38 10 16 03 8F |**********.8....|
00000820: 20 2A 20 20 45 52 52 4F 52 20 43 48 45 43 4B 20 | * ERROR CHECK |
00000830: 20 20 20 20 20 20 20 2A 00 56 10 20 03 8F 20 2A | *.V. .. *|
00000840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000850: 2A 2A 2A 2A 2A 2A 00 6B 10 2A 03 84 31 35 2C 45 |******.k.*..15,E|
00000860: 4E 2C 45 4D 24 2C 45 54 2C 45 53 00 77 10 34 03 |N,EM$,ET,ES.w.4.|
00000870: 8B 45 4E B2 30 A7 8E 00 99 10 3E 03 99 22 45 52 |.EN.0.....>.."ER|
00000880: 52 4F 52 20 53 54 41 54 55 53 3A 22 3B 45 4E 3B |ROR STATUS:";EN;|
00000890: 45 4D 24 3B 45 54 3B 45 53 00 B7 10 48 03 85 22 |EM$;ET;ES...H.."|
000008A0: 43 4F 4E 54 49 4E 55 45 3F 22 3B 59 24 3A 8B 59 |CONTINUE?";Y$:.Y|
000008B0: 24 B2 22 59 22 A7 8E 00 BD 10 52 03 90 00 DB 10 |$."Y".....R.....|
000008C0: 5C 03 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |\.. ************|
000008D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F9 10 66 03 |***********...f.|
000008E0: 8F 20 2A 20 53 45 54 20 54 52 41 43 4B 20 26 20 |. * SET TRACK & |
000008F0: 53 45 43 54 4F 52 20 20 2A 00 17 11 70 03 8F 20 |SECTOR *...p.. |
00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000910: 2A 2A 2A 2A 2A 2A 2A 00 37 11 7A 03 8B 46 B3 33 |*******.7.z..F.3|
00000920: 35 38 A7 46 31 B2 30 3A 46 32 B2 32 32 3A 46 33 |58.F1.0:F2.22:F3|
00000930: B2 31 3A 89 39 33 30 00 60 11 84 03 8B 46 B1 33 |.1:.930.`....F.3|
00000940: 35 37 AF 46 B3 34 37 32 A7 46 31 B2 33 35 37 3A |57.F.472.F1.357:|
00000950: 46 32 B2 32 30 3A 46 33 B2 31 39 3A 89 39 33 30 |F2.20:F3.19:.930|
00000960: 00 89 11 8E 03 8B 46 B1 34 37 31 AF 46 B3 35 38 |......F.471.F.58|
00000970: 30 A7 46 31 B2 34 37 31 3A 46 32 B2 31 39 3A 46 |0.F1.471:F2.19:F|
00000980: 33 B2 32 35 3A 89 39 33 30 00 A7 11 98 03 8B 46 |3.25:.930......F|
00000990: B1 35 37 39 A7 46 31 B2 35 37 39 3A 46 32 B2 31 |.579.F1.579:F2.1|
000009A0: 38 3A 46 33 B2 33 31 00 C6 11 A2 03 46 54 B2 B5 |8:F3.31.....FT..|
000009B0: 28 28 28 46 AB 46 31 29 AB 31 29 AD 28 46 32 AB |(((F.F1).1).(F2.|
000009C0: 31 29 29 AA 46 33 00 E7 11 AC 03 46 53 B2 46 AB |1)).F3.....FS.F.|
000009D0: 46 31 AB 28 46 54 AB 46 33 29 AC 46 32 AA 28 46 |F1.(FT.F3).F2.(F|
000009E0: 54 AB 46 33 AB 31 29 00 ED 11 B6 03 8E 00 0F 12 |T.F3.1).........|
000009F0: C0 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00000A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000A10: 31 12 CA 03 8F 2A 20 20 20 20 50 45 44 49 47 52 |1....* PEDIGR|
00000A20: 45 45 20 50 52 49 4E 54 4F 55 54 20 20 20 20 20 |EE PRINTOUT |
00000A30: 2A 00 53 12 D4 03 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |*.S....*********|
00000A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A50: 2A 2A 2A 00 59 12 DE 03 8F 00 61 12 E8 03 50 B2 |***.Y.....a...P.|
00000A60: 30 00 82 12 F2 03 99 22 93 11 11 11 11 4E 55 4D |0......".....NUM|
00000A70: 42 45 52 20 4F 46 20 54 48 45 20 50 45 52 53 4F |BER OF THE PERSO|
00000A80: 4E 22 00 9C 12 FC 03 99 22 57 48 4F 53 45 20 50 |N"......"WHOSE P|
00000A90: 45 44 49 47 52 45 45 20 59 4F 55 22 00 B0 12 06 |EDIGREE YOU"....|
00000AA0: 04 99 22 57 49 53 48 20 50 52 49 4E 54 45 44 22 |.."WISH PRINTED"|
00000AB0: 00 CD 12 10 04 99 3A 99 22 28 49 4E 50 55 54 20 |......:."(INPUT |
00000AC0: 30 20 54 4F 20 45 58 49 54 29 22 3A 99 00 DE 12 |0 TO EXIT)":....|
00000AD0: 1A 04 85 46 3A 8B 46 B2 30 A7 34 32 36 30 00 FD |...F:.F.0.4260..|
00000AE0: 12 24 04 99 3A 99 22 20 34 2C 35 20 4F 52 20 36 |.$..:." 4,5 OR 6|
00000AF0: 20 47 45 4E 45 52 41 54 49 4F 4E 53 22 00 05 13 | GENERATIONS"...|
00000B00: 2E 04 85 4E 47 00 28 13 38 04 99 3A 99 22 12 57 |...NG.(.8..:.".W|
00000B10: 41 49 54 20 2D 2D 20 4C 49 4E 4B 49 4E 47 20 50 |AIT -- LINKING P|
00000B20: 45 44 49 47 52 45 45 22 00 31 13 42 04 8D 35 38 |EDIGREE".1.B..58|
00000B30: 30 00 3B 13 4C 04 8D 31 34 30 30 00 51 13 56 04 |0.;.L..1400.Q.V.|
00000B40: 8F 2A 2A 20 20 20 50 41 52 45 4E 54 53 20 20 2A |.** PARENTS *|
00000B50: 2A 00 66 13 60 04 46 B2 C5 28 4E 46 24 28 31 29 |*.f.`.F..(NF$(1)|
00000B60: 29 3A 8D 35 38 30 00 70 13 6A 04 8D 31 34 30 30 |):.580.p.j..1400|
00000B70: 00 85 13 74 04 46 B2 C5 28 4D 4E 24 28 31 29 29 |...t.F..(MN$(1))|
00000B80: 3A 8D 35 38 30 00 8F 13 7E 04 8D 31 34 30 30 00 |:.580...~..1400.|
00000B90: A7 13 88 04 8F 2A 2A 20 47 52 41 4E 44 50 41 52 |.....** GRANDPAR|
00000BA0: 45 4E 54 53 20 2A 2A 00 B2 13 92 04 81 4A B2 32 |ENTS **......J.2|
00000BB0: A4 33 00 C7 13 9C 04 46 B2 C5 28 4E 46 24 28 4A |.3.....F..(NF$(J|
00000BC0: 29 29 3A 8D 35 38 30 00 D1 13 A6 04 8D 31 34 30 |)):.580......140|
00000BD0: 30 00 E6 13 B0 04 46 B2 C5 28 4D 4E 24 28 4A 29 |0.....F..(MN$(J)|
00000BE0: 29 3A 8D 35 38 30 00 F0 13 BA 04 8D 31 34 30 30 |):.580......1400|
00000BF0: 00 F6 13 C4 04 82 00 11 14 CE 04 8F 20 2A 2A 20 |............ ** |
00000C00: 47 20 47 52 41 4E 44 50 41 52 45 4E 54 53 20 2A |G GRANDPARENTS *|
00000C10: 2A 00 1C 14 D8 04 81 4A B2 34 A4 37 00 31 14 E2 |*......J.4.7.1..|
00000C20: 04 46 B2 C5 28 4E 46 24 28 4A 29 29 3A 8D 35 38 |.F..(NF$(J)):.58|
00000C30: 30 00 3B 14 EC 04 8D 31 34 34 30 00 50 14 F6 04 |0.;....1440.P...|
00000C40: 46 B2 C5 28 4D 4E 24 28 4A 29 29 3A 8D 35 38 30 |F..(MN$(J)):.580|
00000C50: 00 5A 14 00 05 8D 31 34 34 30 00 61 14 0A 05 82 |.Z....1440.a....|
00000C60: 4A 00 70 14 14 05 8B 4E 47 B2 34 A7 33 35 35 30 |J.p....NG.4.3550|
00000C70: 00 8C 14 1E 05 8F 20 2A 2A 20 47 47 20 47 52 41 |...... ** GG GRA|
00000C80: 4E 44 50 41 52 45 4E 54 53 20 2A 2A 00 98 14 28 |NDPARENTS **...(|
00000C90: 05 81 4A B2 38 A4 31 35 00 AD 14 32 05 46 B2 C5 |..J.8.15...2.F..|
00000CA0: 28 4E 46 24 28 4A 29 29 3A 8D 35 38 30 00 B7 14 |(NF$(J)):.580...|
00000CB0: 3C 05 8D 31 34 37 30 00 CC 14 46 05 46 B2 C5 28 |<..1470...F.F..(|
00000CC0: 4D 4E 24 28 4A 29 29 3A 8D 35 38 30 00 D6 14 50 |MN$(J)):.580...P|
00000CD0: 05 8D 31 34 37 30 00 DC 14 5A 05 82 00 EB 14 64 |..1470...Z.....d|
00000CE0: 05 8B 4E 47 B2 35 A7 32 37 34 30 00 F5 14 6E 05 |..NG.5.2740...n.|
00000CF0: 89 31 35 30 30 00 3C 15 78 05 50 B2 50 AA 31 3A |.1500.<.x.P.P.1:|
00000D00: 4E 28 50 29 B2 46 3A 4E 24 28 50 29 B2 46 42 24 |N(P).F:N$(P).FB$|
00000D10: 28 31 29 3A 47 4E 24 28 50 29 B2 46 42 24 28 32 |(1):GN$(P).FB$(2|
00000D20: 29 3A 42 24 28 50 29 B2 46 42 24 28 33 29 3A 42 |):B$(P).FB$(3):B|
00000D30: 50 24 28 50 29 B2 46 42 24 28 34 29 00 85 15 82 |P$(P).FB$(4)....|
00000D40: 05 4D 24 28 50 29 B2 4D 44 24 28 31 29 3A 4D 50 |.M$(P).MD$(1):MP|
00000D50: 24 28 50 29 B2 4D 45 24 28 31 29 3A 44 24 28 50 |$(P).ME$(1):D$(P|
00000D60: 29 B2 46 42 24 28 31 36 29 3A 44 50 24 28 50 29 |).FB$(16):DP$(P)|
00000D70: B2 46 42 24 28 31 37 29 3A 53 24 28 50 29 B2 4D |.FB$(17):S$(P).M|
00000D80: 41 24 28 31 29 00 C2 15 8C 05 53 47 24 28 50 29 |A$(1).....SG$(P)|
00000D90: B2 4D 42 24 28 31 29 3A 53 4E 24 28 50 29 B2 4D |.MB$(1):SN$(P).M|
00000DA0: 43 24 28 31 29 3A 4E 46 24 28 50 29 B2 46 42 24 |C$(1):NF$(P).FB$|
00000DB0: 28 37 29 3A 4D 4E 24 28 50 29 B2 46 42 24 28 31 |(7):MN$(P).FB$(1|
00000DC0: 30 29 00 C8 15 96 05 8E 00 0F 16 A0 05 50 B2 50 |0)...........P.P|
00000DD0: AA 31 3A 4E 28 50 29 B2 46 3A 4E 24 28 50 29 B2 |.1:N(P).F:N$(P).|
00000DE0: 46 42 24 28 31 29 3A 47 4E 24 28 50 29 B2 46 42 |FB$(1):GN$(P).FB|
00000DF0: 24 28 32 29 3A 42 24 28 50 29 B2 46 42 24 28 33 |$(2):B$(P).FB$(3|
00000E00: 29 3A 42 50 24 28 50 29 B2 46 42 24 28 34 29 00 |):BP$(P).FB$(4).|
00000E10: 30 16 AA 05 4E 46 24 28 50 29 B2 46 42 24 28 37 |0...NF$(P).FB$(7|
00000E20: 29 3A 4D 4E 24 28 50 29 B2 46 42 24 28 31 30 29 |):MN$(P).FB$(10)|
00000E30: 00 36 16 B4 05 8E 00 7F 16 BE 05 50 B2 50 AA 31 |.6.........P.P.1|
00000E40: 3A 4E 28 50 29 B2 46 3A 4E 24 28 50 29 B2 46 42 |:N(P).F:N$(P).FB|
00000E50: 24 28 31 29 3A 47 4E 24 28 50 29 B2 46 42 24 28 |$(1):GN$(P).FB$(|
00000E60: 32 29 3A 4E 46 24 28 50 29 B2 46 42 24 28 37 29 |2):NF$(P).FB$(7)|
00000E70: 3A 4D 4E 24 28 50 29 B2 46 42 24 28 31 30 29 00 |:MN$(P).FB$(10).|
00000E80: BB 16 C8 05 53 46 24 28 50 29 B2 46 42 24 28 35 |....SF$(P).FB$(5|
00000E90: 29 3A 47 46 24 28 50 29 B2 46 42 24 28 36 29 3A |):GF$(P).FB$(6):|
00000EA0: 53 4D 24 28 50 29 B2 46 42 24 28 38 29 3A 47 4D |SM$(P).FB$(8):GM|
00000EB0: 24 28 50 29 B2 46 42 24 28 39 29 00 C1 16 D2 05 |$(P).FB$(9).....|
00000EC0: 8E 00 E5 16 DC 05 8F 20 2A 2A 20 53 49 58 20 47 |....... ** SIX G|
00000ED0: 45 4E 45 52 41 54 49 4F 4E 20 50 45 44 49 47 52 |ENERATION PEDIGR|
00000EE0: 45 45 20 2A 2A 00 EE 16 E6 05 9F 34 2C 34 00 2C |EE **......4,4.,|
00000EF0: 17 F0 05 98 34 2C C7 28 31 34 29 22 50 45 44 49 |....4,.(14)"PEDI|
00000F00: 47 52 45 45 20 4F 46 20 22 3B 47 4E 24 28 31 29 |GREE OF ";GN$(1)|
00000F10: 3B 22 20 22 3B 4E 24 28 31 29 3B 22 20 28 23 22 |;" ";N$(1);" (#"|
00000F20: 3B C4 28 4E 28 31 29 29 3B 22 29 22 00 39 17 FA |;.(N(1));")".9..|
00000F30: 05 98 34 2C C7 28 31 35 29 00 4F 17 04 06 81 58 |..4,.(15).O....X|
00000F40: B2 31 A4 37 35 3A 98 34 2C 22 2A 22 3B 3A 82 00 |.1.75:.4,"*";:..|
00000F50: 65 17 0E 06 81 58 B2 31 A4 32 3A 98 34 2C C7 28 |e....X.1.2:.4,.(|
00000F60: 31 33 29 3A 82 00 A4 17 18 06 41 41 24 B2 22 20 |13):......AA$." |
00000F70: 20 20 20 20 20 20 22 3A 42 42 24 B2 22 20 20 20 | ":BB$." |
00000F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00000F90: 3A 43 43 24 B2 41 41 24 AA 41 41 24 AA 41 41 24 |:CC$.AA$.AA$.AA$|
00000FA0: AA 41 41 24 00 CD 17 22 06 45 45 24 B2 42 42 24 |.AA$...".EE$.BB$|
00000FB0: AA 42 42 24 AA 42 42 24 3A 44 44 24 B2 41 41 24 |.BB$.BB$:DD$.AA$|
00000FC0: AA 42 42 24 AA 42 42 24 AA 22 20 20 22 00 0D 18 |.BB$.BB$." "...|
00000FD0: 2C 06 98 34 2C 45 45 24 3B 22 2A 2A 2A 22 3B C8 |,..4,EE$;"***";.|
00000FE0: 28 53 46 24 28 31 36 29 AA 22 2C 22 AA 47 46 24 |(SF$(16).",".GF$|
00000FF0: 28 31 36 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 |(16).AA$,14);"(#|
00001000: 22 3B 4E 46 24 28 31 36 29 3B 22 29 22 00 4D 18 |";NF$(16);")".M.|
00001010: 36 06 98 34 2C 44 44 24 3B 22 2A 2A 2A 22 3B C8 |6..4,DD$;"***";.|
00001020: 28 4E 24 28 31 36 29 AA 22 2C 22 AA 47 4E 24 28 |(N$(16).",".GN$(|
00001030: 31 36 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |16).AA$,14);"(#"|
00001040: 3B C4 28 4E 28 31 36 29 29 3B 22 29 22 00 8B 18 |;.(N(16));")"...|
00001050: 40 06 98 34 2C 43 43 24 3B 22 2A 2A 2A 22 3B C8 |@..4,CC$;"***";.|
00001060: 28 4E 24 28 38 29 AA 22 2C 22 AA 47 4E 24 28 38 |(N$(8).",".GN$(8|
00001070: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 |).AA$,14);"(#";.|
00001080: 28 4E 28 38 29 29 3B 22 29 22 3B 00 CA 18 4A 06 |(N(8));")";...J.|
00001090: 98 34 2C 22 20 20 20 2A 2A 2A 22 3B C8 28 53 4D |.4," ***";.(SM|
000010A0: 24 28 31 36 29 AA 22 2C 22 AA 47 4D 24 28 31 36 |$(16).",".GM$(16|
000010B0: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 4D |).AA$,14);"(#";M|
000010C0: 4E 24 28 31 36 29 3B 22 29 22 00 F0 18 54 06 98 |N$(16);")"...T..|
000010D0: 34 2C 43 43 24 22 2A 20 20 20 20 42 2E 20 22 3B |4,CC$"* B. ";|
000010E0: C8 28 42 24 28 38 29 AA 41 41 24 2C 31 31 29 3B |.(B$(8).AA$,11);|
000010F0: 00 2F 19 5E 06 98 34 2C 41 41 24 22 2A 2A 2A 22 |./.^..4,AA$"***"|
00001100: 3B C8 28 53 46 24 28 31 37 29 AA 22 2C 22 AA 47 |;.(SF$(17).",".G|
00001110: 46 24 28 31 37 29 AA 41 41 24 2C 31 34 29 3B 22 |F$(17).AA$,14);"|
00001120: 28 23 22 3B 4E 46 24 28 31 37 29 3B 22 29 22 00 |(#";NF$(17);")".|
00001130: 6C 19 68 06 98 34 2C 42 42 24 22 2A 2A 2A 22 3B |l.h..4,BB$"***";|
00001140: C8 28 4E 24 28 34 29 AA 22 2C 22 AA 47 4E 24 28 |.(N$(4).",".GN$(|
00001150: 34 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |4).AA$,14);"(#";|
00001160: C4 28 4E 28 34 29 29 3B 22 29 22 3B 00 AC 19 72 |.(N(4));")";...r|
00001170: 06 98 34 2C 22 20 20 20 20 2A 2A 2A 22 3B C8 28 |..4," ***";.(|
00001180: 4E 24 28 31 37 29 AA 22 2C 22 AA 47 4E 24 28 31 |N$(17).",".GN$(1|
00001190: 37 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |7).AA$,14);"(#";|
000011A0: C4 28 4E 28 31 37 29 29 3B 22 29 22 00 D2 19 7C |.(N(17));")"...||
000011B0: 06 98 34 2C 42 42 24 3B 22 2A 20 20 20 42 2E 20 |..4,BB$;"* B. |
000011C0: 22 3B C8 28 42 24 28 34 29 AA 41 41 24 2C 31 31 |";.(B$(4).AA$,11|
000011D0: 29 3B 00 12 1A 86 06 98 34 2C 42 42 24 3B 22 2A |);......4,BB$;"*|
000011E0: 2A 2A 22 3B C8 28 53 4D 24 28 31 37 29 AA 22 2C |**";.(SM$(17).",|
000011F0: 22 AA 47 4D 24 28 31 37 29 AA 41 41 24 2C 31 34 |".GM$(17).AA$,14|
00001200: 29 3B 22 28 23 22 3B 4D 4E 24 28 31 37 29 3B 22 |);"(#";MN$(17);"|
00001210: 29 22 00 38 1A 90 06 98 34 2C 42 42 24 3B 22 2A |)".8....4,BB$;"*|
00001220: 20 20 20 4D 2E 20 22 3B C8 28 4D 24 28 34 29 AA | M. ";.(M$(4).|
00001230: 41 41 24 2C 31 31 29 3B 00 78 1A 9A 06 98 34 2C |AA$,11);.x....4,|
00001240: 42 42 24 3B 22 2A 2A 2A 22 3B C8 28 53 46 24 28 |BB$;"***";.(SF$(|
00001250: 31 38 29 AA 22 2C 22 AA 47 46 24 28 31 38 29 AA |18).",".GF$(18).|
00001260: 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 4E 46 24 |AA$,14);"(#";NF$|
00001270: 28 31 38 29 3B 22 29 22 00 9E 1A A4 06 98 34 2C |(18);")"......4,|
00001280: 42 42 24 3B 22 2A 20 20 20 44 2E 20 22 3B C8 28 |BB$;"* D. ";.(|
00001290: 44 24 28 34 29 AA 41 41 24 2C 31 31 29 3B 00 E0 |D$(4).AA$,11);..|
000012A0: 1A AE 06 98 34 2C 41 41 24 3B 22 20 20 2A 2A 2A |....4,AA$;" ***|
000012B0: 22 3B C8 28 4E 24 28 31 38 29 AA 22 2C 22 AA 47 |";.(N$(18).",".G|
000012C0: 4E 24 28 31 38 29 AA 41 41 24 2C 31 34 29 3B 22 |N$(18).AA$,14);"|
000012D0: 28 23 22 3B C4 28 4E 28 31 38 29 29 3B 22 29 22 |(#";.(N(18));")"|
000012E0: 00 1C 1B B8 06 98 34 2C 22 20 20 2A 2A 2A 22 3B |......4," ***";|
000012F0: C8 28 4E 24 28 32 29 AA 22 2C 22 AA 47 4E 24 28 |.(N$(2).",".GN$(|
00001300: 32 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |2).AA$,14);"(#";|
00001310: C4 28 4E 28 32 29 29 3B 22 29 22 3B 00 59 1B C2 |.(N(2));")";.Y..|
00001320: 06 98 34 2C 22 20 20 20 2A 2A 2A 22 3B C8 28 4E |..4," ***";.(N|
00001330: 24 28 39 29 AA 22 2C 22 AA 47 4E 24 28 39 29 AA |$(9).",".GN$(9).|
00001340: 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E |AA$,14);"(#";.(N|
00001350: 28 39 29 29 3B 22 29 22 3B 00 98 1B CC 06 98 34 |(9));")";......4|
00001360: 2C 22 20 20 20 2A 2A 2A 22 3B C8 28 53 4D 24 28 |," ***";.(SM$(|
00001370: 31 38 29 AA 22 2C 22 AA 47 4D 24 28 31 38 29 AA |18).",".GM$(18).|
00001380: 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 4D 4E 24 |AA$,14);"(#";MN$|
00001390: 28 31 38 29 3B 22 29 22 00 BD 1B D6 06 98 34 2C |(18);")"......4,|
000013A0: 22 20 20 2A 20 20 20 42 2E 20 22 3B C8 28 42 24 |" * B. ";.(B$|
000013B0: 28 32 29 AA 41 41 24 2C 31 31 29 20 3B 00 E4 1B |(2).AA$,11) ;...|
000013C0: E0 06 98 34 2C 41 41 24 3B 22 20 20 20 20 20 42 |...4,AA$;" B|
000013D0: 2E 20 22 3B C8 28 42 24 28 39 29 AA 41 41 24 2C |. ";.(B$(9).AA$,|
000013E0: 31 31 29 3B 00 25 1C EA 06 98 34 2C 41 41 24 3B |11);.%....4,AA$;|
000013F0: 22 20 2A 2A 2A 22 3B C8 28 53 46 24 28 31 39 29 |" ***";.(SF$(19)|
00001400: AA 22 2C 22 AA 47 46 24 28 31 39 29 AA 41 41 24 |.",".GF$(19).AA$|
00001410: 2C 31 34 29 3B 22 28 23 22 3B 4E 46 24 28 31 39 |,14);"(#";NF$(19|
00001420: 29 3B 22 29 22 00 51 1C F4 06 98 34 2C 22 20 20 |);")".Q....4," |
00001430: 2A 20 20 20 4D 2E 20 22 3B C8 28 4D 24 28 32 29 |* M. ";.(M$(2)|
00001440: AA 41 41 24 2C 31 31 29 3B 42 42 24 3B 41 41 24 |.AA$,11);BB$;AA$|
00001450: 3B 00 8D 1C FE 06 98 34 2C 22 2A 2A 2A 22 3B C8 |;......4,"***";.|
00001460: 28 4E 24 28 31 39 29 AA 22 2C 22 AA 47 4E 24 28 |(N$(19).",".GN$(|
00001470: 31 39 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |19).AA$,14);"(#"|
00001480: 3B C4 28 4E 28 31 39 29 29 3B 22 29 22 00 BD 1C |;.(N(19));")"...|
00001490: 08 07 98 34 2C 22 20 20 2A 20 20 20 44 2E 20 22 |...4," * D. "|
000014A0: 3B C8 28 44 24 28 32 29 AA 41 41 24 2C 31 31 29 |;.(D$(2).AA$,11)|
000014B0: 3B 42 42 24 3B 41 41 24 3B 41 41 24 3B 00 FB 1C |;BB$;AA$;AA$;...|
000014C0: 12 07 98 34 2C 22 20 20 2A 2A 2A 22 3B C8 28 53 |...4," ***";.(S|
000014D0: 4D 24 28 31 39 29 AA 22 2C 22 AA 47 4D 24 28 31 |M$(19).",".GM$(1|
000014E0: 39 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |9).AA$,14);"(#";|
000014F0: 4D 4E 24 28 31 39 29 3B 22 29 22 00 12 1D 1C 07 |MN$(19);")".....|
00001500: 98 34 2C 22 20 20 2A 20 22 3B 41 41 24 3B 41 41 |.4," * ";AA$;AA|
00001510: 24 3B 00 2B 1D 26 07 98 34 2C 22 2A 20 22 3B 42 |$;.+.&..4,"* ";B|
00001520: 42 24 3B 41 41 24 3B 41 41 24 3B 00 69 1D 30 07 |B$;AA$;AA$;.i.0.|
00001530: 98 34 2C 22 20 20 2A 2A 2A 22 3B C8 28 53 46 24 |.4," ***";.(SF$|
00001540: 28 32 30 29 AA 22 2C 22 AA 47 46 24 28 32 30 29 |(20).",".GF$(20)|
00001550: AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 4E 46 |.AA$,14);"(#";NF|
00001560: 24 28 32 30 29 3B 22 29 22 00 80 1D 3A 07 98 34 |$(20);")"...:..4|
00001570: 2C 22 20 20 2A 20 22 3B 41 41 24 3B 41 41 24 3B |," * ";AA$;AA$;|
00001580: 00 94 1D 44 07 98 34 2C 22 2A 22 3B 42 42 24 3B |...D..4,"*";BB$;|
00001590: 41 41 24 3B 00 D1 1D 4E 07 98 34 2C 22 20 2A 2A |AA$;...N..4," **|
000015A0: 2A 22 3B C8 28 4E 24 28 32 30 29 AA 22 2C 22 AA |*";.(N$(20).",".|
000015B0: 47 4E 24 28 32 30 29 AA 41 41 24 2C 31 34 29 3B |GN$(20).AA$,14);|
000015C0: 22 28 23 22 3B C4 28 4E 28 32 30 29 29 3B 22 29 |"(#";.(N(20));")|
000015D0: 22 00 E8 1D 58 07 98 34 2C 22 20 20 2A 20 22 3B |"...X..4," * ";|
000015E0: 41 41 24 3B 41 41 24 3B 00 F8 1D 62 07 98 34 2C |AA$;AA$;...b..4,|
000015F0: 22 2A 22 3B 41 41 24 3B 00 37 1E 6C 07 98 34 2C |"*";AA$;.7.l..4,|
00001600: 22 20 20 2A 2A 2A 22 3B C8 28 4E 24 28 31 30 29 |" ***";.(N$(10)|
00001610: AA 22 2C 22 AA 47 4E 24 28 31 30 29 AA 41 41 24 |.",".GN$(10).AA$|
00001620: 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 30 |,14);"(#";.(N(10|
00001630: 29 29 3B 22 29 22 3B 00 76 1E 76 07 98 34 2C 22 |));")";.v.v..4,"|
00001640: 20 20 20 2A 2A 2A 22 3B C8 28 53 4D 24 28 32 30 | ***";.(SM$(20|
00001650: 29 AA 22 2C 22 AA 47 4D 24 28 32 30 29 AA 41 41 |).",".GM$(20).AA|
00001660: 24 2C 31 34 29 3B 22 28 23 22 3B 4D 4E 24 28 32 |$,14);"(#";MN$(2|
00001670: 30 29 3B 22 29 22 00 8D 1E 80 07 98 34 2C 22 20 |0);")"......4," |
00001680: 20 2A 20 22 3B 41 41 24 3B 41 41 24 3B 00 9D 1E | * ";AA$;AA$;...|
00001690: 8A 07 98 34 2C 22 2A 22 3B 41 41 24 3B 00 C6 1E |...4,"*";AA$;...|
000016A0: 94 07 98 34 2C 22 20 20 2A 20 20 20 42 2E 20 22 |...4," * B. "|
000016B0: 3B C8 28 42 24 28 31 30 29 AA 41 41 24 2C 31 31 |;.(B$(10).AA$,11|
000016C0: 29 3B 41 41 24 3B 00 03 1F 9E 07 98 34 2C 22 20 |);AA$;......4," |
000016D0: 2A 2A 2A 22 3B C8 28 53 46 24 28 32 31 29 AA 22 |***";.(SF$(21)."|
000016E0: 2C 22 AA 47 46 24 28 32 31 29 AA 41 41 24 2C 31 |,".GF$(21).AA$,1|
000016F0: 34 29 3B 22 28 23 22 3B 4E 46 24 28 32 31 29 3B |4);"(#";NF$(21);|
00001700: 22 29 22 00 1A 1F A8 07 98 34 2C 22 20 20 2A 20 |")"......4," * |
00001710: 22 3B 41 41 24 3B 41 41 24 3B 00 54 1F B2 07 98 |";AA$;AA$;.T....|
00001720: 34 2C 22 2A 2A 2A 22 3B C8 28 4E 24 28 35 29 AA |4,"***";.(N$(5).|
00001730: 22 2C 22 AA 47 4E 24 28 35 29 AA 41 41 24 2C 31 |",".GN$(5).AA$,1|
00001740: 34 29 3B 22 28 23 22 3B C4 28 4E 28 35 29 29 3B |4);"(#";.(N(5));|
00001750: 22 29 22 3B 00 94 1F BC 07 98 34 2C 22 20 20 20 |")";......4," |
00001760: 20 2A 2A 2A 22 3B C8 28 4E 24 28 32 31 29 AA 22 | ***";.(N$(21)."|
00001770: 2C 22 AA 47 4E 24 28 32 31 29 AA 41 41 24 2C 31 |,".GN$(21).AA$,1|
00001780: 34 29 3B 22 28 23 22 3B C4 28 4E 28 32 31 29 29 |4);"(#";.(N(21))|
00001790: 3B 22 29 22 00 AB 1F C6 07 98 34 2C 22 20 20 2A |;")"......4," *|
000017A0: 20 22 3B 41 41 24 3B 41 41 24 3B 00 CD 1F D0 07 | ";AA$;AA$;.....|
000017B0: 98 34 2C 22 20 20 20 20 42 2E 20 22 3B C8 28 42 |.4," B. ";.(B|
000017C0: 24 28 35 29 AA 41 41 24 2C 31 31 29 3B 00 0D 20 |$(5).AA$,11);.. |
000017D0: DA 07 98 34 2C 42 42 24 3B 22 2A 2A 2A 22 3B C8 |...4,BB$;"***";.|
000017E0: 28 53 4D 24 28 32 31 29 AA 22 2C 22 AA 47 4D 24 |(SM$(21).",".GM$|
000017F0: 28 32 31 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 |(21).AA$,14);"(#|
00001800: 22 3B 4D 4E 24 28 32 31 29 3B 22 29 22 00 24 20 |";MN$(21);")".$ |
00001810: E4 07 98 34 2C 22 20 20 2A 20 22 3B 41 41 24 3B |...4," * ";AA$;|
00001820: 41 41 24 3B 00 46 20 EE 07 98 34 2C 22 20 20 20 |AA$;.F ...4," |
00001830: 20 44 2E 20 22 3B C8 28 44 24 28 35 29 AA 41 41 | D. ";.(D$(5).AA|
00001840: 24 2C 31 31 29 3B 00 86 20 F8 07 98 34 2C 42 42 |$,11);.. ...4,BB|
00001850: 24 3B 22 2A 2A 2A 22 3B C8 28 53 46 24 28 32 32 |$;"***";.(SF$(22|
00001860: 29 AA 22 2C 22 AA 47 46 24 28 32 32 29 AA 41 41 |).",".GF$(22).AA|
00001870: 24 2C 31 34 29 3B 22 28 23 22 3B 4E 46 24 28 32 |$,14);"(#";NF$(2|
00001880: 32 29 3B 22 29 22 00 9C 20 02 08 98 34 2C 22 20 |2);")".. ...4," |
00001890: 20 2A 22 3B 42 42 24 3B 41 41 24 3B 00 B0 20 0C | *";BB$;AA$;.. .|
000018A0: 08 98 34 2C 22 2A 22 3B 41 41 24 3B 41 41 24 3B |..4,"*";AA$;AA$;|
000018B0: 00 EE 20 16 08 98 34 2C 22 20 20 2A 2A 2A 22 3B |.. ...4," ***";|
000018C0: C8 28 4E 24 28 32 32 29 AA 22 2C 22 AA 47 4E 24 |.(N$(22).",".GN$|
000018D0: 28 32 32 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 |(22).AA$,14);"(#|
000018E0: 22 3B C4 28 4E 28 32 32 29 29 3B 22 29 22 00 04 |";.(N(22));")"..|
000018F0: 21 20 08 98 34 2C 22 20 20 2A 22 3B 42 42 24 3B |! ..4," *";BB$;|
00001900: 41 41 24 3B 00 41 21 2A 08 98 34 2C 22 2A 2A 2A |AA$;.A!*..4,"***|
00001910: 22 3B C8 28 4E 24 28 31 31 29 AA 22 2C 22 AA 47 |";.(N$(11).",".G|
00001920: 4E 24 28 31 31 29 AA 41 41 24 2C 31 34 29 3B 22 |N$(11).AA$,14);"|
00001930: 28 23 22 3B C4 28 4E 28 31 31 29 29 3B 22 29 22 |(#";.(N(11));")"|
00001940: 3B 00 80 21 34 08 98 34 2C 22 20 20 20 2A 2A 2A |;..!4..4," ***|
00001950: 22 3B C8 28 53 4D 24 28 32 32 29 AA 22 2C 22 AA |";.(SM$(22).",".|
00001960: 47 4D 24 28 32 32 29 AA 41 41 24 2C 31 34 29 3B |GM$(22).AA$,14);|
00001970: 22 28 23 22 3B 4D 4E 24 28 32 32 29 3B 22 29 22 |"(#";MN$(22);")"|
00001980: 00 B4 21 3E 08 98 34 2C C8 28 4E 24 28 31 29 AA |..!>..4,.(N$(1).|
00001990: 22 2C 22 AA 47 4E 24 28 31 29 AA 41 41 24 2C 31 |",".GN$(1).AA$,1|
000019A0: 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 29 29 3B |4);"(#";.(N(1));|
000019B0: 22 29 22 3B 00 E0 21 48 08 98 34 2C 41 41 24 3B |")";..!H..4,AA$;|
000019C0: 22 20 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 |" B. ";.(B$(|
000019D0: 31 31 29 AA 41 41 24 2C 31 31 29 3B 41 41 24 3B |11).AA$,11);AA$;|
000019E0: 00 1D 22 52 08 98 34 2C 22 20 2A 2A 2A 22 3B C8 |.."R..4," ***";.|
000019F0: 28 53 46 24 28 32 33 29 AA 22 2C 22 AA 47 46 24 |(SF$(23).",".GF$|
00001A00: 28 32 33 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 |(23).AA$,14);"(#|
00001A10: 22 3B 4E 46 24 28 32 33 29 3B 22 29 22 00 40 22 |";NF$(23);")".@"|
00001A20: 5C 08 98 34 2C 22 20 42 2E 20 22 3B C8 28 42 24 |\..4," B. ";.(B$|
00001A30: 28 31 29 AA 41 41 24 2C 31 31 29 3B 43 43 24 3B |(1).AA$,11);CC$;|
00001A40: 00 7E 22 66 08 98 34 2C 22 20 20 2A 2A 2A 22 3B |.~"f..4," ***";|
00001A50: C8 28 4E 24 28 32 33 29 AA 22 2C 22 AA 47 4E 24 |.(N$(23).",".GN$|
00001A60: 28 32 33 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 |(23).AA$,14);"(#|
00001A70: 22 3B C4 28 4E 28 32 33 29 29 3B 22 29 22 00 A5 |";.(N(23));")"..|
00001A80: 22 70 08 98 34 2C 22 20 4D 2E 20 22 3B C8 28 4D |"p..4," M. ";.(M|
00001A90: 24 28 31 29 AA 41 41 24 2C 31 31 29 3B 43 43 24 |$(1).AA$,11);CC$|
00001AA0: 3B 41 41 24 3B 00 E5 22 7A 08 98 34 2C 22 20 20 |;AA$;.."z..4," |
00001AB0: 20 20 2A 2A 2A 22 3B C8 28 53 4D 24 28 32 33 29 | ***";.(SM$(23)|
00001AC0: AA 22 2C 22 AA 47 4D 24 28 32 33 29 AA 41 41 24 |.",".GM$(23).AA$|
00001AD0: 2C 31 34 29 3B 22 28 23 22 3B 4D 4E 24 28 32 33 |,14);"(#";MN$(23|
00001AE0: 29 3B 22 29 22 00 0C 23 84 08 98 34 2C 22 20 44 |);")"..#...4," D|
00001AF0: 2E 20 22 3B C8 28 44 24 28 31 29 AA 41 41 24 2C |. ";.(D$(1).AA$,|
00001B00: 31 31 29 3B 43 43 24 3B 41 41 24 3B 00 4C 23 8E |11);CC$;AA$;.L#.|
00001B10: 08 98 34 2C 22 20 20 20 20 2A 2A 2A 22 3B C8 28 |..4," ***";.(|
00001B20: 53 46 24 28 32 34 29 AA 22 2C 22 AA 47 46 24 28 |SF$(24).",".GF$(|
00001B30: 32 34 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |24).AA$,14);"(#"|
00001B40: 3B 4E 46 24 28 32 34 29 3B 22 29 22 00 8C 23 98 |;NF$(24);")"..#.|
00001B50: 08 98 34 2C 44 44 24 3B 22 2A 2A 2A 22 3B C8 28 |..4,DD$;"***";.(|
00001B60: 4E 24 28 32 34 29 AA 22 2C 22 AA 47 4E 24 28 32 |N$(24).",".GN$(2|
00001B70: 34 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |4).AA$,14);"(#";|
00001B80: C4 28 4E 28 32 34 29 29 3B 22 29 22 00 CA 23 A2 |.(N(24));")"..#.|
00001B90: 08 98 34 2C 22 53 50 4F 55 53 45 3A 20 22 3B C8 |..4,"SPOUSE: ";.|
00001BA0: 28 53 24 28 31 29 AA 22 2C 22 AA 53 47 24 28 31 |(S$(1).",".SG$(1|
00001BB0: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 53 |).AA$,14);"(#";S|
00001BC0: 4E 24 28 31 29 3B 22 29 22 3B 00 09 24 AC 08 98 |N$(1);")";..$...|
00001BD0: 34 2C 22 20 20 2A 2A 2A 22 3B C8 28 4E 24 28 31 |4," ***";.(N$(1|
00001BE0: 32 29 AA 22 2C 22 AA 47 4E 24 28 31 32 29 AA 41 |2).",".GN$(12).A|
00001BF0: 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 |A$,14);"(#";.(N(|
00001C00: 31 32 29 29 3B 22 29 22 3B 00 48 24 B6 08 98 34 |12));")";.H$...4|
00001C10: 2C 22 20 20 20 2A 2A 2A 22 3B C8 28 53 4D 24 28 |," ***";.(SM$(|
00001C20: 32 34 29 AA 22 2C 22 AA 47 4D 24 28 32 34 29 AA |24).",".GM$(24).|
00001C30: 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 4D 4E 24 |AA$,14);"(#";MN$|
00001C40: 28 32 34 29 3B 22 29 22 00 5E 24 C0 08 98 34 2C |(24);")".^$...4,|
00001C50: 22 20 20 2A 22 3B 41 41 24 3B 42 42 24 3B 00 85 |" *";AA$;BB$;..|
00001C60: 24 CA 08 98 34 2C 22 2A 20 20 20 42 2E 20 22 3B |$...4,"* B. ";|
00001C70: C8 28 42 24 28 31 32 29 AA 41 41 24 2C 31 31 29 |.(B$(12).AA$,11)|
00001C80: 3B 41 41 24 3B 00 C2 24 D4 08 98 34 2C 22 20 2A |;AA$;..$...4," *|
00001C90: 2A 2A 22 3B C8 28 53 46 24 28 32 35 29 AA 22 2C |**";.(SF$(25).",|
00001CA0: 22 AA 47 46 24 28 32 35 29 AA 41 41 24 2C 31 34 |".GF$(25).AA$,14|
00001CB0: 29 3B 22 28 23 22 3B 4E 46 24 28 32 35 29 3B 22 |);"(#";NF$(25);"|
00001CC0: 29 22 00 D9 24 DE 08 98 34 2C 22 20 20 2A 20 22 |)"..$...4," * "|
00001CD0: 3B 41 41 24 3B 41 41 24 3B 00 13 25 E8 08 98 34 |;AA$;AA$;..%...4|
00001CE0: 2C 22 2A 2A 2A 22 3B C8 28 4E 24 28 36 29 AA 22 |,"***";.(N$(6)."|
00001CF0: 2C 22 AA 47 4E 24 28 36 29 AA 41 41 24 2C 31 34 |,".GN$(6).AA$,14|
00001D00: 29 3B 22 28 23 22 3B C4 28 4E 28 36 29 29 3B 22 |);"(#";.(N(6));"|
00001D10: 29 22 3B 00 53 25 F2 08 98 34 2C 22 20 20 20 20 |)";.S%...4," |
00001D20: 2A 2A 2A 22 3B C8 28 4E 24 28 32 35 29 AA 22 2C |***";.(N$(25).",|
00001D30: 22 AA 47 4E 24 28 32 35 29 AA 41 41 24 2C 31 34 |".GN$(25).AA$,14|
00001D40: 29 3B 22 28 23 22 3B C4 28 4E 28 32 35 29 29 3B |);"(#";.(N(25));|
00001D50: 22 29 22 00 6A 25 FC 08 98 34 2C 22 20 20 2A 20 |")".j%...4," * |
00001D60: 22 3B 41 41 24 3B 41 41 24 3B 00 8C 25 06 09 98 |";AA$;AA$;..%...|
00001D70: 34 2C 22 2A 20 20 20 42 2E 20 22 3B C8 28 42 24 |4,"* B. ";.(B$|
00001D80: 28 36 29 AA 41 41 24 2C 31 31 29 3B 00 CC 25 10 |(6).AA$,11);..%.|
00001D90: 09 98 34 2C 42 42 24 3B 22 2A 2A 2A 22 3B C8 28 |..4,BB$;"***";.(|
00001DA0: 53 4D 24 28 32 35 29 AA 22 2C 22 AA 47 4D 24 28 |SM$(25).",".GM$(|
00001DB0: 32 35 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |25).AA$,14);"(#"|
00001DC0: 3B 4D 4E 24 28 32 35 29 3B 22 29 22 00 E3 25 1A |;MN$(25);")"..%.|
00001DD0: 09 98 34 2C 22 20 20 2A 20 22 3B 41 41 24 3B 41 |..4," * ";AA$;A|
00001DE0: 41 24 3B 00 05 26 24 09 98 34 2C 22 2A 20 20 20 |A$;..&$..4,"* |
00001DF0: 4D 2E 20 22 3B C8 28 4D 24 28 36 29 AA 41 41 24 |M. ";.(M$(6).AA$|
00001E00: 2C 31 31 29 3B 00 45 26 2E 09 98 34 2C 42 42 24 |,11);.E&...4,BB$|
00001E10: 3B 22 2A 2A 2A 22 3B C8 28 53 46 24 28 32 36 29 |;"***";.(SF$(26)|
00001E20: AA 22 2C 22 AA 47 46 24 28 32 36 29 AA 41 41 24 |.",".GF$(26).AA$|
00001E30: 2C 31 34 29 3B 22 28 23 22 3B 4E 46 24 28 32 36 |,14);"(#";NF$(26|
00001E40: 29 3B 22 29 22 00 5C 26 38 09 98 34 2C 22 20 20 |);")".\&8..4," |
00001E50: 2A 20 22 3B 41 41 24 3B 41 41 24 3B 00 7E 26 42 |* ";AA$;AA$;.~&B|
00001E60: 09 98 34 2C 22 2A 20 20 20 44 2E 20 22 3B C8 28 |..4,"* D. ";.(|
00001E70: 44 24 28 36 29 AA 41 41 24 2C 31 31 29 3B 00 C0 |D$(6).AA$,11);..|
00001E80: 26 4C 09 98 34 2C 41 41 24 3B 22 20 20 2A 2A 2A |&L..4,AA$;" ***|
00001E90: 22 3B C8 28 4E 24 28 32 36 29 AA 22 2C 22 AA 47 |";.(N$(26).",".G|
00001EA0: 4E 24 28 32 36 29 AA 41 41 24 2C 31 34 29 3B 22 |N$(26).AA$,14);"|
00001EB0: 28 23 22 3B C4 28 4E 28 32 36 29 29 3B 22 29 22 |(#";.(N(26));")"|
00001EC0: 00 F9 26 56 09 98 34 2C 22 20 20 2A 2A 2A 22 3B |..&V..4," ***";|
00001ED0: C8 28 4E 24 28 33 29 AA 22 2C 22 AA 47 4E 24 28 |.(N$(3).",".GN$(|
00001EE0: 33 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |3).AA$,14);"(#";|
00001EF0: 4E 28 33 29 3B 22 29 22 3B 00 38 27 60 09 98 34 |N(3);")";.8'`..4|
00001F00: 2C 22 20 20 2A 2A 2A 22 3B C8 28 4E 24 28 31 33 |," ***";.(N$(13|
00001F10: 29 AA 22 2C 22 AA 47 4E 24 28 31 33 29 AA 41 41 |).",".GN$(13).AA|
00001F20: 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 |$,14);"(#";.(N(1|
00001F30: 33 29 29 3B 22 29 22 3B 00 77 27 6A 09 98 34 2C |3));")";.w'j..4,|
00001F40: 22 20 20 20 2A 2A 2A 22 3B C8 28 53 4D 24 28 32 |" ***";.(SM$(2|
00001F50: 36 29 AA 22 2C 22 AA 47 4D 24 28 32 36 29 AA 41 |6).",".GM$(26).A|
00001F60: 41 24 2C 31 34 29 3B 22 28 23 22 3B 4D 4E 24 28 |A$,14);"(#";MN$(|
00001F70: 32 36 29 3B 22 29 22 00 9F 27 74 09 98 34 2C 22 |26);")"..'t..4,"|
00001F80: 20 20 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 | B. ";.(B$(|
00001F90: 33 29 AA 41 41 24 2C 31 31 29 3B 41 41 24 3B 00 |3).AA$,11);AA$;.|
00001FA0: C7 27 7E 09 98 34 2C 22 20 20 20 20 20 42 2E 20 |.'~..4," B. |
00001FB0: 22 3B C8 28 42 24 28 31 33 29 AA 41 41 24 2C 31 |";.(B$(13).AA$,1|
00001FC0: 31 29 3B 41 41 24 3B 00 04 28 88 09 98 34 2C 22 |1);AA$;..(...4,"|
00001FD0: 20 2A 2A 2A 22 3B C8 28 53 46 24 28 32 37 29 AA | ***";.(SF$(27).|
00001FE0: 22 2C 22 AA 47 46 24 28 32 37 29 AA 41 41 24 2C |",".GF$(27).AA$,|
00001FF0: 31 34 29 3B 22 28 23 22 3B 4E 46 24 28 32 37 29 |14);"(#";NF$(27)|
00002000: 3B 22 29 22 00 30 28 92 09 98 34 2C 22 20 20 20 |;")".0(...4," |
00002010: 20 20 20 44 2E 20 22 3B C8 28 44 24 28 33 29 AA | D. ";.(D$(3).|
00002020: 41 41 24 2C 31 31 29 3B 41 41 24 3B 42 42 24 3B |AA$,11);AA$;BB$;|
00002030: 00 6C 28 9C 09 98 34 2C 22 2A 2A 2A 22 3B C8 28 |.l(...4,"***";.(|
00002040: 4E 24 28 32 37 29 AA 22 2C 22 AA 47 4E 24 28 32 |N$(27).",".GN$(2|
00002050: 37 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |7).AA$,14);"(#";|
00002060: C4 28 4E 28 32 37 29 29 3B 22 29 22 00 84 28 A6 |.(N(27));")"..(.|
00002070: 09 98 34 2C 42 42 24 3B 22 2A 22 3B 43 43 24 3B |..4,BB$;"*";CC$;|
00002080: 41 41 24 3B 00 C0 28 B0 09 98 34 2C 22 2A 2A 2A |AA$;..(...4,"***|
00002090: 22 3B C8 28 53 4D 24 28 32 37 29 AA 22 2C 22 AA |";.(SM$(27).",".|
000020A0: 47 4D 24 28 32 37 29 AA 41 41 24 2C 31 34 29 3B |GM$(27).AA$,14);|
000020B0: 22 28 23 22 3B 4D 4E 24 28 32 37 29 3B 22 29 22 |"(#";MN$(27);")"|
000020C0: 00 D8 28 BA 09 98 34 2C 42 42 24 3B 22 2A 22 3B |..(...4,BB$;"*";|
000020D0: 43 43 24 3B 41 41 24 3B 00 15 29 C4 09 98 34 2C |CC$;AA$;..)...4,|
000020E0: 22 2A 2A 2A 22 3B C8 28 53 46 24 28 32 38 29 AA |"***";.(SF$(28).|
000020F0: 22 2C 22 AA 47 46 24 28 32 38 29 AA 41 41 24 2C |",".GF$(28).AA$,|
00002100: 31 34 29 3B 22 28 23 22 3B 4E 46 24 28 32 38 29 |14);"(#";NF$(28)|
00002110: 3B 22 29 22 22 00 2D 29 CE 09 98 34 2C 42 42 24 |;")"".-)...4,BB$|
00002120: 3B 22 2A 22 3B 42 42 24 3B 41 41 24 3B 00 6A 29 |;"*";BB$;AA$;.j)|
00002130: D8 09 98 34 2C 22 20 2A 2A 2A 22 3B C8 28 4E 24 |...4," ***";.(N$|
00002140: 28 32 38 29 AA 22 2C 22 AA 47 4E 24 28 32 38 29 |(28).",".GN$(28)|
00002150: AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 |.AA$,14);"(#";.(|
00002160: 4E 28 32 38 29 29 3B 22 29 22 00 7F 29 E2 09 98 |N(28));")"..)...|
00002170: 34 2C 42 42 24 3B 22 2A 20 22 3B 41 41 24 3B 00 |4,BB$;"* ";AA$;.|
00002180: BD 29 EC 09 98 34 2C 22 20 2A 2A 2A 22 3B C8 28 |.)...4," ***";.(|
00002190: 4E 24 28 31 34 29 AA 22 2C 22 AA 47 4E 24 28 31 |N$(14).",".GN$(1|
000021A0: 34 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |4).AA$,14);"(#";|
000021B0: C4 28 4E 28 31 34 29 29 3B 22 29 22 3B 00 FC 29 |.(N(14));")";..)|
000021C0: F6 09 98 34 2C 22 20 20 20 2A 2A 2A 22 3B C8 28 |...4," ***";.(|
000021D0: 53 4D 24 28 32 38 29 AA 22 2C 22 AA 47 4D 24 28 |SM$(28).",".GM$(|
000021E0: 32 38 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |28).AA$,14);"(#"|
000021F0: 3B 4D 4E 24 28 32 38 29 3B 22 29 22 00 10 2A 00 |;MN$(28);")"..*.|
00002200: 0A 98 34 2C 42 42 24 3B 22 2A 22 3B 41 41 24 3B |..4,BB$;"*";AA$;|
00002210: 00 39 2A 0A 0A 98 34 2C 22 20 20 2A 20 20 20 42 |.9*...4," * B|
00002220: 2E 20 22 3B C8 28 42 24 28 31 34 29 AA 41 41 24 |. ";.(B$(14).AA$|
00002230: 2C 31 31 29 3B 41 41 24 3B 00 76 2A 14 0A 98 34 |,11);AA$;.v*...4|
00002240: 2C 22 20 2A 2A 2A 22 3B C8 28 53 46 24 28 32 39 |," ***";.(SF$(29|
00002250: 29 AA 22 2C 22 AA 47 46 24 28 32 39 29 AA 41 41 |).",".GF$(29).AA|
00002260: 24 2C 31 34 29 3B 22 28 23 22 3B 4E 46 24 28 32 |$,14);"(#";NF$(2|
00002270: 39 29 3B 22 29 22 00 B4 2A 1E 0A 98 34 2C 42 42 |9);")"..*...4,BB|
00002280: 24 3B 22 2A 2A 2A 22 3B C8 28 4E 24 28 37 29 AA |$;"***";.(N$(7).|
00002290: 22 2C 22 AA 47 4E 24 28 37 29 AA 41 41 24 2C 31 |",".GN$(7).AA$,1|
000022A0: 34 29 3B 22 28 23 22 3B C4 28 4E 28 37 29 29 3B |4);"(#";.(N(7));|
000022B0: 22 29 22 3B 00 F4 2A 28 0A 98 34 2C 22 20 20 20 |")";..*(..4," |
000022C0: 20 2A 2A 2A 22 3B C8 28 4E 24 28 32 39 29 AA 22 | ***";.(N$(29)."|
000022D0: 2C 22 AA 47 4E 24 28 32 39 29 AA 41 41 24 2C 31 |,".GN$(29).AA$,1|
000022E0: 34 29 3B 22 28 23 22 3B C4 28 4E 28 32 39 29 29 |4);"(#";.(N(29))|
000022F0: 3B 22 29 22 00 1A 2B 32 0A 98 34 2C 42 42 24 3B |;")"..+2..4,BB$;|
00002300: 22 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 37 |" B. ";.(B$(7|
00002310: 29 AA 41 41 24 2C 31 31 29 3B 00 5A 2B 3C 0A 98 |).AA$,11);.Z+<..|
00002320: 34 2C 42 42 24 3B 22 2A 2A 2A 22 3B C8 28 53 4D |4,BB$;"***";.(SM|
00002330: 24 28 32 39 29 AA 22 2C 22 AA 47 4D 24 28 32 39 |$(29).",".GM$(29|
00002340: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B 4D |).AA$,14);"(#";M|
00002350: 4E 24 28 32 39 29 3B 22 29 22 00 80 2B 46 0A 98 |N$(29);")"..+F..|
00002360: 34 2C 42 42 24 3B 22 20 20 20 20 44 2E 20 22 3B |4,BB$;" D. ";|
00002370: C8 28 44 24 28 37 29 AA 41 41 24 2C 31 31 29 3B |.(D$(7).AA$,11);|
00002380: 00 C0 2B 50 0A 98 34 2C 42 42 24 3B 22 2A 2A 2A |..+P..4,BB$;"***|
00002390: 22 3B C8 28 53 46 24 28 33 30 29 AA 22 2C 22 AA |";.(SF$(30).",".|
000023A0: 47 46 24 28 33 30 29 AA 41 41 24 2C 31 34 29 3B |GF$(30).AA$,14);|
000023B0: 22 28 23 22 3B 4E 46 24 28 33 30 29 3B 22 29 22 |"(#";NF$(30);")"|
000023C0: 00 D9 2B 5A 0A 98 34 2C 43 43 24 3B 22 2A 20 22 |..+Z..4,CC$;"* "|
000023D0: 3B 41 41 24 3B 41 41 24 3B 00 16 2C 64 0A 98 34 |;AA$;AA$;..,d..4|
000023E0: 2C 22 20 2A 2A 2A 22 3B C8 28 4E 24 28 33 30 29 |," ***";.(N$(30)|
000023F0: AA 22 2C 22 AA 47 4E 24 28 33 30 29 AA 41 41 24 |.",".GN$(30).AA$|
00002400: 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 33 30 |,14);"(#";.(N(30|
00002410: 29 29 3B 22 29 22 00 57 2C 6E 0A 98 34 2C 43 43 |));")".W,n..4,CC|
00002420: 24 3B 22 2A 2A 2A 22 3B C8 28 4E 24 28 31 35 29 |$;"***";.(N$(15)|
00002430: AA 22 2C 22 AA 47 4E 24 28 31 35 29 AA 41 41 24 |.",".GN$(15).AA$|
00002440: 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 35 |,14);"(#";.(N(15|
00002450: 29 29 3B 22 29 22 3B 00 96 2C 78 0A 98 34 2C 22 |));")";..,x..4,"|
00002460: 20 20 20 2A 2A 2A 22 3B C8 28 53 4D 24 28 33 30 | ***";.(SM$(30|
00002470: 29 AA 22 2C 22 AA 47 4D 24 28 33 30 29 AA 41 41 |).",".GM$(30).AA|
00002480: 24 2C 31 34 29 3B 22 28 23 22 3B 4D 4E 24 28 33 |$,14);"(#";MN$(3|
00002490: 30 29 3B 22 29 22 00 BD 2C 82 0A 98 34 2C 43 43 |0);")"..,...4,CC|
000024A0: 24 3B 22 20 20 20 20 42 2E 20 22 3B C8 28 42 24 |$;" B. ";.(B$|
000024B0: 28 31 35 29 AA 41 41 24 2C 31 31 29 3B 00 FE 2C |(15).AA$,11);..,|
000024C0: 8C 0A 98 34 2C 41 41 24 3B 22 20 2A 2A 2A 22 3B |...4,AA$;" ***";|
000024D0: C8 28 53 46 24 28 33 31 29 AA 22 2C 22 AA 47 46 |.(SF$(31).",".GF|
000024E0: 24 28 33 31 29 AA 41 41 24 2C 31 34 29 3B 22 28 |$(31).AA$,14);"(|
000024F0: 23 22 3B 4E 46 24 28 33 31 29 3B 22 29 22 00 3E |#";NF$(31);")".>|
00002500: 2D 96 0A 98 34 2C 44 44 24 3B 22 2A 2A 2A 22 3B |-...4,DD$;"***";|
00002510: C8 28 4E 24 28 33 31 29 AA 22 2C 22 AA 47 4E 24 |.(N$(31).",".GN$|
00002520: 28 33 31 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 |(31).AA$,14);"(#|
00002530: 22 3B C4 28 4E 28 33 31 29 29 3B 22 29 22 00 7E |";.(N(31));")".~|
00002540: 2D A0 0A 98 34 2C 45 45 24 3B 22 2A 2A 2A 22 3B |-...4,EE$;"***";|
00002550: C8 28 53 4D 24 28 33 31 29 AA 22 2C 22 AA 47 4D |.(SM$(31).",".GM|
00002560: 24 28 33 31 29 AA 41 41 24 2C 31 34 29 3B 22 28 |$(31).AA$,14);"(|
00002570: 23 22 3B 4D 4E 24 28 33 31 29 3B 22 29 22 00 8C |#";MN$(31);")"..|
00002580: 2D AA 0A 98 34 3A A0 34 3A 89 35 30 00 B1 2D B4 |-...4:.4:.50..-.|
00002590: 0A 8F 20 2A 2A 20 46 49 56 45 20 47 45 4E 45 52 |.. ** FIVE GENER|
000025A0: 41 54 49 4F 4E 20 50 45 44 49 47 52 45 45 20 2A |ATION PEDIGREE *|
000025B0: 2A 00 FA 2D BE 0A 41 41 24 B2 22 20 20 20 20 20 |*..-..AA$." |
000025C0: 20 20 20 22 3A 42 42 24 B2 41 41 24 AA 41 41 24 | ":BB$.AA$.AA$|
000025D0: 3A 43 43 24 B2 42 42 24 AA 41 41 24 3A 44 44 24 |:CC$.BB$.AA$:DD$|
000025E0: B2 42 42 24 AA 42 42 24 AA 22 20 20 20 22 3A 45 |.BB$.BB$." ":E|
000025F0: 45 24 B2 44 44 24 AA 42 42 24 00 03 2E C8 0A 9F |E$.DD$.BB$......|
00002600: 34 2C 34 00 41 2E D2 0A 98 34 2C C7 28 31 34 29 |4,4.A....4,.(14)|
00002610: 22 50 45 44 49 47 52 45 45 20 4F 46 20 22 3B 47 |"PEDIGREE OF ";G|
00002620: 4E 24 28 31 29 3B 22 20 22 3B 4E 24 28 31 29 3B |N$(1);" ";N$(1);|
00002630: 22 20 28 23 22 3B C4 28 4E 28 31 29 29 3B 22 29 |" (#";.(N(1));")|
00002640: 22 00 4E 2E DC 0A 98 34 2C C7 28 31 35 29 00 64 |".N....4,.(15).d|
00002650: 2E E6 0A 81 58 B2 31 A4 37 35 3A 98 34 2C 22 2A |....X.1.75:.4,"*|
00002660: 22 3B 3A 82 00 7A 2E F0 0A 81 58 B2 31 A4 32 3A |";:..z....X.1.2:|
00002670: 98 34 2C C7 28 31 33 29 3A 82 00 BD 2E FA 0A 98 |.4,.(13):.......|
00002680: 34 2C 45 45 24 3B 22 20 20 2A 2A 2A 2A 22 3B C8 |4,EE$;" ****";.|
00002690: 28 4E 24 28 31 36 29 AA 22 2C 22 AA 47 4E 24 28 |(N$(16).",".GN$(|
000026A0: 31 36 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |16).AA$,14);"(#"|
000026B0: 3B C4 28 4E 28 31 36 29 29 3B 22 29 22 00 FC 2E |;.(N(16));")"...|
000026C0: 04 0B 98 34 2C 44 44 24 3B 22 20 2A 2A 2A 2A 22 |...4,DD$;" ****"|
000026D0: 3B C8 28 4E 24 28 38 29 AA 22 2C 22 AA 47 4E 24 |;.(N$(8).",".GN$|
000026E0: 28 38 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |(8).AA$,14);"(#"|
000026F0: 3B C4 28 4E 28 38 29 29 3B 22 29 22 00 23 2F 0E |;.(N(8));")".#/.|
00002700: 0B 98 34 2C 44 44 24 3B 22 20 2A 20 20 20 20 42 |..4,DD$;" * B|
00002710: 2E 20 22 3B C8 28 42 24 28 38 29 AA 41 41 24 2C |. ";.(B$(8).AA$,|
00002720: 31 31 29 00 63 2F 18 0B 98 34 2C 43 43 24 3B 22 |11).c/...4,CC$;"|
00002730: 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 34 29 AA 22 | ****";.(N$(4)."|
00002740: 2C 22 AA 47 4E 24 28 34 29 AA 41 41 24 2C 31 34 |,".GN$(4).AA$,14|
00002750: 29 3B 22 28 23 22 3B C4 28 4E 28 34 29 29 3B 22 |);"(#";.(N(4));"|
00002760: 29 22 3B 00 A4 2F 22 0B 98 34 2C 22 20 20 20 20 |)";../"..4," |
00002770: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 37 29 AA 22 |****";.(N$(17)."|
00002780: 2C 22 AA 47 4E 24 28 31 37 29 AA 41 41 24 2C 31 |,".GN$(17).AA$,1|
00002790: 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 37 29 29 |4);"(#";.(N(17))|
000027A0: 3B 22 29 22 00 CB 2F 2C 0B 98 34 2C 43 43 24 3B |;")"../,..4,CC$;|
000027B0: 22 20 2A 20 20 20 20 42 2E 20 22 3B C8 28 42 24 |" * B. ";.(B$|
000027C0: 28 34 29 AA 41 41 24 2C 31 31 29 00 F2 2F 36 0B |(4).AA$,11)../6.|
000027D0: 98 34 2C 43 43 24 3B 22 20 2A 20 20 20 20 4D 2E |.4,CC$;" * M.|
000027E0: 20 22 3B C8 28 4D 24 28 34 29 AA 41 41 24 2C 31 | ";.(M$(4).AA$,1|
000027F0: 31 29 00 1A 30 40 0B 98 34 2C 43 43 24 3B 22 20 |1)..0@..4,CC$;" |
00002800: 2A 20 20 20 20 44 2E 20 22 3B C8 28 44 24 28 34 |* D. ";.(D$(4|
00002810: 29 AA 41 41 24 2C 31 31 29 3B 00 5C 30 4A 0B 98 |).AA$,11);.\0J..|
00002820: 34 2C 41 41 24 3B 22 20 2A 2A 2A 2A 22 3B C8 28 |4,AA$;" ****";.(|
00002830: 4E 24 28 31 38 29 AA 22 2C 22 AA 47 4E 24 28 31 |N$(18).",".GN$(1|
00002840: 38 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |8).AA$,14);"(#";|
00002850: C4 28 4E 28 31 38 29 29 3B 22 29 22 00 9B 30 54 |.(N(18));")"..0T|
00002860: 0B 98 34 2C 41 41 24 3B 22 2A 2A 2A 2A 22 3B C8 |..4,AA$;"****";.|
00002870: 28 4E 24 28 32 29 AA 22 2C 22 AA 47 4E 24 28 32 |(N$(2).",".GN$(2|
00002880: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 |).AA$,14);"(#";.|
00002890: 28 4E 28 32 29 29 3B 22 29 22 3B 00 DC 30 5E 0B |(N(2));")";..0^.|
000028A0: 98 34 2C 22 20 20 20 20 22 3B 22 2A 2A 2A 2A 22 |.4," ";"****"|
000028B0: 3B C8 28 4E 24 28 39 29 AA 22 2C 22 AA 47 4E 24 |;.(N$(9).",".GN$|
000028C0: 28 39 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |(9).AA$,14);"(#"|
000028D0: 3B C4 28 4E 28 39 29 29 3B 22 29 22 00 03 31 68 |;.(N(9));")"..1h|
000028E0: 0B 98 34 2C 41 41 24 3B 22 2A 20 20 20 20 42 2E |..4,AA$;"* B.|
000028F0: 20 22 3B C8 28 42 24 28 32 29 AA 41 41 24 2C 31 | ";.(B$(2).AA$,1|
00002900: 31 29 3B 00 2A 31 72 0B 98 34 2C 41 41 24 3B 22 |1);.*1r..4,AA$;"|
00002910: 20 20 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 | B. ";.(B$(|
00002920: 39 29 AA 41 41 24 2C 31 31 29 00 51 31 7C 0B 98 |9).AA$,11).Q1|..|
00002930: 34 2C 41 41 24 3B 22 2A 20 20 20 20 4D 2E 20 22 |4,AA$;"* M. "|
00002940: 3B C8 28 4D 24 28 32 29 AA 41 41 24 2C 31 31 29 |;.(M$(2).AA$,11)|
00002950: 3B 00 94 31 86 0B 98 34 2C 43 43 24 3B 22 20 20 |;..1...4,CC$;" |
00002960: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 39 29 AA 22 |****";.(N$(19)."|
00002970: 2C 22 AA 47 4E 24 28 31 39 29 AA 41 41 24 2C 31 |,".GN$(19).AA$,1|
00002980: 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 39 29 29 |4);"(#";.(N(19))|
00002990: 3B 22 29 22 00 BA 31 90 0B 98 34 2C 41 41 24 3B |;")"..1...4,AA$;|
000029A0: 22 2A 20 20 20 20 44 2E 20 22 3B C8 28 44 24 28 |"* D. ";.(D$(|
000029B0: 32 29 AA 41 41 24 2C 31 31 29 00 D1 31 9A 0B 98 |2).AA$,11)..1...|
000029C0: 34 2C 41 41 24 3B 22 2A 22 3B 42 42 24 3B 22 2A |4,AA$;"*";BB$;"*|
000029D0: 22 00 ED 31 A4 0B 98 34 2C 41 41 24 3B 22 2A 22 |"..1...4,AA$;"*"|
000029E0: 3B 42 42 24 3B 22 2A 22 3B 43 43 24 3B 00 2D 32 |;BB$;"*";CC$;.-2|
000029F0: AE 0B 98 34 2C 22 20 20 20 2A 2A 2A 2A 22 3B C8 |...4," ****";.|
00002A00: 28 4E 24 28 32 30 29 AA 22 2C 22 AA 47 4E 24 28 |(N$(20).",".GN$(|
00002A10: 32 30 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |20).AA$,14);"(#"|
00002A20: 3B C4 28 4E 28 32 30 29 29 3B 22 29 22 00 45 32 |;.(N(20));")".E2|
00002A30: B8 0B 98 34 2C 41 41 24 3B 22 2A 22 3B 42 42 24 |...4,AA$;"*";BB$|
00002A40: 3B 22 2A 22 3B 00 88 32 C2 0B 98 34 2C 41 41 24 |;"*";..2...4,AA$|
00002A50: 3B 22 20 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 |;" ****";.(N$(1|
00002A60: 30 29 AA 22 2C 22 AA 47 4E 24 28 31 30 29 AA 41 |0).",".GN$(10).A|
00002A70: 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 |A$,14);"(#";.(N(|
00002A80: 31 30 29 29 3B 22 29 22 00 A0 32 CC 0B 98 34 2C |10));")"..2...4,|
00002A90: 41 41 24 3B 22 2A 22 3B 42 42 24 3B 22 2A 22 3B |AA$;"*";BB$;"*";|
00002AA0: 00 C9 32 D6 0B 98 34 2C 41 41 24 3B 22 20 20 2A |..2...4,AA$;" *|
00002AB0: 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 31 30 | B. ";.(B$(10|
00002AC0: 29 AA 41 41 24 2C 31 31 29 00 D9 32 E0 0B 98 34 |).AA$,11)..2...4|
00002AD0: 2C 41 41 24 3B 22 2A 22 3B 00 18 33 EA 0B 98 34 |,AA$;"*";..3...4|
00002AE0: 2C 42 42 24 3B 22 2A 2A 2A 2A 22 3B C8 28 4E 24 |,BB$;"****";.(N$|
00002AF0: 28 35 29 AA 22 2C 22 AA 47 4E 24 28 35 29 AA 41 |(5).",".GN$(5).A|
00002B00: 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 |A$,14);"(#";.(N(|
00002B10: 35 29 29 3B 22 29 22 3B 00 59 33 F4 0B 98 34 2C |5));")";.Y3...4,|
00002B20: 22 20 20 20 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 |" ****";.(N$(|
00002B30: 32 31 29 AA 22 2C 22 AA 47 4E 24 28 32 31 29 AA |21).",".GN$(21).|
00002B40: 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E |AA$,14);"(#";.(N|
00002B50: 28 32 31 29 29 3B 22 29 22 00 88 33 FE 0B 98 34 |(21));")"..3...4|
00002B60: 2C 41 41 24 3B 22 2A 22 3B 42 42 24 3B 22 20 20 |,AA$;"*";BB$;" |
00002B70: 20 20 20 42 2E 20 20 22 3B C8 28 42 24 28 35 29 | B. ";.(B$(5)|
00002B80: AA 41 41 24 2C 31 31 29 00 B7 33 08 0C 98 34 2C |.AA$,11)..3...4,|
00002B90: 41 41 24 3B 22 2A 22 3B 42 42 24 3B 22 20 20 20 |AA$;"*";BB$;" |
00002BA0: 20 20 44 2E 20 20 22 3B C8 28 44 24 28 35 29 AA | D. ";.(D$(5).|
00002BB0: 41 41 24 2C 31 31 29 00 D2 33 12 0C 98 34 2C 41 |AA$,11)..3...4,A|
00002BC0: 41 24 3B 22 2A 22 3B 43 43 24 3B 22 20 20 20 2A |A$;"*";CC$;" *|
00002BD0: 22 3B 00 13 34 1C 0C 98 34 2C 42 42 24 3B 22 2A |";..4...4,BB$;"*|
00002BE0: 2A 2A 2A 22 3B C8 28 4E 24 28 32 32 29 AA 22 2C |***";.(N$(22).",|
00002BF0: 22 AA 47 4E 24 28 32 32 29 AA 41 41 24 2C 31 34 |".GN$(22).AA$,14|
00002C00: 29 3B 22 28 23 22 3B C4 28 4E 28 32 32 29 29 3B |);"(#";.(N(22));|
00002C10: 22 29 22 00 26 34 26 0C 98 34 2C 41 41 24 3B 22 |")".&4&..4,AA$;"|
00002C20: 2A 20 20 20 22 3B 00 67 34 30 0C 98 34 2C 43 43 |* ";.g40..4,CC|
00002C30: 24 3B 22 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 31 |$;"****";.(N$(11|
00002C40: 29 AA 22 2C 22 AA 47 4E 24 28 31 31 29 AA 41 41 |).",".GN$(11).AA|
00002C50: 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 |$,14);"(#";.(N(1|
00002C60: 31 29 29 3B 22 29 22 00 9B 34 3A 0C 98 34 2C C8 |1));")"..4:..4,.|
00002C70: 28 4E 24 28 31 29 AA 22 2C 22 AA 47 4E 24 28 31 |(N$(1).",".GN$(1|
00002C80: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 |).AA$,14);"(#";.|
00002C90: 28 4E 28 31 29 29 3B 22 29 22 3B 00 C1 34 44 0C |(N(1));")";..4D.|
00002CA0: 98 34 2C 42 42 24 3B 22 20 20 20 20 42 2E 20 22 |.4,BB$;" B. "|
00002CB0: 3B C8 28 42 24 28 31 31 29 AA 41 41 24 2C 31 31 |;.(B$(11).AA$,11|
00002CC0: 29 00 E4 34 4E 0C 98 34 2C 22 20 42 2E 20 22 3B |)..4N..4," B. ";|
00002CD0: C8 28 42 24 28 31 29 AA 41 41 24 2C 31 31 29 3B |.(B$(1).AA$,11);|
00002CE0: 44 44 24 3B 00 24 35 58 0C 98 34 2C 22 20 20 20 |DD$;.$5X..4," |
00002CF0: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 32 33 29 AA 22 |****";.(N$(23)."|
00002D00: 2C 22 AA 47 4E 24 28 32 33 29 AA 41 41 24 2C 31 |,".GN$(23).AA$,1|
00002D10: 34 29 3B 22 28 23 22 3B C4 28 4E 28 32 33 29 29 |4);"(#";.(N(23))|
00002D20: 3B 22 29 22 00 42 35 62 0C 98 34 2C 22 20 4D 2E |;")".B5b..4," M.|
00002D30: 20 22 3B C8 28 4D 24 28 31 29 AA 41 41 24 2C 31 | ";.(M$(1).AA$,1|
00002D40: 31 29 00 60 35 6C 0C 98 34 2C 22 20 44 2E 20 22 |1).`5l..4," D. "|
00002D50: 3B C8 28 44 24 28 31 29 AA 41 41 24 2C 31 31 29 |;.(D$(1).AA$,11)|
00002D60: 00 A3 35 76 0C 98 34 2C 45 45 24 3B 22 20 20 2A |..5v..4,EE$;" *|
00002D70: 2A 2A 2A 22 3B C8 28 4E 24 28 32 34 29 AA 22 2C |***";.(N$(24).",|
00002D80: 22 AA 47 4E 24 28 32 34 29 AA 41 41 24 2C 31 34 |".GN$(24).AA$,14|
00002D90: 29 3B 22 28 23 22 3B C4 28 4E 28 32 34 29 29 3B |);"(#";.(N(24));|
00002DA0: 22 29 22 00 E5 35 80 0C 98 34 2C 22 53 50 4F 55 |")"..5...4,"SPOU|
00002DB0: 53 45 3A 20 22 3B C8 28 53 24 28 31 29 AA 22 2C |SE: ";.(S$(1).",|
00002DC0: 22 AA 53 47 24 28 31 29 AA 41 41 24 2C 31 34 29 |".SG$(1).AA$,14)|
00002DD0: 3B 22 28 23 22 3B 53 4E 24 28 31 29 3B 22 29 22 |;"(#";SN$(1);")"|
00002DE0: 3B 41 41 24 3B 00 24 36 8A 0C 98 34 2C 22 20 20 |;AA$;.$6...4," |
00002DF0: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 32 29 AA 22 |****";.(N$(12)."|
00002E00: 2C 22 AA 47 4E 24 28 31 32 29 AA 41 41 24 2C 31 |,".GN$(12).AA$,1|
00002E10: 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 32 29 29 |4);"(#";.(N(12))|
00002E20: 3B 22 29 22 00 56 36 94 0C 98 34 2C 41 41 24 3B |;")".V6...4,AA$;|
00002E30: 22 2A 22 3B 43 43 24 3B 22 20 20 20 2A 20 20 20 |"*";CC$;" * |
00002E40: 20 42 2E 20 22 3B C8 28 42 24 28 31 32 29 AA 41 | B. ";.(B$(12).A|
00002E50: 41 24 2C 31 31 29 00 66 36 9E 0C 98 34 2C 41 41 |A$,11).f6...4,AA|
00002E60: 24 3B 22 2A 22 3B 00 A5 36 A8 0C 98 34 2C 42 42 |$;"*";..6...4,BB|
00002E70: 24 3B 22 2A 2A 2A 2A 22 3B C8 28 4E 24 28 36 29 |$;"****";.(N$(6)|
00002E80: AA 22 2C 22 AA 47 4E 24 28 36 29 AA 41 41 24 2C |.",".GN$(6).AA$,|
00002E90: 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 36 29 29 |14);"(#";.(N(6))|
00002EA0: 3B 22 29 22 3B 00 E6 36 B2 0C 98 34 2C 22 20 20 |;")";..6...4," |
00002EB0: 20 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 32 35 29 | ****";.(N$(25)|
00002EC0: AA 22 2C 22 AA 47 4E 24 28 32 35 29 AA 41 41 24 |.",".GN$(25).AA$|
00002ED0: 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 32 35 |,14);"(#";.(N(25|
00002EE0: 29 29 3B 22 29 22 00 14 37 BC 0C 98 34 2C 41 41 |));")"..7...4,AA|
00002EF0: 24 3B 22 2A 22 3B 42 42 24 3B 22 2A 20 20 20 20 |$;"*";BB$;"* |
00002F00: 42 2E 20 22 3B C8 28 42 24 28 36 29 AA 41 41 24 |B. ";.(B$(6).AA$|
00002F10: 2C 31 31 29 00 42 37 C6 0C 98 34 2C 41 41 24 3B |,11).B7...4,AA$;|
00002F20: 22 2A 22 3B 42 42 24 3B 22 2A 20 20 20 20 4D 2E |"*";BB$;"* M.|
00002F30: 20 22 3B C8 28 4D 24 28 36 29 AA 41 41 24 2C 31 | ";.(M$(6).AA$,1|
00002F40: 31 29 00 71 37 D0 0C 98 34 2C 41 41 24 3B 22 2A |1).q7...4,AA$;"*|
00002F50: 22 3B 42 42 24 3B 22 2A 20 20 20 20 44 2E 20 22 |";BB$;"* D. "|
00002F60: 3B C8 28 44 24 28 36 29 AA 41 41 24 2C 31 31 29 |;.(D$(6).AA$,11)|
00002F70: 3B 00 B3 37 DA 0C 98 34 2C 41 41 24 3B 22 20 2A |;..7...4,AA$;" *|
00002F80: 2A 2A 2A 22 3B C8 28 4E 24 28 32 36 29 AA 22 2C |***";.(N$(26).",|
00002F90: 22 AA 47 4E 24 28 32 36 29 AA 41 41 24 2C 31 34 |".GN$(26).AA$,14|
00002FA0: 29 3B 22 28 23 22 3B C4 28 4E 28 32 36 29 29 3B |);"(#";.(N(26));|
00002FB0: 22 29 22 00 EF 37 E4 0C 98 34 2C 41 41 24 3B 22 |")"..7...4,AA$;"|
00002FC0: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 33 29 AA 22 2C |****";.(N$(3).",|
00002FD0: 22 AA 47 4E 24 28 33 29 AA 41 41 24 2C 31 34 29 |".GN$(3).AA$,14)|
00002FE0: 3B 22 28 23 22 3B 4E 28 33 29 3B 22 29 22 3B 00 |;"(#";N(3);")";.|
00002FF0: 2F 38 EE 0C 98 34 2C 22 20 20 20 2A 2A 2A 2A 22 |/8...4," ****"|
00003000: 3B C8 28 4E 24 28 31 33 29 AA 22 2C 22 AA 47 4E |;.(N$(13).",".GN|
00003010: 24 28 31 33 29 AA 41 41 24 2C 31 34 29 3B 22 28 |$(13).AA$,14);"(|
00003020: 23 22 3B C4 28 4E 28 31 33 29 29 3B 22 29 22 00 |#";.(N(13));")".|
00003030: 56 38 F8 0C 98 34 2C 41 41 24 3B 22 20 20 20 20 |V8...4,AA$;" |
00003040: 20 42 2E 20 22 3B C8 28 42 24 28 33 29 AA 41 41 | B. ";.(B$(3).AA|
00003050: 24 2C 31 31 29 3B 00 7E 38 02 0D 98 34 2C 41 41 |$,11);.~8...4,AA|
00003060: 24 3B 22 20 20 20 20 20 20 42 2E 20 22 3B C8 28 |$;" B. ";.(|
00003070: 42 24 28 31 33 29 AA 41 41 24 2C 31 31 29 00 A9 |B$(13).AA$,11)..|
00003080: 38 0C 0D 98 34 2C 41 41 24 3B 22 20 20 20 20 20 |8...4,AA$;" |
00003090: 44 2E 20 22 3B C8 28 44 24 28 33 29 AA 41 41 24 |D. ";.(D$(3).AA$|
000030A0: 2C 31 31 29 3B 43 43 24 3B 00 E8 38 16 0D 98 34 |,11);CC$;..8...4|
000030B0: 2C 22 20 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 32 |," ****";.(N$(2|
000030C0: 37 29 AA 22 2C 22 AA 47 4E 24 28 32 37 29 AA 41 |7).",".GN$(27).A|
000030D0: 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 |A$,14);"(#";.(N(|
000030E0: 32 37 29 29 3B 22 29 22 00 F8 38 20 0D 98 34 2C |27));")"..8 ..4,|
000030F0: 43 43 24 3B 22 20 2A 22 00 08 39 2A 0D 98 34 2C |CC$;" *"..9*..4,|
00003100: 43 43 24 3B 22 20 2A 22 00 18 39 34 0D 98 34 2C |CC$;" *"..94..4,|
00003110: 43 43 24 3B 22 20 2A 22 00 2C 39 3E 0D 98 34 2C |CC$;" *".,9>..4,|
00003120: 43 43 24 3B 22 20 2A 20 20 20 22 3B 00 6D 39 48 |CC$;" * ";.m9H|
00003130: 0D 98 34 2C 43 43 24 3B 22 2A 2A 2A 2A 22 3B C8 |..4,CC$;"****";.|
00003140: 28 4E 24 28 32 38 29 AA 22 2C 22 AA 47 4E 24 28 |(N$(28).",".GN$(|
00003150: 32 38 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 |28).AA$,14);"(#"|
00003160: 3B C4 28 4E 28 32 38 29 29 3B 22 29 22 00 80 39 |;.(N(28));")"..9|
00003170: 52 0D 98 34 2C 43 43 24 3B 22 20 2A 20 20 22 3B |R..4,CC$;" * ";|
00003180: 00 C1 39 5C 0D 98 34 2C 41 41 24 3B 22 2A 2A 2A |..9\..4,AA$;"***|
00003190: 2A 22 3B C8 28 4E 24 28 31 34 29 AA 22 2C 22 AA |*";.(N$(14).",".|
000031A0: 47 4E 24 28 31 34 29 AA 41 41 24 2C 31 34 29 3B |GN$(14).AA$,14);|
000031B0: 22 28 23 22 3B C4 28 4E 28 31 34 29 29 3B 22 29 |"(#";.(N(14));")|
000031C0: 22 00 D4 39 66 0D 98 34 2C 43 43 24 3B 22 20 2A |"..9f..4,CC$;" *|
000031D0: 20 20 22 3B 00 FB 39 70 0D 98 34 2C 41 41 24 3B | ";..9p..4,AA$;|
000031E0: 22 2A 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 |"* B. ";.(B$(|
000031F0: 31 34 29 AA 41 41 24 2C 31 31 29 00 3B 3A 7A 0D |14).AA$,11).;:z.|
00003200: 98 34 2C 43 43 24 3B 22 20 2A 2A 2A 2A 22 3B C8 |.4,CC$;" ****";.|
00003210: 28 4E 24 28 37 29 AA 22 2C 22 AA 47 4E 24 28 37 |(N$(7).",".GN$(7|
00003220: 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B C4 |).AA$,14);"(#";.|
00003230: 28 4E 28 37 29 29 3B 22 29 22 3B 00 7C 3A 84 0D |(N(7));")";.|:..|
00003240: 98 34 2C 22 20 20 20 20 2A 2A 2A 2A 22 3B C8 28 |.4," ****";.(|
00003250: 4E 24 28 32 39 29 AA 22 2C 22 AA 47 4E 24 28 32 |N$(29).",".GN$(2|
00003260: 39 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |9).AA$,14);"(#";|
00003270: C4 28 4E 28 32 39 29 29 3B 22 29 22 00 A3 3A 8E |.(N(29));")"..:.|
00003280: 0D 98 34 2C 43 43 24 3B 22 20 20 20 20 20 20 42 |..4,CC$;" B|
00003290: 2E 20 22 3B C8 28 42 24 28 37 29 AA 41 41 24 2C |. ";.(B$(7).AA$,|
000032A0: 31 31 29 00 CA 3A 98 0D 98 34 2C 43 43 24 3B 22 |11)..:...4,CC$;"|
000032B0: 20 20 20 20 20 20 44 2E 20 22 3B C8 28 44 24 28 | D. ";.(D$(|
000032C0: 37 29 AA 41 41 24 2C 31 31 29 00 DF 3A A2 0D 98 |7).AA$,11)..:...|
000032D0: 34 2C 44 44 24 3B 22 20 2A 22 3B 42 42 24 3B 00 |4,DD$;" *";BB$;.|
000032E0: 1C 3B AC 0D 98 34 2C 22 2A 2A 2A 2A 22 3B C8 28 |.;...4,"****";.(|
000032F0: 4E 24 28 33 30 29 AA 22 2C 22 AA 47 4E 24 28 33 |N$(30).",".GN$(3|
00003300: 30 29 AA 41 41 24 2C 31 34 29 3B 22 28 23 22 3B |0).AA$,14);"(#";|
00003310: C4 28 4E 28 33 30 29 29 3B 22 29 22 00 5A 3B B6 |.(N(30));")".Z;.|
00003320: 0D 98 34 2C 44 44 24 3B 22 20 2A 2A 2A 2A 22 3B |..4,DD$;" ****";|
00003330: C8 28 4E 24 28 31 35 29 AA 22 2C 22 AA 47 4E 24 |.(N$(15).",".GN$|
00003340: 28 31 35 29 2C 31 34 29 3B 22 28 23 22 3B C4 28 |(15),14);"(#";.(|
00003350: 4E 28 31 35 29 29 3B 22 29 22 00 82 3B C0 0D 98 |N(15));")"..;...|
00003360: 34 2C 44 44 24 3B 22 20 20 20 20 20 20 42 2E 20 |4,DD$;" B. |
00003370: 22 3B C8 28 42 24 28 31 35 29 AA 41 41 24 2C 31 |";.(B$(15).AA$,1|
00003380: 31 29 00 C1 3B CA 0D 98 34 2C 45 45 24 3B 22 20 |1)..;...4,EE$;" |
00003390: 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 33 31 29 AA | ****";.(N$(31).|
000033A0: 22 2C 22 AA 47 4E 24 28 33 31 29 2C 31 34 29 3B |",".GN$(31),14);|
000033B0: 22 28 23 22 3B C4 28 4E 28 33 31 29 29 3B 22 29 |"(#";.(N(31));")|
000033C0: 22 00 CF 3B D4 0D 98 34 3A A0 34 3A 89 35 30 00 |"..;...4:.4:.50.|
000033D0: F4 3B DE 0D 8F 20 2A 2A 20 46 4F 55 52 20 47 45 |.;... ** FOUR GE|
000033E0: 4E 45 52 41 54 49 4F 4E 20 50 45 44 49 47 52 45 |NERATION PEDIGRE|
000033F0: 45 20 2A 2A 00 24 3C E8 0D 41 41 24 B2 22 20 20 |E **.$<..AA$." |
00003400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003410: 20 20 20 20 22 3A 42 42 24 B2 22 20 20 20 20 20 | ":BB$." |
00003420: 20 20 20 22 00 61 3C F2 0D 43 43 24 B2 22 20 20 | ".a<..CC$." |
00003430: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003440: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003460: 22 00 8D 3C FC 0D 44 44 24 B2 22 20 20 20 20 20 |"..<..DD$." |
00003470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00003480: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 96 3C | "..<|
00003490: 06 0E 9F 34 2C 34 00 D4 3C 10 0E 98 34 2C C7 28 |...4,4..<...4,.(|
000034A0: 31 34 29 22 50 45 44 49 47 52 45 45 20 4F 46 20 |14)"PEDIGREE OF |
000034B0: 22 3B 47 4E 24 28 31 29 3B 22 20 22 3B 4E 24 28 |";GN$(1);" ";N$(|
000034C0: 31 29 3B 22 20 28 23 22 3B C4 28 4E 28 31 29 29 |1);" (#";.(N(1))|
000034D0: 3B 22 29 22 00 E1 3C 1A 0E 98 34 2C C7 28 31 35 |;")"..<...4,.(15|
000034E0: 29 00 F7 3C 24 0E 81 58 B2 31 A4 37 35 3A 98 34 |)..<$..X.1.75:.4|
000034F0: 2C 22 2A 22 3B 3A 82 00 0D 3D 2E 0E 81 58 B2 31 |,"*";:...=...X.1|
00003500: A4 32 3A 98 34 2C C7 28 31 33 29 3A 82 00 4C 3D |.2:.4,.(13):..L=|
00003510: 38 0E 98 34 2C 43 43 24 3B 22 20 2A 2A 2A 2A 22 |8..4,CC$;" ****"|
00003520: 3B C8 28 4E 24 28 38 29 AA 22 2C 22 AA 47 4E 24 |;.(N$(8).",".GN$|
00003530: 28 38 29 AA 42 42 24 2C 31 34 29 3B 22 28 23 22 |(8).BB$,14);"(#"|
00003540: 3B C4 28 4E 28 38 29 29 3B 22 29 22 00 73 3D 42 |;.(N(8));")".s=B|
00003550: 0E 98 34 2C 43 43 24 3B 22 20 2A 20 20 20 20 42 |..4,CC$;" * B|
00003560: 2E 20 22 3B C8 28 42 24 28 38 29 AA 42 42 24 2C |. ";.(B$(8).BB$,|
00003570: 31 31 29 00 84 3D 4C 0E 98 34 2C 43 43 24 3B 22 |11)..=L..4,CC$;"|
00003580: 20 2A 20 22 00 C2 3D 56 0E 98 34 2C 44 44 24 3B | * "..=V..4,DD$;|
00003590: 22 2A 2A 2A 2A 22 3B C8 28 4E 24 28 34 29 AA 22 |"****";.(N$(4)."|
000035A0: 2C 22 AA 47 4E 24 28 34 29 AA 42 42 24 2C 31 34 |,".GN$(4).BB$,14|
000035B0: 29 3B 22 28 23 22 3B C4 28 4E 28 34 29 29 3B 22 |);"(#";.(N(4));"|
000035C0: 29 22 00 E9 3D 60 0E 98 34 2C 44 44 24 3B 22 2A |)"..=`..4,DD$;"*|
000035D0: 20 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 34 | B. ";.(B$(4|
000035E0: 29 AA 42 42 24 2C 31 31 29 00 10 3E 6A 0E 98 34 |).BB$,11)..>j..4|
000035F0: 2C 44 44 24 3B 22 2A 20 20 20 20 20 4D 2E 20 22 |,DD$;"* M. "|
00003600: 3B C8 28 4D 24 28 34 29 AA 42 42 24 2C 31 31 29 |;.(M$(4).BB$,11)|
00003610: 00 37 3E 74 0E 98 34 2C 44 44 24 3B 22 2A 20 20 |.7>t..4,DD$;"* |
00003620: 20 20 20 44 2E 20 22 3B C8 28 44 24 28 34 29 AA | D. ";.(D$(4).|
00003630: 42 42 24 2C 31 31 29 00 53 3E 7E 0E 98 34 2C 44 |BB$,11).S>~..4,D|
00003640: 44 24 3B 22 2A 22 3B 42 42 24 3B 42 42 24 3B 22 |D$;"*";BB$;BB$;"|
00003650: 20 2A 22 00 92 3E 88 0E 98 34 2C 41 41 24 3B 22 | *"..>...4,AA$;"|
00003660: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 32 29 AA 22 2C |****";.(N$(2).",|
00003670: 22 AA 47 4E 24 28 32 29 AA 42 42 24 2C 31 34 29 |".GN$(2).BB$,14)|
00003680: 3B 22 28 23 22 3B C4 28 4E 28 32 29 29 3B 22 29 |;"(#";.(N(2));")|
00003690: 22 3B 00 D1 3E 92 0E 98 34 2C 22 20 20 20 20 20 |";..>...4," |
000036A0: 2A 2A 2A 2A 22 3B C8 28 4E 24 28 39 29 AA 22 2C |****";.(N$(9).",|
000036B0: 22 AA 47 4E 24 28 39 29 AA 42 42 24 2C 31 34 29 |".GN$(9).BB$,14)|
000036C0: 3B 22 28 23 22 3B C4 28 4E 28 39 29 29 3B 22 29 |;"(#";.(N(9));")|
000036D0: 22 00 11 3F 9C 0E 98 34 2C 41 41 24 3B 22 2A 20 |"..?...4,AA$;"* |
000036E0: 20 20 20 42 2E 20 22 3B C8 28 42 24 28 32 29 AA | B. ";.(B$(2).|
000036F0: 42 42 24 2C 31 34 29 3B 42 42 24 3B 22 20 20 20 |BB$,14);BB$;" |
00003700: 20 42 2E 20 22 3B C8 28 42 24 28 39 29 2C 31 31 | B. ";.(B$(9),11|
00003710: 29 00 33 3F A6 0E 98 34 2C 41 41 24 3B 22 2A 20 |).3?...4,AA$;"* |
00003720: 20 20 20 4D 2E 20 22 3B C8 28 4D 24 28 32 29 2C | M. ";.(M$(2),|
00003730: 31 31 29 00 55 3F B0 0E 98 34 2C 41 41 24 3B 22 |11).U?...4,AA$;"|
00003740: 2A 20 20 20 20 44 2E 20 22 3B C8 28 44 24 28 32 |* D. ";.(D$(2|
00003750: 29 2C 31 31 29 00 6E 3F BA 0E 98 34 2C 41 41 24 |),11).n?...4,AA$|
00003760: 3B 22 2A 20 22 3B 42 42 24 3B 22 20 2A 22 00 87 |;"* ";BB$;" *"..|
00003770: 3F C4 0E 98 34 2C 41 41 24 3B 22 2A 20 22 3B 42 |?...4,AA$;"* ";B|
00003780: 42 24 3B 22 20 2A 22 00 A9 3F CE 0E 98 34 2C 41 |B$;" *"..?...4,A|
00003790: 41 24 3B 22 2A 20 22 3B 42 42 24 3B 22 20 2A 22 |A$;"* ";BB$;" *"|
000037A0: 3B 42 42 24 3B 42 42 24 3B 00 E7 3F D8 0E 98 34 |;BB$;BB$;..?...4|
000037B0: 2C 22 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 30 |," ****";.(N$(10|
000037C0: 29 AA 22 2C 22 AA 47 4E 24 28 31 30 29 AA 42 42 |).",".GN$(10).BB|
000037D0: 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 |$,14);"(#";.(N(1|
000037E0: 30 29 29 3B 22 29 22 00 01 40 E2 0E 98 34 2C 41 |0));")"..@...4,A|
000037F0: 41 24 3B 22 2A 20 22 3B 42 42 24 3B 22 20 2A 22 |A$;"* ";BB$;" *"|
00003800: 3B 00 29 40 EC 0E 98 34 2C 42 42 24 3B 42 42 24 |;.)@...4,BB$;BB$|
00003810: 3B 22 20 2A 20 20 20 20 42 2E 20 22 3B C8 28 42 |;" * B. ";.(B|
00003820: 24 28 31 30 29 2C 31 31 29 00 4F 40 F6 0E 98 34 |$(10),11).O@...4|
00003830: 2C 41 41 24 3B 22 2A 20 22 3B 42 42 24 3B 22 20 |,AA$;"* ";BB$;" |
00003840: 2A 20 22 3B 42 42 24 3B 42 42 24 3B 22 2A 22 00 |* ";BB$;BB$;"*".|
00003850: 60 40 00 0F 98 34 2C 41 41 24 3B 22 2A 20 22 3B |`@...4,AA$;"* ";|
00003860: 00 9F 40 0A 0F 98 34 2C 42 42 24 3B 22 20 2A 2A |..@...4,BB$;" **|
00003870: 2A 2A 22 3B C8 28 4E 24 28 35 29 AA 22 2C 22 AA |**";.(N$(5).",".|
00003880: 47 4E 24 28 35 29 AA 42 42 24 2C 31 34 29 3B 22 |GN$(5).BB$,14);"|
00003890: 28 23 22 3B C4 28 4E 28 35 29 29 3B 22 29 22 00 |(#";.(N(5));")".|
000038A0: C8 40 14 0F 98 34 2C 41 41 24 3B 22 2A 22 3B 42 |.@...4,AA$;"*";B|
000038B0: 42 24 3B 42 42 24 3B 22 42 2E 20 22 3B C8 28 42 |B$;BB$;"B. ";.(B|
000038C0: 24 28 35 29 2C 31 31 29 00 F1 40 1E 0F 98 34 2C |$(5),11)..@...4,|
000038D0: 41 41 24 3B 22 2A 22 3B 42 42 24 3B 42 42 24 3B |AA$;"*";BB$;BB$;|
000038E0: 22 44 2E 20 22 3B C8 28 44 24 28 35 29 2C 31 31 |"D. ";.(D$(5),11|
000038F0: 29 00 0E 41 28 0F 98 34 2C 41 41 24 3B 22 2A 20 |)..A(..4,AA$;"* |
00003900: 22 3B 41 41 24 3B 22 20 20 20 20 20 2A 22 00 23 |";AA$;" *".#|
00003910: 41 32 0F 98 34 2C 41 41 24 3B 22 2A 20 22 3B 41 |A2..4,AA$;"* ";A|
00003920: 41 24 3B 00 65 41 3C 0F 98 34 2C 22 20 20 20 20 |A$;.eA<..4," |
00003930: 20 2A 2A 2A 2A 22 3B C8 28 4E 24 28 31 31 29 AA | ****";.(N$(11).|
00003940: 22 2C 22 AA 47 4E 24 28 31 31 29 AA 42 42 24 2C |",".GN$(11).BB$,|
00003950: 31 34 29 3B 22 28 23 22 3B C4 28 4E 28 31 31 29 |14);"(#";.(N(11)|
00003960: 29 3B 22 29 22 00 9D 41 46 0F 98 34 2C 42 42 24 |);")"..AF..4,BB$|
00003970: 3B C8 28 4E 24 28 31 29 AA 22 2C 22 AA 47 4E 24 |;.(N$(1).",".GN$|
00003980: 28 31 29 AA 42 42 24 2C 31 34 29 3B 22 28 23 22 |(1).BB$,14);"(#"|
00003990: 3B C4 28 4E 28 31 29 29 3B 22 29 22 3B 00 C1 41 |;.(N(1));")";..A|
000039A0: 50 0F 98 34 2C 41 41 24 3B 22 20 20 20 20 20 20 |P..4,AA$;" |
000039B0: 42 2E 20 22 3B C8 28 42 24 28 31 31 29 2C 31 31 |B. ";.(B$(11),11|
000039C0: 29 00 E0 41 5A 0F 98 34 2C 42 42 24 3B 22 20 20 |)..AZ..4,BB$;" |
000039D0: 42 2E 20 22 3B C8 28 42 24 28 31 29 2C 31 31 29 |B. ";.(B$(1),11)|
000039E0: 00 FF 41 64 0F 98 34 2C 42 42 24 3B 22 20 20 4D |..Ad..4,BB$;" M|
000039F0: 2E 20 22 3B C8 28 4D 24 28 31 29 2C 31 31 29 00 |. ";.(M$(1),11).|
00003A00: 1E 42 6E 0F 98 34 2C 42 42 24 3B 22 20 20 44 2E |.Bn..4,BB$;" D.|
00003A10: 20 22 3B C8 28 44 24 28 31 29 2C 31 31 29 00 29 | ";.(D$(1),11).)|
00003A20: 42 78 0F 98 34 2C 22 A0 22 00 6B 42 82 0F 98 34 |Bx..4,".".kB...4|
00003A30: 2C 42 42 24 3B 22 53 50 4F 55 53 45 3A 20 22 3B |,BB$;"SPOUSE: ";|
00003A40: C8 28 53 24 28 31 29 AA 22 2C 22 AA 53 47 24 28 |.(S$(1).",".SG$(|
00003A50: 31 29 AA 42 42 24 2C 31 34 29 3B 22 28 23 22 3B |1).BB$,14);"(#";|
00003A60: 53 4E 24 28 31 29 3B 22 29 22 3B 00 AD 42 8C 0F |SN$(1);")";..B..|
00003A70: 98 34 2C 42 42 24 3B 42 42 24 3B 22 20 2A 2A 2A |.4,BB$;BB$;" ***|
00003A80: 2A 22 3B C8 28 4E 24 28 31 32 29 AA 22 2C 22 AA |*";.(N$(12).",".|
00003A90: 47 4E 24 28 31 32 29 2C 31 34 29 3B 22 28 23 22 |GN$(12),14);"(#"|
00003AA0: 3B C4 28 4E 28 31 32 29 29 3B 22 29 22 00 E8 42 |;.(N(12));")"..B|
00003AB0: 96 0F 98 34 2C 41 41 24 3B 22 2A 20 22 3B 42 42 |...4,AA$;"* ";BB|
00003AC0: 24 3B 22 20 20 22 3B 42 42 24 3B 42 42 24 3B 22 |$;" ";BB$;BB$;"|
00003AD0: 20 2A 20 20 20 20 20 42 2E 20 22 3B C8 28 42 24 | * B. ";.(B$|
00003AE0: 28 31 32 29 2C 31 31 29 00 0E 43 A0 0F 98 34 2C |(12),11)..C...4,|
00003AF0: 41 41 24 3B 22 2A 20 22 3B 42 42 24 3B 22 20 20 |AA$;"* ";BB$;" |
00003B00: 22 3B 42 42 24 3B 42 42 24 3B 22 20 2A 22 00 1F |";BB$;BB$;" *"..|
00003B10: 43 AA 0F 98 34 2C 41 41 24 3B 22 2A 20 22 3B 00 |C...4,AA$;"* ";.|
00003B20: 5E 43 B4 0F 98 34 2C 42 42 24 3B 22 20 2A 2A 2A |^C...4,BB$;" ***|
00003B30: 2A 22 3B C8 28 4E 24 28 36 29 AA 22 2C 22 AA 47 |*";.(N$(6).",".G|
00003B40: 4E 24 28 36 29 AA 42 42 24 2C 31 34 29 3B 22 28 |N$(6).BB$,14);"(|
00003B50: 23 22 3B C4 28 4E 28 36 29 29 3B 22 29 22 00 8B |#";.(N(6));")"..|
00003B60: 43 BE 0F 98 34 2C 41 41 24 3B 22 2A 22 3B 42 42 |C...4,AA$;"*";BB|
00003B70: 24 3B 22 20 20 2A 20 20 20 20 20 42 2E 20 22 3B |$;" * B. ";|
00003B80: C8 28 42 24 28 36 29 2C 31 31 29 00 B8 43 C8 0F |.(B$(6),11)..C..|
00003B90: 98 34 2C 41 41 24 3B 22 2A 22 3B 42 42 24 3B 22 |.4,AA$;"*";BB$;"|
00003BA0: 20 20 2A 20 20 20 20 20 4D 2E 20 22 3B C8 28 4D | * M. ";.(M|
00003BB0: 24 28 36 29 2C 31 31 29 00 E5 43 D2 0F 98 34 2C |$(6),11)..C...4,|
00003BC0: 41 41 24 3B 22 2A 22 3B 42 42 24 3B 22 20 20 2A |AA$;"*";BB$;" *|
00003BD0: 20 20 20 20 20 44 2E 20 22 3B C8 28 44 24 28 36 | D. ";.(D$(6|
00003BE0: 29 2C 31 31 29 00 0B 44 DC 0F 98 34 2C 41 41 24 |),11)..D...4,AA$|
00003BF0: 3B 22 2A 22 3B 42 42 24 3B 22 20 20 2A 22 3B 42 |;"*";BB$;" *";B|
00003C00: 42 24 3B 42 42 24 3B 22 20 2A 22 00 4A 44 E6 0F |B$;BB$;" *".JD..|
00003C10: 98 34 2C 41 41 24 3B 22 2A 2A 2A 2A 22 3B C8 28 |.4,AA$;"****";.(|
00003C20: 4E 24 28 33 29 AA 22 2C 22 AA 47 4E 24 28 33 29 |N$(3).",".GN$(3)|
00003C30: AA 42 42 24 2C 31 34 29 3B 22 28 23 22 3B C4 28 |.BB$,14);"(#";.(|
00003C40: 4E 28 33 29 29 3B 22 29 22 3B 00 8C 44 F0 0F 98 |N(3));")";..D...|
00003C50: 34 2C 22 20 20 20 20 20 2A 2A 2A 2A 22 3B C8 28 |4," ****";.(|
00003C60: 4E 24 28 31 33 29 AA 22 2C 22 AA 47 4E 24 28 31 |N$(13).",".GN$(1|
00003C70: 33 29 AA 42 42 24 2C 31 34 29 3B 22 28 23 22 3B |3).BB$,14);"(#";|
00003C80: C4 28 4E 28 31 33 29 29 3B 22 29 22 00 C8 44 FA |.(N(13));")"..D.|
00003C90: 0F 98 34 2C 41 41 24 3B 22 20 20 20 20 20 42 2E |..4,AA$;" B.|
00003CA0: 20 22 3B C8 28 42 24 28 33 29 AA 42 42 24 2C 31 | ";.(B$(3).BB$,1|
00003CB0: 34 29 3B 42 42 24 3B 22 20 20 20 20 20 42 2E 20 |4);BB$;" B. |
00003CC0: 22 3B 42 24 28 31 33 29 00 EA 44 04 10 98 34 2C |";B$(13)..D...4,|
00003CD0: 41 41 24 3B 22 20 20 20 20 20 44 2E 20 22 3B C8 |AA$;" D. ";.|
00003CE0: 28 44 24 28 33 29 2C 31 31 29 00 FA 44 0E 10 98 |(D$(3),11)..D...|
00003CF0: 34 2C 44 44 24 3B 22 2A 20 22 00 0A 45 18 10 98 |4,DD$;"* "..E...|
00003D00: 34 2C 44 44 24 3B 22 2A 20 22 00 1A 45 22 10 98 |4,DD$;"* "..E"..|
00003D10: 34 2C 44 44 24 3B 22 2A 20 22 00 33 45 2C 10 98 |4,DD$;"* ".3E,..|
00003D20: 34 2C 44 44 24 3B 22 2A 20 22 3B 42 42 24 3B 42 |4,DD$;"* ";BB$;B|
00003D30: 42 24 3B 00 70 45 36 10 98 34 2C 22 2A 2A 2A 2A |B$;.pE6..4,"****|
00003D40: 22 3B C8 28 4E 24 28 31 34 29 AA 22 2C 22 AA 47 |";.(N$(14).",".G|
00003D50: 4E 24 28 31 34 29 AA 42 42 24 2C 31 34 29 3B 22 |N$(14).BB$,14);"|
00003D60: 28 23 22 3B C4 28 4E 28 31 34 29 29 3B 22 29 22 |(#";.(N(14));")"|
00003D70: 00 81 45 40 10 98 34 2C 44 44 24 3B 22 2A 20 22 |..E@..4,DD$;"* "|
00003D80: 3B 00 A8 45 4A 10 98 34 2C 42 42 24 3B 42 42 24 |;..EJ..4,BB$;BB$|
00003D90: 3B 22 2A 20 20 20 20 42 2E 20 22 3B C8 28 42 24 |;"* B. ";.(B$|
00003DA0: 28 31 34 29 2C 31 31 29 00 C4 45 54 10 98 34 2C |(14),11)..ET..4,|
00003DB0: 44 44 24 3B 22 2A 20 22 3B 42 42 24 3B 42 42 24 |DD$;"* ";BB$;BB$|
00003DC0: 3B 22 2A 22 00 02 46 5E 10 98 34 2C 44 44 24 3B |;"*"..F^..4,DD$;|
00003DD0: 22 2A 2A 2A 2A 22 3B C8 28 4E 24 28 37 29 AA 22 |"****";.(N$(7)."|
00003DE0: 2C 22 AA 47 4E 24 28 37 29 AA 42 42 24 2C 31 34 |,".GN$(7).BB$,14|
00003DF0: 29 3B 22 28 23 22 3B C4 28 4E 28 37 29 29 3B 22 |);"(#";.(N(7));"|
00003E00: 29 22 00 25 46 68 10 98 34 2C 44 44 24 3B 22 20 |)".%Fh..4,DD$;" |
00003E10: 20 20 20 20 20 42 2E 20 22 3B C8 28 42 24 28 37 | B. ";.(B$(7|
00003E20: 29 2C 31 31 29 00 48 46 72 10 98 34 2C 44 44 24 |),11).HFr..4,DD$|
00003E30: 3B 22 20 20 20 20 20 20 44 2E 20 22 3B C8 28 44 |;" D. ";.(D|
00003E40: 24 28 37 29 2C 31 31 29 00 59 46 7C 10 98 34 2C |$(7),11).YF|..4,|
00003E50: 43 43 24 3B 22 20 2A 20 22 00 9B 46 86 10 98 34 |CC$;" * "..F...4|
00003E60: 2C 43 43 24 3B 22 20 2A 2A 2A 2A 22 3B C8 28 4E |,CC$;" ****";.(N|
00003E70: 24 28 31 35 29 AA 22 2C 22 AA 47 4E 24 28 31 35 |$(15).",".GN$(15|
00003E80: 29 AA 42 42 24 2C 31 34 29 3B 22 28 23 22 3B C4 |).BB$,14);"(#";.|
00003E90: 28 4E 28 31 35 29 29 3B 22 29 22 00 BF 46 90 10 |(N(15));")"..F..|
00003EA0: 98 34 2C 43 43 24 3B 22 20 20 20 20 20 20 42 2E |.4,CC$;" B.|
00003EB0: 20 22 3B C8 28 42 24 28 31 35 29 2C 31 31 29 00 | ";.(B$(15),11).|
00003EC0: CD 46 9A 10 98 34 3A A0 34 3A 89 35 30 00 E9 46 |.F...4:.4:.50..F|
00003ED0: A4 10 99 22 93 11 11 11 11 11 44 4F 20 59 4F 55 |..."......DO YOU|
00003EE0: 20 57 49 53 48 20 54 4F 22 00 10 47 AE 10 99 22 | WISH TO"..G..."|
00003EF0: 11 11 20 20 12 50 92 20 20 50 52 49 4E 54 20 41 |.. .P. PRINT A|
00003F00: 4E 4F 54 48 45 52 20 50 45 44 49 47 52 45 45 22 |NOTHER PEDIGREE"|
00003F10: 00 3E 47 B8 10 99 22 11 20 20 20 12 52 92 20 20 |.>G...". .R. |
00003F20: 52 45 54 55 52 4E 20 54 4F 20 46 41 4D 49 4C 59 |RETURN TO FAMILY|
00003F30: 20 54 52 45 45 20 50 52 4F 47 52 41 4D 22 00 53 | TREE PROGRAM".S|
00003F40: 47 C2 10 99 22 11 20 20 20 12 51 92 20 20 51 55 |G...". .Q. QU|
00003F50: 49 54 22 00 70 47 CC 10 99 3A 99 22 45 4E 54 45 |IT".pG...:."ENTE|
00003F60: 52 20 50 2C 52 20 4F 52 20 51 20 20 22 3B 43 24 |R P,R OR Q ";C$|
00003F70: 00 84 47 D6 10 A1 43 24 3A 8B 43 24 B2 22 22 A7 |..G...C$:.C$."".|
00003F80: 34 33 31 30 00 A1 47 E0 10 8B 43 24 B2 22 52 22 |4310..G...C$."R"|
00003F90: A7 43 24 B2 22 43 4F 56 45 52 22 3A 89 34 33 36 |.C$."COVER":.436|
00003FA0: 30 00 B0 47 EA 10 8B 43 24 B2 22 50 22 A7 34 30 |0..G...C$."P".40|
00003FB0: 00 BE 47 EF 10 8B 43 24 B2 22 51 22 A7 80 00 E1 |..G...C$."Q"....|
00003FC0: 47 F4 10 8B 43 24 B2 22 52 22 A7 43 24 B2 22 46 |G...C$."R".C$."F|
00003FD0: 41 4D 49 4C 59 20 54 52 45 45 22 3A 89 34 33 36 |AMILY TREE":.436|
00003FE0: 30 00 EB 47 FE 10 89 34 33 31 30 00 0D 48 08 11 |0..G...4310..H..|
00003FF0: 99 22 93 11 11 11 11 11 11 11 11 11 11 1D 1D 1D |."..............|
00004000: 50 4C 45 41 53 45 20 57 41 49 54 21 22 00 20 48 |PLEASE WAIT!". H|
00004010: 12 11 99 22 4C 4F 41 44 49 4E 47 20 22 3B 43 24 |..."LOADING ";C$|
00004020: 00 47 48 1C 11 99 C7 28 31 39 29 C7 28 31 37 29 |.GH....(19).(17)|
00004030: 22 9B 4C 4F 41 44 22 C7 28 33 34 29 43 24 C7 28 |".LOAD".(34)C$.(|
00004040: 33 34 29 22 2C 38 22 00 5F 48 26 11 99 3A 99 3A |34)",8"._H&..:.:|
00004050: 99 3A 99 3A 99 22 52 55 4E 22 C7 28 31 39 29 00 |.:.:."RUN".(19).|
00004060: 87 48 30 11 97 31 39 38 2C 34 3A 97 36 33 31 2C |.H0..198,4:.631,|
00004070: 31 39 3A 81 42 B2 31 A4 33 3A 97 36 33 31 AA 42 |19:.B.1.3:.631.B|
00004080: 2C 31 33 3A 82 3A 80 00 00 00 |,13:.:.... |
.. ....FB$(19):FD.0:FX.19:U$.",".A....N(
63),N$(63),GN$(63),B$(15),BP$(15),NF$(63
),MN$(63),CB$(20)......SF$(31),GF$(31),S
M$(31),GM$(31)...2.."...FFFFFFFFFFFFFFFF
FFFF".B.<..". PRINT PEDIGREE "...F..
"DDDDDDDDDDDDDDDDDDDD"...P.."OUTPUT TO:"
:."THE SCREEN":."THE PRINTER".(.Z..:."EN
TER (S) OR (P)";.:._..Y$:.Y$."".95.R.A..
Y$.."S".Y$.."P".95.B.D..Y$."P".960...N..
"..NUMBER OF THE PERSON"...X.."WHOSE PED
IGREE YOU "......"WANT TRACED".K....:."(
INPUT 0 TO EXIT)":..R....F... ..F.0.4260
......580......"..";FB$(1);U$;FB$(2)....
.."...................".C.H.."........";
:.X.1.11:..2)"B.":..C.R..".....";:.X.1.5
:..4)"B.":......."......";:.X.1.5:..4)"B
.":......."............";H(FB$(1).U$.FB$
(2),15).O...."(";H(MA$(1).U$.MB$(1),15).
.....".......";......" ....";......" "
;H(FB$(5).U$.FB$(6),15)."...."..........
";.2.".." ....";.R.,.." ";H(FB$(8).U$.
FB$(9),15).N.6.F.E(FB$(7)):FP$.FB$(10).W
.@..580...J.."....";.3)H(FB$(5).U$.FB$(6
),15).C.T.."....";.3)H(FB$(8).U$.FB$(9),
15)...^.FA$.FB$(7):FC$.FB$(10)...H.F.E(F
P$)...R..580...|.."......";.3)H(FB$(5).U
$.FB$(6),15).B...."....";.3)H(FB$(8).U$.
FB$(9),15).]...FW$.FB$(7):FV$.FB$(10).J.
..F.E(FA$).S....580......"...";.6)"O";H(
FB$(5).U$.FB$(6),13).C....".";.6)"L";H(F
B$(8).U$.FB$(9),13)...B.FX$.FB$(7):FY$.F
B$(10):F.E(FC$):.580...L.."..";.6)"O";H(
FB$(5).U$.FB$(6),13).;.V..".";.6)"L";H(F
B$(8).U$.FB$(9),13).D...FT$.FB$(7):FP$.F
B$(10):F.E(FW$):.580......"....";.6)"O";
H(FB$(5).U$.FB$(6),13)......".";.6)"L";H
(FB$(8).U$.FB$(9),13).G...F.E(FV$):.580.
....."..";.6)"O";H(FB$(5).U$.FB$(6),13).
.....".";.6)"L";H(FB$(8).U$.FB$(9),13).:
...FD$.FB$(7):FE$.FB$(10):F.E(FX$).M.&..
A$:.A$."".550.U.0..50._.:..V,90.}.D.. **
*********************...N.. * FDD BLOCK
READ *...X.. **********************
*.V.]..15,8,15,"I0":.2,8,2,"#"...B..890.
..L..15,"B-R:";2;FD;FT;FS...V..780......
FI.1.10. ....2,FB$(FI):..;....2,X$:X.E(X
$):.X.0.730.F....I.1.X.U....2,MA$(I):.D.
...2,MB$(I):.S....2,MC$(I):...F..2,MD$(I
):...P..2,ME$(I):.. .Z..FI.16.17.H....2,
FB$(FI):.:.2,Y$:Y.E(Y$):.Y.0.760......I.
1.Y:.2,CB$(I):.......2,FB$(19):..... 2:
15:....... ***********************.8....
* ERROR CHECK *.V. .. *********
**************.K.*..15,EN,EM$,ET,ES.W.4.
.EN.0.....>.."ERROR STATUS:";EN;EM$;ET;E
S...H.."CONTINUE?";Y$:.Y$."Y".....R.....
\.. ***********************...F.. * SET
TRACK & SECTOR *...P.. ****************
*******.7.Z..F.358.F1.0:F2.22:F3.1:.930.
`....F.357.F.472.F1.357:F2.20:F3.19:.930
......F.471.F.580.F1.471:F2.19:F3.25:.93
0......F.579.F1.579:F2.18:F3.31.F...FT..
(((F.F1).1).(F2.1)).F3.....FS.F.F1.(FT.F
3).F2.(FT.F3.1)............*************
***************.1.J..* PEDIGREE PRINT
OUT *.S.T..*************************
***.Y.....A...P.0......".....NUMBER OF T
HE PERSON"......"WHOSE PEDIGREE YOU"....
.."WISH PRINTED".M....:."(INPUT 0 TO EXI
T)":.......F:.F.0.4260...$..:." 4,5 OR 6
GENERATIONS"......NG.(.8..:.".WAIT -- L
INKING PEDIGREE".1.B..580.;.L..1400.Q.V.
.** PARENTS **.F.`.F.E(NF$(1)):.580.P
.J..1400...T.F.E(MN$(1)):.580...~..1400.
.....** GRANDPARENTS **......J.2.3.G...F
.E(NF$(J)):.580.Q....1400.....F.E(MN$(J)
):.580......1400...D.....N.. ** G GRANDP
ARENTS **...X..J.4.7.1...F.E(NF$(J)):.58
0.;....1440.P...F.E(MN$(J)):.580.Z....14
40.A....J.P....NG.4.3550...... ** GG GRA
NDPARENTS **...(..J.8.15...2.F.E(NF$(J))
:.580...<..1470.L.F.F.E(MN$(J)):.580.V.P
..1470...Z.....D..NG.5.2740...N..1500.<.
X.P.P.1:N(P).F:N$(P).FB$(1):GN$(P).FB$(2
):B$(P).FB$(3):BP$(P).FB$(4).....M$(P).M
D$(1):MP$(P).ME$(1):D$(P).FB$(16):DP$(P)
.FB$(17):S$(P).MA$(1).B...SG$(P).MB$(1):
SN$(P).MC$(1):NF$(P).FB$(7):MN$(P).FB$(1
0).H....... .P.P.1:N(P).F:N$(P).FB$(1):G
N$(P).FB$(2):B$(P).FB$(3):BP$(P).FB$(4).
0...NF$(P).FB$(7):MN$(P).FB$(10).6.....
...P.P.1:N(P).F:N$(P).FB$(1):GN$(P).FB$(
2):NF$(P).FB$(7):MN$(P).FB$(10)...H.SF$(
P).FB$(5):GF$(P).FB$(6):SM$(P).FB$(8):GM
$(P).FB$(9).A.R........ ** SIX GENERATIO
N PEDIGREE **......4,4.,....4,G(14)"PEDI
GREE OF ";GN$(1);" ";N$(1);" (#";D(N(1))
;")".9....4,G(15).O....X.1.75:.4,"*";:..
E....X.1.2:.4,G(13):......AA$." ":
BB$." ":CC$.AA$.AA$.AA$
.AA$.M.".EE$.BB$.BB$.BB$:DD$.AA$.BB$.BB$
." "...,..4,EE$;"***";H(SF$(16).",".GF$
(16).AA$,14);"(#";NF$(16);")".M.6..4,DD$
;"***";H(N$(16).",".GN$(16).AA$,14);"(#"
;D(N(16));")"...@..4,CC$;"***";H(N$(8)."
,".GN$(8).AA$,14);"(#";D(N(8));")";.J.J.
.4," ***";H(SM$(16).",".GM$(16).AA$,14
);"(#";MN$(16);")"...T..4,CC$"* B. ";
H(B$(8).AA$,11);./.^..4,AA$"***";H(SF$(1
7).",".GF$(17).AA$,14);"(#";NF$(17);")".
L.H..4,BB$"***";H(N$(4).",".GN$(4).AA$,1
4);"(#";D(N(4));")";...R..4," ***";H(
N$(17).",".GN$(17).AA$,14);"(#";D(N(17))
;")".R.|..4,BB$;"* B. ";H(B$(4).AA$,11
);......4,BB$;"***";H(SM$(17).",".GM$(17
).AA$,14);"(#";MN$(17);")".8....4,BB$;"*
M. ";H(M$(4).AA$,11);.X....4,BB$;"***
";H(SF$(18).",".GF$(18).AA$,14);"(#";NF$
(18);")"......4,BB$;"* D. ";H(D$(4).AA
$,11);......4,AA$;" ***";H(N$(18).",".G
N$(18).AA$,14);"(#";D(N(18));")"......4,
" ***";H(N$(2).",".GN$(2).AA$,14);"(#";
D(N(2));")";.Y.B..4," ***";H(N$(9).","
.GN$(9).AA$,14);"(#";D(N(9));")";...L..4
," ***";H(SM$(18).",".GM$(18).AA$,14);
"(#";MN$(18);")"...V..4," * B. ";H(B$
(2).AA$,11) ;......4,AA$;" B. ";H(B$
(9).AA$,11);.%....4,AA$;" ***";H(SF$(19)
.",".GF$(19).AA$,14);"(#";NF$(19);")".Q.
...4," * M. ";H(M$(2).AA$,11);BB$;AA$
;......4,"***";H(N$(19).",".GN$(19).AA$,
14);"(#";D(N(19));")"......4," * D. "
;H(D$(2).AA$,11);BB$;AA$;AA$;......4,"
***";H(SM$(19).",".GM$(19).AA$,14);"(#";
MN$(19);")"......4," * ";AA$;AA$;.+.&..
4,"* ";BB$;AA$;AA$;.I.0..4," ***";H(SF$
(20).",".GF$(20).AA$,14);"(#";NF$(20);")
"...:..4," * ";AA$;AA$;...D..4,"*";BB$;
AA$;.Q.N..4," ***";H(N$(20).",".GN$(20).
AA$,14);"(#";D(N(20));")"...X..4," * ";
AA$;AA$;...B..4,"*";AA$;.7.L..4," ***";
H(N$(10).",".GN$(10).AA$,14);"(#";D(N(10
));")";.V.V..4," ***";H(SM$(20).",".GM
$(20).AA$,14);"(#";MN$(20);")"......4,"
* ";AA$;AA$;......4,"*";AA$;.F....4,"
* B. ";H(B$(10).AA$,11);AA$;......4,"
***";H(SF$(21).",".GF$(21).AA$,14);"(#";
NF$(21);")"......4," * ";AA$;AA$;.T....
4,"***";H(N$(5).",".GN$(5).AA$,14);"(#";
D(N(5));")";......4," ***";H(N$(21)."
,".GN$(21).AA$,14);"(#";D(N(21));")"...F
..4," * ";AA$;AA$;.M.P..4," B. ";H(B
$(5).AA$,11);.. Z..4,BB$;"***";H(SM$(21)
.",".GM$(21).AA$,14);"(#";MN$(21);")".$
...4," * ";AA$;AA$;.F ...4," D. ";H(
D$(5).AA$,11);.. ...4,BB$;"***";H(SF$(22
).",".GF$(22).AA$,14);"(#";NF$(22);")"..
...4," *";BB$;AA$;.. ...4,"*";AA$;AA$;
.. ...4," ***";H(N$(22).",".GN$(22).AA$
,14);"(#";D(N(22));")"..! ..4," *";BB$;
AA$;.A!*..4,"***";H(N$(11).",".GN$(11).A
A$,14);"(#";D(N(11));")";..!4..4," ***
";H(SM$(22).",".GM$(22).AA$,14);"(#";MN$
(22);")"..!>..4,H(N$(1).",".GN$(1).AA$,1
4);"(#";D(N(1));")";..!H..4,AA$;" B.
";H(B$(11).AA$,11);AA$;.."R..4," ***";H
(SF$(23).",".GF$(23).AA$,14);"(#";NF$(23
);")".@"\..4," B. ";H(B$(1).AA$,11);CC$;
.~"F..4," ***";H(N$(23).",".GN$(23).AA$
,14);"(#";D(N(23));")".."P..4," M. ";H(M
$(1).AA$,11);CC$;AA$;.."Z..4," ***";H
(SM$(23).",".GM$(23).AA$,14);"(#";MN$(23
);")"..#...4," D. ";H(D$(1).AA$,11);CC$;
AA$;.L#...4," ***";H(SF$(24).",".GF$(
24).AA$,14);"(#";NF$(24);")"..#...4,DD$;
"***";H(N$(24).",".GN$(24).AA$,14);"(#";
D(N(24));")".J#...4,"SPOUSE: ";H(S$(1)."
,".SG$(1).AA$,14);"(#";SN$(1);")";..$...
4," ***";H(N$(12).",".GN$(12).AA$,14);"
(#";D(N(12));")";.H$...4," ***";H(SM$(
24).",".GM$(24).AA$,14);"(#";MN$(24);")"
.^$...4," *";AA$;BB$;..$J..4,"* B. ";
H(B$(12).AA$,11);AA$;.B$T..4," ***";H(SF
$(25).",".GF$(25).AA$,14);"(#";NF$(25);"
)".Y$...4," * ";AA$;AA$;..%...4,"***";H
(N$(6).",".GN$(6).AA$,14);"(#";D(N(6));"
)";.S%...4," ***";H(N$(25).",".GN$(25
).AA$,14);"(#";D(N(25));")".J%...4," *
";AA$;AA$;..%...4,"* B. ";H(B$(6).AA$,
11);.L%...4,BB$;"***";H(SM$(25).",".GM$(
25).AA$,14);"(#";MN$(25);")"..%...4," *
";AA$;AA$;..&$..4,"* M. ";H(M$(6).AA$
,11);.E&...4,BB$;"***";H(SF$(26).",".GF$
(26).AA$,14);"(#";NF$(26);")".\&8..4,"
* ";AA$;AA$;.~&B..4,"* D. ";H(D$(6).AA
$,11);..&L..4,AA$;" ***";H(N$(26).",".G
N$(26).AA$,14);"(#";D(N(26));")"..&V..4,
" ***";H(N$(3).",".GN$(3).AA$,14);"(#";
N(3);")";.8'`..4," ***";H(N$(13).",".GN
$(13).AA$,14);"(#";D(N(13));")";.W'J..4,
" ***";H(SM$(26).",".GM$(26).AA$,14);"
(#";MN$(26);")"..'T..4," B. ";H(B$(
3).AA$,11);AA$;.G'~..4," B. ";H(B$(1
3).AA$,11);AA$;..(...4," ***";H(SF$(27).
",".GF$(27).AA$,14);"(#";NF$(27);")".0(.
..4," D. ";H(D$(3).AA$,11);AA$;BB$;
.L(...4,"***";H(N$(27).",".GN$(27).AA$,1
4);"(#";D(N(27));")"..(...4,BB$;"*";CC$;
AA$;..(...4,"***";H(SM$(27).",".GM$(27).
AA$,14);"(#";MN$(27);")".X(...4,BB$;"*";
CC$;AA$;..)D..4,"***";H(SF$(28).",".GF$(
28).AA$,14);"(#";NF$(28);")"".-)N..4,BB$
;"*";BB$;AA$;.J)X..4," ***";H(N$(28).","
.GN$(28).AA$,14);"(#";D(N(28));")".)...
4,BB$;"* ";AA$;..)...4," ***";H(N$(14)."
,".GN$(14).AA$,14);"(#";D(N(14));")";..)
...4," ***";H(SM$(28).",".GM$(28).AA$,
14);"(#";MN$(28);")"..*...4,BB$;"*";AA$;
.9*...4," * B. ";H(B$(14).AA$,11);AA$
;.V*...4," ***";H(SF$(29).",".GF$(29).AA
$,14);"(#";NF$(29);")"..*...4,BB$;"***";
H(N$(7).",".GN$(7).AA$,14);"(#";D(N(7));
")";..*(..4," ***";H(N$(29).",".GN$(2
9).AA$,14);"(#";D(N(29));")"..+2..4,BB$;
" B. ";H(B$(7).AA$,11);.Z+<..4,BB$;"*
**";H(SM$(29).",".GM$(29).AA$,14);"(#";M
N$(29);")"..+F..4,BB$;" D. ";H(D$(7).
AA$,11);..+P..4,BB$;"***";H(SF$(30).",".
GF$(30).AA$,14);"(#";NF$(30);")".Y+Z..4,
CC$;"* ";AA$;AA$;..,D..4," ***";H(N$(30)
.",".GN$(30).AA$,14);"(#";D(N(30));")".W
,N..4,CC$;"***";H(N$(15).",".GN$(15).AA$
,14);"(#";D(N(15));")";..,X..4," ***";
H(SM$(30).",".GM$(30).AA$,14);"(#";MN$(3
0);")"..,...4,CC$;" B. ";H(B$(15).AA$
,11);..,...4,AA$;" ***";H(SF$(31).",".GF
$(31).AA$,14);"(#";NF$(31);")".>-...4,DD
$;"***";H(N$(31).",".GN$(31).AA$,14);"(#
";D(N(31));")".~- ..4,EE$;"***";H(SM$(31
).",".GM$(31).AA$,14);"(#";MN$(31);")"..
-...4: 4:.50..-... ** FIVE GENERATION PE
DIGREE **..-..AA$." ":BB$.AA$.AA$
:CC$.BB$.AA$:DD$.BB$.BB$." ":EE$.DD$.B
B$...H..4,4.A.R..4,G(14)"PEDIGREE OF ";G
N$(1);" ";N$(1);" (#";D(N(1));")".N....4
,G(15).D....X.1.75:.4,"*";:..Z....X.1.2:
.4,G(13):.......4,EE$;" ****";H(N$(16).
",".GN$(16).AA$,14);"(#";D(N(16));")"...
...4,DD$;" ****";H(N$(8).",".GN$(8).AA$,
14);"(#";D(N(8));")".#/...4,DD$;" * B
. ";H(B$(8).AA$,11).C/...4,CC$;" ****";H
(N$(4).",".GN$(4).AA$,14);"(#";D(N(4));"
)";../"..4," ****";H(N$(17).",".GN$(1
7).AA$,14);"(#";D(N(17));")".K/,..4,CC$;
" * B. ";H(B$(4).AA$,11)../6..4,CC$;"
* M. ";H(M$(4).AA$,11)..0@..4,CC$;"
* D. ";H(D$(4).AA$,11);.\0J..4,AA$;"
****";H(N$(18).",".GN$(18).AA$,14);"(#";
D(N(18));")"..0T..4,AA$;"****";H(N$(2)."
,".GN$(2).AA$,14);"(#";D(N(2));")";..0^.
.4," ";"****";H(N$(9).",".GN$(9).AA$,
14);"(#";D(N(9));")"..1H..4,AA$;"* B.
";H(B$(2).AA$,11);.*1R..4,AA$;" B.
";H(B$(9).AA$,11).Q1|..4,AA$;"* M. "
;H(M$(2).AA$,11);..1...4,CC$;" ****";H(
N$(19).",".GN$(19).AA$,14);"(#";D(N(19))
;")"..1...4,AA$;"* D. ";H(D$(2).AA$,1
1).Q1...4,AA$;"*";BB$;"*"..1...4,AA$;"*"
;BB$;"*";CC$;.-2...4," ****";H(N$(20).
",".GN$(20).AA$,14);"(#";D(N(20));")".E2
...4,AA$;"*";BB$;"*";..2B..4,AA$;" ****
";H(N$(10).",".GN$(10).AA$,14);"(#";D(N(
10));")". 2L..4,AA$;"*";BB$;"*";.I2V..4,
AA$;" * B. ";H(B$(10).AA$,11).Y2...4
,AA$;"*";..3...4,BB$;"****";H(N$(5).",".
GN$(5).AA$,14);"(#";D(N(5));")";.Y3...4,
" ****";H(N$(21).",".GN$(21).AA$,14);
"(#";D(N(21));")"..3...4,AA$;"*";BB$;"
B. ";H(B$(5).AA$,11)..3...4,AA$;"*";
BB$;" D. ";H(D$(5).AA$,11).R3...4,A
A$;"*";CC$;" *";..4...4,BB$;"****";H(N
$(22).",".GN$(22).AA$,14);"(#";D(N(22));
")".&4&..4,AA$;"* ";.G40..4,CC$;"****"
;H(N$(11).",".GN$(11).AA$,14);"(#";D(N(1
1));")"..4:..4,H(N$(1).",".GN$(1).AA$,14
);"(#";D(N(1));")";.A4D..4,BB$;" B. "
;H(B$(11).AA$,11)..4N..4," B. ";H(B$(1).
AA$,11);DD$;.$5X..4," ****";H(N$(23)."
,".GN$(23).AA$,14);"(#";D(N(23));")".B5B
..4," M. ";H(M$(1).AA$,11).`5L..4," D. "
;H(D$(1).AA$,11)..5V..4,EE$;" ****";H(N
$(24).",".GN$(24).AA$,14);"(#";D(N(24));
")"..5...4,"SPOUSE: ";H(S$(1).",".SG$(1)
.AA$,14);"(#";SN$(1);")";AA$;.$6...4,"
****";H(N$(12).",".GN$(12).AA$,14);"(#";
D(N(12));")".V6...4,AA$;"*";CC$;" *
B. ";H(B$(12).AA$,11).F6...4,AA$;"*";..
6...4,BB$;"****";H(N$(6).",".GN$(6).AA$,
14);"(#";D(N(6));")";..6...4," ****";
H(N$(25).",".GN$(25).AA$,14);"(#";D(N(25
));")"..7...4,AA$;"*";BB$;"* B. ";H(B
$(6).AA$,11).B7F..4,AA$;"*";BB$;"* M.
";H(M$(6).AA$,11).Q7P..4,AA$;"*";BB$;"*
D. ";H(D$(6).AA$,11);..7Z..4,AA$;" *
***";H(N$(26).",".GN$(26).AA$,14);"(#";D
(N(26));")"..7...4,AA$;"****";H(N$(3).",
".GN$(3).AA$,14);"(#";N(3);")";./8...4,"
****";H(N$(13).",".GN$(13).AA$,14);"(
#";D(N(13));")".V8...4,AA$;" B. ";H(
B$(3).AA$,11);.~8...4,AA$;" B. ";H(
B$(13).AA$,11)..8...4,AA$;" D. ";H(D
$(3).AA$,11);CC$;..8...4," ****";H(N$(2
7).",".GN$(27).AA$,14);"(#";D(N(27));")"
..8 ..4,CC$;" *"..9*..4,CC$;" *"..94..4,
CC$;" *".,9>..4,CC$;" * ";.M9H..4,CC$;
"****";H(N$(28).",".GN$(28).AA$,14);"(#"
;D(N(28));")"..9R..4,CC$;" * ";.A9\..4,
AA$;"****";H(N$(14).",".GN$(14).AA$,14);
"(#";D(N(14));")".T9F..4,CC$;" * ";..9P
..4,AA$;"* B. ";H(B$(14).AA$,11).;:Z.
.4,CC$;" ****";H(N$(7).",".GN$(7).AA$,14
);"(#";D(N(7));")";.|:...4," ****";H(
N$(29).",".GN$(29).AA$,14);"(#";D(N(29))
;")"..:...4,CC$;" B. ";H(B$(7).AA$,
11).J:...4,CC$;" D. ";H(D$(7).AA$,1
1)..:...4,DD$;" *";BB$;..;...4,"****";H(
N$(30).",".GN$(30).AA$,14);"(#";D(N(30))
;")".Z;...4,DD$;" ****";H(N$(15).",".GN$
(15),14);"(#";D(N(15));")"..;...4,DD$;"
B. ";H(B$(15).AA$,11).A;J..4,EE$;"
****";H(N$(31).",".GN$(31),14);"(#";D(N
(31));")".O;T..4: 4:.50..;... ** FOUR GE
NERATION PEDIGREE **.$<..AA$."
":BB$." ".A<..CC$."
"..<..DD$."
"..<...4,4.T<...4,G(14)"PEDI
GREE OF ";GN$(1);" ";N$(1);" (#";D(N(1))
;")"..<...4,G(15)..<$..X.1.75:.4,"*";:..
.=...X.1.2:.4,G(13):..L=8..4,CC$;" ****"
;H(N$(8).",".GN$(8).BB$,14);"(#";D(N(8))
;")".S=B..4,CC$;" * B. ";H(B$(8).BB$,
11)..=L..4,CC$;" * ".B=V..4,DD$;"****";H
(N$(4).",".GN$(4).BB$,14);"(#";D(N(4));"
)"..=`..4,DD$;"* B. ";H(B$(4).BB$,11
)..>J..4,DD$;"* M. ";H(M$(4).BB$,11)
.7>T..4,DD$;"* D. ";H(D$(4).BB$,11).
S>~..4,DD$;"*";BB$;BB$;" *"..>...4,AA$;"
****";H(N$(2).",".GN$(2).BB$,14);"(#";D(
N(2));")";.Q>...4," ****";H(N$(9).",
".GN$(9).BB$,14);"(#";D(N(9));")"..?...4
,AA$;"* B. ";H(B$(2).BB$,14);BB$;"
B. ";H(B$(9),11).3?...4,AA$;"* M. ";
H(M$(2),11).U?...4,AA$;"* D. ";H(D$(2
),11).N?...4,AA$;"* ";BB$;" *"..?D..4,AA
$;"* ";BB$;" *"..?N..4,AA$;"* ";BB$;" *"
;BB$;BB$;..?X..4," ****";H(N$(10).",".GN
$(10).BB$,14);"(#";D(N(10));")"..@...4,A
A$;"* ";BB$;" *";.)@...4,BB$;BB$;" *
B. ";H(B$(10),11).O@...4,AA$;"* ";BB$;"
* ";BB$;BB$;"*".`@...4,AA$;"* ";..@...4,
BB$;" ****";H(N$(5).",".GN$(5).BB$,14);"
(#";D(N(5));")".H@...4,AA$;"*";BB$;BB$;"
B. ";H(B$(5),11)..@...4,AA$;"*";BB$;BB$;
"D. ";H(D$(5),11)..A(..4,AA$;"* ";AA$;"
*".#A2..4,AA$;"* ";AA$;.EA<..4,"
****";H(N$(11).",".GN$(11).BB$,14);"(#"
;D(N(11));")"..AF..4,BB$;H(N$(1).",".GN$
(1).BB$,14);"(#";D(N(1));")";.AAP..4,AA$
;" B. ";H(B$(11),11)..AZ..4,BB$;"
B. ";H(B$(1),11)..AD..4,BB$;" M. ";H(M$
(1),11)..BN..4,BB$;" D. ";H(D$(1),11).)
BX..4," ".KB...4,BB$;"SPOUSE: ";H(S$(1).
",".SG$(1).BB$,14);"(#";SN$(1);")";..B..
.4,BB$;BB$;" ****";H(N$(12).",".GN$(12),
14);"(#";D(N(12));")"..B...4,AA$;"* ";BB
$;" ";BB$;BB$;" * B. ";H(B$(12),11)
..C ..4,AA$;"* ";BB$;" ";BB$;BB$;" *"..
C...4,AA$;"* ";.^C...4,BB$;" ****";H(N$(
6).",".GN$(6).BB$,14);"(#";D(N(6));")"..
C...4,AA$;"*";BB$;" * B. ";H(B$(6),
11)..CH..4,AA$;"*";BB$;" * M. ";H(M
$(6),11)..CR..4,AA$;"*";BB$;" * D.
";H(D$(6),11)..D...4,AA$;"*";BB$;" *";B
B$;BB$;" *".JD...4,AA$;"****";H(N$(3).",
".GN$(3).BB$,14);"(#";D(N(3));")";..D...
4," ****";H(N$(13).",".GN$(13).BB$,1
4);"(#";D(N(13));")".HD...4,AA$;" B.
";H(B$(3).BB$,14);BB$;" B. ";B$(13)
..D...4,AA$;" D. ";H(D$(3),11)..D...
4,DD$;"* "..E...4,DD$;"* "..E"..4,DD$;"*
".3E,..4,DD$;"* ";BB$;BB$;.PE6..4,"****
";H(N$(14).",".GN$(14).BB$,14);"(#";D(N(
14));")"..E@..4,DD$;"* ";..EJ..4,BB$;BB$
;"* B. ";H(B$(14),11).DET..4,DD$;"* "
;BB$;BB$;"*"..F^..4,DD$;"****";H(N$(7)."
,".GN$(7).BB$,14);"(#";D(N(7));")".%FH..
4,DD$;" B. ";H(B$(7),11).HFR..4,DD$
;" D. ";H(D$(7),11).YF|..4,CC$;" *
"..F...4,CC$;" ****";H(N$(15).",".GN$(15
).BB$,14);"(#";D(N(15));")"..F...4,CC$;"
B. ";H(B$(15),11).MF...4: 4:.50..F
..."......DO YOU WISH TO"..G...".. .P.
PRINT ANOTHER PEDIGREE".>G...". .R.
RETURN TO FAMILY TREE PROGRAM".SGB..".
.Q. QUIT".PGL..:."ENTER P,R OR Q ";C$
..GV..C$:.C$."".4310..G...C$."R".C$."COV
ER":.4360..G...C$."P".40..G...C$."Q"....
G...C$."R".C$."FAMILY TREE":.4360..G...4
310..H..."..............PLEASE WAIT!". H
..."LOADING ";C$.GH...G(19)G(17)".LOAD"G
(34)C$G(34)",8"._H&..:.:.:.:."RUN"G(19).
.H0..198,4:.631,19:.B.1.3:.631.B,13:.:..
..
> CLICK IMAGE PREVIEW FOR FULL MODAL