aboutsummaryrefslogtreecommitdiff
path: root/Perl/Zinc
diff options
context:
space:
mode:
Diffstat (limited to 'Perl/Zinc')
-rw-r--r--Perl/Zinc/Graphics.pm66
1 files changed, 33 insertions, 33 deletions
diff --git a/Perl/Zinc/Graphics.pm b/Perl/Zinc/Graphics.pm
index 1557ec6..6f33f5f 100644
--- a/Perl/Zinc/Graphics.pm
+++ b/Perl/Zinc/Graphics.pm
@@ -2,59 +2,59 @@
#-----------------------------------------------------------------------------------
#
# Graphics.pm
-# module de fonctions graphiques
+# some graphic design functions
#
#-----------------------------------------------------------------------------------
-# Gestion de ressources globales : gradients zinc (couleurs et dégradés nommés)
-# patterns (fichiers bitmap X11)
-# textures (fichiers texture)
-# images (fichiers GIF, JPEG, PNG)
-#-----------------------------------------------------------------------------------
# Functions to create complexe graphic component :
-# buildZincItem (réalisation d'un item zinc à partir d'une table de description)
+# ------------------------------------------------
+# buildZincItem (realize a zinc item from description hash table)
#
-# Function to compute complexe geometrical forms :
-# roundedRectangleCoords
-# hippodromeCoords
-# polygonCoords
-# roundedCurveCoords
-# polylineCoords
-# tabBoxCoords
-# pathLineCoords
+# Function to compute complexe geometrical forms :
+# (text header of functions explain options for each form,
+# function return curve coords using control points of cubic curve)
+# -----------------------------------------------------------------
+# roundedRectangleCoords (return curve coords of rounded rectangle)
+# hippodromeCoords (return curve coords of circus form)
+# polygonCoords (return curve coords of regular polygon)
+# roundedCurveCoords (return curve coords of rounded curve)
+# polylineCoords (return curve coords of polyline)
+# tabBoxCoords (return curve coords of tabBox's pages)
+# pathLineCoords (return triangles coords of pathline)
#
-# Geometrical Functions :
-# perpendicularPoint
-# lineAngle
-# vertexAngle
-# arc_pts
-# rad_point
+# Geometrical basic Functions :
+# -----------------------------
+# perpendicularPoint
+# lineAngle
+# vertexAngle
+# arc_pts
+# rad_point
#
# Pictorial Functions :
-# setGradients
-# getPattern
-# getTexture
-# getImage
-# init_pixmaps
-# hexaRGBcolor
-# createGraduate
+# ----------------------
+# setGradients
+# getPattern
+# getTexture
+# getImage
+# init_pixmaps
+# hexaRGBcolor
+# createGraduate
+#
#-----------------------------------------------------------------------------------
# Authors: Jean-Luc Vinot <vinot@cena.fr>
#
# $Id:
#-----------------------------------------------------------------------------------
-package Tk::Zinc::Graphics;
+package Graphics;
require Exporter;
@ISA = qw(Exporter);
@EXPORT = qw(&buildZincItem
-
+
&roundedRectangleCoords &hippodromeCoords &polygonCoords
&roundedCurveCoords &polylineCoords &tabBoxCoords &pathLineCoords
-
- &perpendicularPoint &lineAngle &vertexAngle &rad_point &arc_pts
+ &perpendicularPoint &lineAngle &vertexAngle &rad_point &arc_pts
-
&setGradients &getPattern &getTexture &getImage &init_pixmaps &hexaRGBcolor &createGraduate
);