Rearrange php libs/includes and produce sitemap.xml
[busui.git] / lib / tcpdf / examples / example_013.php
blob:a/lib/tcpdf/examples/example_013.php -> blob:b/lib/tcpdf/examples/example_013.php
  <?php
  //============================================================+
  // File name : example_013.php
  // Begin : 2008-03-04
  // Last Update : 2010-08-08
  //
  // Description : Example 013 for TCPDF class
  // Graphic Transformations
  //
  // Author: Nicola Asuni
  //
  // (c) Copyright:
  // Nicola Asuni
  // Tecnick.com s.r.l.
  // Via Della Pace, 11
  // 09044 Quartucciu (CA)
  // ITALY
  // www.tecnick.com
  // info@tecnick.com
  //============================================================+
   
  /**
  * Creates an example PDF TEST document using TCPDF
  * @package com.tecnick.tcpdf
  * @abstract TCPDF - Example: Graphic Transformations
  * @author Nicola Asuni
  * @since 2008-03-04
  */
   
  require_once('../config/lang/eng.php');
  require_once('../tcpdf.php');
   
  // create new PDF document
  $pdf = new TCPDF(PDF_PAGE_ORIENTATION, PDF_UNIT, PDF_PAGE_FORMAT, true, 'UTF-8', false);
   
  // set document information
  $pdf->SetCreator(PDF_CREATOR);
  $pdf->SetAuthor('Nicola Asuni');
  $pdf->SetTitle('TCPDF Example 013');
  $pdf->SetSubject('TCPDF Tutorial');
  $pdf->SetKeywords('TCPDF, PDF, example, test, guide');
   
  // set default header data
  $pdf->SetHeaderData(PDF_HEADER_LOGO, PDF_HEADER_LOGO_WIDTH, PDF_HEADER_TITLE.' 013', PDF_HEADER_STRING);
   
  // set header and footer fonts
  $pdf->setHeaderFont(Array(PDF_FONT_NAME_MAIN, '', PDF_FONT_SIZE_MAIN));
  $pdf->setFooterFont(Array(PDF_FONT_NAME_DATA, '', PDF_FONT_SIZE_DATA));
   
  // set default monospaced font
  $pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
   
  //set margins
  $pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
  $pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
  $pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
   
  //set auto page breaks
  $pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
   
  //set image scale factor
  $pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
   
  //set some language-dependent strings
  $pdf->setLanguageArray($l);
   
  // ---------------------------------------------------------
   
  // set font
  $pdf->SetFont('helvetica', 'B', 20);
   
  // add a page
  $pdf->AddPage();
   
  $pdf->Write(0, 'Graphic Transformations', '', 0, 'C', 1, 0, false, false, 0);
   
  // set font
  $pdf->SetFont('helvetica', '', 10);
   
  // --- Scaling ---------------------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(50, 70, 40, 10, 'D');
  $pdf->Text(50, 66, 'Scale');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // Scale by 150% centered by (50,80) which is the lower left corner of the rectangle
  $pdf->ScaleXY(150, 50, 80);
  $pdf->Rect(50, 70, 40, 10, 'D');
  $pdf->Text(50, 66, 'Scale');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Translation -----------------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(125, 70, 40, 10, 'D');
  $pdf->Text(125, 66, 'Translate');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // Translate 7 to the right, 5 to the bottom
  $pdf->Translate(7, 5);
  $pdf->Rect(125, 70, 40, 10, 'D');
  $pdf->Text(125, 66, 'Translate');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Rotation --------------------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(70, 100, 40, 10, 'D');
  $pdf->Text(70, 96, 'Rotate');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // Rotate 20 degrees counter-clockwise centered by (70,110) which is the lower left corner of the rectangle
  $pdf->Rotate(20, 70, 110);
  $pdf->Rect(70, 100, 40, 10, 'D');
  $pdf->Text(70, 96, 'Rotate');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Skewing ---------------------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(125, 100, 40, 10, 'D');
  $pdf->Text(125, 96, 'Skew');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // skew 30 degrees along the x-axis centered by (125,110) which is the lower left corner of the rectangle
  $pdf->SkewX(30, 125, 110);
  $pdf->Rect(125, 100, 40, 10, 'D');
  $pdf->Text(125, 96, 'Skew');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Mirroring horizontally ------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(70, 130, 40, 10, 'D');
  $pdf->Text(70, 126, 'MirrorH');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // mirror horizontally with axis of reflection at x-position 70 (left side of the rectangle)
  $pdf->MirrorH(70);
  $pdf->Rect(70, 130, 40, 10, 'D');
  $pdf->Text(70, 126, 'MirrorH');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Mirroring vertically --------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(125, 130, 40, 10, 'D');
  $pdf->Text(125, 126, 'MirrorV');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // mirror vertically with axis of reflection at y-position 140 (bottom side of the rectangle)
  $pdf->MirrorV(140);
  $pdf->Rect(125, 130, 40, 10, 'D');
  $pdf->Text(125, 126, 'MirrorV');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Point reflection ------------------------------------
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(70, 160, 40, 10, 'D');
  $pdf->Text(70, 156, 'MirrorP');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  // Start Transformation
  $pdf->StartTransform();
  // point reflection at the lower left point of rectangle
  $pdf->MirrorP(70,170);
  $pdf->Rect(70, 160, 40, 10, 'D');
  $pdf->Text(70, 156, 'MirrorP');
  // Stop Transformation
  $pdf->StopTransform();
   
  // --- Mirroring against a straigth line described by a point (120, 120) and an angle -20°
  $angle=-20;
  $px=120;
  $py=170;
   
  // just for visualisation: the straight line to mirror against
   
  $pdf->SetDrawColor(200);
  $pdf->Line($px-1,$py-1,$px+1,$py+1);
  $pdf->Line($px-1,$py+1,$px+1,$py-1);
  $pdf->StartTransform();
  $pdf->Rotate($angle, $px, $py);
  $pdf->Line($px-5, $py, $px+60, $py);
  $pdf->StopTransform();
   
  $pdf->SetDrawColor(200);
  $pdf->SetTextColor(200);
  $pdf->Rect(125, 160, 40, 10, 'D');
  $pdf->Text(125, 156, 'MirrorL');
  $pdf->SetDrawColor(0);
  $pdf->SetTextColor(0);
  //Start Transformation
  $pdf->StartTransform();
  //mirror against the straight line
  $pdf->MirrorL($angle, $px, $py);
  $pdf->Rect(125, 160, 40, 10, 'D');
  $pdf->Text(125, 156, 'MirrorL');
  //Stop Transformation
  $pdf->StopTransform();
   
  // ---------------------------------------------------------
   
  //Close and output PDF document
  $pdf->Output('example_013.pdf', 'I');
   
  //============================================================+
  // END OF FILE
  //============================================================+