Made this last summer for someone.
make_cube(1, 100)
texture_cube(1,2,7)
texture_cube(1,3,13)
texture_cube(1,5,2)
function make_cube(obj, size#)
make object plain obj, size#, size#
size# = size#/2
make mesh from object 1, obj
offset limb obj, 0, 0, 0,-size#
add limb obj,1,1
add limb obj,2,1
add limb obj,3,1
add limb obj,4,1
add limb obj,5,1
offset limb obj, 1, 0, size#, 0
rotate limb obj, 1, 90, 0, 0
offset limb obj, 2, 0, 0, size#
rotate limb obj, 2, 0, 180, 0
offset limb obj, 3, 0, -size#, 0
rotate limb obj, 3, 270, 0, 0
offset limb obj, 4, -size#, 0, 0
rotate limb obj, 4, 0, 270, 0
offset limb obj, 5, size#, 0, 0
rotate limb obj, 5, 0, 90, 0
set object cull obj, 0
endfunction
function texture_cube(obj, side, img)
side = side - 1
texture limb obj, side, img
endfunction
"eureka" - Archimedes