Exemple #1
0
 if ($ubt1 == 0) {
     echo '<tr>';
     echo "<td><font color='#0000ff'><b> House </b></font></td>";
     echo "<td><font color='#0000ff'><b> Longitude </b></font></td>";
     echo "<td> &nbsp </td>";
     echo '</tr>';
     for ($i = LAST_PLANET + 1; $i <= LAST_PLANET + 12; $i++) {
         echo '<tr>';
         if ($i == LAST_PLANET + 1) {
             echo "<td>Ascendant </td>";
         } elseif ($i == LAST_PLANET + 10) {
             echo "<td>MC (Midheaven) </td>";
         } else {
             echo "<td>House " . ($i - LAST_PLANET) . "</td>";
         }
         echo "<td><font face='Courier New'>" . Convert_Longitude($longitude1[$i]) . "</font></td>";
         echo "<td> &nbsp </td>";
         echo '</tr>';
     }
 }
 echo '</table></center>', "\n";
 echo "<br /><br />";
 // display natal data - aspect table
 echo '<center><table width="40%" cellpadding="0" cellspacing="0" border="0">', "\n";
 echo '<tr>';
 echo "<td><font color='#0000ff'><b> Planet </b></font></td>";
 echo "<td><font color='#0000ff'><b> Aspect </b></font></td>";
 echo "<td><font color='#0000ff'><b> Planet </b></font></td>";
 echo "<td><font color='#0000ff'><b> Orb </b></font></td>";
 echo '</tr>';
 // include Ascendant and MC
