55 lines
1.0 KiB
C++
55 lines
1.0 KiB
C++
/* This demonstrates "interpolation"
|
|
which is generating frames between
|
|
frames. For interpolation to work,
|
|
your CSprite must not be bitmaps and
|
|
must be identical, except shifted
|
|
around. Cut and paste and use
|
|
"shift points."
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
$SP,"<1>",1$
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
$SP,"<2>",2$
|
|
|
|
|
|
|
|
|
|
F64 t0;
|
|
|
|
U0 DrawIt(CTask *task,CDC *dc)
|
|
{
|
|
U8 *inter;
|
|
|
|
if (tP(task)-t0<1.0) {
|
|
inter=CSpriteInterpolate($IB,"<1>",1$,$IB,"<2>",2$,(tP(task)-t0)%1.0);
|
|
CSpritePlot3(dc,100,100,0,inter);
|
|
Free(inter);
|
|
} else
|
|
CSpritePlot3(dc,100,100,0,$IB,"<1>",1$);
|
|
}
|
|
|
|
U0 Golf()
|
|
{
|
|
SettingsPush; //See $LK,"SettingsPush","MN:SettingsPush"$
|
|
Fs->draw_it=&DrawIt;
|
|
|
|
DocClear;
|
|
do t0=tP;
|
|
while (PressAKey);
|
|
SettingsPop;
|
|
}
|
|
|
|
Golf;
|
|
¨ 6 > þÿÿÿ> þÿÿÿD > üÿÿÿF èÿÿÿ> úÿÿÿ: æÿÿÿB âÿÿÿ@ âÿÿÿ@ âÿÿÿD ÚÿÿÿD æÿÿÿD 8 âÿÿÿ@ þÿÿÿ B úÿÿÿB ¨ 6 > þÿÿÿ> þÿÿÿB > üÿÿÿF èÿÿÿ8 üÿÿÿ: æÿÿÿB âÿÿÿ@ âÿÿÿ@ âÿÿÿD ÚÿÿÿD æÿÿÿ8 üÿÿÿ8 âÿÿÿ@ þÿÿÿ 6 úÿÿÿ( |