# Genuary2026_Boxes1Color

# StagingBoxes

**StagingBoxes**  takes Prompt 1: `“1 Color 1 Shape”(Went with a Box and for Color: Red`),  Prompt 2: `Staging (one of the 12 Animation Principles)`,  and Prompt 12: `Only Boxes` of **Genuary2026**. Coded in ***Locomotion***.

## Poem

```ocaml
Entities made of Boxes
Wandering around acting as this Stage
Is theirs
Within their tiers
Ignoring the others that are there
For this is their space
For their paths in their pace
For the Boxes are of one shade
For the Boxes are only Boxes
```

## Video

%[https://youtu.be/8gpjjGHJ1KU] 

## Locomotion Code

```haskell
directional {z = 6, intensity = range 0 10 (osc 0.5), color = 0xff0000};

for [-3..84]  (\n -> box {x = (n/2)-(20), y = (osc((0.5) + ((n/2)/(100)))*sin(n/2)) + (-7), z = -20, sy = 20, ry = (n/2)-(20) + range -70 170 (osc 0.015) ,  size=1.5, color = 0x2AFF00});

for [-3..84]  (\n -> box {x = (n/2)-(20), y = (osc((0.5) + ((n/2)/(100)))*sin(n/2)) + (-8), z = -10, sy = 20, rx = (n/2)-(20) + range -70 170 (osc 0.005) , size=1.5, color = 0xA6FF95});
```