Handbook
Glossary
load-slabs ( -- slabs )
Vocabulary
papier
Inputs
None
Outputs
slabs
an
object
Definition
USING:
accessors
arrays
kernel
math.vectors.simd
papier.map
papier.sprites
;
IN:
papier
:
load-slabs
( -- slabs )
<sprite>
"backdrop"
>>name
{
"backdrop.png"
}
>>images
0
>>frame
float-4{
0.0 9.0 -2.0 1.0
}
>>center
float-4{
10.0 10.0 1.0 1.0
}
>>size
float-4{
1.0 0.0 0.0 0.0
}
>>orient
float-4{
1.0 1.0 1.0 1.0
}
>>color
{
{
T{
animation-frame
{
duration 1
}
}
}
}
swap
set-up-sprite
dup
update-slab-matrix
<sprite>
"ground"
>>name
{
"ground.png"
}
>>images
0
>>frame
float-4{
0.0 -1.0 0.0 1.0
}
>>center
float-4{
10.0 2.0 2.0 1.0
}
>>size
float-4{
0.7071067690849304 0.7071067690849304 0.0 0.0
}
>>orient
float-4{
1.0 1.0 1.0 1.0
}
>>color
{
{
T{
animation-frame
{
duration 1
}
}
}
}
swap
set-up-sprite
dup
update-slab-matrix
<sprite>
"cat"
>>name
{
"dancing-cat001.png"
"dancing-cat002.png"
"dancing-cat003.png"
"dancing-cat004.png"
"dancing-cat005.png"
"dancing-cat006.png"
"dancing-cat007.png"
"dancing-cat008.png"
"dancing-cat009.png"
"dancing-cat010.png"
"dancing-cat011.png"
"dancing-cat012.png"
}
>>images
0
>>frame
float-4{
3.0 -0.25 -0.10000000149011612 1.0
}
>>center
float-4{
0.75 0.75 1.0 1.0
}
>>size
float-4{
1.0 0.0 0.0 0.0
}
>>orient
float-4{
1.0 1.0 1.0 1.0
}
>>color
{
{
T{
animation-frame
{
duration 2
}
}
T{
animation-frame
{
slab-frame 1
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 2
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 3
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 4
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 5
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 6
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 7
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 8
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 9
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 10
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 11
}
{
duration 2
}
}
}
}
swap
set-up-sprite
dup
update-slab-matrix
<sprite>
"marco"
>>name
{
"marco-still001.png"
"marco-walk001.png"
"marco-walk002.png"
"marco-walk003.png"
"marco-walk004.png"
"marco-walk005.png"
"marco-walk006.png"
"marco-walk007.png"
"marco-walk008.png"
"marco-walk009.png"
"marco-walk010.png"
"marco-walk011.png"
"marco-walk012.png"
"marco-walk013.png"
"marco-walk014.png"
}
>>images
0
>>frame
float-4{
-3.0 0.0 0.0 1.0
}
>>center
float-4{
0.75 1.0 1.0 1.0
}
>>size
float-4{
1.0 0.0 0.0 0.0
}
>>orient
float-4{
1.0 1.0 1.0 1.0
}
>>color
{
{
T{
animation-frame
{
duration 1
}
}
}
{
T{
animation-frame
{
slab-frame 3
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 4
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 5
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 6
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 7
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 8
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 9
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 10
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 11
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 12
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 13
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 14
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 1
}
{
duration 2
}
}
T{
animation-frame
{
slab-frame 2
}
{
duration 2
}
}
}
}
swap
set-up-sprite
dup
update-slab-matrix
4array
;