'.$strret.'';
}
if(isset($_POST['letter1g']) && isset($_POST['letter2g']) && isset($_POST['hh11']) && isset($_POST['hh21']) && isset($_POST['hh12']) && isset($_POST['hh22']))
{
if($_POST['hh11']=="homo")
{
if(isset($_POST['hh11dr']))
{
if($_POST['hh11dr']=="d")
{
$p11[0]=strtoupper($_POST['letter1g']);
$p11[1]=strtoupper($_POST['letter1g']);
}
else if($_POST['hh11dr']=="r")
{
$p11[0]=strtolower($_POST['letter1g']);
$p11[1]=strtolower($_POST['letter1g']);
}
}
else{echo "Please input dominant or recessive for homozygous.
";}
}
else if($_POST['hh11']=="hete")
{
$p11[0]=strtoupper($_POST['letter1g']);
$p11[1]=strtolower($_POST['letter1g']);
}
if($_POST['hh21']=="homo")
{
if(isset($_POST['hh21dr']))
{
if($_POST['hh21dr']=="d")
{
$p21[0]=strtoupper($_POST['letter2g']);
$p21[1]=strtoupper($_POST['letter2g']);
}
else if($_POST['hh21dr']=="r")
{
$p21[0]=strtolower($_POST['letter2g']);
$p21[1]=strtolower($_POST['letter2g']);
}
}
else{echo "Please input dominant or recessive for homozygous.
";}
}
else if($_POST['hh21']=="hete")
{
$p21[0]=strtoupper($_POST['letter2g']);
$p21[1]=strtolower($_POST['letter2g']);
}
if($_POST['hh12']=="homo")
{
if(isset($_POST['hh12dr']))
{
if($_POST['hh12dr']=="d")
{
$p12[0]=strtoupper($_POST['letter1g']);
$p12[1]=strtoupper($_POST['letter1g']);
}
else if($_POST['hh12dr']=="r")
{
$p12[0]=strtolower($_POST['letter1g']);
$p12[1]=strtolower($_POST['letter1g']);
}
}
else{echo "Please input dominant or recessive for homozygous.
";}
}
else if($_POST['hh12']=="hete")
{
$p12[0]=strtoupper($_POST['letter1g']);
$p12[1]=strtolower($_POST['letter1g']);
}
if($_POST['hh22']=="homo")
{
if(isset($_POST['hh22dr']))
{
if($_POST['hh22dr']=="d")
{
$p22[0]=strtoupper($_POST['letter2g']);
$p22[1]=strtoupper($_POST['letter2g']);
}
else if($_POST['hh22dr']=="r")
{
$p22[0]=strtolower($_POST['letter2g']);
$p22[1]=strtolower($_POST['letter2g']);
}
}
else{echo "Please input dominant or recessive for homozygous.
";}
}
else if($_POST['hh22']=="hete")
{
$p22[0]=strtoupper($_POST['letter2g']);
$p22[1]=strtolower($_POST['letter2g']);
}
echo 'For a cross between Genotypes '.$p11[0].$p11[1].$p21[0].$p21[1].' and '.$p12[0].$p12[1].$p22[0].$p22[1].':
| | '.$p11[0].$p21[0].' | '.$p11[0].$p21[1].' | '.$p11[1].$p21[0].' | '.$p11[1].$p21[1].' |
| '.$p12[0].$p22[0].' | '.format($p11[0], $p12[0], $p21[0], $p22[0]).format($p11[0], $p12[0], $p21[1], $p22[0]).format($p11[1], $p12[0], $p21[0], $p22[0]).format($p11[1], $p12[0], $p21[1], $p22[0]).'
| '.$p12[0].$p22[1].' | '.format($p11[0], $p12[0], $p21[0], $p22[1]).format($p11[0], $p12[0], $p21[1], $p22[1]).format($p11[1], $p12[0], $p21[0], $p22[1]).format($p11[1], $p12[0], $p21[1], $p22[1]).'
| '.$p12[1].$p22[0].' | '.format($p11[0], $p12[1], $p21[0], $p22[0]).format($p11[0], $p12[1], $p21[1], $p22[0]).format($p11[1], $p12[1], $p21[0], $p22[0]).format($p11[1], $p12[1], $p21[1], $p22[0]).'
| '.$p12[1].$p22[1].' | '.format($p11[0], $p12[1], $p21[0], $p22[1]).format($p11[0], $p12[1], $p21[1], $p22[1]).format($p11[1], $p12[1], $p21[0], $p22[1]).format($p11[1], $p12[1], $p21[1], $p22[1]).'
There are:
'.$g12dom.' Dominant/Dominant
'.$g1dom2rec.' Dominant/Recessive
'.$g1rec2dom.' Recessive/Dominant
'.$g12rec.' Recessive/Recessive
Note: Above are respective. Dom/Rec=Gene1 is dominant, Gene2 is recessive.
----------------------
';
}
else{echo "Please input heterozygous or homozygous and the abbreviation for goth genes and both parents.
";}
?>