Handbook
Glossary
board-one ( gadget -- gadget )
Vocabulary
gamelib
.
demos
.
sokoban
.
layouts
Inputs
gadget
an
object
Outputs
gadget
an
object
Definition
USING:
gamelib.board
gamelib.ui
sequences
;
IN:
gamelib.demos.sokoban.layouts
:
board-one
( gadget -- gadget )
8 9
make-board
{
2 2
}
player
add-to-cell
{
{
2 0
}
{
3 0
}
{
4 0
}
{
5 0
}
{
6 0
}
{
0 1
}
{
1 1
}
{
2 1
}
{
6 1
}
{
0 2
}
{
6 2
}
{
0 3
}
{
1 3
}
{
2 3
}
{
6 3
}
{
0 4
}
{
2 4
}
{
3 4
}
{
6 4
}
{
0 5
}
{
2 5
}
{
6 5
}
{
7 5
}
{
0 6
}
{
7 6
}
{
0 7
}
{
7 7
}
{
0 8
}
{
1 8
}
{
2 8
}
{
3 8
}
{
4 8
}
{
5 8
}
{
6 8
}
{
7 8
}
}
"vocab:gamelib/demos/sokoban/resources/Wall_Brown.png"
add-to-cells
{
{
1 6
}
{
3 2
}
{
4 3
}
{
4 4
}
{
4 6
}
{
3 6
}
{
5 6
}
}
"vocab:gamelib/demos/sokoban/resources/Crate_Yellow.png"
make-crate
add-copy-to-cells
{
{
1 2
}
{
5 3
}
{
1 4
}
{
4 5
}
{
3 6
}
{
6 6
}
{
4 7
}
}
"vocab:gamelib/demos/sokoban/resources/Goal.png"
add-to-cells
{
}
1sequence
add-board
;