Xref: utzoo soc.roots:140 comp.binaries.ibm.pc:454
Path: utzoo!mnetor!uunet!lll-winken!lll-tis!ames!killer!mazda
From: mazda@killer.UUCP (John Wilson)
Newsgroups: soc.roots,comp.binaries.ibm.pc
Subject: Genealogy Prog. in BASIC
Message-ID: <3571@killer.UUCP>
Date: 4 Mar 88 20:47:29 GMT
Organization: The Unix(R) Connection, Dallas, Texas
Lines: 47
Keywords: Part 1 of 7




This is PART ZERO of of the program "Genealogy on Display."
A BASIC program which can be run on an MS-DOS / BASIC PC.
The User's Manual <genea(n).doc> consists of 80+ pages.
This Public Domain software is UUENCODED and ARC'ed.
Remove everything above the line, run UUDECODE and then
extract the individual files with your ARCHIVE program.

-------------------------------------------------------------
begin 644 runfirst.bas
M_V8.9 "/(%!R;V=R86T@=&\@<VAO=R!N97<@=7-E<G,@:&]W('1O('-T87)T
M &P.;@"1 +P.> "1(")4:&4@1V5N96%L;V=Y($].($1)4U!,05D@4')O9W)A
M;7,@86YD('1H92!$;V-U;65N=&%T:6]N(&%R92!A;&P@;VX@=&AI<R( VPZ"
M )$@(D1I<W1R:6)U=&EO;B!$:7-K971T92XB .$.C "1 "H/E@"1(")4;R!B
M96=I;BP@8G)I;F<@=7 @24)-(%!#($1/4R H5F5R<VEO;B R+C @;W(@;&%T
M97(I+"!A;F0@0D%324,N(@ P#Z  D0"%#ZH D2 B*$YO=&4Z("!)9B!Y;W4@
M87)E('5S:6YG(&$@<')I;G1E<B!O=&AE<B!T:&%N('1H92!)0DT@36%T<FEX
M(&]R($E"32!'<F%P:&EC<R( V0^T )$@(E!R:6YT97(L('EO=2!M87D@;F5E
M9"!T;R!M;V1I9GD@=&AE(&1O8W5M96YT871I;VX@=&\@9FET('EO=7(@<')I
M;G1E<BX@(%)U;B( &1"^ )$@(G1H92!"05-)0R!P<F]G<F%M("=P<FEN=&5R
M<RYB87,G(&9O<B!M;W)E(&EN9F]R;6%T:6]N+BDB !\0R "1 '$0T@"1(")-
M86ME('-U<F4@=&AA="!T:&4@<')I;G1E<B!I<R!O;BP@86YD('1H96X@3$]!
M1"!A;F0@4E5.('1H92!"05-)0R!P<F]G<F%M(@#$$-P D2 B)V1I<F5C=&]R
M+F)A<R<@9G)O;2!T:&ES($1I<W1R:6)U=&EO;B!$:7-K971T92X@(%1H:7,@
M=VEL;"!P<FEN="!A(%!R;V=R86TB !<1Y@"1(")$:7)E8W1O<GDL('=H:6-H
M(&-O;G1A:6YS(&EN9F]R;6%T:6]N(&%B;W5T('1H92!R97-T(&]F('1H92!D
M;V-U;65N=&%T:6]N+"( 3!'P )$@(F%N9"!A8F]U="!T:&4@1V5N96%L;V=Y
M($].($1)4U!,05D@<')O9W)A;7,N(@!2$?H D0"F$00!D2 B1F]L;&]W:6YG
M('1H92!I;G-T<G5C=&EO;G,@:6X@=&AE(%!R;V=R86T@1&ER96-T;W)Y+"!,
M3T%$(&%N9"!254X@=&AE(&]T:&5R(@#[$0X!D2 B<VEX(&1O8W5M96YT871I
M;VX@<')O9W)A;7,L(&5A8V@@;V8@=VAI8V@@=VEL;"!P<FEN="!A('-E8W1I
M;VX@;V8@=&AE(%5S97(G<R( 41(8 9$@(DUA;G5A;"X@(" @*$AA=F4@<&QE
M;G1Y(&]F('!A<&5R(')E861Y+"!S:6YC92!T:&4@57-E<B=S($UA;G5A;"!I
M<R!M86YY+"!M86YY(@"C$B(!D2 B<&%G97,@;&]N9RXI("!)9B!Y;W4@=V%N
M="P@>6]U(&-A;B!T<FEM('1H92!P86=E<R!O9B!T:&4@57-E<B=S($UA;G5A
M;"!T;R( P1(L 9$@(C4M,2\R('@@."TQ+S(@:6YC:&5S+B( QQ(V 9$ $Q- 
M 9$@(E1H92!5<V5R)W,@36%N=6%L(&5X<&QA:6YS('1H92!F=6YC=&EO;G,@
M;V8@=&AE($=E;F5A;&]G>2!/3B!$25-03$%9 #H32@&1(")P<F]G<F%M<RP@
?86YD(&AO=R!T;R!U<V4@=&AE;2XB $ 35 &!    &@&1
 
end
-- 
--------------------------------------------------------------------------------
...the greatest sensation of existence, |   J.P.Wilson - ...!killer!mazda     
   not to trust, but to know.    a.r.   |                   mazda@killer.UUCP
--------------------------------------------------------------------------------