board-two ( gadget -- gadget )


Vocabulary
gamelib.demos.sokoban.layouts

Inputs
gadgetan object


Outputs
gadgetan object


Definition


: board-two ( gadget -- gadget )
22 11 make-board { 11 8 } player add-to-cell {
{ 4 0 }
{ 5 0 }
{ 6 0 }
{ 7 0 }
{ 8 0 }
{ 4 1 }
{ 8 1 }
{ 4 2 }
{ 8 2 }
{ 2 3 }
{ 3 3 }
{ 4 3 }
{ 8 3 }
{ 9 3 }
{ 10 3 }
{ 2 4 }
{ 10 4 }
{ 0 5 }
{ 1 5 }
{ 2 5 }
{ 4 5 }
{ 6 5 }
{ 7 5 }
{ 8 5 }
{ 10 5 }
{ 16 5 }
{ 17 5 }
{ 18 5 }
{ 19 5 }
{ 20 5 }
{ 21 5 }
{ 0 6 }
{ 4 6 }
{ 6 6 }
{ 7 6 }
{ 8 6 }
{ 10 6 }
{ 11 6 }
{ 12 6 }
{ 13 6 }
{ 14 6 }
{ 15 6 }
{ 16 6 }
{ 21 6 }
{ 0 7 }
{ 21 7 }
{ 0 8 }
{ 1 8 }
{ 2 8 }
{ 3 8 }
{ 4 8 }
{ 6 8 }
{ 7 8 }
{ 8 8 }
{ 10 8 }
{ 12 8 }
{ 13 8 }
{ 14 8 }
{ 15 8 }
{ 16 8 }
{ 21 8 }
{ 4 9 }
{ 10 9 }
{ 11 9 }
{ 12 9 }
{ 16 9 }
{ 17 9 }
{ 18 9 }
{ 19 9 }
{ 20 9 }
{ 21 9 }
{ 4 10 }
{ 5 10 }
{ 6 10 }
{ 7 10 }
{ 8 10 }
{ 9 10 }
{ 10 10 }
} "vocab:gamelib/demos/sokoban/resources/Wall_Brown.png"
add-to-cells
{ { 19 6 } { 20 6 } { 19 7 } { 20 7 } { 19 8 } { 20 8 } }
"vocab:gamelib/demos/sokoban/resources/Goal.png"
add-to-cells
{ { 5 2 } { 7 3 } { 5 4 } { 8 4 } { 5 7 } { 2 7 } }
"vocab:gamelib/demos/sokoban/resources/Crate_Yellow.png"
make-crate add-copy-to-cells { } 1sequence add-board ;