format
This commit is contained in:
parent
7e27eeaae1
commit
36651b8faa
GPG key ID:
A82D63DFF8D1317F
1 changed files with 94 additions and 69 deletions
73
traceur.xsl
73
traceur.xsl
|
|
@ -15,17 +15,19 @@
|
|||
<xsl:template match="/tortue">
|
||||
<xsl:processing-instruction name="xml-model">href="traceur.xsd"</xsl:processing-instruction>
|
||||
<traceur>
|
||||
<!-- Appel du template pour traiter les commandes avec les valeurs initiales des
|
||||
paramètres -->
|
||||
<!-- Appel du template pour traiter les commandes
|
||||
avec les valeurs initiales des paramètres -->
|
||||
<xsl:call-template name="process-commands">
|
||||
<xsl:with-param name="commands" select="*" />
|
||||
<xsl:with-param name="commands"
|
||||
select="*" />
|
||||
<xsl:with-param name="x"
|
||||
select="$initial-x" />
|
||||
<xsl:with-param
|
||||
name="y" select="$initial-y" />
|
||||
<xsl:with-param name="y"
|
||||
select="$initial-y" />
|
||||
<xsl:with-param
|
||||
name="angle" select="$initial-angle" />
|
||||
<xsl:with-param name="states" select="()" />
|
||||
<xsl:with-param name="states"
|
||||
select="()" />
|
||||
</xsl:call-template>
|
||||
</traceur>
|
||||
</xsl:template>
|
||||
|
|
@ -33,9 +35,12 @@
|
|||
<!-- Template récursif pour traiter les commandes individuelles -->
|
||||
<xsl:template
|
||||
name="process-commands">
|
||||
<xsl:param name="commands" />
|
||||
<xsl:param name="x" />
|
||||
<xsl:param name="y" />
|
||||
<xsl:param
|
||||
name="commands" />
|
||||
<xsl:param
|
||||
name="x" />
|
||||
<xsl:param
|
||||
name="y" />
|
||||
<xsl:param
|
||||
name="angle" />
|
||||
<xsl:param
|
||||
|
|
@ -44,8 +49,8 @@
|
|||
<!-- Si il reste des commandes à traiter -->
|
||||
<xsl:if test="$commands">
|
||||
<!-- Sélection de la première commande à traiter -->
|
||||
<xsl:variable
|
||||
name="current-command" select="$commands[1]" />
|
||||
<xsl:variable name="current-command"
|
||||
select="$commands[1]" />
|
||||
<xsl:choose>
|
||||
<!-- Si la commande est une ligne -->
|
||||
<xsl:when test="local-name($current-command) = 'line'">
|
||||
|
|
@ -58,42 +63,52 @@
|
|||
select="$x + $distance * math:cos($radians)" />
|
||||
<xsl:variable name="new-y"
|
||||
select="$y + $distance * math:sin($radians)" />
|
||||
|
||||
<!-- Création de l'élément LINETO avec les nouvelles coordonnées calculées -->
|
||||
<LINETO
|
||||
x="{format-number($new-x, '#.######')}"
|
||||
y="{format-number($new-y, '#.######')}" />
|
||||
|
||||
<!-- Rappel récursif du template avec la mise à jour des coordonnées et des
|
||||
commandes restantes -->
|
||||
<xsl:call-template
|
||||
name="process-commands">
|
||||
<xsl:with-param name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="x" select="$new-x" />
|
||||
<xsl:with-param name="y" select="$new-y" />
|
||||
<xsl:with-param
|
||||
name="y" select="$new-y" />
|
||||
<xsl:with-param
|
||||
name="angle" select="$angle" />
|
||||
<xsl:with-param name="states" select="$states" />
|
||||
<xsl:with-param
|
||||
name="states" select="$states" />
|
||||
</xsl:call-template>
|
||||
</xsl:when>
|
||||
|
||||
<!-- Si la commande est un turn -->
|
||||
<xsl:when test="local-name($current-command) = 'turn'">
|
||||
<!-- Calcul du nouvel angle avec modulo 360 pour rester dans un cercle complet -->
|
||||
<xsl:variable
|
||||
name="new-angle" select="($angle + number($current-command)) mod 360" />
|
||||
<xsl:variable name="new-angle"
|
||||
select="($angle + number($current-command)) mod 360" />
|
||||
|
||||
<!-- Rappel récursif du template sans changer de position mais en mettant à jour
|
||||
l'angle -->
|
||||
<xsl:call-template
|
||||
name="process-commands">
|
||||
<xsl:with-param name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="x" select="$x" />
|
||||
<xsl:with-param name="y" select="$y" />
|
||||
<xsl:with-param
|
||||
name="y" select="$y" />
|
||||
<xsl:with-param
|
||||
name="angle" select="$new-angle" />
|
||||
<xsl:with-param name="states"
|
||||
select="$states" />
|
||||
</xsl:call-template>
|
||||
</xsl:when>
|
||||
|
||||
<!-- Si la commande est un MOVE -->
|
||||
<xsl:when test="local-name($current-command) = 'move'">
|
||||
<!-- Calcul de la distance à parcourir et conversion de l'angle en radians -->
|
||||
|
|
@ -105,23 +120,29 @@
|
|||
select="$x + $distance * math:cos($radians)" />
|
||||
<xsl:variable name="new-y"
|
||||
select="$y + $distance * math:sin($radians)" />
|
||||
|
||||
<!-- Création de l'élément MOVETO avec les nouvelles coordonnées calculées -->
|
||||
<MOVETO
|
||||
x="{format-number($new-x, '#.######')}"
|
||||
y="{format-number($new-y, '#.######')}" />
|
||||
|
||||
<!-- Rappel récursif du template avec la mise à jour des coordonnées et des
|
||||
commandes restantes -->
|
||||
<xsl:call-template
|
||||
name="process-commands">
|
||||
<xsl:with-param name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="x" select="$new-x" />
|
||||
<xsl:with-param name="y" select="$new-y" />
|
||||
<xsl:with-param
|
||||
name="y" select="$new-y" />
|
||||
<xsl:with-param
|
||||
name="angle" select="$angle" />
|
||||
<xsl:with-param name="states" select="$states" />
|
||||
<xsl:with-param name="states"
|
||||
select="$states" />
|
||||
</xsl:call-template>
|
||||
</xsl:when>
|
||||
|
||||
<!-- Si la commande est un store -->
|
||||
<xsl:when test="local-name($current-command) = 'store'">
|
||||
<!-- On enregistre le nouvelle état-->
|
||||
|
|
@ -133,16 +154,19 @@
|
|||
name="new-states" select="($states, $new-state)" />
|
||||
<xsl:call-template
|
||||
name="process-commands">
|
||||
<xsl:with-param name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="x" select="$x" />
|
||||
<xsl:with-param name="y" select="$y" />
|
||||
<xsl:with-param
|
||||
name="y" select="$y" />
|
||||
<xsl:with-param
|
||||
name="angle" select="$angle" />
|
||||
<xsl:with-param name="states"
|
||||
select="$new-states" />
|
||||
</xsl:call-template>
|
||||
</xsl:when>
|
||||
|
||||
<!-- Si la commande est un restore et que au moins 1 état est enregistré : -->
|
||||
<xsl:when test="local-name($current-command) = 'restore' and count($states) >= 1">
|
||||
<!-- On séléctionne notre state-->
|
||||
|
|
@ -154,7 +178,8 @@
|
|||
|
||||
<xsl:call-template
|
||||
name="process-commands">
|
||||
<xsl:with-param name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="commands" select="$commands[position() > 1]" />
|
||||
<xsl:with-param
|
||||
name="x" select="($state/@x)[last()]" />
|
||||
<xsl:with-param name="y"
|
||||
|
|
|
|||
Reference in a new issue