set showscript 1000 load gold.cif {3 3 3};spacefill 1.45;moveto /* time, axisAngle */ 1.0 { -691 507 -515 173.7} /* zoom, translation */ 132.8 0.4 33.4 /* center, rotationRadius */ {6.1178994 6.1179 5.09825} 11.7; display within(4.0,atomno=68) select within(hkl,{1/4,1/4,1/4});color red; select within(hkl,{1/3,1/3,1/3});color translucent gold; select within(hkl,{1/2,1/2,1/2});color white; set showscript 0