Код описан на алгоритмическом языке.

Одновременное движение объектов

править

Движение в одном направлении

править
constant DecimalNumber Force = 0.25
constant DecimalNumber Duration = 0.25
Boolean MoveForward = true
Boolean MoveRight = true
while (true) is true
{
  each (Sphere sphere) in (new Sphere[] {this.sphere, this.sphere2, this.sphere3}) together
    do together
    {
      if (MoveForward) is true then
        sphere  move(direction = FORWARD, amount = Force, duration = Duration, animationStyle = BEGIN_AND_END_ARBUTLY)
      else
        sphere  move(direction = BACKWARD, amount = Force, duration = Duration, animationStyle = BEGIN_AND_END_ARBUTLY)
      
      if (MoveRight) is true
        sphere  move(direction = RIGHT, amount = Force, duration = Duration, animationStyle = BEGIN_AND_END_ARBUTLY)
      else
        sphere  move(direction = LEFT, amount = Force, duration = Duration, animationStyle = BEGIN_AND_END_ARBUTLY)
    }
    MoveForward = nextRandomBoolean()
    MoveRight = nextRandomBoolean()
}

Броуновское движение

править
constant DecimalNumber Force = 0.25
constant DecimalNumber Duration = 0.25
while true is true
{
  each (Sphere sphere) in (new Sphere[] {this.sphere, this.sphere2, this.sphere3}) together
    do together
    {
      sphere  move(direction = FORWARD, amount = Force - nextRandomRealNumberRange(0.0, 2.0 * Force), duration = Duration, animationStyle = BEGIN_AND_END_ARBUTLY)
      sphere  move(direction = RIGHT, amount = Force - nextRandomRealNumberRange(0.0, 2.0 * Force), duration = Duration, animationStyle = BEGIN_AND_END_ARBUTLY)
    }
}

Поиск и сортировка

править

Линейный поиск

править
constant DecimalNumber Arr = new DecimalNumber[] {0.25, 1.0, 2.0, 0.5, 1.0}
WholeNumber i = 0
DecimalNumber X = this.getDoubleFromUser("X")
Boolean Found = false
while (BOTH (NOT Found) and (i < Arr.Length)) is true
{
  if (X == Arr[i]) is true then
  {
    this.alice  say("X найден в позиции " + i)
    Found = true
  }
  else
    i = i + 1
}
if (NOT Found) is true then
  this.alice  say("X не найден")

Сортировка выбором

править
constant DecimalNumber Arr = new DecimalNumber[] {0.25, 1.0, 2.0, 0.5, 1.0}
WholeNumber i = 0
WholeNumber j = 0
DecimalNumber X = 0.0
while (i < Arr.Length) is true
{
  j = i + 1
  while (j < Arr.Length) is true
  {
    if (Arr[i] < Arr[j]) is true then
    {
      C = Arr[i]
      Arr[i] = Arr[j]
      Arr[j] = C
    }
    j = j + 1
  }
  i = i + 1
}
for each (DecimalNumber n) in Arr
  this.alice  say("n:" + n)

Camera Markers

править

Облёт кубика с трех сторон.

constant CameraMarker Arr = new CameraMarker[] {this.cameraMarker1, this.cameraMarker2, this.cameraMarker3}
for each (CameraMarker cameraMarker) in Arr
  do together
  {
    this.camera  moveTo(target = this.cameraMarker)
    this.camera  orientTo(target = this.cameraMarker)
  }

Анимации

править

Качание объекта

править