#box s1 0 0 0 10 10 10 #pcylinder s2 2 5 #ttranslate s2 10 10 0 #trotate s1 s2 0 0 0 0 0 1 -10 #fuse s s1 s2 #save s E5678.draw restore [locate_data_file CFI_e5678fil.rle] s tscale s 0 0 0 SCALE1 explode s e blend result s 0.5*SCALE1 s_4 set square 64521.3