dim x,y,z

CreatePrim "Cube", "MeshSurface"

x = InputBox ("Please enter the local X value for 'cube':")
y = InputBox ("Please enter the local Y value for 'cube':")
z = InputBox ("Please enter the local Z value for 'cube':")

setvalue "cube.kine.local.posx",x
setvalue "cube.kine.local.posy",y
setvalue "cube.kine.local.posz",z