function Find_Specific_Report_Paragraph($phrase_to_look_for, $file, $pl1_name, $aspect, $pl2_name, $pl_pos, $pl_speed)
{
    $string = "";
    $len = strlen($phrase_to_look_for);
    //put entire file contents into an array, line by line
    $file_array = file($file);
    // look through each line searching for $phrase_to_look_for
    for ($i = 0; $i < count($file_array); $i++) {
        if (left(trim($file_array[$i]), $len) == $phrase_to_look_for) {
            $flag = 0;
            while (trim($file_array[$i]) != "*") {
                if ($flag == 0) {
                    if ($pl_speed < 0) {
                        //retrograde
                        $string .= "<b>" . $pl1_name . $aspect . $pl2_name . "</b> - " . $pl1_name . " (Rx) at " . Convert_Longitude($pl_pos) . "<br>";
                    } else {
                        $string .= "<b>" . $pl1_name . $aspect . $pl2_name . "</b> - " . $pl1_name . " at " . Convert_Longitude($pl_pos) . "<br>";
                    }
                } else {
                    $string .= $file_array[$i];
                }
                $flag = 1;
                $i++;
            }
            break;
        }
    }
    return $string;
}
imageline($im, $margins, $cell_height * $num_planets, $margins + $cell_width * $i, $cell_height * $num_planets, $black);
// draw the grid - vertical lines
for ($i = 1; $i <= $last_planet_num; $i++) {
    imageline($im, $margins + $cell_width * $i, $cell_height * $num_planets, $margins + $cell_width * $i, $cell_height * $i, $black);
}
imageline($im, $margins, $cell_height * $num_planets, $margins, $cell_height, $black);
// ------------------------------------------
// draw in the planet glyphs
for ($i = 0; $i <= $last_planet_num; $i++) {
    drawboldtext($im, 18, 0, $margins + $i * $cell_width, $cell_height * ($i + 1), $black, HAMBURG_TTF, chr($pl_glyph[$i]), 0);
    // display planet data in the right-hand table
    drawboldtext($im, 16, 0, $margins + $left_margin_planet_table, $cell_height * ($i + 1), $black, HAMBURG_TTF, chr($pl_glyph[$i]), 0);
    imagettftext($im, 10, 0, $margins + $left_margin_planet_table + $cell_width * 2, $cell_height * ($i + 1) - 3, $blue, FONTPATHARIAL_TTF, $pl_name[$i]);
    $sign_num = floor($longitude[$i] / 30) + 1;
    drawboldtext($im, 14, 0, $margins + $left_margin_planet_table + $cell_width * 5, $cell_height * ($i + 1), $black, FONTPATH . HAMBURG_TTF, chr($sign_glyph[$sign_num]), 0);
    imagettftext($im, 10, 0, $margins + $left_margin_planet_table + $cell_width * 6, $cell_height * ($i + 1) - 3, $blue, FONTPATH . ARIAL_TTF, Convert_Longitude($longitude[$i]) . " " . $rx1[$i]);
}
// ------------------------------------------
// display the aspect glyphs in the aspect grid
for ($i = 0; $i <= $last_planet_num - 1; $i++) {
    for ($j = $i + 1; $j <= $last_planet_num; $j++) {
        $q = 0;
        $da = Abs($longitude[$i] - $longitude[$j]);
        if ($da > 180) {
            $da = 360 - $da;
        }
        // set orb - 8 if Sun or Moon, 6 if not Sun or Moon
        if ($i == 0 or $i == 1 or $j == 0 or $j == 1) {
            $orb = 8;
        } else {
            $orb = 6;
Exemple #4
0
    drawboldtext($im, 18, 0, $margins + $i * $cell_width, $cell_height, $black, HAMBURG_TTF, chr($pl_glyph[$i]), 0);
    //across the top
    // display planet data in the right-hand table
    if ($i <= $last_planet_num) {
        drawboldtext($im, 16, 0, $margins + $left_margin_planet_table, $cell_height + $cell_height * ($i + 1), $red, HAMBURG_TTF, chr($pl_glyph[$i]), 0);
    } else {
        drawboldtext($im, 16, 0, $margins + $left_margin_planet_table, $cell_height + $cell_height * ($i + 1), $black, HAMBURG_TTF, chr($pl_glyph[$i]), 0);
    }
    imagettftext($im, 10, 0, $margins + $left_margin_planet_table + $cell_width * 2, $cell_height + $cell_height * ($i + 1) - 3, $blue, ARIAL_TTF, $pl_name[$i]);
    $sign_num1 = floor($longitude1[$i] / 30) + 1;
    drawboldtext($im, 14, 0, $margins + $left_margin_planet_table + $cell_width * 5, $cell_height + $cell_height * ($i + 1), $black, HAMBURG_TTF, chr($sign_glyph[$sign_num1]), 0);
    imagettftext($im, 10, 0, $margins + $left_margin_planet_table + $cell_width * 6, $cell_height + $cell_height * ($i + 1) - 3, $blue, ARIAL_TTF, Convert_Longitude($longitude1[$i]) . " " . $rx1[$i]);
    $sign_num2 = floor($longitude2[$i] / 30) + 1;
    if ($i != $last_planet_num - 2) {
        drawboldtext($im, 14, 0, $margins + $left_margin_planet_table + $cell_width * 10, $cell_height + $cell_height * ($i + 1), $red, HAMBURG_TTF, chr($sign_glyph[$sign_num2]), 0);
        imagettftext($im, 10, 0, $margins + $left_margin_planet_table + $cell_width * 11, $cell_height + $cell_height * ($i + 1) - 3, $blue, ARIAL_TTF, Convert_Longitude($longitude2[$i]) . " " . $rx2[$i]);
    }
}
// ------------------------------------------
// display the aspect glyphs in the aspect grid
for ($i = 0; $i <= $last_planet_num; $i++) {
    for ($j = 0; $j <= $last_planet_num; $j++) {
        $q = 0;
        $da = Abs($longitude2[$j] - $longitude1[$i]);
        if ($da > 180) {
            $da = 360 - $da;
        }
        // set orb - 3 if Sun or Moon, 3 if not Sun or Moon
        if ($i == 0 or $i == 1 or $j == 0 or $j == 1) {
            $orb = 1;
        } else {
Exemple #5
0
$ser_L1 = serialize($longitude1);
$ser_L2 = serialize($longitude1);
echo "<center>";
echo "<img border='0' src='chartwheel_right_now_line.php?rx1={$rx1}&rx2={$rx2}&p1={$ser_L1}&p2={$ser_L2}' width='730' height='400'>";
echo "</center>";
echo "<br>";
//display right now data
echo '<center><table width="40%" cellpadding="0" cellspacing="0" border="0">', "\n";
echo '<tr>';
echo "<td><font color='#0000ff'><b> Planet </b></font></td>";
echo "<td><font color='#0000ff'><b> Longitude </b></font></td>";
echo '</tr>';
for ($i = 0; $i <= SE_TNODE; $i++) {
    echo '<tr>';
    echo "<td>" . $pl_name[$i] . "</td>";
    echo "<td><font face='Courier New'>" . Convert_Longitude($longitude1[$i]) . " " . Mid($rx1, $i + 1, 1) . "</font></td>";
    echo '</tr>';
}
echo '<tr>';
echo "<td> &nbsp </td>";
echo "<td> &nbsp </td>";
echo '</tr>';
echo '</table></center>', "\n";
echo "<br />";
// display right now data - aspect table
echo '<center><table width="40%" cellpadding="0" cellspacing="0" border="0">', "\n";
echo '<tr>';
echo "<td><font color='#0000ff'><b> Planet </b></font></td>";
echo "<td><font color='#0000ff'><b> Aspect </b></font></td>";
echo "<td><font color='#0000ff'><b> Planet </b></font></td>";
echo "<td><font color='#0000ff'><b> Orb </b></font></td>";