This page is still under development so not all features are working properly

Please choose a person and a tree type:



Generations:
Level of Detail:
"; $fid=$personnode; $fid = db_result(db_query("SELECT fid FROM {family_facts} WHERE nid=%d", $personnode)); if (!isset($fid)||!isset($treetype)) { // family_indi_list("ALL"); return $content; } switch($treetype){ case 'a': $treearray[0][1]=family_tree_get_info($fid); for($level=1;$level<=$length;$level++){ for($familyno=1;$familyno<=pow(2,$level);$familyno++){ $childid=$treearray[($level-1)][(ceil($familyno/2))]['fid']; $fam = db_result(db_query("SELECT f.fid FROM {family_facts} f, {family_relations} r "."WHERE (f.fact_code = '%s' AND f.fid=r.fid2 AND r.fid1= %d AND r.relation_description='%s')", "FAM", $childid,"CHIL")); if ($fam) { $father = db_result(db_query("SELECT fid1 FROM {family_relations} WHERE (fid2 = %d AND relation_description='%s')", $fam, "HUSB")); if ($father) { $treearray[$level][$familyno]= family_tree_get_info($father); } $familyno++; $mother = db_result(db_query("SELECT fid1 FROM {family_relations} WHERE (fid2 = %d AND relation_description='%s')", $fam, "WIFE")); if ($mother) { $treearray[$level][$familyno]= family_tree_get_info($mother); } } } } $toprowcells=pow(2,$length); $totalwidth=$toprowcells*120; $content.='


'; for($level=$length;$level>=0;$level--){ $content.=' '; for($familyno=1;$familyno<=pow(2,$level);$familyno++){ $content.= ' '; } $content.=' '; } $content.='

'; if($level!=$length){ // previous method for width of image '.((100/(pow(2,$level-1)))-(2/$level)).' $content.='
'; } if(isset($treearray[$level][$familyno]['NAME'])){ $content.=$treearray[$level][$familyno]['NAME']; if($detail==2&&$treearray[$level][$familyno]['NAME']!='Private'){ $content.='
b. '.$treearray[$level][$familyno]['BIRT'].'
d. '.$treearray[$level][$familyno]['DEAT'].'
'; } }else{ $content.='Unknown'; } $content.='

'; break; Case 'd': $treearray= array(); $treearray[1][]=107; //$content.='

The descendancy graphs are yet to be completed; hence it probably wont work

'; //$treearray=family_tree_get_info($fid); //$treearray.=family_tree_getchildren($fid,$length,'1'); //$content.=$treearray['NAME']; break; } $content.="

"; return $content; }