delete $*
box()
select $Box001
UvwRws = uvwmap maptype:4 realWorldMapSize:on utile:1 vtile:1 wtile:1 length:1 width:1 height:1
meshColSmoothMod = SmoothModifier autoSmooth:false preventIndirect:false
convertTo $ mesh
addModifier $ meshColSmoothMod
ResetXForm $
maxOps.CollapseNodeTo $ 1 true
$.pivot = [$.center.x,$.center.y,$.min.z]
addModifier $ UvwRws