<span style="font-size: 120%">Textris</span>
<img src="http://stevebromley.com/games/textris/pictures/textris.jpg" width="50%" align="middle" alt="Textris">
Welcome to Textris
[[Play Textris->First shape]](set: $turns to 10)
You see a grid, ten blocks wide by ten high. It's empty.
-------------------------
A shape appears at the top of the grid. It's shaped like the letter L, and upright in the same way the letter L is. It is currently centred. What do you want to do with the shape?
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"First Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"First Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"First Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"First Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"First Shape Repeat")]
(if: $turns > 0)[
You $last.
It looks the piece is $turns spaces above the ground.
What do you want to do now with the L shaped piece?
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"First Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"First Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"First Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"First Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"First Shape Repeat")]
](if: $turns is 0)[
(set: $turns to 10)
The L shape reaches the floor and stops.
----------------------------------------------------
Another shape appears at the top of the grid. It's shaped like a squiggly one, a bit like an S.
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Second Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Second Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Second Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Second Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Second Shape Repeat")]
](if: $turns > 0)[
You $last.
It looks the piece is $turns spaces above the ground.
What do you want to do now with the squiggly shaped piece?
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Second Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Second Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Second Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Second Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Second Shape Repeat")]
](if: $turns is 0)[
(set: $turns to 10)
The position looks good. The squiggly shape reaches the bottom of the grid and stops.
----------------------------------------------------
Another shape appears at the top of the grid. It's ziggurat shaped.
(live:1s)[(set: $helloTimer to $helloTimer + 1)(if: $helloTimer is 5 or $helloTimer > 5)[... You know, a ziggurat.
]
(if: $helloTimer is 8 or $helloTimer > 8)[...that one that has three blocks in a line on the bottom, and one block centered on top.
]
(if: $helloTimer is 12 or $helloTimer > 12)[Get it now?
]
(if: $helloTimer > 15)[Ok. Let's continue.
]
(if: $helloTimer > 19)[Another shape appears at the top of the grid. It's ziggurat shaped.
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Third Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Third Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Third Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Third Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Third Shape Repeat")]
]
]
](if: $turns > 0)[
You $last.
It looks the piece is $turns spaces above the ground.
What do you want to do now with the ziggurat?
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Third Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Third Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Third Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Third Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Third Shape Repeat")]
](if: $turns is 0)[
(set: $turns to 10)
The ziggurat has stopped. It's touching the previous shape. If I had to describe how they are attached, I'd say it's roughly the shape of a ferry
----------------------------------------------------
Another shape appears at the top of the grid. It's the other kind of squiggly one. Kind of Z shaped, but not really a Z.
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Fourth Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Fourth Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Fourth Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Fourth Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Fourth Shape Repeat")]
](if: $turns > 0)[
You $last.
It looks the piece is $turns spaces above the ground.
What do you want to do now with the kind of Z shape, but not really a Z shaped object.
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Fourth Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Fourth Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Fourth Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Fourth Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Fourth Shape Repeat")]
](if: $turns is 0)[
(set: $turns to 10)
This shape has stopped. It's also touching the previous one. If I had to describe how they are attached, I'd say it's roughly the shape of a duck.
----------------------------------------------------
Another shape appears at the top of the grid. It's a long thin one. They are the best ones.
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Fifth Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Fifth Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Fifth Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Fifth Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Fifth Shape Repeat")]
](if: $turns > 0)[
You $last.
It looks the piece is $turns spaces above the ground.
What do you want to do now with the long thin one.
(link: "Rotate it clockwise")[(set: $turns to it -1)(set: $last to "rotate it clockwise")(goto:"Fifth Shape Repeat")]
(link: "Rotate it anticlockwise")[(set: $turns to it -1)(set: $last to "rotate it anticlockwise")(goto:"Fifth Shape Repeat")]
(link: "Move it left")[(set: $turns to it -1)(set: $last to "move it left")(goto:"Fifth Shape Repeat")]
(link: "Move it right")[(set: $turns to it -1)(set: $last to "move it right")(goto:"Fifth Shape Repeat")]
(link: "Leave it to fall")[(set: $turns to 0)(set: $last to "leave it to fall")(goto:"Fifth Shape Repeat")]
](if: $turns is 0)[
(set: $turns to 10)
Oh no. The long thin one is touching the previous duck shaped pile of blocks, and now it's reached the top of the screen.
I guess that's **game over**.
But didn't we have fun together?
[[Yes, we had fun->Fun]]
[[No, we did not have fun->Not Fun]]
]Good for you! I'm surprised, but ok.
The end.
(colour: "#2F4F4F")[`@steve_bromley`]I'm not surprised - the game didn't even really work. It was just a waste of everyone's time.
The end.
(colour: "#2F4F4F")[`@steve_bromley`]