Saltar la navegación

Segundo movimiento

¿Podré mover todos los sectores simultaneámente?

Paso a paso

Creamos un deslizador  n de tipo entero: Valor mínimo, 1, valor máximo 8. Incremento 1.

  • n=Deslizador(1,8,1,1,100,false,true)

Creamos un deslizador  m de tipo entero: Valor mínimo, 1, valor máximo 8. Incremento 1.

  • m=Deslizador(1,8,1,1,100,false,false)

Creamos un deslizador  m de tipo ángulo: Valor mínimo, 0º, valor máximo 360º. Incremento 1º.

  • alfa=Deslizador(0º,360º,1º,1,100,true)

Ahora creamos los centros usando el comando secuencia iterado para conseguir crear una matriz de puntos:

  • centros=Secuencia(Secuencia((i, j), i, 1, n), j, 1, m)

Los puntos iniciales de los sectores:

  • extremo1=Secuencia(Secuencia(centros(j, i) + (Si(Resto(j, 2) ≟ 1, Si(Resto(i, 2) ≟ 1, 0.5, 0), Si(Resto(i, 2) ≟ 1, 0, -0.5)), Si(Resto(j, 2) ≟ 1, Si(Resto(i, 2) ≟ 1, 0, 0.5), Si(Resto(i, 2) ≟ 1, -0.5, 0))), i, 1, n), j, 1, m)

Los puntos finales de los sectores:

  • extremo2=Secuencia(Secuencia(Rota(extremo1(j, i), 90°, centros(j, i)), i, 1, n), j, 1, m)

Ahora construimos los puntos girados:

  • extremo1'=Secuencia(Secuencia(Rota(extremo1(j, i), alfa, centros(j, i)), i, 1, n), j, 1, m)
  • extremo2'=Secuencia(Secuencia(Rota(extremo1'(j, i), 90°, centros(j, i)), i, 1, n), j, 1, m)

Ahora construimos los sectores usando los puntos girados:

  • S=Secuencia(Secuencia(SectorCircular(centros(j, i), extremo2'(j, i), extremo1'(j, i)), i, 1, n), j, 1, m)

  • s=Secuencia(Secuencia(SectorCircular(centros(j, i), extremo1'(j, i), extremo2'(j, i)), i, 1, n), j, 1, m)