Little sample:
`---load animation sequences---------------
anim1=ANIMSEQ LOAD("run.mob")
anim2=ANIMSEQ LOAD("walk.mob")
anim3=ANIMSEQ LOAD("idle.mob")
obj=1
load object "man.x",obj
`---create animation controller------------
acon1=ANIMCON CREATE(obj)
ANIMCON TIMER INIT acon1,1
`---setup layers---------------------------
ANIMCON SELECT LAYER acon1,0
ANIMCONL SET ANIMATION anim1,0
ANIMCONL USE ALL LIMBS
ANIMCONL SET FRAME RANGE 0,40
ANIMCONL SET PLAY SPEED 10
ANIMCON SELECT LAYER acon1,1
ANIMCONL SET ANIMATION anim2,0
ANIMCONL USE ALL LIMBS
ANIMCONL SET FRAME RANGE 0,40
ANIMCONL SET PLAY SPEED 10
ANIMCONL SET LAYER SCALE 0
`---main loop------------------------------
do
if inkey$()="a"
ANIMCON SELECT LAYER acon1,0
`---simple transition-------------------
ANIMCONL TRANSIT TO ANIMATION anim3,1,2 `---(to animation,to frame,time)----
endif
if inkey$()="s"
`---transition by using layers scaling---------------
ANIMCON SET LAYER SCALE acon1,0,1 `---(controller,layer,scale)----
ANIMCON SET LAYER TRANSITION acon1,0,0,1 `---(controller,layer,to scale,time)----
ANIMCON SET LAYER SCALE acon1,1,0`---(controller,layer,scale)----
ANIMCON SET LAYER TRANSITION acon1,1,1,1`---(controller,layer,to value,time)----
endif
`---update animation--------------------
ANIMCON ALL TIMER STEP
loop
