Valid XHTML     Valid CSS2    

Listing du fichier chess1.php

 

00001     <?php
00002     
# (gH) -_- skel.php ; TimeStamp (unix) : 11 Septembre 2013 vers 15:19
00003     
00004     
error_reporting(E_ALL | E_NOTICE ) ;
00005     
00006     include(
"std.php") ;
00007     
00008     
########################################################################################
00009     
00010     
$error
= 0 ;
00011     
$n
= "" ;
00012     
00013     if (!isset(
$_GET
["n"])) { $erreur = 1 ; } else {
00014     
00015     
# on récupère le nombre cases
00016     
00017     
$n
= $_GET["n"] ;
00018     
00019     }
# fin si
00020     
00021     # quelques vérification élémentaires sur n
00022     
00023     
if (
$error==0) {
00024     
00025     
$n
= trim($n) ;
00026     
00027      if (!
preg_match
("/^[0-9]+$/",$n)) { $error = 2 ; } else {
00028      if (
$n
<1) { $error = 2 ; } ;
00029      if (
$n
>29) { $error = 2 ; } ;
00030      } ;
# fin si
00031     
00032     
} # fin si
00033     
00034     
if (
$error>0) {
00035     
00036     
$titre
= "Echiquier en taille variable ! " ;
00037     
debutPage
($titre,"strict") ;
00038     
debutSection() ;
00039     
h1
($titre) ;
00040     
00041      if ((
$error
==2) and (!$n=="")) {
00042     
h2
("erreur : n devrait &ecirc;tre un entier strictement positif inférieur à 30.","grouge") ;
00043      } ;
# finsi
00044     
00045     
p() ;
00046      echo
"Pour afficher un échiquier de taille "
.b("n").", cliquez sur le lien " ;
00047      echo
" ci-dessous et changez la valeur de "
.b("n")." dans l'URL&nbsp;: " ;
00048     
finp() ;
00049     
00050     
pvide() ;
00051     
00052     
p() ;
00053     
nbsp
(15) ;
00054      echo
href
("chess1.php?n=3"," cliquez-moi !","bouton_fin vert_pastel nou") ;
00055     
finp() ;
00056     
00057     
finSection() ;
00058     
finPage() ;
00059      exit(-
1) ;
00060     
00061     }
# fin si
00062     
00063     ########################################################################################
00064     
00065     # si on arrive ici, on peut tracer le SVG
00066     
00067     ########################################################################################
00068     
00069     # on déduit de n la zone de tracé et le cadre
00070     
00071     
$np
= $n+1 ;
00072     
$cases
= 100*$n ;
00073     
$cadre
= 100*$np ;
00074     
svg
("latin1",$cadre,$cadre) ;
00075     
00076     
cmt
(" les bords de l'échiquier ") ;
00077     
rect
(0,0,$cases,$cases,"white","black",5) ;
00078     
00079     
# on boucle sur les lignes et sur les colonnes
00080     
00081     
for (
$ilig=1;$ilig<=$n;$ilig++) {
00082      for (
$jcol
=1;$jcol<=$n;$jcol++) {
00083      if (((
$ilig
+$jcol)%2)==1) {
00084     
rect
(100*($ilig-1),100*($jcol-1),"100","100","black","black",1) ;
00085      } ;
# fin si
00086     
} ; # fin tant que sur jcol
00087     
} ; # fin tant que sur ilig
00088     
00089     
finsvg() ;
00090     
00091     
?>

Pour ne pas voir les numéros de ligne, ajoutez &nl=non à la suite du nom du fichier.

 

 

retour gH    Retour à la page principale de   (gH)