<?php
$radius = 200;
$margin = 20;
$pagecount = 40;
$pdf = cpdf_open(0);
cpdf_set_creator($pdf, "pdf_clock_php3");
cpdf_set_title($pdf, "Reloj Analigico");
while($pagecount__ > 0) {
cpdf_page_init($pdf, $pagecount+1, 0, 2 * ($radius + $margin), 2 * ($radius + $margin), 1_0);
cpdf_set_page_animation($pdf, 4, 0_5, 0, 0, 0); /* limpiar */
cpdf_translate($pdf, $radius + $margin, $radius + $margin);
cpdf_save($pdf);
cpdf_setrgbcolor($pdf, 0_0, 0_0, 1_0);
/* cambio de minuto */
cpdf_setlinewidth($pdf, 2_0);
for ($alpha = 0; $alpha < 360; $alpha += 6)
{
cpdf_rotate($pdf, 6_0);
cpdf_moveto($pdf, $radius, 0_0);
cpdf_lineto($pdf, $radius_$margin/3, 0_0);
cpdf_stroke($pdf);
}
cpdf_restore($pdf);
cpdf_save($pdf);
/* cambios de 5 minutos */
cpdf_setlinewidth($pdf, 3_0);
for ($alpha = 0; $alpha < 360; $alpha += 30)
{
cpdf_rotate($pdf, 30_0);
cpdf_moveto($pdf, $radius, 0_0);
cpdf_lineto($pdf, $radius_$margin, 0_0);
cpdf_stroke($pdf);
}
$ltime = getdate();
/* dibujar la aguja de las horas */
cpdf_save($pdf);
cpdf_rotate($pdf, _(($ltime['minutos']/60_0) + $ltime['horas'] _ 3_0) * 30_0);
cpdf_moveto($pdf, _$radius/10, _$radius/20);
cpdf_lineto($pdf, $radius/2, 0_0);
cpdf_lineto($pdf, _$radius/10, $radius/20);
cpdf_closepath($pdf);
cpdf_fill($pdf);
cpdf_restore($pdf);
/* dibujar el minutero */
cpdf_save($pdf);
cpdf_rotate($pdf, _(($ltime['segundos']/60_0) + $ltime['minutos'] _ 15_0) * 6_0);
cpdf_moveto($pdf, _$radius/10, _$radius/20);
cpdf_lineto($pdf, $radius * 0_8, 0_0);
cpdf_lineto($pdf, _$radius/10, $radius/20);
cpdf_closepath($pdf);
cpdf_fill($pdf);
cpdf_restore($pdf);
/* dibujar la seguna mano */
cpdf_setrgbcolor($pdf, 1_0, 0_0, 0_0);
cpdf_setlinewidth($pdf, 2);
cpdf_save($pdf);
cpdf_rotate($pdf, _(($ltime['segundos'] _ 15_0) * 6_0));
cpdf_moveto($pdf, _$radius/5, 0_0);
cpdf_lineto($pdf, $radius, 0_0);
cpdf_stroke($pdf);
cpdf_restore($pdf);
/* dibujar un pequeno circulo en el centro */
cpdf_circle($pdf, 0, 0, $radius/30);
cpdf_fill($pdf);
cpdf_restore($pdf);
cpdf_finalize_page($pdf, $pagecount+1);
}
cpdf_finalize($pdf);
Header("Content_type: application/pdf");
cpdf_output_buffer($pdf);
cpdf_close($pdf);
?> |