Here's a simple example of deforming a sphere. Credits go to empty.
make object sphere 1,10,8,8
make object sphere 2,10,8,8
hide object 2
sync on
sync rate 10
rem get the vertex count
lock vertexdata for limb 1,0
maxvertex = get vertexdata vertex count()
unlock vertexdata
repeat
for i = 0 to maxvertex-1
lock vertexdata for limb 2,0
rem get the vertex position and add random values
x# = get vertexdata position x(i) + rnd(10) / 30.0
y# = get vertexdata position y(i) + rnd(10) / 30.0
z# = get vertexdata position z(i) + rnd(10) / 30.0
unlock vertexdata
rem lock the vertexdata for visible object
lock vertexdata for limb 1,0
rem and set the new vertex positions
set vertexdata position i, x#, y#, z#
unlock vertexdata
next i
Text 10,10,"Deforming a sphere..."
sync
until spacekey()
You may be able to find more help on this thread:
http://forum.thegamecreators.com/?m=forum_view&t=167912&b=1
TheComet